functions/compose.php

   1 <?php
   2
   3 /**
   4  * compose.php
   5  *
   6  * Functions for message compositon: writing a message, attaching files etc.
   7  *
   8  * @author Thijs Kinkhorst <kink at squirrelmail.org>
   9  * @copyright &copy; 1999-2007 The SquirrelMail Project Team
  10  * @license http://opensource.org/licenses/gpl-license.php GNU Public License
  11  * @version $Id$
  12  * @package squirrelmail
  13  */
  14
  15
  16 /**
  17  * Get a new file to write an attachment to.
  18  * This function makes sure it doesn't overwrite other attachments,
  19  * preventing collisions and race conditions.
  20  *
  21  * @return filename of the tempfile only (not full path)
  22  * @since 1.5.2
  23  */
  24 function sq_get_attach_tempfile()
  25 {
  26     global $username, $attachment_dir;
  27
  28     $hashed_attachment_dir = getHashedDir($username, $attachment_dir);
  29
  30     // using PHP >= 4.3.2 we can be truly atomic here
  31     $filemods = check_php_version ( 4,3,2 ) ? 'x' : 'w';
  32
  33     // give up after 1000 tries
  34     $TMP_MAX = 1000;
  35     for ($try=0; $try<$TMP_MAX; ++$try) {
  36
  37         $localfilename = GenerateRandomString(32, '', 7);
  38         $full_localfilename = "$hashed_attachment_dir/$localfilename";
  39
  40         // filename collision. try again
  41         if ( file_exists($full_localfilename) ) {
  42             continue;
  43         }
  44
  45         // try to open for (binary) writing
  46         $fp = @fopen( $full_localfilename, $filemods);
  47
  48         if ( $fp !== FALSE ) {
  49             // success! make sure it's not readable, close and return filename
  50             chmod($full_localfilename, 0600);
  51             fclose($fp);
  52             return $localfilename;
  53         }
  54     }
  55
  56     // we tried 1000 times but didn't succeed.
  57     error_box( _("Could not open temporary file to store attachment. Contact your system administrator to resolve this issue.") );
  58     return FALSE;
  59 }
  60
  61
  62 /**
  63   * Send a simple mail message using SquirrelMail's API.
  64   *
  65   * Until SquirrelMail is sufficiently redesigned, this
  66   * function is a stand-in for a simple mail delivery
  67   * call.  Currently, it only sends plaintext messages
  68   * (unless the caller uses the $message parameter).
  69   *
  70   * @param string $to      The destination recipient.
  71   * @param string $subject The message subject.
  72   * @param string $body    The message body.
  73   * @param string $from    The sender.
  74   * @param string $cc      The destination carbon-copy recipient.
  75   *                        (OPTIONAL; default no Cc:)
  76   * @param string $bcc     The destination blind carbon-copy recipient.
  77   *                        (OPTIONAL; default no Bcc:)
  78   * @param object $message If the caller wants to construct a more
  79   *                        complicated message themselves and pass
  80   *                        it here, this function will take care
  81   *                        of the rest - handing it over to SMTP
  82   *                        or Sendmail.  If this parameter is non-
  83   *                        empty, all other parameters are ignored.
  84   *                        (OPTIONAL: default is empty)
  85   *
  86   * @return array A two-element array, the first element being a
  87   *               boolean value indicating if the message was successfully
  88   *               sent or not, and the second element being the message's
  89   *               assigned Message-ID, if available (only available as of
  90   *               SquirrelMail 1.4.14 and 1.5.2)
  91   *
  92   */
  93 function sq_send_mail($to, $subject, $body, $from, $cc='', $bcc='', $message='')
  94 {
  95
  96    require_once(SM_PATH . 'functions/mime.php');
  97    require_once(SM_PATH . 'class/mime.class.php');
  98
  99    if (empty($message))
 100    {
 101       $message = new Message();
 102       $header  = new Rfc822Header();
 103
 104       $message->setBody($body);
 105       $content_type = new ContentType('text/plain');
 106       global $special_encoding, $default_charset;
 107       if ($special_encoding)
 108          $rfc822_header->encoding = $special_encoding;
 109       else
 110          $rfc822_header->encoding = '8bit';
 111       if ($default_charset)
 112          $content_type->properties['charset']=$default_charset;
 113       $header->content_type = $content_type;
 114
 115       $header->parseField('To', $to);
 116       $header->parseField('Cc', $cc);
 117       $header->parseField('Bcc', $bcc);
 118       $header->parseField('From', $from);
 119       $header->parseField('Subject', $subject);
 120       $message->rfc822_header = $header;
 121    }
 122 //sm_print_r($message);exit;
 123
 124
 125    global $useSendmail;
 126
 127
 128    // ripped from src/compose.php - based on both 1.5.2 and 1.4.14
 129    //
 130    if (!$useSendmail) {
 131       require_once(SM_PATH . 'class/deliver/Deliver_SMTP.class.php');
 132       $deliver = new Deliver_SMTP();
 133       global $smtpServerAddress, $smtpPort, $pop_before_smtp,
 134              $domain, $pop_before_smtp_host;
 135
 136       $authPop = (isset($pop_before_smtp) && $pop_before_smtp) ? true : false;
 137       if (empty($pop_before_smtp_host)) $pop_before_smtp_host = $smtpServerAddress;
 138       $user = '';
 139       $pass = '';
 140       get_smtp_user($user, $pass);
 141       $stream = $deliver->initStream($message,$domain,0,
 142                 $smtpServerAddress, $smtpPort, $user, $pass, $authPop, $pop_before_smtp_host);
 143    } else {
 144       require_once(SM_PATH . 'class/deliver/Deliver_SendMail.class.php');
 145       global $sendmail_path, $sendmail_args;
 146       // Check for outdated configuration
 147       if (!isset($sendmail_args)) {
 148          if ($sendmail_path=='/var/qmail/bin/qmail-inject') {
 149             $sendmail_args = '';
 150          } else {
 151             $sendmail_args = '-i -t';
 152          }
 153       }
 154       $deliver = new Deliver_SendMail(array('sendmail_args'=>$sendmail_args));
 155       $stream = $deliver->initStream($message,$sendmail_path);
 156    }
 157
 158
 159    $success = false;
 160    $message_id = '';
 161    if ($stream) {
 162       $deliver->mail($message, $stream);
 163       if (!empty($message->rfc822_header->message_id)) {
 164          $message_id = $message->rfc822_header->message_id;
 165       }
 166
 167       $success = $deliver->finalizeStream($stream);
 168    }
 169
 170    return array($success, $message_id);
 171
 172 }
 173
 174