* @version $Id$ * * This file can be called from other Squirrelmail plugins or pages, which want * to provide a direct link to add ACLs to a predefined username. * * An example for such kind of usage is provided by the directory plugin (see * http://email.uoa.gr/projects/squirrelmail/directory.php ) * * This file is work in progress... Interface has not been finalized yet. */ /** Squirrelmail Includes */ if (file_exists('../../include/init.php')) { include_once('../../include/init.php'); } else if (file_exists('../../include/validate.php')) { define('SM_PATH','../../'); require_once(SM_PATH . 'include/validate.php'); require_once(SM_PATH . 'functions/global.php'); require_once(SM_PATH . 'functions/display_messages.php'); } require_once(SM_PATH . 'functions/imap.php'); sq_change_text_domain('useracl'); /** Useracl Includes */ require_once(SM_PATH . 'plugins/useracl/config.php'); require_once(SM_PATH . 'plugins/useracl/imap_acl.php'); require_once(SM_PATH . 'plugins/useracl/functions.php'); require_once(SM_PATH . 'plugins/useracl/html.php'); sqgetGlobalVar('key', $key, SQ_COOKIE); sqgetGlobalVar('username', $username, SQ_SESSION); sqgetGlobalVar('onetimepad', $onetimepad, SQ_SESSION); sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION); /* GET Variables that are passed from other pages */ /* e.g. addacl?mailbox=INBOX.foo&user=bar */ if(isset($_GET['mailbox'])) { $mybox = $_GET['mailbox']; } else { $mybox = ''; } if(isset($_GET['user'])) { $myuser = $_GET['user']; } else { $myuser = ''; } /* Printing */ $location = get_location(); $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0); if(sqimap_capability($imapConnection, 'ACL') == false ) { print 'IMAP server does not support the ACL capability, sorry.'; sqimap_logout($imapConnection); exit; } $boxes = useracl_mailbox_list($imapConnection); sqimap_logout($imapConnection); if ($compose_new_win == '1') { displayHtmlHeader(_("Add New User Permission"), '', false); } else { sq_change_text_domain('squirrelmail'); displayPageHeader($color, $mybox); } sq_change_text_domain('useracl'); useracl_html_printheader( _("Add New User Permission") ); useracl_html_print_all_sections_start(); useracl_html_print_section_start( _("Add New Share to User") ); print '
'; print ''; print ''; useracl_print_table_header(true); useracl_print_addnew_separate($mybox, $myuser); print '
'; print '
'; useracl_html_print_section_end(); useracl_html_print_all_sections_end(); sq_change_text_domain('squirrelmail'); if ($compose_new_win == '1') { print ''."\n"; } useracl_html_printfooter();