| 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@199
 | 
   244   if args.is_contact_of_member_id then
 | 
| 
bsw@199
 | 
   245     selector:join("contact", "__model_member__contact", "member.id = __model_member__contact.other_member_id")
 | 
| 
bsw@199
 | 
   246     selector:add_where{ "__model_member__contact.member_id = ?", args.is_contact_of_member_id }
 | 
| 
bsw@199
 | 
   247   end
 | 
| 
bsw@297
 | 
   248   if args.voting_right_for_unit_id then
 | 
| 
bsw@299
 | 
   249     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
 | 
   250   end
 | 
| 
bsw@193
 | 
   251   if args.order then
 | 
| 
bsw@193
 | 
   252     if args.order == "id" then
 | 
| 
bsw@193
 | 
   253       selector:add_order_by("id")
 | 
| 
bsw@193
 | 
   254     elseif args.order == "login" then
 | 
| 
bsw@193
 | 
   255       selector:add_order_by("login")
 | 
| 
bsw@193
 | 
   256     elseif args.order == "name" then
 | 
| 
bsw@193
 | 
   257       selector:add_order_by("name")
 | 
| 
bsw@193
 | 
   258     else
 | 
| 
bsw@193
 | 
   259       error("invalid order")
 | 
| 
bsw@193
 | 
   260     end
 | 
| 
bsw@193
 | 
   261   end
 | 
| 
bsw@193
 | 
   262   return selector
 | 
| 
bsw@193
 | 
   263 end
 | 
| 
bsw@193
 | 
   264 
 | 
| 
bsw/jbe@0
 | 
   265 function Member.object:set_password(password)
 | 
| 
bsw/jbe@0
 | 
   266   local hash = os.crypt(
 | 
| 
bsw/jbe@0
 | 
   267     password,
 | 
| 
bsw/jbe@0
 | 
   268     "$1$" .. multirand.string(
 | 
| 
bsw/jbe@0
 | 
   269       8,
 | 
| 
bsw/jbe@0
 | 
   270       "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz./"
 | 
| 
bsw/jbe@0
 | 
   271     )
 | 
| 
bsw/jbe@0
 | 
   272   )
 | 
| 
bsw/jbe@0
 | 
   273   assert(hash, "os.crypt failed")
 | 
| 
bsw/jbe@0
 | 
   274   self.password = hash
 | 
| 
bsw/jbe@0
 | 
   275 end
 | 
| 
bsw/jbe@0
 | 
   276 
 | 
| 
bsw/jbe@0
 | 
   277 function Member.object:check_password(password)
 | 
| 
bsw/jbe@0
 | 
   278   if type(password) == "string" and type(self.password) == "string" then
 | 
| 
bsw/jbe@0
 | 
   279     return os.crypt(password, self.password) == self.password
 | 
| 
bsw/jbe@0
 | 
   280   else
 | 
| 
bsw/jbe@0
 | 
   281     return false
 | 
| 
bsw/jbe@0
 | 
   282   end
 | 
| 
bsw/jbe@0
 | 
   283 end
 | 
| 
bsw/jbe@0
 | 
   284 
 | 
| 
bsw/jbe@0
 | 
   285 function Member.object_get:published_contacts()
 | 
| 
bsw/jbe@0
 | 
   286   return Member:new_selector()
 | 
| 
bsw/jbe@0
 | 
   287     :join('"contact"', nil, '"contact"."other_member_id" = "member"."id"')
 | 
| 
bsw/jbe@0
 | 
   288     :add_where{ '"contact"."member_id" = ?', self.id }
 | 
| 
bsw/jbe@0
 | 
   289     :add_where("public")
 | 
| 
bsw/jbe@0
 | 
   290     :exec()
 | 
| 
bsw/jbe@0
 | 
   291 end
 | 
| 
bsw/jbe@0
 | 
   292 
 | 
| 
bsw/jbe@0
 | 
   293 function Member:by_login_and_password(login, password)
 | 
| 
bsw/jbe@0
 | 
   294   local selector = self:new_selector()
 | 
| 
bsw/jbe@5
 | 
   295   selector:add_where{'"login" = ?', login }
 | 
| 
bsw@203
 | 
   296   selector:add_where('NOT "locked"')
 | 
| 
bsw/jbe@0
 | 
   297   selector:optional_object_mode()
 | 
| 
bsw/jbe@0
 | 
   298   local member = selector:exec()
 | 
| 
bsw/jbe@0
 | 
   299   if member and member:check_password(password) then
 | 
| 
bsw/jbe@0
 | 
   300     return member
 | 
| 
bsw/jbe@0
 | 
   301   else
 | 
| 
bsw/jbe@0
 | 
   302     return nil
 | 
| 
bsw/jbe@0
 | 
   303   end
 | 
| 
bsw/jbe@0
 | 
   304 end
 | 
| 
bsw/jbe@0
 | 
   305 
 | 
| 
bsw/jbe@5
 | 
   306 function Member:by_login(login)
 | 
| 
bsw/jbe@5
 | 
   307   local selector = self:new_selector()
 | 
| 
bsw/jbe@5
 | 
   308   selector:add_where{'"login" = ?', login }
 | 
| 
bsw/jbe@5
 | 
   309   selector:optional_object_mode()
 | 
| 
bsw/jbe@5
 | 
   310   return selector:exec()
 | 
| 
bsw/jbe@5
 | 
   311 end
 | 
| 
bsw/jbe@5
 | 
   312 
 | 
| 
bsw/jbe@5
 | 
   313 function Member:by_name(name)
 | 
| 
bsw/jbe@5
 | 
   314   local selector = self:new_selector()
 | 
| 
bsw/jbe@5
 | 
   315   selector:add_where{'"name" = ?', name }
 | 
| 
bsw/jbe@5
 | 
   316   selector:optional_object_mode()
 | 
| 
bsw/jbe@5
 | 
   317   return selector:exec()
 | 
| 
bsw/jbe@5
 | 
   318 end
 | 
| 
bsw/jbe@5
 | 
   319 
 | 
| 
bsw@2
 | 
   320 function Member:get_search_selector(search_string)
 | 
| 
bsw/jbe@0
 | 
   321   return self:new_selector()
 | 
| 
bsw@2
 | 
   322     :add_field( {'"highlight"("member"."name", ?)', search_string }, "name_highlighted")
 | 
| 
bsw@2
 | 
   323     :add_where{ '"member"."text_search_data" @@ "text_search_query"(?)', search_string }
 | 
| 
bsw@362
 | 
   324     :add_where("activated NOTNULL AND active")
 | 
| 
bsw/jbe@0
 | 
   325 end
 | 
| 
bsw@2
 | 
   326 
 | 
| 
bsw@388
 | 
   327 function Member.object:send_invitation(template_file, subject)
 | 
| 
bsw@286
 | 
   328   trace.disable()
 | 
| 
bsw@286
 | 
   329   self.invite_code = multirand.string( 24, "23456789ABCDEFGHJKLMNPQRSTUVWXYZabcdefghijkmnopqrstuvwxyz" )
 | 
| 
bsw@388
 | 
   330   self:save()
 | 
| 
bsw@388
 | 
   331   
 | 
| 
bsw@388
 | 
   332   local subject = subject
 | 
| 
bsw@388
 | 
   333   local content
 | 
| 
bsw@388
 | 
   334   
 | 
| 
bsw@388
 | 
   335   if template_file then
 | 
| 
bsw@388
 | 
   336     local fh = io.open(template_file, "r")
 | 
| 
bsw@388
 | 
   337     content = fh:read("*a")
 | 
| 
bsw@388
 | 
   338     content = (content:gsub("#{invite_code}", self.invite_code))
 | 
| 
bsw@388
 | 
   339   else
 | 
| 
bsw@388
 | 
   340     subject = config.mail_subject_prefix .. _"Invitation to LiquidFeedback"
 | 
| 
bsw@388
 | 
   341     content = slot.use_temporary(function()
 | 
| 
bsw@388
 | 
   342       slot.put(_"Hello\n\n")
 | 
| 
bsw@388
 | 
   343       slot.put(_"You are invited to LiquidFeedback. To register please click the following link:\n\n")
 | 
| 
bsw@388
 | 
   344       slot.put(request.get_absolute_baseurl() .. "index/register.html?invite=" .. self.invite_code .. "\n\n")
 | 
| 
bsw@388
 | 
   345       slot.put(_"If this link is not working, please open following url in your web browser:\n\n")
 | 
| 
bsw@388
 | 
   346       slot.put(request.get_absolute_baseurl() .. "index/register.html\n\n")
 | 
| 
bsw@388
 | 
   347       slot.put(_"On that page please enter the invite key:\n\n")
 | 
| 
bsw@388
 | 
   348       slot.put(self.invite_code .. "\n\n")
 | 
| 
bsw@388
 | 
   349     end)
 | 
| 
bsw@388
 | 
   350   end
 | 
| 
bsw@388
 | 
   351 
 | 
| 
bsw@286
 | 
   352   local success = net.send_mail{
 | 
| 
bsw@286
 | 
   353     envelope_from = config.mail_envelope_from,
 | 
| 
bsw@286
 | 
   354     from          = config.mail_from,
 | 
| 
bsw@286
 | 
   355     reply_to      = config.mail_reply_to,
 | 
| 
bsw@286
 | 
   356     to            = self.notify_email_unconfirmed or self.notify_email,
 | 
| 
bsw@388
 | 
   357     subject       = subject,
 | 
| 
bsw@286
 | 
   358     content_type  = "text/plain; charset=UTF-8",
 | 
| 
bsw@286
 | 
   359     content       = content
 | 
| 
bsw@286
 | 
   360   }
 | 
| 
bsw@286
 | 
   361   return success
 | 
| 
bsw@286
 | 
   362 end
 | 
| 
bsw@286
 | 
   363 
 | 
| 
bsw/jbe@6
 | 
   364 function Member.object:set_notify_email(notify_email)
 | 
| 
bsw@224
 | 
   365   trace.disable()
 | 
| 
bsw/jbe@6
 | 
   366   local expiry = db:query("SELECT now() + '7 days'::interval as expiry", "object").expiry
 | 
| 
bsw/jbe@6
 | 
   367   self.notify_email_unconfirmed = notify_email
 | 
| 
bsw/jbe@6
 | 
   368   self.notify_email_secret = multirand.string( 24, "23456789ABCDEFGHJKLMNPQRSTUVWXYZabcdefghijkmnopqrstuvwxyz" )
 | 
| 
bsw/jbe@6
 | 
   369   self.notify_email_secret_expiry = expiry
 | 
| 
bsw/jbe@6
 | 
   370   local content = slot.use_temporary(function()
 | 
| 
bsw/jbe@6
 | 
   371     slot.put(_"Hello " .. self.name .. ",\n\n")
 | 
| 
bsw/jbe@6
 | 
   372     slot.put(_"Please confirm your email address by clicking the following link:\n\n")
 | 
| 
jbe@326
 | 
   373     slot.put(request.get_absolute_baseurl() .. "index/confirm_notify_email.html?secret=" .. self.notify_email_secret .. "\n\n")
 | 
| 
bsw/jbe@6
 | 
   374     slot.put(_"If this link is not working, please open following url in your web browser:\n\n")
 | 
| 
jbe@326
 | 
   375     slot.put(request.get_absolute_baseurl() .. "index/confirm_notify_email.html\n\n")
 | 
| 
bsw/jbe@6
 | 
   376     slot.put(_"On that page please enter the confirmation code:\n\n")
 | 
| 
bsw/jbe@6
 | 
   377     slot.put(self.notify_email_secret .. "\n\n")
 | 
| 
bsw/jbe@6
 | 
   378   end)
 | 
| 
bsw/jbe@6
 | 
   379   local success = net.send_mail{
 | 
| 
bsw/jbe@6
 | 
   380     envelope_from = config.mail_envelope_from,
 | 
| 
bsw/jbe@6
 | 
   381     from          = config.mail_from,
 | 
| 
bsw/jbe@6
 | 
   382     reply_to      = config.mail_reply_to,
 | 
| 
bsw/jbe@6
 | 
   383     to            = self.notify_email_unconfirmed,
 | 
| 
bsw/jbe@6
 | 
   384     subject       = config.mail_subject_prefix .. _"Email confirmation request",
 | 
| 
bsw/jbe@6
 | 
   385     content_type  = "text/plain; charset=UTF-8",
 | 
| 
bsw/jbe@6
 | 
   386     content       = content
 | 
| 
bsw/jbe@6
 | 
   387   }
 | 
| 
bsw@75
 | 
   388   if success then
 | 
| 
bsw@75
 | 
   389     local lock_expiry = db:query("SELECT now() + '1 hour'::interval AS lock_expiry", "object").lock_expiry
 | 
| 
bsw@75
 | 
   390     self.notify_email_lock_expiry = lock_expiry
 | 
| 
bsw@75
 | 
   391   end
 | 
| 
bsw@75
 | 
   392   self:save()
 | 
| 
bsw/jbe@6
 | 
   393   return success
 | 
| 
bsw/jbe@6
 | 
   394 end
 | 
| 
bsw@11
 | 
   395 
 | 
| 
bsw/jbe@19
 | 
   396 function Member.object:get_setting(key)
 | 
| 
bsw@79
 | 
   397   return Setting:by_pk(self.id, key)
 | 
| 
bsw/jbe@19
 | 
   398 end
 | 
| 
bsw/jbe@19
 | 
   399 
 | 
| 
bsw/jbe@19
 | 
   400 function Member.object:get_setting_value(key)
 | 
| 
bsw@79
 | 
   401   local setting = Setting:by_pk(self.id, key)
 | 
| 
bsw/jbe@19
 | 
   402   if setting then
 | 
| 
bsw/jbe@19
 | 
   403     return setting.value
 | 
| 
bsw/jbe@19
 | 
   404   end
 | 
| 
bsw@11
 | 
   405 end
 | 
| 
bsw@11
 | 
   406 
 | 
| 
bsw@11
 | 
   407 function Member.object:set_setting(key, value)
 | 
| 
bsw/jbe@19
 | 
   408   local setting = self:get_setting(key)
 | 
| 
bsw/jbe@19
 | 
   409   if not setting then
 | 
| 
bsw/jbe@19
 | 
   410     setting = Setting:new()
 | 
| 
bsw@79
 | 
   411     setting.member_id = self.id
 | 
| 
bsw/jbe@19
 | 
   412     setting.key = key
 | 
| 
bsw/jbe@19
 | 
   413   end
 | 
| 
bsw/jbe@19
 | 
   414   setting.value = value
 | 
| 
bsw/jbe@19
 | 
   415   setting:save()
 | 
| 
bsw@11
 | 
   416 end
 | 
| 
bsw@11
 | 
   417 
 | 
| 
bsw@11
 | 
   418 function Member.object:get_setting_maps_by_key(key)
 | 
| 
bsw@11
 | 
   419   return SettingMap:new_selector()
 | 
| 
bsw@11
 | 
   420     :add_where{ "member_id = ?", self.id }
 | 
| 
bsw@11
 | 
   421     :add_where{ "key = ?", key }
 | 
| 
bsw@11
 | 
   422     :add_order_by("subkey")
 | 
| 
bsw@11
 | 
   423     :exec()
 | 
| 
bsw@11
 | 
   424 end
 | 
| 
bsw@11
 | 
   425 
 | 
| 
bsw@11
 | 
   426 function Member.object:get_setting_map_by_key_and_subkey(key, subkey)
 | 
| 
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_where{ "subkey = ?", subkey }
 | 
| 
bsw@11
 | 
   431     :add_order_by("subkey")
 | 
| 
bsw@11
 | 
   432     :optional_object_mode()
 | 
| 
bsw@11
 | 
   433     :exec()
 | 
| 
bsw@11
 | 
   434 end
 | 
| 
bsw@11
 | 
   435 
 | 
| 
bsw@11
 | 
   436 function Member.object:set_setting_map(key, subkey, value)
 | 
| 
poelzi@144
 | 
   437   setting_map = self:get_setting_map_by_key_and_subkey(key, subkey)
 | 
| 
poelzi@144
 | 
   438   if not setting_map then
 | 
| 
poelzi@144
 | 
   439     setting_map = SettingMap:new()
 | 
| 
poelzi@144
 | 
   440     setting_map.member_id = self.id
 | 
| 
poelzi@144
 | 
   441     setting_map.key = key
 | 
| 
poelzi@144
 | 
   442     setting_map.subkey = subkey
 | 
| 
poelzi@144
 | 
   443   end
 | 
| 
poelzi@144
 | 
   444   setting_map.value = value
 | 
| 
poelzi@144
 | 
   445   setting_map:save()
 | 
| 
bsw@11
 | 
   446 end
 | 
| 
bsw@75
 | 
   447 
 | 
| 
bsw@75
 | 
   448 function Member.object_get:notify_email_locked()
 | 
| 
bsw@75
 | 
   449   return(
 | 
| 
bsw@75
 | 
   450     Member:new_selector()
 | 
| 
bsw@75
 | 
   451       :add_where{ "id = ?", app.session.member.id }
 | 
| 
bsw@75
 | 
   452       :add_where("notify_email_lock_expiry > now()")
 | 
| 
bsw@75
 | 
   453       :count() == 1
 | 
| 
bsw@75
 | 
   454   )
 | 
| 
poelzi@134
 | 
   455 end
 | 
| 
poelzi@134
 | 
   456 
 | 
| 
bsw@273
 | 
   457 function Member.object_get:units_with_voting_right()
 | 
| 
bsw@273
 | 
   458   return(Unit:new_selector()
 | 
| 
bsw@273
 | 
   459     :join("privilege", nil, { "privilege.unit_id = unit.id AND privilege.member_id = ? AND privilege.voting_right", self.id })
 | 
| 
bsw@273
 | 
   460     :exec()
 | 
| 
bsw@273
 | 
   461   )
 | 
| 
bsw@273
 | 
   462 end
 | 
| 
bsw@273
 | 
   463 
 | 
| 
poelzi@134
 | 
   464 function Member.object:ui_field_text(args)
 | 
| 
poelzi@134
 | 
   465   args = args or {}
 | 
| 
bsw@527
 | 
   466   if app.session.member_id or config.public_access == "pseudonym" or config.public_access == "full" then
 | 
| 
poelzi@134
 | 
   467     -- ugly workaround for getting html into a replaced string and to the user
 | 
| 
poelzi@134
 | 
   468     ui.container{label = args.label, label_attr={class="ui_field_label"}, content = function()
 | 
| 
poelzi@134
 | 
   469         slot.put(string.format('<span><a href="%s">%s</a></span>',
 | 
| 
poelzi@134
 | 
   470                                                 encode.url{
 | 
| 
poelzi@134
 | 
   471                                                   module    = "member",
 | 
| 
poelzi@134
 | 
   472                                                   view      = "show",
 | 
| 
poelzi@134
 | 
   473                                                   id        = self.id,
 | 
| 
poelzi@134
 | 
   474                                                 },
 | 
| 
poelzi@134
 | 
   475                                                 encode.html(self.name)))
 | 
| 
poelzi@134
 | 
   476       end
 | 
| 
poelzi@134
 | 
   477     }
 | 
| 
poelzi@134
 | 
   478   else
 | 
| 
poelzi@134
 | 
   479     ui.field.text{ label = args.label,      value = _"[not displayed public]" }
 | 
| 
poelzi@134
 | 
   480   end
 | 
| 
poelzi@134
 | 
   481 end
 | 
| 
bsw@281
 | 
   482 
 | 
| 
bsw@281
 | 
   483 function Member.object:has_voting_right_for_unit_id(unit_id)
 | 
| 
bsw@281
 | 
   484   return (Privilege:new_selector()
 | 
| 
bsw@281
 | 
   485     :add_where{ "member_id = ?", self.id }
 | 
| 
bsw@281
 | 
   486     :add_where{ "unit_id = ?", unit_id }
 | 
| 
bsw@281
 | 
   487     :add_where("voting_right")
 | 
| 
bsw@281
 | 
   488     :optional_object_mode()
 | 
| 
bsw@281
 | 
   489     :for_share()
 | 
| 
bsw@281
 | 
   490     :exec()) and true or false
 | 
| 
jbe@326
 | 
   491 end
 | 
| 
bsw@525
 | 
   492 
 | 
| 
bsw@525
 | 
   493 function Member.object:get_delegatee_member(unit_id, area_id, issue_id)
 | 
| 
bsw@525
 | 
   494   local selector = Member:new_selector()
 | 
| 
bsw@525
 | 
   495   if unit_id then
 | 
| 
bsw@525
 | 
   496     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
 | 
   497   end
 | 
| 
bsw@525
 | 
   498   selector:optional_object_mode()
 | 
| 
bsw@525
 | 
   499   return selector:exec()
 | 
| 
bsw@533
 | 
   500 end
 |