include/acl_selectors.php

   1 <?php
   2
   3
   4 function group_select($selname,$selclass,$preselected = false,$size = 4) {
   5
   6         $a = get_app();
   7
   8         $o = '';
   9
  10         $o .= "<select name=\"{$selname}[]\" id=\"$selclass\" class=\"$selclass\" multiple=\"multiple\" size=\"$size\" >\r\n";
  11
  12         $r = q("SELECT * FROM `group` WHERE `deleted` = 0 AND `uid` = %d ORDER BY `name` ASC",
  13                 $_SESSION['uid']
  14         );
  15
  16
  17         $arr = array('group' => $r, 'entry' => $o);
  18
  19         // e.g. 'network_pre_group_deny', 'profile_pre_group_allow'
  20
  21         call_hooks($a->module . '_pre_' . $selname, $arr);
  22
  23         if(count($r)) {
  24                 foreach($r as $rr) {
  25                         if((is_array($preselected)) && in_array($rr['id'], $preselected))
  26                                 $selected = " selected=\"selected\" ";
  27                         else
  28                                 $selected = '';
  29                         $trimmed = substr($rr['name'],0,12);
  30
  31                         $o .= "<option value=\"{$rr['id']}\" $selected title=\"{$rr['name']}\" >$trimmed</option>\r\n";
  32                 }
  33
  34         }
  35         $o .= "</select>\r\n";
  36
  37         call_hooks($a->module . '_post_' . $selname, $o);
  38
  39
  40         return $o;
  41 }
  42
  43
  44
  45 function contact_select($selname, $selclass, $preselected = false, $size = 4, $privmail = false, $celeb = false, $privatenet = false) {
  46
  47         $o = '';
  48
  49         // When used for private messages, we limit correspondence to mutual friends and the selector
  50         // to one recipient. By default our selector allows multiple selects amongst all contacts.
  51
  52         $sql_extra = '';
  53
  54         if($privmail || $celeb) {
  55                 $sql_extra .= sprintf(" AND `rel` = %d ", intval(REL_BUD));
  56         }
  57
  58         if($privmail || $privatenet) {
  59                 $sql_extra .= " AND `network` IN ( 'dfrn' ) ";
  60         }
  61
  62         if($privmail)
  63                 $o .= "<select name=\"$selname\" id=\"$selclass\" class=\"$selclass\" size=\"$size\" >\r\n";
  64         else
  65                 $o .= "<select name=\"{$selname}[]\" id=\"$selclass\" class=\"$selclass\" multiple=\"multiple\" size=\"$size\" >\r\n";
  66
  67         $r = q("SELECT `id`, `name`, `url`, `network` FROM `contact`
  68                 WHERE `uid` = %d AND `self` = 0 AND `blocked` = 0 AND `pending` = 0 AND `notify` != ''
  69                 $sql_extra
  70                 ORDER BY `name` ASC ",
  71                 intval(local_user())
  72         );
  73
  74
  75         $arr = array('contact' => $r, 'entry' => $o);
  76
  77         // e.g. 'network_pre_contact_deny', 'profile_pre_contact_allow'
  78
  79         call_hooks($a->module . '_pre_' . $selname, $arr);
  80
  81
  82
  83         if(count($r)) {
  84                 foreach($r as $rr) {
  85                         if((is_array($preselected)) && in_array($rr['id'], $preselected))
  86                                 $selected = " selected=\"selected\" ";
  87                         else
  88                                 $selected = '';
  89
  90                         $trimmed = substr($rr['name'],0,22);
  91
  92                         $o .= "<option value=\"{$rr['id']}\" $selected title=\"{$rr['name']}|{$rr['url']}\" >$trimmed</option>\r\n";
  93                 }
  94
  95         }
  96
  97         $o .= "</select>\r\n";
  98
  99         call_hooks($a->module . '_post_' . $selname, $o);
 100
 101         return $o;
 102 }
 103
 104 function fixacl(&$item) {
 105         $item = intval(str_replace(array('<','>'),array('',''),$item));
 106 }
 107
 108 function populate_acl($user = null,$celeb = false) {
 109
 110         $allow_cid = $allow_gid = $deny_cid = $deny_gid = false;
 111
 112         if(is_array($user)) {
 113                 $allow_cid = ((strlen($user['allow_cid']))
 114                         ? explode('><', $user['allow_cid']) : array() );
 115                 $allow_gid = ((strlen($user['allow_gid']))
 116                         ? explode('><', $user['allow_gid']) : array() );
 117                 $deny_cid  = ((strlen($user['deny_cid']))
 118                         ? explode('><', $user['deny_cid']) : array() );
 119                 $deny_gid  = ((strlen($user['deny_gid']))
 120                         ? explode('><', $user['deny_gid']) : array() );
 121                 array_walk($allow_cid,'fixacl');
 122                 array_walk($allow_gid,'fixacl');
 123                 array_walk($deny_cid,'fixacl');
 124                 array_walk($deny_gid,'fixacl');
 125         }
 126
 127         $o = '';
 128         $o .= '<div id="acl-wrapper">';
 129         $o .= '<div id="acl-permit-outer-wrapper">';
 130         $o .= '<div id="acl-permit-text">' . t('Visible To:') . '</div>';
 131         $o .= '<div id="acl-permit-text-end"></div>';
 132         $o .= '<div id="acl-permit-wrapper">';
 133         $o .= '<div id="group_allow_wrapper">';
 134         $o .= '<label id="acl-allow-group-label" for="group_allow" >' . t('Groups') . '</label>';
 135         $o .= group_select('group_allow','group_allow',$allow_gid);
 136         $o .= '</div>';
 137         $o .= '<div id="contact_allow_wrapper">';
 138         $o .= '<label id="acl-allow-contact-label" for="contact_allow" >' . t('Contacts') . '</label>';
 139         $o .= contact_select('contact_allow','contact_allow',$allow_cid,4,false,$celeb,true);
 140         $o .= '</div>';
 141         $o .= '</div>' . "\r\n";
 142         $o .= '<div id="acl-allow-end"></div>' . "\r\n";
 143         $o .= '</div>';
 144         $o .= '<div id="acl-deny-outer-wrapper">';
 145         $o .= '<div id="acl-deny-text">' . t('Except For:') . '</div>';
 146         $o .= '<div id="acl-deny-text-end"></div>';
 147         $o .= '<div id="acl-deny-wrapper">';
 148         $o .= '<div id="group_deny_wrapper" >';
 149         $o .= '<label id="acl-deny-group-label" for="group_deny" >' . t('Groups') . '</label>';
 150         $o .= group_select('group_deny','group_deny', $deny_gid);
 151         $o .= '</div>';
 152         $o .= '<div id="contact_deny_wrapper" >';
 153         $o .= '<label id="acl-deny-contact-label" for="contact_deny" >' . t('Contacts') . '</label>';
 154         $o .= contact_select('contact_deny','contact_deny', $deny_cid,4,false, $celeb,true);
 155         $o .= '</div>';
 156         $o .= '</div>' . "\r\n";
 157         $o .= '<div id="acl-deny-end"></div>' . "\r\n";
 158         $o .= '</div>';
 159         $o .= '</div>' . "\r\n";
 160         $o .= '<div id="acl-wrapper-end"></div>' . "\r\n";
 161         return $o;
 162
 163 }
 164