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