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