include/acl_selectors.php

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