| 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@362
 | 
   328     :add_where("activated NOTNULL AND active")
 | 
| 
bsw/jbe@0
 | 
   329 end
 | 
| 
bsw@2
 | 
   330 
 | 
| 
bsw@388
 | 
   331 function Member.object:send_invitation(template_file, subject)
 | 
| 
bsw@286
 | 
   332   trace.disable()
 | 
| 
bsw@286
 | 
   333   self.invite_code = multirand.string( 24, "23456789ABCDEFGHJKLMNPQRSTUVWXYZabcdefghijkmnopqrstuvwxyz" )
 | 
| 
bsw@388
 | 
   334   self:save()
 | 
| 
bsw@388
 | 
   335   
 | 
| 
bsw@388
 | 
   336   local subject = subject
 | 
| 
bsw@388
 | 
   337   local content
 | 
| 
bsw@388
 | 
   338   
 | 
| 
bsw@388
 | 
   339   if template_file then
 | 
| 
bsw@388
 | 
   340     local fh = io.open(template_file, "r")
 | 
| 
bsw@388
 | 
   341     content = fh:read("*a")
 | 
| 
bsw@388
 | 
   342     content = (content:gsub("#{invite_code}", self.invite_code))
 | 
| 
bsw@388
 | 
   343     print (content)
 | 
| 
bsw@388
 | 
   344   else
 | 
| 
bsw@388
 | 
   345     subject = config.mail_subject_prefix .. _"Invitation to LiquidFeedback"
 | 
| 
bsw@388
 | 
   346     content = slot.use_temporary(function()
 | 
| 
bsw@388
 | 
   347       slot.put(_"Hello\n\n")
 | 
| 
bsw@388
 | 
   348       slot.put(_"You are invited to LiquidFeedback. To register please click the following link:\n\n")
 | 
| 
bsw@388
 | 
   349       slot.put(request.get_absolute_baseurl() .. "index/register.html?invite=" .. self.invite_code .. "\n\n")
 | 
| 
bsw@388
 | 
   350       slot.put(_"If this link is not working, please open following url in your web browser:\n\n")
 | 
| 
bsw@388
 | 
   351       slot.put(request.get_absolute_baseurl() .. "index/register.html\n\n")
 | 
| 
bsw@388
 | 
   352       slot.put(_"On that page please enter the invite key:\n\n")
 | 
| 
bsw@388
 | 
   353       slot.put(self.invite_code .. "\n\n")
 | 
| 
bsw@388
 | 
   354     end)
 | 
| 
bsw@388
 | 
   355   end
 | 
| 
bsw@388
 | 
   356 
 | 
| 
bsw@286
 | 
   357   local success = net.send_mail{
 | 
| 
bsw@286
 | 
   358     envelope_from = config.mail_envelope_from,
 | 
| 
bsw@286
 | 
   359     from          = config.mail_from,
 | 
| 
bsw@286
 | 
   360     reply_to      = config.mail_reply_to,
 | 
| 
bsw@286
 | 
   361     to            = self.notify_email_unconfirmed or self.notify_email,
 | 
| 
bsw@388
 | 
   362     subject       = subject,
 | 
| 
bsw@286
 | 
   363     content_type  = "text/plain; charset=UTF-8",
 | 
| 
bsw@286
 | 
   364     content       = content
 | 
| 
bsw@286
 | 
   365   }
 | 
| 
bsw@286
 | 
   366   return success
 | 
| 
bsw@286
 | 
   367 end
 | 
| 
bsw@286
 | 
   368 
 | 
| 
bsw/jbe@6
 | 
   369 function Member.object:set_notify_email(notify_email)
 | 
| 
bsw@224
 | 
   370   trace.disable()
 | 
| 
bsw/jbe@6
 | 
   371   local expiry = db:query("SELECT now() + '7 days'::interval as expiry", "object").expiry
 | 
| 
bsw/jbe@6
 | 
   372   self.notify_email_unconfirmed = notify_email
 | 
| 
bsw/jbe@6
 | 
   373   self.notify_email_secret = multirand.string( 24, "23456789ABCDEFGHJKLMNPQRSTUVWXYZabcdefghijkmnopqrstuvwxyz" )
 | 
| 
bsw/jbe@6
 | 
   374   self.notify_email_secret_expiry = expiry
 | 
| 
bsw/jbe@6
 | 
   375   local content = slot.use_temporary(function()
 | 
| 
bsw/jbe@6
 | 
   376     slot.put(_"Hello " .. self.name .. ",\n\n")
 | 
| 
bsw/jbe@6
 | 
   377     slot.put(_"Please confirm your email address by clicking the following link:\n\n")
 | 
| 
jbe@326
 | 
   378     slot.put(request.get_absolute_baseurl() .. "index/confirm_notify_email.html?secret=" .. self.notify_email_secret .. "\n\n")
 | 
| 
bsw/jbe@6
 | 
   379     slot.put(_"If this link is not working, please open following url in your web browser:\n\n")
 | 
| 
jbe@326
 | 
   380     slot.put(request.get_absolute_baseurl() .. "index/confirm_notify_email.html\n\n")
 | 
| 
bsw/jbe@6
 | 
   381     slot.put(_"On that page please enter the confirmation code:\n\n")
 | 
| 
bsw/jbe@6
 | 
   382     slot.put(self.notify_email_secret .. "\n\n")
 | 
| 
bsw/jbe@6
 | 
   383   end)
 | 
| 
bsw/jbe@6
 | 
   384   local success = net.send_mail{
 | 
| 
bsw/jbe@6
 | 
   385     envelope_from = config.mail_envelope_from,
 | 
| 
bsw/jbe@6
 | 
   386     from          = config.mail_from,
 | 
| 
bsw/jbe@6
 | 
   387     reply_to      = config.mail_reply_to,
 | 
| 
bsw/jbe@6
 | 
   388     to            = self.notify_email_unconfirmed,
 | 
| 
bsw/jbe@6
 | 
   389     subject       = config.mail_subject_prefix .. _"Email confirmation request",
 | 
| 
bsw/jbe@6
 | 
   390     content_type  = "text/plain; charset=UTF-8",
 | 
| 
bsw/jbe@6
 | 
   391     content       = content
 | 
| 
bsw/jbe@6
 | 
   392   }
 | 
| 
bsw@75
 | 
   393   if success then
 | 
| 
bsw@75
 | 
   394     local lock_expiry = db:query("SELECT now() + '1 hour'::interval AS lock_expiry", "object").lock_expiry
 | 
| 
bsw@75
 | 
   395     self.notify_email_lock_expiry = lock_expiry
 | 
| 
bsw@75
 | 
   396   end
 | 
| 
bsw@75
 | 
   397   self:save()
 | 
| 
bsw/jbe@6
 | 
   398   return success
 | 
| 
bsw/jbe@6
 | 
   399 end
 | 
| 
bsw@11
 | 
   400 
 | 
| 
bsw/jbe@19
 | 
   401 function Member.object:get_setting(key)
 | 
| 
bsw@79
 | 
   402   return Setting:by_pk(self.id, key)
 | 
| 
bsw/jbe@19
 | 
   403 end
 | 
| 
bsw/jbe@19
 | 
   404 
 | 
| 
bsw/jbe@19
 | 
   405 function Member.object:get_setting_value(key)
 | 
| 
bsw@79
 | 
   406   local setting = Setting:by_pk(self.id, key)
 | 
| 
bsw/jbe@19
 | 
   407   if setting then
 | 
| 
bsw/jbe@19
 | 
   408     return setting.value
 | 
| 
bsw/jbe@19
 | 
   409   end
 | 
| 
bsw@11
 | 
   410 end
 | 
| 
bsw@11
 | 
   411 
 | 
| 
bsw@11
 | 
   412 function Member.object:set_setting(key, value)
 | 
| 
bsw/jbe@19
 | 
   413   local setting = self:get_setting(key)
 | 
| 
bsw/jbe@19
 | 
   414   if not setting then
 | 
| 
bsw/jbe@19
 | 
   415     setting = Setting:new()
 | 
| 
bsw@79
 | 
   416     setting.member_id = self.id
 | 
| 
bsw/jbe@19
 | 
   417     setting.key = key
 | 
| 
bsw/jbe@19
 | 
   418   end
 | 
| 
bsw/jbe@19
 | 
   419   setting.value = value
 | 
| 
bsw/jbe@19
 | 
   420   setting:save()
 | 
| 
bsw@11
 | 
   421 end
 | 
| 
bsw@11
 | 
   422 
 | 
| 
bsw@11
 | 
   423 function Member.object:get_setting_maps_by_key(key)
 | 
| 
bsw@11
 | 
   424   return SettingMap:new_selector()
 | 
| 
bsw@11
 | 
   425     :add_where{ "member_id = ?", self.id }
 | 
| 
bsw@11
 | 
   426     :add_where{ "key = ?", key }
 | 
| 
bsw@11
 | 
   427     :add_order_by("subkey")
 | 
| 
bsw@11
 | 
   428     :exec()
 | 
| 
bsw@11
 | 
   429 end
 | 
| 
bsw@11
 | 
   430 
 | 
| 
bsw@11
 | 
   431 function Member.object:get_setting_map_by_key_and_subkey(key, subkey)
 | 
| 
bsw@11
 | 
   432   return SettingMap:new_selector()
 | 
| 
bsw@11
 | 
   433     :add_where{ "member_id = ?", self.id }
 | 
| 
bsw@11
 | 
   434     :add_where{ "key = ?", key }
 | 
| 
bsw@11
 | 
   435     :add_where{ "subkey = ?", subkey }
 | 
| 
bsw@11
 | 
   436     :add_order_by("subkey")
 | 
| 
bsw@11
 | 
   437     :optional_object_mode()
 | 
| 
bsw@11
 | 
   438     :exec()
 | 
| 
bsw@11
 | 
   439 end
 | 
| 
bsw@11
 | 
   440 
 | 
| 
bsw@11
 | 
   441 function Member.object:set_setting_map(key, subkey, value)
 | 
| 
poelzi@144
 | 
   442   setting_map = self:get_setting_map_by_key_and_subkey(key, subkey)
 | 
| 
poelzi@144
 | 
   443   if not setting_map then
 | 
| 
poelzi@144
 | 
   444     setting_map = SettingMap:new()
 | 
| 
poelzi@144
 | 
   445     setting_map.member_id = self.id
 | 
| 
poelzi@144
 | 
   446     setting_map.key = key
 | 
| 
poelzi@144
 | 
   447     setting_map.subkey = subkey
 | 
| 
poelzi@144
 | 
   448   end
 | 
| 
poelzi@144
 | 
   449   setting_map.value = value
 | 
| 
poelzi@144
 | 
   450   setting_map:save()
 | 
| 
bsw@11
 | 
   451 end
 | 
| 
bsw@75
 | 
   452 
 | 
| 
bsw@75
 | 
   453 function Member.object_get:notify_email_locked()
 | 
| 
bsw@75
 | 
   454   return(
 | 
| 
bsw@75
 | 
   455     Member:new_selector()
 | 
| 
bsw@75
 | 
   456       :add_where{ "id = ?", app.session.member.id }
 | 
| 
bsw@75
 | 
   457       :add_where("notify_email_lock_expiry > now()")
 | 
| 
bsw@75
 | 
   458       :count() == 1
 | 
| 
bsw@75
 | 
   459   )
 | 
| 
poelzi@134
 | 
   460 end
 | 
| 
poelzi@134
 | 
   461 
 | 
| 
bsw@273
 | 
   462 function Member.object_get:units_with_voting_right()
 | 
| 
bsw@273
 | 
   463   return(Unit:new_selector()
 | 
| 
bsw@273
 | 
   464     :join("privilege", nil, { "privilege.unit_id = unit.id AND privilege.member_id = ? AND privilege.voting_right", self.id })
 | 
| 
bsw@273
 | 
   465     :exec()
 | 
| 
bsw@273
 | 
   466   )
 | 
| 
bsw@273
 | 
   467 end
 | 
| 
bsw@273
 | 
   468 
 | 
| 
poelzi@134
 | 
   469 function Member.object:ui_field_text(args)
 | 
| 
poelzi@134
 | 
   470   args = args or {}
 | 
| 
poelzi@134
 | 
   471   if app.session.member_id or config.public_access == "pseudonym" then
 | 
| 
poelzi@134
 | 
   472     -- ugly workaround for getting html into a replaced string and to the user
 | 
| 
poelzi@134
 | 
   473     ui.container{label = args.label, label_attr={class="ui_field_label"}, content = function()
 | 
| 
poelzi@134
 | 
   474         slot.put(string.format('<span><a href="%s">%s</a></span>',
 | 
| 
poelzi@134
 | 
   475                                                 encode.url{
 | 
| 
poelzi@134
 | 
   476                                                   module    = "member",
 | 
| 
poelzi@134
 | 
   477                                                   view      = "show",
 | 
| 
poelzi@134
 | 
   478                                                   id        = self.id,
 | 
| 
poelzi@134
 | 
   479                                                 },
 | 
| 
poelzi@134
 | 
   480                                                 encode.html(self.name)))
 | 
| 
poelzi@134
 | 
   481       end
 | 
| 
poelzi@134
 | 
   482     }
 | 
| 
poelzi@134
 | 
   483   else
 | 
| 
poelzi@134
 | 
   484     ui.field.text{ label = args.label,      value = _"[not displayed public]" }
 | 
| 
poelzi@134
 | 
   485   end
 | 
| 
poelzi@134
 | 
   486 end
 | 
| 
bsw@281
 | 
   487 
 | 
| 
bsw@281
 | 
   488 function Member.object:has_voting_right_for_unit_id(unit_id)
 | 
| 
bsw@281
 | 
   489   return (Privilege:new_selector()
 | 
| 
bsw@281
 | 
   490     :add_where{ "member_id = ?", self.id }
 | 
| 
bsw@281
 | 
   491     :add_where{ "unit_id = ?", unit_id }
 | 
| 
bsw@281
 | 
   492     :add_where("voting_right")
 | 
| 
bsw@281
 | 
   493     :optional_object_mode()
 | 
| 
bsw@281
 | 
   494     :for_share()
 | 
| 
bsw@281
 | 
   495     :exec()) and true or false
 | 
| 
jbe@326
 | 
   496 end
 |