| rev | 
   line source | 
| 
bsw/jbe@0
 | 
     1 Member = mondelefant.new_class()
 | 
| 
bsw/jbe@0
 | 
     2 Member.table = 'member'
 | 
| 
bsw/jbe@0
 | 
     3 
 | 
| 
bsw/jbe@0
 | 
     4 Member:add_reference{
 | 
| 
bsw@9
 | 
     5   mode          = "1m",
 | 
| 
bsw@9
 | 
     6   to            = "MemberHistory",
 | 
| 
bsw@9
 | 
     7   this_key      = 'id',
 | 
| 
bsw@9
 | 
     8   that_key      = 'member_id',
 | 
| 
bsw@9
 | 
     9   ref           = 'history_entries',
 | 
| 
bsw@9
 | 
    10   back_ref      = 'member'
 | 
| 
bsw@9
 | 
    11 }
 | 
| 
bsw@9
 | 
    12 
 | 
| 
bsw@9
 | 
    13 Member:add_reference{
 | 
| 
bsw/jbe@4
 | 
    14   mode          = '1m',
 | 
| 
bsw@2
 | 
    15   to            = "MemberImage",
 | 
| 
bsw@2
 | 
    16   this_key      = 'id',
 | 
| 
bsw@2
 | 
    17   that_key      = 'member_id',
 | 
| 
bsw/jbe@4
 | 
    18   ref           = 'images',
 | 
| 
bsw@2
 | 
    19   back_ref      = 'member'
 | 
| 
bsw@2
 | 
    20 }
 | 
| 
bsw@2
 | 
    21 
 | 
| 
bsw@2
 | 
    22 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
    23   mode          = '1m',
 | 
| 
bsw/jbe@0
 | 
    24   to            = "Contact",
 | 
| 
bsw/jbe@0
 | 
    25   this_key      = 'id',
 | 
| 
bsw/jbe@0
 | 
    26   that_key      = 'member_id',
 | 
| 
bsw/jbe@0
 | 
    27   ref           = 'contacts',
 | 
| 
bsw/jbe@0
 | 
    28   back_ref      = 'member',
 | 
| 
bsw/jbe@0
 | 
    29   default_order = '"other_member_id"'
 | 
| 
bsw/jbe@0
 | 
    30 }
 | 
| 
bsw/jbe@0
 | 
    31 
 | 
| 
bsw/jbe@0
 | 
    32 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
    33   mode          = '1m',
 | 
| 
bsw/jbe@0
 | 
    34   to            = "Contact",
 | 
| 
bsw/jbe@0
 | 
    35   this_key      = 'id',
 | 
| 
bsw/jbe@0
 | 
    36   that_key      = 'member_id',
 | 
| 
bsw/jbe@0
 | 
    37   ref           = 'foreign_contacts',
 | 
| 
bsw/jbe@0
 | 
    38   back_ref      = 'other_member',
 | 
| 
bsw/jbe@0
 | 
    39   default_order = '"member_id"'
 | 
| 
bsw/jbe@0
 | 
    40 }
 | 
| 
bsw/jbe@0
 | 
    41 
 | 
| 
bsw/jbe@0
 | 
    42 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
    43   mode          = '1m',
 | 
| 
bsw/jbe@0
 | 
    44   to            = "Session",
 | 
| 
bsw/jbe@0
 | 
    45   this_key      = 'id',
 | 
| 
bsw/jbe@0
 | 
    46   that_key      = 'member_id',
 | 
| 
bsw/jbe@0
 | 
    47   ref           = 'sessions',
 | 
| 
bsw/jbe@0
 | 
    48   back_ref      = 'member',
 | 
| 
bsw/jbe@0
 | 
    49   default_order = '"ident"'
 | 
| 
bsw/jbe@0
 | 
    50 }
 | 
| 
bsw/jbe@0
 | 
    51 
 | 
| 
bsw/jbe@0
 | 
    52 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
    53   mode          = '1m',
 | 
| 
bsw/jbe@0
 | 
    54   to            = "Draft",
 | 
| 
bsw/jbe@0
 | 
    55   this_key      = 'id',
 | 
| 
bsw/jbe@0
 | 
    56   that_key      = 'author_id',
 | 
| 
bsw/jbe@0
 | 
    57   ref           = 'drafts',
 | 
| 
bsw/jbe@0
 | 
    58   back_ref      = 'author',
 | 
| 
bsw/jbe@0
 | 
    59   default_order = '"id"'
 | 
| 
bsw/jbe@0
 | 
    60 }
 | 
| 
bsw/jbe@0
 | 
    61 
 | 
| 
bsw/jbe@0
 | 
    62 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
    63   mode          = '1m',
 | 
| 
bsw/jbe@0
 | 
    64   to            = "Suggestion",
 | 
| 
bsw/jbe@0
 | 
    65   this_key      = 'id',
 | 
| 
bsw/jbe@0
 | 
    66   that_key      = 'author_id',
 | 
| 
bsw/jbe@0
 | 
    67   ref           = 'suggestions',
 | 
| 
bsw/jbe@0
 | 
    68   back_ref      = 'author',
 | 
| 
bsw/jbe@0
 | 
    69   default_order = '"id"'
 | 
| 
bsw/jbe@0
 | 
    70 }
 | 
| 
bsw/jbe@0
 | 
    71 
 | 
| 
bsw/jbe@0
 | 
    72 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
    73   mode          = '1m',
 | 
| 
bsw/jbe@0
 | 
    74   to            = "Membership",
 | 
| 
bsw/jbe@0
 | 
    75   this_key      = 'id',
 | 
| 
bsw/jbe@0
 | 
    76   that_key      = 'member_id',
 | 
| 
bsw/jbe@0
 | 
    77   ref           = 'memberships',
 | 
| 
bsw/jbe@0
 | 
    78   back_ref      = 'member',
 | 
| 
bsw/jbe@0
 | 
    79   default_order = '"area_id"'
 | 
| 
bsw/jbe@0
 | 
    80 }
 | 
| 
bsw/jbe@0
 | 
    81 
 | 
| 
bsw/jbe@0
 | 
    82 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
    83   mode          = '1m',
 | 
| 
bsw/jbe@0
 | 
    84   to            = "Interest",
 | 
| 
bsw/jbe@0
 | 
    85   this_key      = 'id',
 | 
| 
bsw/jbe@0
 | 
    86   that_key      = 'member_id',
 | 
| 
bsw/jbe@0
 | 
    87   ref           = 'interests',
 | 
| 
bsw/jbe@0
 | 
    88   back_ref      = 'member',
 | 
| 
bsw/jbe@0
 | 
    89   default_order = '"id"'
 | 
| 
bsw/jbe@0
 | 
    90 }
 | 
| 
bsw/jbe@0
 | 
    91 
 | 
| 
bsw/jbe@0
 | 
    92 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
    93   mode          = '1m',
 | 
| 
bsw/jbe@0
 | 
    94   to            = "Initiator",
 | 
| 
bsw/jbe@0
 | 
    95   this_key      = 'id',
 | 
| 
bsw/jbe@0
 | 
    96   that_key      = 'member_id',
 | 
| 
bsw/jbe@0
 | 
    97   ref           = 'initiators',
 | 
| 
bsw@10
 | 
    98   back_ref      = 'member'
 | 
| 
bsw/jbe@0
 | 
    99 }
 | 
| 
bsw/jbe@0
 | 
   100 
 | 
| 
bsw/jbe@0
 | 
   101 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
   102   mode          = '1m',
 | 
| 
bsw/jbe@0
 | 
   103   to            = "Supporter",
 | 
| 
bsw/jbe@0
 | 
   104   this_key      = 'id',
 | 
| 
bsw/jbe@0
 | 
   105   that_key      = 'member_id',
 | 
| 
bsw/jbe@0
 | 
   106   ref           = 'supporters',
 | 
| 
bsw@2
 | 
   107   back_ref      = 'member'
 | 
| 
bsw/jbe@0
 | 
   108 }
 | 
| 
bsw/jbe@0
 | 
   109 
 | 
| 
bsw/jbe@0
 | 
   110 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
   111   mode          = '1m',
 | 
| 
bsw/jbe@0
 | 
   112   to            = "Opinion",
 | 
| 
bsw/jbe@0
 | 
   113   this_key      = 'id',
 | 
| 
bsw/jbe@0
 | 
   114   that_key      = 'member_id',
 | 
| 
bsw/jbe@0
 | 
   115   ref           = 'opinions',
 | 
| 
bsw/jbe@0
 | 
   116   back_ref      = 'member',
 | 
| 
bsw/jbe@0
 | 
   117   default_order = '"id"'
 | 
| 
bsw/jbe@0
 | 
   118 }
 | 
| 
bsw/jbe@0
 | 
   119 
 | 
| 
bsw/jbe@0
 | 
   120 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
   121   mode          = '1m',
 | 
| 
bsw/jbe@0
 | 
   122   to            = "Delegation",
 | 
| 
bsw/jbe@0
 | 
   123   this_key      = 'id',
 | 
| 
bsw/jbe@0
 | 
   124   that_key      = 'truster_id',
 | 
| 
bsw/jbe@0
 | 
   125   ref           = 'outgoing_delegations',
 | 
| 
bsw/jbe@0
 | 
   126   back_ref      = 'truster',
 | 
| 
bsw/jbe@0
 | 
   127   default_order = '"id"'
 | 
| 
bsw/jbe@0
 | 
   128 }
 | 
| 
bsw/jbe@0
 | 
   129 
 | 
| 
bsw/jbe@0
 | 
   130 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
   131   mode          = '1m',
 | 
| 
bsw/jbe@0
 | 
   132   to            = "Delegation",
 | 
| 
bsw/jbe@0
 | 
   133   this_key      = 'id',
 | 
| 
bsw/jbe@0
 | 
   134   that_key      = 'trustee_id',
 | 
| 
bsw/jbe@0
 | 
   135   ref           = 'incoming_delegations',
 | 
| 
bsw/jbe@0
 | 
   136   back_ref      = 'trustee',
 | 
| 
bsw/jbe@0
 | 
   137   default_order = '"id"'
 | 
| 
bsw/jbe@0
 | 
   138 }
 | 
| 
bsw/jbe@0
 | 
   139 
 | 
| 
bsw/jbe@0
 | 
   140 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
   141   mode          = '1m',
 | 
| 
bsw/jbe@0
 | 
   142   to            = "DirectVoter",
 | 
| 
bsw/jbe@0
 | 
   143   this_key      = 'id',
 | 
| 
bsw/jbe@0
 | 
   144   that_key      = 'member_id',
 | 
| 
bsw/jbe@0
 | 
   145   ref           = 'direct_voter',
 | 
| 
bsw/jbe@0
 | 
   146   back_ref      = 'member',
 | 
| 
bsw/jbe@0
 | 
   147   default_order = '"issue_id"'
 | 
| 
bsw/jbe@0
 | 
   148 }
 | 
| 
bsw/jbe@0
 | 
   149 
 | 
| 
bsw/jbe@0
 | 
   150 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
   151   mode          = '1m',
 | 
| 
bsw/jbe@0
 | 
   152   to            = "Vote",
 | 
| 
bsw/jbe@0
 | 
   153   this_key      = 'id',
 | 
| 
bsw/jbe@0
 | 
   154   that_key      = 'member_id',
 | 
| 
bsw/jbe@0
 | 
   155   ref           = 'vote',
 | 
| 
bsw/jbe@0
 | 
   156   back_ref      = 'member',
 | 
| 
bsw/jbe@0
 | 
   157   default_order = '"issue_id", "initiative_id"'
 | 
| 
bsw/jbe@0
 | 
   158 }
 | 
| 
bsw/jbe@0
 | 
   159 
 | 
| 
bsw/jbe@0
 | 
   160 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
   161   mode                  = 'mm',
 | 
| 
bsw/jbe@0
 | 
   162   to                    = "Member",
 | 
| 
bsw/jbe@0
 | 
   163   this_key              = 'id',
 | 
| 
bsw/jbe@0
 | 
   164   that_key              = 'id',
 | 
| 
bsw/jbe@0
 | 
   165   connected_by_table    = 'contact',
 | 
| 
bsw/jbe@0
 | 
   166   connected_by_this_key = 'member_id',
 | 
| 
bsw/jbe@0
 | 
   167   connected_by_that_key = 'other_member_id',
 | 
| 
bsw/jbe@0
 | 
   168   ref                   = 'saved_members',
 | 
| 
bsw/jbe@0
 | 
   169 }
 | 
| 
bsw/jbe@0
 | 
   170 
 | 
| 
bsw/jbe@0
 | 
   171 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
   172   mode                  = 'mm',
 | 
| 
bsw/jbe@0
 | 
   173   to                    = "Member",
 | 
| 
bsw/jbe@0
 | 
   174   this_key              = 'id',
 | 
| 
bsw/jbe@0
 | 
   175   that_key              = 'id',
 | 
| 
bsw/jbe@0
 | 
   176   connected_by_table    = 'contact',
 | 
| 
bsw/jbe@0
 | 
   177   connected_by_this_key = 'other_member_id',
 | 
| 
bsw/jbe@0
 | 
   178   connected_by_that_key = 'member_id',
 | 
| 
bsw/jbe@0
 | 
   179   ref                   = 'saved_by_members',
 | 
| 
bsw/jbe@0
 | 
   180 }
 | 
| 
bsw/jbe@0
 | 
   181 
 | 
| 
bsw/jbe@0
 | 
   182 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
   183   mode                  = 'mm',
 | 
| 
bsw@281
 | 
   184   to                    = "Unit",
 | 
| 
bsw@281
 | 
   185   this_key              = 'id',
 | 
| 
bsw@281
 | 
   186   that_key              = 'id',
 | 
| 
bsw@281
 | 
   187   connected_by_table    = 'privilege',
 | 
| 
bsw@281
 | 
   188   connected_by_this_key = 'member_id',
 | 
| 
bsw@281
 | 
   189   connected_by_that_key = 'unit_id',
 | 
| 
bsw@281
 | 
   190   ref                   = 'units'
 | 
| 
bsw@281
 | 
   191 }
 | 
| 
bsw@281
 | 
   192 
 | 
| 
bsw@281
 | 
   193 Member:add_reference{
 | 
| 
bsw@281
 | 
   194   mode                  = 'mm',
 | 
| 
bsw/jbe@0
 | 
   195   to                    = "Area",
 | 
| 
bsw/jbe@0
 | 
   196   this_key              = 'id',
 | 
| 
bsw/jbe@0
 | 
   197   that_key              = 'id',
 | 
| 
bsw/jbe@0
 | 
   198   connected_by_table    = 'membership',
 | 
| 
bsw/jbe@0
 | 
   199   connected_by_this_key = 'member_id',
 | 
| 
bsw/jbe@0
 | 
   200   connected_by_that_key = 'area_id',
 | 
| 
bsw/jbe@0
 | 
   201   ref                   = 'areas'
 | 
| 
bsw/jbe@0
 | 
   202 }
 | 
| 
bsw/jbe@0
 | 
   203 
 | 
| 
bsw/jbe@0
 | 
   204 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
   205   mode                  = 'mm',
 | 
| 
bsw/jbe@0
 | 
   206   to                    = "Issue",
 | 
| 
bsw/jbe@0
 | 
   207   this_key              = 'id',
 | 
| 
bsw/jbe@0
 | 
   208   that_key              = 'id',
 | 
| 
bsw/jbe@0
 | 
   209   connected_by_table    = 'interest',
 | 
| 
bsw/jbe@0
 | 
   210   connected_by_this_key = 'member_id',
 | 
| 
bsw/jbe@0
 | 
   211   connected_by_that_key = 'issue_id',
 | 
| 
bsw/jbe@0
 | 
   212   ref                   = 'issues'
 | 
| 
bsw/jbe@0
 | 
   213 }
 | 
| 
bsw/jbe@0
 | 
   214 
 | 
| 
bsw/jbe@0
 | 
   215 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
   216   mode                  = 'mm',
 | 
| 
bsw/jbe@0
 | 
   217   to                    = "Initiative",
 | 
| 
bsw/jbe@0
 | 
   218   this_key              = 'id',
 | 
| 
bsw/jbe@0
 | 
   219   that_key              = 'id',
 | 
| 
bsw/jbe@0
 | 
   220   connected_by_table    = 'initiator',
 | 
| 
bsw/jbe@0
 | 
   221   connected_by_this_key = 'member_id',
 | 
| 
bsw/jbe@0
 | 
   222   connected_by_that_key = 'initiative_id',
 | 
| 
bsw/jbe@0
 | 
   223   ref                   = 'initiated_initiatives'
 | 
| 
bsw/jbe@0
 | 
   224 }
 | 
| 
bsw/jbe@0
 | 
   225 
 | 
| 
bsw/jbe@0
 | 
   226 Member:add_reference{
 | 
| 
bsw/jbe@0
 | 
   227   mode                  = 'mm',
 | 
| 
bsw/jbe@0
 | 
   228   to                    = "Initiative",
 | 
| 
bsw/jbe@0
 | 
   229   this_key              = 'id',
 | 
| 
bsw/jbe@0
 | 
   230   that_key              = 'id',
 | 
| 
bsw/jbe@0
 | 
   231   connected_by_table    = 'supporter',
 | 
| 
bsw/jbe@0
 | 
   232   connected_by_this_key = 'member_id',
 | 
| 
bsw/jbe@0
 | 
   233   connected_by_that_key = 'initiative_id',
 | 
| 
bsw/jbe@0
 | 
   234   ref                   = 'supported_initiatives'
 | 
| 
bsw/jbe@0
 | 
   235 }
 | 
| 
bsw/jbe@0
 | 
   236 
 | 
| 
bsw@279
 | 
   237 model.has_rendered_content(Member, RenderedMemberStatement, "statement")
 | 
| 
bsw@279
 | 
   238 
 | 
| 
bsw@193
 | 
   239 function Member:build_selector(args)
 | 
| 
bsw@193
 | 
   240   local selector = self:new_selector()
 | 
| 
bsw@193
 | 
   241   if args.active ~= nil then
 | 
| 
bsw@193
 | 
   242     selector:add_where{ "member.active = ?", args.active }
 | 
| 
bsw@193
 | 
   243   end
 | 
| 
bsw@581
 | 
   244   if args.locked ~= nil then
 | 
| 
bsw@581
 | 
   245     selector:add_where{ "member.locked = ?", args.locked }
 | 
| 
bsw@581
 | 
   246   end
 | 
| 
bsw@199
 | 
   247   if args.is_contact_of_member_id then
 | 
| 
bsw@199
 | 
   248     selector:join("contact", "__model_member__contact", "member.id = __model_member__contact.other_member_id")
 | 
| 
bsw@199
 | 
   249     selector:add_where{ "__model_member__contact.member_id = ?", args.is_contact_of_member_id }
 | 
| 
bsw@199
 | 
   250   end
 | 
| 
bsw@297
 | 
   251   if args.voting_right_for_unit_id then
 | 
| 
bsw@299
 | 
   252     selector:join("privilege", "__model_member__privilege", { "member.id = __model_member__privilege.member_id AND __model_member__privilege.voting_right AND __model_member__privilege.unit_id = ?", args.voting_right_for_unit_id })
 | 
| 
bsw@297
 | 
   253   end
 | 
| 
bsw@581
 | 
   254   if args.admin_search then
 | 
| 
bsw@581
 | 
   255     local search_string = "%" .. args.admin_search .. "%"
 | 
| 
bsw@581
 | 
   256     selector:add_where{ "member.identification ILIKE ? OR member.name ILIKE ?", search_string, search_string }
 | 
| 
bsw@581
 | 
   257   end
 | 
| 
bsw@193
 | 
   258   if args.order then
 | 
| 
bsw@193
 | 
   259     if args.order == "id" then
 | 
| 
bsw@193
 | 
   260       selector:add_order_by("id")
 | 
| 
bsw@581
 | 
   261     elseif args.order == "identification" then
 | 
| 
bsw@581
 | 
   262       selector:add_order_by("identification")
 | 
| 
bsw@193
 | 
   263     elseif args.order == "name" then
 | 
| 
bsw@193
 | 
   264       selector:add_order_by("name")
 | 
| 
bsw@193
 | 
   265     else
 | 
| 
bsw@193
 | 
   266       error("invalid order")
 | 
| 
bsw@193
 | 
   267     end
 | 
| 
bsw@193
 | 
   268   end
 | 
| 
bsw@193
 | 
   269   return selector
 | 
| 
bsw@193
 | 
   270 end
 | 
| 
bsw@193
 | 
   271 
 | 
| 
bsw/jbe@0
 | 
   272 function Member.object:set_password(password)
 | 
| 
bsw@865
 | 
   273   trace.disable()
 | 
| 
bsw@728
 | 
   274   local hash = extos.crypt(
 | 
| 
bsw/jbe@0
 | 
   275     password,
 | 
| 
bsw/jbe@0
 | 
   276     "$1$" .. multirand.string(
 | 
| 
bsw/jbe@0
 | 
   277       8,
 | 
| 
bsw/jbe@0
 | 
   278       "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz./"
 | 
| 
bsw/jbe@0
 | 
   279     )
 | 
| 
bsw/jbe@0
 | 
   280   )
 | 
| 
bsw@728
 | 
   281   assert(hash, "extos.crypt failed")
 | 
| 
bsw/jbe@0
 | 
   282   self.password = hash
 | 
| 
bsw/jbe@0
 | 
   283 end
 | 
| 
bsw/jbe@0
 | 
   284 
 | 
| 
bsw/jbe@0
 | 
   285 function Member.object:check_password(password)
 | 
| 
bsw/jbe@0
 | 
   286   if type(password) == "string" and type(self.password) == "string" then
 | 
| 
bsw@728
 | 
   287     return extos.crypt(password, self.password) == self.password
 | 
| 
bsw/jbe@0
 | 
   288   else
 | 
| 
bsw/jbe@0
 | 
   289     return false
 | 
| 
bsw/jbe@0
 | 
   290   end
 | 
| 
bsw/jbe@0
 | 
   291 end
 | 
| 
bsw/jbe@0
 | 
   292 
 | 
| 
bsw/jbe@0
 | 
   293 function Member.object_get:published_contacts()
 | 
| 
bsw/jbe@0
 | 
   294   return Member:new_selector()
 | 
| 
bsw/jbe@0
 | 
   295     :join('"contact"', nil, '"contact"."other_member_id" = "member"."id"')
 | 
| 
bsw/jbe@0
 | 
   296     :add_where{ '"contact"."member_id" = ?', self.id }
 | 
| 
bsw/jbe@0
 | 
   297     :add_where("public")
 | 
| 
bsw/jbe@0
 | 
   298     :exec()
 | 
| 
bsw/jbe@0
 | 
   299 end
 | 
| 
bsw/jbe@0
 | 
   300 
 | 
| 
bsw/jbe@0
 | 
   301 function Member:by_login_and_password(login, password)
 | 
| 
bsw/jbe@0
 | 
   302   local selector = self:new_selector()
 | 
| 
bsw/jbe@5
 | 
   303   selector:add_where{'"login" = ?', login }
 | 
| 
bsw@203
 | 
   304   selector:add_where('NOT "locked"')
 | 
| 
bsw/jbe@0
 | 
   305   selector:optional_object_mode()
 | 
| 
bsw/jbe@0
 | 
   306   local member = selector:exec()
 | 
| 
bsw/jbe@0
 | 
   307   if member and member:check_password(password) then
 | 
| 
bsw/jbe@0
 | 
   308     return member
 | 
| 
bsw/jbe@0
 | 
   309   else
 | 
| 
bsw/jbe@0
 | 
   310     return nil
 | 
| 
bsw/jbe@0
 | 
   311   end
 | 
| 
bsw/jbe@0
 | 
   312 end
 | 
| 
bsw/jbe@0
 | 
   313 
 | 
| 
bsw/jbe@5
 | 
   314 function Member:by_login(login)
 | 
| 
bsw/jbe@5
 | 
   315   local selector = self:new_selector()
 | 
| 
bsw/jbe@5
 | 
   316   selector:add_where{'"login" = ?', login }
 | 
| 
bsw/jbe@5
 | 
   317   selector:optional_object_mode()
 | 
| 
bsw/jbe@5
 | 
   318   return selector:exec()
 | 
| 
bsw/jbe@5
 | 
   319 end
 | 
| 
bsw/jbe@5
 | 
   320 
 | 
| 
bsw/jbe@5
 | 
   321 function Member:by_name(name)
 | 
| 
bsw/jbe@5
 | 
   322   local selector = self:new_selector()
 | 
| 
bsw/jbe@5
 | 
   323   selector:add_where{'"name" = ?', name }
 | 
| 
bsw/jbe@5
 | 
   324   selector:optional_object_mode()
 | 
| 
bsw/jbe@5
 | 
   325   return selector:exec()
 | 
| 
bsw/jbe@5
 | 
   326 end
 | 
| 
bsw/jbe@5
 | 
   327 
 | 
| 
bsw@2
 | 
   328 function Member:get_search_selector(search_string)
 | 
| 
bsw/jbe@0
 | 
   329   return self:new_selector()
 | 
| 
bsw@2
 | 
   330     :add_field( {'"highlight"("member"."name", ?)', search_string }, "name_highlighted")
 | 
| 
bsw@2
 | 
   331     :add_where{ '"member"."text_search_data" @@ "text_search_query"(?)', search_string }
 | 
| 
bsw@362
 | 
   332     :add_where("activated NOTNULL AND active")
 | 
| 
bsw/jbe@0
 | 
   333 end
 | 
| 
bsw@2
 | 
   334 
 | 
| 
bsw@388
 | 
   335 function Member.object:send_invitation(template_file, subject)
 | 
| 
bsw@286
 | 
   336   trace.disable()
 | 
| 
bsw@286
 | 
   337   self.invite_code = multirand.string( 24, "23456789ABCDEFGHJKLMNPQRSTUVWXYZabcdefghijkmnopqrstuvwxyz" )
 | 
| 
bsw@388
 | 
   338   self:save()
 | 
| 
bsw@388
 | 
   339   
 | 
| 
bsw@388
 | 
   340   local subject = subject
 | 
| 
bsw@388
 | 
   341   local content
 | 
| 
bsw@388
 | 
   342   
 | 
| 
bsw@388
 | 
   343   if template_file then
 | 
| 
bsw@388
 | 
   344     local fh = io.open(template_file, "r")
 | 
| 
bsw@388
 | 
   345     content = fh:read("*a")
 | 
| 
bsw@388
 | 
   346     content = (content:gsub("#{invite_code}", self.invite_code))
 | 
| 
bsw@388
 | 
   347   else
 | 
| 
bsw@388
 | 
   348     subject = config.mail_subject_prefix .. _"Invitation to LiquidFeedback"
 | 
| 
bsw@388
 | 
   349     content = slot.use_temporary(function()
 | 
| 
bsw@388
 | 
   350       slot.put(_"Hello\n\n")
 | 
| 
bsw@388
 | 
   351       slot.put(_"You are invited to LiquidFeedback. To register please click the following link:\n\n")
 | 
| 
bsw@388
 | 
   352       slot.put(request.get_absolute_baseurl() .. "index/register.html?invite=" .. self.invite_code .. "\n\n")
 | 
| 
bsw@388
 | 
   353       slot.put(_"If this link is not working, please open following url in your web browser:\n\n")
 | 
| 
bsw@388
 | 
   354       slot.put(request.get_absolute_baseurl() .. "index/register.html\n\n")
 | 
| 
bsw@388
 | 
   355       slot.put(_"On that page please enter the invite key:\n\n")
 | 
| 
bsw@388
 | 
   356       slot.put(self.invite_code .. "\n\n")
 | 
| 
bsw@388
 | 
   357     end)
 | 
| 
bsw@388
 | 
   358   end
 | 
| 
bsw@388
 | 
   359 
 | 
| 
bsw@286
 | 
   360   local success = net.send_mail{
 | 
| 
bsw@286
 | 
   361     envelope_from = config.mail_envelope_from,
 | 
| 
bsw@286
 | 
   362     from          = config.mail_from,
 | 
| 
bsw@286
 | 
   363     reply_to      = config.mail_reply_to,
 | 
| 
bsw@286
 | 
   364     to            = self.notify_email_unconfirmed or self.notify_email,
 | 
| 
bsw@388
 | 
   365     subject       = subject,
 | 
| 
bsw@286
 | 
   366     content_type  = "text/plain; charset=UTF-8",
 | 
| 
bsw@286
 | 
   367     content       = content
 | 
| 
bsw@286
 | 
   368   }
 | 
| 
bsw@286
 | 
   369   return success
 | 
| 
bsw/jbe@0
 | 
   370 end
 | 
| 
bsw@2
 | 
   371 
 | 
| 
bsw/jbe@6
 | 
   372 function Member.object:set_notify_email(notify_email)
 | 
| 
bsw@224
 | 
   373   trace.disable()
 | 
| 
bsw/jbe@6
 | 
   374   local expiry = db:query("SELECT now() + '7 days'::interval as expiry", "object").expiry
 | 
| 
bsw/jbe@6
 | 
   375   self.notify_email_unconfirmed = notify_email
 | 
| 
bsw/jbe@6
 | 
   376   self.notify_email_secret = multirand.string( 24, "23456789ABCDEFGHJKLMNPQRSTUVWXYZabcdefghijkmnopqrstuvwxyz" )
 | 
| 
bsw/jbe@6
 | 
   377   self.notify_email_secret_expiry = expiry
 | 
| 
bsw/jbe@6
 | 
   378   local content = slot.use_temporary(function()
 | 
| 
bsw/jbe@6
 | 
   379     slot.put(_"Hello " .. self.name .. ",\n\n")
 | 
| 
bsw/jbe@6
 | 
   380     slot.put(_"Please confirm your email address by clicking the following link:\n\n")
 | 
| 
jbe@326
 | 
   381     slot.put(request.get_absolute_baseurl() .. "index/confirm_notify_email.html?secret=" .. self.notify_email_secret .. "\n\n")
 | 
| 
bsw/jbe@6
 | 
   382     slot.put(_"If this link is not working, please open following url in your web browser:\n\n")
 | 
| 
jbe@326
 | 
   383     slot.put(request.get_absolute_baseurl() .. "index/confirm_notify_email.html\n\n")
 | 
| 
bsw/jbe@6
 | 
   384     slot.put(_"On that page please enter the confirmation code:\n\n")
 | 
| 
bsw/jbe@6
 | 
   385     slot.put(self.notify_email_secret .. "\n\n")
 | 
| 
bsw/jbe@6
 | 
   386   end)
 | 
| 
bsw/jbe@6
 | 
   387   local success = net.send_mail{
 | 
| 
bsw/jbe@6
 | 
   388     envelope_from = config.mail_envelope_from,
 | 
| 
bsw/jbe@6
 | 
   389     from          = config.mail_from,
 | 
| 
bsw/jbe@6
 | 
   390     reply_to      = config.mail_reply_to,
 | 
| 
bsw/jbe@6
 | 
   391     to            = self.notify_email_unconfirmed,
 | 
| 
bsw/jbe@6
 | 
   392     subject       = config.mail_subject_prefix .. _"Email confirmation request",
 | 
| 
bsw/jbe@6
 | 
   393     content_type  = "text/plain; charset=UTF-8",
 | 
| 
bsw/jbe@6
 | 
   394     content       = content
 | 
| 
bsw/jbe@6
 | 
   395   }
 | 
| 
bsw@75
 | 
   396   if success then
 | 
| 
bsw@75
 | 
   397     local lock_expiry = db:query("SELECT now() + '1 hour'::interval AS lock_expiry", "object").lock_expiry
 | 
| 
bsw@75
 | 
   398     self.notify_email_lock_expiry = lock_expiry
 | 
| 
bsw@75
 | 
   399   end
 | 
| 
bsw@75
 | 
   400   self:save()
 | 
| 
bsw/jbe@6
 | 
   401   return success
 | 
| 
bsw/jbe@6
 | 
   402 end
 | 
| 
bsw@11
 | 
   403 
 | 
| 
bsw/jbe@19
 | 
   404 function Member.object:get_setting(key)
 | 
| 
bsw@79
 | 
   405   return Setting:by_pk(self.id, key)
 | 
| 
bsw/jbe@19
 | 
   406 end
 | 
| 
bsw/jbe@19
 | 
   407 
 | 
| 
bsw/jbe@19
 | 
   408 function Member.object:get_setting_value(key)
 | 
| 
bsw@79
 | 
   409   local setting = Setting:by_pk(self.id, key)
 | 
| 
bsw/jbe@19
 | 
   410   if setting then
 | 
| 
bsw/jbe@19
 | 
   411     return setting.value
 | 
| 
bsw/jbe@19
 | 
   412   end
 | 
| 
bsw@11
 | 
   413 end
 | 
| 
bsw@11
 | 
   414 
 | 
| 
bsw@11
 | 
   415 function Member.object:set_setting(key, value)
 | 
| 
bsw/jbe@19
 | 
   416   local setting = self:get_setting(key)
 | 
| 
bsw/jbe@19
 | 
   417   if not setting then
 | 
| 
bsw/jbe@19
 | 
   418     setting = Setting:new()
 | 
| 
bsw@79
 | 
   419     setting.member_id = self.id
 | 
| 
bsw/jbe@19
 | 
   420     setting.key = key
 | 
| 
bsw/jbe@19
 | 
   421   end
 | 
| 
bsw/jbe@19
 | 
   422   setting.value = value
 | 
| 
bsw/jbe@19
 | 
   423   setting:save()
 | 
| 
bsw@11
 | 
   424 end
 | 
| 
bsw@11
 | 
   425 
 | 
| 
bsw@11
 | 
   426 function Member.object:get_setting_maps_by_key(key)
 | 
| 
bsw@11
 | 
   427   return SettingMap:new_selector()
 | 
| 
bsw@11
 | 
   428     :add_where{ "member_id = ?", self.id }
 | 
| 
bsw@11
 | 
   429     :add_where{ "key = ?", key }
 | 
| 
bsw@11
 | 
   430     :add_order_by("subkey")
 | 
| 
bsw@11
 | 
   431     :exec()
 | 
| 
bsw@11
 | 
   432 end
 | 
| 
bsw@11
 | 
   433 
 | 
| 
bsw@11
 | 
   434 function Member.object:get_setting_map_by_key_and_subkey(key, subkey)
 | 
| 
bsw@11
 | 
   435   return SettingMap:new_selector()
 | 
| 
bsw@11
 | 
   436     :add_where{ "member_id = ?", self.id }
 | 
| 
bsw@11
 | 
   437     :add_where{ "key = ?", key }
 | 
| 
bsw@11
 | 
   438     :add_where{ "subkey = ?", subkey }
 | 
| 
bsw@11
 | 
   439     :add_order_by("subkey")
 | 
| 
bsw@11
 | 
   440     :optional_object_mode()
 | 
| 
bsw@11
 | 
   441     :exec()
 | 
| 
bsw@11
 | 
   442 end
 | 
| 
bsw@11
 | 
   443 
 | 
| 
bsw@11
 | 
   444 function Member.object:set_setting_map(key, subkey, value)
 | 
| 
poelzi@144
 | 
   445   setting_map = self:get_setting_map_by_key_and_subkey(key, subkey)
 | 
| 
poelzi@144
 | 
   446   if not setting_map then
 | 
| 
poelzi@144
 | 
   447     setting_map = SettingMap:new()
 | 
| 
poelzi@144
 | 
   448     setting_map.member_id = self.id
 | 
| 
poelzi@144
 | 
   449     setting_map.key = key
 | 
| 
poelzi@144
 | 
   450     setting_map.subkey = subkey
 | 
| 
poelzi@144
 | 
   451   end
 | 
| 
poelzi@144
 | 
   452   setting_map.value = value
 | 
| 
poelzi@144
 | 
   453   setting_map:save()
 | 
| 
bsw@11
 | 
   454 end
 | 
| 
bsw@75
 | 
   455 
 | 
| 
bsw@75
 | 
   456 function Member.object_get:notify_email_locked()
 | 
| 
bsw@75
 | 
   457   return(
 | 
| 
bsw@75
 | 
   458     Member:new_selector()
 | 
| 
bsw@75
 | 
   459       :add_where{ "id = ?", app.session.member.id }
 | 
| 
bsw@75
 | 
   460       :add_where("notify_email_lock_expiry > now()")
 | 
| 
bsw@75
 | 
   461       :count() == 1
 | 
| 
bsw@75
 | 
   462   )
 | 
| 
poelzi@134
 | 
   463 end
 | 
| 
poelzi@134
 | 
   464 
 | 
| 
bsw@273
 | 
   465 function Member.object_get:units_with_voting_right()
 | 
| 
bsw@273
 | 
   466   return(Unit:new_selector()
 | 
| 
bsw@273
 | 
   467     :join("privilege", nil, { "privilege.unit_id = unit.id AND privilege.member_id = ? AND privilege.voting_right", self.id })
 | 
| 
bsw@273
 | 
   468     :exec()
 | 
| 
bsw@273
 | 
   469   )
 | 
| 
bsw@273
 | 
   470 end
 | 
| 
bsw@273
 | 
   471 
 | 
| 
poelzi@134
 | 
   472 function Member.object:ui_field_text(args)
 | 
| 
poelzi@134
 | 
   473   args = args or {}
 | 
| 
bsw@813
 | 
   474   if app.session:has_access("authors_pseudonymous") then
 | 
| 
poelzi@134
 | 
   475     -- ugly workaround for getting html into a replaced string and to the user
 | 
| 
poelzi@134
 | 
   476     ui.container{label = args.label, label_attr={class="ui_field_label"}, content = function()
 | 
| 
poelzi@134
 | 
   477         slot.put(string.format('<span><a href="%s">%s</a></span>',
 | 
| 
poelzi@134
 | 
   478                                                 encode.url{
 | 
| 
poelzi@134
 | 
   479                                                   module    = "member",
 | 
| 
poelzi@134
 | 
   480                                                   view      = "show",
 | 
| 
poelzi@134
 | 
   481                                                   id        = self.id,
 | 
| 
poelzi@134
 | 
   482                                                 },
 | 
| 
poelzi@134
 | 
   483                                                 encode.html(self.name)))
 | 
| 
poelzi@134
 | 
   484       end
 | 
| 
poelzi@134
 | 
   485     }
 | 
| 
poelzi@134
 | 
   486   else
 | 
| 
poelzi@134
 | 
   487     ui.field.text{ label = args.label,      value = _"[not displayed public]" }
 | 
| 
poelzi@134
 | 
   488   end
 | 
| 
poelzi@134
 | 
   489 end
 | 
| 
bsw@281
 | 
   490 
 | 
| 
bsw@281
 | 
   491 function Member.object:has_voting_right_for_unit_id(unit_id)
 | 
| 
bsw@547
 | 
   492   if not self.__units_with_voting_right_hash then
 | 
| 
bsw@547
 | 
   493     local privileges = Privilege:new_selector()
 | 
| 
bsw@547
 | 
   494       :add_where{ "member_id = ?", self.id }
 | 
| 
bsw@547
 | 
   495       :add_where("voting_right")
 | 
| 
bsw@547
 | 
   496       :for_share()
 | 
| 
bsw@547
 | 
   497       :exec()
 | 
| 
bsw@547
 | 
   498     self.__units_with_voting_right_hash = {}
 | 
| 
bsw@551
 | 
   499     for i, privilege in ipairs(privileges) do
 | 
| 
bsw@551
 | 
   500       self.__units_with_voting_right_hash[privilege.unit_id] = true
 | 
| 
bsw@551
 | 
   501     end
 | 
| 
bsw@547
 | 
   502   end
 | 
| 
bsw@547
 | 
   503   return self.__units_with_voting_right_hash[unit_id] and true or false
 | 
| 
jbe@326
 | 
   504 end
 | 
| 
bsw@525
 | 
   505 
 | 
| 
bsw@894
 | 
   506 function Member.object:has_polling_right_for_unit_id(unit_id)
 | 
| 
bsw@894
 | 
   507   if not self.__units_with_polling_right_hash then
 | 
| 
bsw@894
 | 
   508     local privileges = Privilege:new_selector()
 | 
| 
bsw@894
 | 
   509       :add_where{ "member_id = ?", self.id }
 | 
| 
bsw@894
 | 
   510       :add_where("polling_right")
 | 
| 
bsw@894
 | 
   511       :for_share()
 | 
| 
bsw@894
 | 
   512       :exec()
 | 
| 
bsw@894
 | 
   513     self.__units_with_polling_right_hash = {}
 | 
| 
bsw@894
 | 
   514     for i, privilege in ipairs(privileges) do
 | 
| 
bsw@894
 | 
   515       self.__units_with_polling_right_hash[privilege.unit_id] = true
 | 
| 
bsw@894
 | 
   516     end
 | 
| 
bsw@894
 | 
   517   end
 | 
| 
bsw@894
 | 
   518   return self.__units_with_polling_right_hash[unit_id] and true or false
 | 
| 
bsw@894
 | 
   519 end
 | 
| 
bsw@894
 | 
   520 
 | 
| 
bsw@525
 | 
   521 function Member.object:get_delegatee_member(unit_id, area_id, issue_id)
 | 
| 
bsw@525
 | 
   522   local selector = Member:new_selector()
 | 
| 
bsw@525
 | 
   523   if unit_id then
 | 
| 
bsw@525
 | 
   524     selector:join("delegation", nil, { "delegation.trustee_id = member.id AND delegation.scope = 'unit' AND delegation.unit_id = ? AND delegation.truster_id = ?", unit_id, self.id })
 | 
| 
bsw@525
 | 
   525   end
 | 
| 
bsw@525
 | 
   526   selector:optional_object_mode()
 | 
| 
bsw@525
 | 
   527   return selector:exec()
 | 
| 
bsw@533
 | 
   528 end
 |