liquid_feedback_frontend
view model/member.lua @ 281:b77e6a17ca77
Check unit voting right where neccessary, hide action buttons for units without voting right
| author | bsw |
|---|---|
| date | Thu Feb 16 15:01:49 2012 +0100 (2012-02-16) |
| parents | 23c98752e697 |
| children | c587d8762e62 |
line source
1 Member = mondelefant.new_class()
2 Member.table = 'member'
4 Member:add_reference{
5 mode = "1m",
6 to = "MemberHistory",
7 this_key = 'id',
8 that_key = 'member_id',
9 ref = 'history_entries',
10 back_ref = 'member'
11 }
13 Member:add_reference{
14 mode = '1m',
15 to = "MemberImage",
16 this_key = 'id',
17 that_key = 'member_id',
18 ref = 'images',
19 back_ref = 'member'
20 }
22 Member:add_reference{
23 mode = '1m',
24 to = "Contact",
25 this_key = 'id',
26 that_key = 'member_id',
27 ref = 'contacts',
28 back_ref = 'member',
29 default_order = '"other_member_id"'
30 }
32 Member:add_reference{
33 mode = '1m',
34 to = "Contact",
35 this_key = 'id',
36 that_key = 'member_id',
37 ref = 'foreign_contacts',
38 back_ref = 'other_member',
39 default_order = '"member_id"'
40 }
42 Member:add_reference{
43 mode = '1m',
44 to = "Session",
45 this_key = 'id',
46 that_key = 'member_id',
47 ref = 'sessions',
48 back_ref = 'member',
49 default_order = '"ident"'
50 }
52 Member:add_reference{
53 mode = '1m',
54 to = "Draft",
55 this_key = 'id',
56 that_key = 'author_id',
57 ref = 'drafts',
58 back_ref = 'author',
59 default_order = '"id"'
60 }
62 Member:add_reference{
63 mode = '1m',
64 to = "Suggestion",
65 this_key = 'id',
66 that_key = 'author_id',
67 ref = 'suggestions',
68 back_ref = 'author',
69 default_order = '"id"'
70 }
72 Member:add_reference{
73 mode = '1m',
74 to = "Membership",
75 this_key = 'id',
76 that_key = 'member_id',
77 ref = 'memberships',
78 back_ref = 'member',
79 default_order = '"area_id"'
80 }
82 Member:add_reference{
83 mode = '1m',
84 to = "Interest",
85 this_key = 'id',
86 that_key = 'member_id',
87 ref = 'interests',
88 back_ref = 'member',
89 default_order = '"id"'
90 }
92 Member:add_reference{
93 mode = '1m',
94 to = "Initiator",
95 this_key = 'id',
96 that_key = 'member_id',
97 ref = 'initiators',
98 back_ref = 'member'
99 }
101 Member:add_reference{
102 mode = '1m',
103 to = "Supporter",
104 this_key = 'id',
105 that_key = 'member_id',
106 ref = 'supporters',
107 back_ref = 'member'
108 }
110 Member:add_reference{
111 mode = '1m',
112 to = "Opinion",
113 this_key = 'id',
114 that_key = 'member_id',
115 ref = 'opinions',
116 back_ref = 'member',
117 default_order = '"id"'
118 }
120 Member:add_reference{
121 mode = '1m',
122 to = "Delegation",
123 this_key = 'id',
124 that_key = 'truster_id',
125 ref = 'outgoing_delegations',
126 back_ref = 'truster',
127 default_order = '"id"'
128 }
130 Member:add_reference{
131 mode = '1m',
132 to = "Delegation",
133 this_key = 'id',
134 that_key = 'trustee_id',
135 ref = 'incoming_delegations',
136 back_ref = 'trustee',
137 default_order = '"id"'
138 }
140 Member:add_reference{
141 mode = '1m',
142 to = "DirectVoter",
143 this_key = 'id',
144 that_key = 'member_id',
145 ref = 'direct_voter',
146 back_ref = 'member',
147 default_order = '"issue_id"'
148 }
150 Member:add_reference{
151 mode = '1m',
152 to = "Vote",
153 this_key = 'id',
154 that_key = 'member_id',
155 ref = 'vote',
156 back_ref = 'member',
157 default_order = '"issue_id", "initiative_id"'
158 }
160 Member:add_reference{
161 mode = 'mm',
162 to = "Member",
163 this_key = 'id',
164 that_key = 'id',
165 connected_by_table = 'contact',
166 connected_by_this_key = 'member_id',
167 connected_by_that_key = 'other_member_id',
168 ref = 'saved_members',
169 }
171 Member:add_reference{
172 mode = 'mm',
173 to = "Member",
174 this_key = 'id',
175 that_key = 'id',
176 connected_by_table = 'contact',
177 connected_by_this_key = 'other_member_id',
178 connected_by_that_key = 'member_id',
179 ref = 'saved_by_members',
180 }
182 Member:add_reference{
183 mode = 'mm',
184 to = "Unit",
185 this_key = 'id',
186 that_key = 'id',
187 connected_by_table = 'privilege',
188 connected_by_this_key = 'member_id',
189 connected_by_that_key = 'unit_id',
190 ref = 'units'
191 }
193 Member:add_reference{
194 mode = 'mm',
195 to = "Area",
196 this_key = 'id',
197 that_key = 'id',
198 connected_by_table = 'membership',
199 connected_by_this_key = 'member_id',
200 connected_by_that_key = 'area_id',
201 ref = 'areas'
202 }
204 Member:add_reference{
205 mode = 'mm',
206 to = "Issue",
207 this_key = 'id',
208 that_key = 'id',
209 connected_by_table = 'interest',
210 connected_by_this_key = 'member_id',
211 connected_by_that_key = 'issue_id',
212 ref = 'issues'
213 }
215 Member:add_reference{
216 mode = 'mm',
217 to = "Initiative",
218 this_key = 'id',
219 that_key = 'id',
220 connected_by_table = 'initiator',
221 connected_by_this_key = 'member_id',
222 connected_by_that_key = 'initiative_id',
223 ref = 'initiated_initiatives'
224 }
226 Member:add_reference{
227 mode = 'mm',
228 to = "Initiative",
229 this_key = 'id',
230 that_key = 'id',
231 connected_by_table = 'supporter',
232 connected_by_this_key = 'member_id',
233 connected_by_that_key = 'initiative_id',
234 ref = 'supported_initiatives'
235 }
237 model.has_rendered_content(Member, RenderedMemberStatement, "statement")
239 Member:new_selector()
240 :add_order_by("member.name")
241 :exec()
243 function Member:build_selector(args)
244 local selector = self:new_selector()
245 if args.active ~= nil then
246 selector:add_where{ "member.active = ?", args.active }
247 end
248 if args.is_contact_of_member_id then
249 selector:join("contact", "__model_member__contact", "member.id = __model_member__contact.other_member_id")
250 selector:add_where{ "__model_member__contact.member_id = ?", args.is_contact_of_member_id }
251 end
252 if args.order then
253 if args.order == "id" then
254 selector:add_order_by("id")
255 elseif args.order == "login" then
256 selector:add_order_by("login")
257 elseif args.order == "name" then
258 selector:add_order_by("name")
259 else
260 error("invalid order")
261 end
262 end
263 return selector
264 end
266 function Member.object:set_password(password)
267 local hash = os.crypt(
268 password,
269 "$1$" .. multirand.string(
270 8,
271 "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz./"
272 )
273 )
274 assert(hash, "os.crypt failed")
275 self.password = hash
276 end
278 function Member.object:check_password(password)
279 if type(password) == "string" and type(self.password) == "string" then
280 return os.crypt(password, self.password) == self.password
281 else
282 return false
283 end
284 end
286 function Member.object_get:published_contacts()
287 return Member:new_selector()
288 :join('"contact"', nil, '"contact"."other_member_id" = "member"."id"')
289 :add_where{ '"contact"."member_id" = ?', self.id }
290 :add_where("public")
291 :exec()
292 end
294 function Member:by_login_and_password(login, password)
295 local selector = self:new_selector()
296 selector:add_where{'"login" = ?', login }
297 selector:add_where('NOT "locked"')
298 selector:optional_object_mode()
299 local member = selector:exec()
300 if member and member:check_password(password) then
301 return member
302 else
303 return nil
304 end
305 end
307 function Member:by_login(login)
308 local selector = self:new_selector()
309 selector:add_where{'"login" = ?', login }
310 selector:optional_object_mode()
311 return selector:exec()
312 end
314 function Member:by_name(name)
315 local selector = self:new_selector()
316 selector:add_where{'"name" = ?', name }
317 selector:optional_object_mode()
318 return selector:exec()
319 end
321 function Member:get_search_selector(search_string)
322 return self:new_selector()
323 :add_field( {'"highlight"("member"."name", ?)', search_string }, "name_highlighted")
324 :add_where{ '"member"."text_search_data" @@ "text_search_query"(?)', search_string }
325 :add_where("active")
326 end
328 function Member.object:set_notify_email(notify_email)
329 trace.disable()
330 local expiry = db:query("SELECT now() + '7 days'::interval as expiry", "object").expiry
331 self.notify_email_unconfirmed = notify_email
332 self.notify_email_secret = multirand.string( 24, "23456789ABCDEFGHJKLMNPQRSTUVWXYZabcdefghijkmnopqrstuvwxyz" )
333 self.notify_email_secret_expiry = expiry
334 local content = slot.use_temporary(function()
335 slot.put(_"Hello " .. self.name .. ",\n\n")
336 slot.put(_"Please confirm your email address by clicking the following link:\n\n")
337 slot.put(config.absolute_base_url .. "index/confirm_notify_email.html?secret=" .. self.notify_email_secret .. "\n\n")
338 slot.put(_"If this link is not working, please open following url in your web browser:\n\n")
339 slot.put(config.absolute_base_url .. "index/confirm_notify_email.html\n\n")
340 slot.put(_"On that page please enter the confirmation code:\n\n")
341 slot.put(self.notify_email_secret .. "\n\n")
342 end)
343 local success = net.send_mail{
344 envelope_from = config.mail_envelope_from,
345 from = config.mail_from,
346 reply_to = config.mail_reply_to,
347 to = self.notify_email_unconfirmed,
348 subject = config.mail_subject_prefix .. _"Email confirmation request",
349 content_type = "text/plain; charset=UTF-8",
350 content = content
351 }
352 if success then
353 local lock_expiry = db:query("SELECT now() + '1 hour'::interval AS lock_expiry", "object").lock_expiry
354 self.notify_email_lock_expiry = lock_expiry
355 end
356 self:save()
357 return success
358 end
360 function Member.object:get_setting(key)
361 return Setting:by_pk(self.id, key)
362 end
364 function Member.object:get_setting_value(key)
365 local setting = Setting:by_pk(self.id, key)
366 if setting then
367 return setting.value
368 end
369 end
371 function Member.object:set_setting(key, value)
372 local setting = self:get_setting(key)
373 if not setting then
374 setting = Setting:new()
375 setting.member_id = self.id
376 setting.key = key
377 end
378 setting.value = value
379 setting:save()
380 end
382 function Member.object:get_setting_maps_by_key(key)
383 return SettingMap:new_selector()
384 :add_where{ "member_id = ?", self.id }
385 :add_where{ "key = ?", key }
386 :add_order_by("subkey")
387 :exec()
388 end
390 function Member.object:get_setting_map_by_key_and_subkey(key, subkey)
391 return SettingMap:new_selector()
392 :add_where{ "member_id = ?", self.id }
393 :add_where{ "key = ?", key }
394 :add_where{ "subkey = ?", subkey }
395 :add_order_by("subkey")
396 :optional_object_mode()
397 :exec()
398 end
400 function Member.object:set_setting_map(key, subkey, value)
401 setting_map = self:get_setting_map_by_key_and_subkey(key, subkey)
402 if not setting_map then
403 setting_map = SettingMap:new()
404 setting_map.member_id = self.id
405 setting_map.key = key
406 setting_map.subkey = subkey
407 end
408 setting_map.value = value
409 setting_map:save()
410 end
412 function Member.object_get:notify_email_locked()
413 return(
414 Member:new_selector()
415 :add_where{ "id = ?", app.session.member.id }
416 :add_where("notify_email_lock_expiry > now()")
417 :count() == 1
418 )
419 end
421 function Member.object_get:units_with_voting_right()
422 return(Unit:new_selector()
423 :join("privilege", nil, { "privilege.unit_id = unit.id AND privilege.member_id = ? AND privilege.voting_right", self.id })
424 :exec()
425 )
426 end
428 function Member.object:ui_field_text(args)
429 args = args or {}
430 if app.session.member_id or config.public_access == "pseudonym" then
431 -- ugly workaround for getting html into a replaced string and to the user
432 ui.container{label = args.label, label_attr={class="ui_field_label"}, content = function()
433 slot.put(string.format('<span><a href="%s">%s</a></span>',
434 encode.url{
435 module = "member",
436 view = "show",
437 id = self.id,
438 },
439 encode.html(self.name)))
440 end
441 }
442 else
443 ui.field.text{ label = args.label, value = _"[not displayed public]" }
444 end
445 end
447 function Member.object:has_voting_right_for_unit_id(unit_id)
448 return (Privilege:new_selector()
449 :add_where{ "member_id = ?", self.id }
450 :add_where{ "unit_id = ?", unit_id }
451 :add_where("voting_right")
452 :optional_object_mode()
453 :for_share()
454 :exec()) and true or false
455 end