123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241 |
- <?php
- /**
- * newmail.php
- *
- * Copyright (c) 1999-2002 The SquirrelMail Project Team
- * Copyright (c) 2000 by Michael Huttinger
- * Licensed under the GNU GPL. For full terms see the file COPYING.
- *
- * Quite a hack -- but my first attempt at a plugin. We were
- * looking for a way to play a sound when there was unseen
- * messages to look at. Nice for users who keep the squirrel
- * mail window up for long periods of time and want to know
- * when mail arrives.
- *
- * Basically, I hacked much of left_main.php into a plugin that
- * goes through each mail folder and increments a flag if
- * there are unseen messages. If the final count of unseen
- * folders is > 0, then we play a sound (using the HTML at the
- * far end of this script).
- *
- * This was tested with IE5.0 - but I hear Netscape works well,
- * too (with a plugin).
- *
- * $Id$
- * @package plugins
- * @subpackage newmail
- */
- /**
- */
- include_once(SM_PATH . 'functions/display_messages.php');
- function CheckNewMailboxSound($imapConnection, $mailbox, $real_box, $delimeter, $unseen, &$total_new) {
-
- global $folder_prefix, $trash_folder, $sent_folder,
- $color, $move_to_sent, $move_to_trash,
- $unseen_notify, $unseen_type, $newmail_allbox,
- $newmail_recent, $newmail_changetitle;
- $mailboxURL = urlencode($real_box);
- $unseen = $recent = 0;
- // Skip folders for Sent and Trash
- if ($real_box == $sent_folder ||
- $real_box == $trash_folder) {
- return 0;
- }
- if (($unseen_notify == 2 && $real_box == 'INBOX') ||
- ($unseen_notify == 3 && ($newmail_allbox == 'on' ||
- $real_box == 'INBOX'))) {
- $status = sqimap_status_messages( $imapConnection, $real_box);
- if($newmail_recent == 'on') {
- $total_new += $status['RECENT'];
- } else {
- $total_new += $status['UNSEEN'];
- }
- if ($total_new) {
- return 1;
- }
-
- }
- return 0;
- }
- function squirrelmail_plugin_init_newmail() {
- global $squirrelmail_plugin_hooks;
- $squirrelmail_plugin_hooks['left_main_before']['newmail'] = 'newmail_plugin';
- $squirrelmail_plugin_hooks['optpage_register_block']['newmail'] = 'newmail_optpage_register_block';
- $squirrelmail_plugin_hooks['options_save']['newmail'] = 'newmail_sav';
- $squirrelmail_plugin_hooks['loading_prefs']['newmail'] = 'newmail_pref';
- }
- function newmail_optpage_register_block() {
- // Gets added to the user's OPTIONS page.
- global $optpage_blocks;
- if ( checkForJavascript() ) {
- /* Register Squirrelspell with the $optionpages array. */
- $optpage_blocks[] = array(
- 'name' => _("NewMail Options"),
- 'url' => SM_PATH . 'plugins/newmail/newmail_opt.php',
- 'desc' => _("This configures settings for playing sounds and/or showing popup windows when new mail arrives."),
- 'js' => TRUE
- );
- }
- }
- function newmail_sav() {
- global $data_dir, $username;
- if ( sqgetGlobalVar('submit_newmail', $submit, SQ_POST) ) {
- $media_enable = '';
- $media_popup = '';
- $media_allbox = '';
- $media_recent = '';
- $media_changetitle = '';
- $media_sel = '';
- sqgetGlobalVar('media_enable', $media_enable, SQ_POST);
- sqgetGlobalVar('media_popup', $media_popup, SQ_POST);
- sqgetGlobalVar('media_allbox', $media_allbox, SQ_POST);
- sqgetGlobalVar('media_recent', $media_recent, SQ_POST);
- sqgetGlobalVar('media_changetitle', $media_changetitle, SQ_POST);
- setPref($data_dir,$username,'newmail_enable',$media_enable);
- setPref($data_dir,$username,'newmail_popup', $media_popup);
- setPref($data_dir,$username,'newmail_allbox',$media_allbox);
- setPref($data_dir,$username,'newmail_recent',$media_recent);
- setPref($data_dir,$username,'newmail_changetitle',$media_changetitle);
-
- if( sqgetGlobalVar('media_sel', $media_sel, SQ_POST) &&
- ($media_sel == '(none)' || $media_sel == '(local media)') ) {
- removePref($data_dir,$username,'newmail_media');
- } else {
- setPref($data_dir,$username,'newmail_media',$media_sel);
- }
- echo html_tag( 'p', _("New Mail Notification options saved"), 'center' );
- }
- }
- function newmail_pref() {
-
- global $username,$data_dir;
- global $newmail_media,$newmail_enable,$newmail_popup,$newmail_allbox;
- global $newmail_recent, $newmail_changetitle;
-
- $newmail_recent = getPref($data_dir,$username,'newmail_recent');
- $newmail_enable = getPref($data_dir,$username,'newmail_enable');
- $newmail_media = getPref($data_dir, $username, 'newmail_media', '(none)');
- $newmail_popup = getPref($data_dir, $username, 'newmail_popup');
- $newmail_allbox = getPref($data_dir, $username, 'newmail_allbox');
- $newmail_changetitle = getPref($data_dir, $username, 'newmail_changetitle');
- }
- function newmail_plugin() {
- global $username, $key, $imapServerAddress, $imapPort,
- $newmail_media, $newmail_enable, $newmail_popup,
- $newmail_recent, $newmail_changetitle, $imapConnection, $PHP_SELF;
- if ($newmail_enable == 'on' ||
- $newmail_popup == 'on' ||
- $newmail_changetitle) {
- // open a connection on the imap port (143)
- $boxes = sqimap_mailbox_list($imapConnection);
- $delimeter = sqimap_get_delimiter($imapConnection);
- $status = 0;
- $totalNew = 0;
- for ($i = 0;$i < count($boxes); $i++) {
- $line = '';
- $mailbox = $boxes[$i]['formatted'];
- if (! isset($boxes[$i]['unseen'])) {
- $boxes[$i]['unseen'] = '';
- }
- if ($boxes[$i]['flags']) {
- $noselect = false;
- for ($h = 0; $h < count($boxes[$i]['flags']); $h++) {
- if (strtolower($boxes[$i]["flags"][$h]) == 'noselect') {
- $noselect = TRUE;
- }
- }
- if (! $noselect) {
- $status += CheckNewMailboxSound($imapConnection,
- $mailbox,
- $boxes[$i]['unformatted'],
- $delimeter,
- $boxes[$i]['unseen'],
- $totalNew);
- }
- } else {
- $status += CheckNewMailboxSound($imapConnection,
- $mailbox,
- $boxes[$i]['unformatted'],
- $delimeter,
- $boxes[$i]['unseen'],
- $totalNew);
- }
- }
- // sqimap_logout($imapConnection);
- // If we found unseen messages, then we
- // will play the sound as follows:
- if ($newmail_changetitle) {
- echo "<script language=\"javascript\">\n" .
- "function ChangeTitleLoad() {\n";
- if( $totalNew > 1 || $totalNew == 0 ) {
- echo 'window.parent.document.title = "' .
- sprintf(_("%s New Messages"), $totalNew ) .
- "\";\n";
- } else {
- echo 'window.parent.document.title = "' .
- sprintf(_("%s New Message"), $totalNew ) .
- "\";\n";
- }
- echo "if (BeforeChangeTitle != null)\n".
- "BeforeChangeTitle();\n".
- "}\n".
- "BeforeChangeTitle = window.onload;\n".
- "window.onload = ChangeTitleLoad;\n".
- "</script>\n";
- }
- if ($totalNew > 0 && $newmail_enable == 'on' && $newmail_media != '' ) {
- echo '<EMBED SRC="'.htmlspecialchars($newmail_media) .
- "\" HIDDEN=\"TRUE\" AUTOSTART=\"TRUE\">\n";
- }
- if ($totalNew > 0 && $newmail_popup == 'on') {
- echo "<SCRIPT LANGUAGE=\"JavaScript\">\n".
- "<!--\n".
- "function PopupScriptLoad() {\n".
- 'window.open("'.sqm_baseuri().'plugins/newmail/newmail.php?numnew='.$totalNew.
- '", "SMPopup",'.
- "\"width=200,height=130,scrollbars=no\");\n".
- "if (BeforePopupScript != null)\n".
- "BeforePopupScript();\n".
- "}\n".
- "BeforePopupScript = window.onload;\n".
- "window.onload = PopupScriptLoad;\n".
- // Idea by: Nic Wolfe (Nic@TimelapseProductions.com)
- // Web URL: http://fineline.xs.mw
- // More code from Tyler Akins
- "// End -->\n".
- "</script>\n";
- }
- }
- }
- ?>
|