<tr>
  <td class='text'><?php 
    xl('Access Control', 'e');
    ?>
:</td>
  <td><select name="access_group[]" multiple style="width:120px;">
  <?php 
    $list_acl_groups = acl_get_group_title_list();
    $default_acl_group = 'Administrators';
    foreach ($list_acl_groups as $value) {
        if ($default_acl_group == $value) {
            // Modified 6-2009 by BM - Translate group name if applicable
            echo " <option value='{$value}' selected>" . xl_gacl_group($value) . "</option>\n";
        } else {
            // Modified 6-2009 by BM - Translate group name if applicable
            echo " <option value='{$value}'>" . xl_gacl_group($value) . "</option>\n";
        }
    }
    ?>
  </select></td>
  <td><span class="text"><?php 
    xl('Additional Info', 'e');
    ?>
: </span></td>
  <td><textarea name=info style="width:120px;" cols=27 rows=4 wrap=auto></textarea></td>

  </tr>
  <tr height="25"><td colspan="4">&nbsp;</td></tr>
<?php 
}
?>
Esempio n. 2
0
function acl_listings_xml($err)
{
    global $phpgacl_location;
    include_once "{$phpgacl_location}/gacl_api.class.php";
    $gacl = new gacl_api();
    $message = "<?xml version=\"1.0\"?>\n" . "<response>\n";
    foreach (acl_get_group_title_list() as $value) {
        $acl_id = $gacl->search_acl(FALSE, FALSE, FALSE, FALSE, $value, FALSE, FALSE, FALSE, FALSE);
        foreach ($acl_id as $value2) {
            $acl = $gacl->get_acl($value2);
            $ret = $acl["return_value"];
            $note = $acl["note"];
            // Modified 6-2009 by BM - Translate gacl group name if applicable
            //                         Translate return value
            //                         Translate description
            $message .= "\t<acl>\n" . "\t\t<value>" . $value . "</value>\n" . "\t\t<title>" . xl_gacl_group($value) . "</title>\n" . "\t\t<returnid>" . $ret . "</returnid>\n" . "\t\t<returntitle>" . xl($ret) . "</returntitle>\n" . "\t\t<note>" . xl($note) . "</note>\n" . "\t</acl>\n";
        }
    }
    if (isset($err)) {
        foreach ($err as $value) {
            $message .= "\t<error>" . $value . "</error>\n";
        }
    }
    $message .= "</response>\n";
    return $message;
}