Source for file compose.php

Documentation is available at 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 1999-2018 The SquirrelMail Project Team
  10.  * @license http://opensource.org/licenses/gpl-license.php GNU Public License
  11.  * @version $Id: compose.php 14750 2018-01-16 23:44:07Z pdontthink $
  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.          $header->encoding = $special_encoding;
  109.       else
  110.          $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. }

Documentation generated on Tue, 17 Apr 2018 04:22:23 +0200 by phpDocumentor 1.4.3