Commit | Line | Data |
---|---|---|
6a488035 TO |
1 | <?php |
2 | /* | |
3 | +--------------------------------------------------------------------+ | |
06b69b18 | 4 | | CiviCRM version 4.5 | |
6a488035 | 5 | +--------------------------------------------------------------------+ |
06b69b18 | 6 | | Copyright CiviCRM LLC (c) 2004-2014 | |
6a488035 TO |
7 | +--------------------------------------------------------------------+ |
8 | | This file is a part of CiviCRM. | | |
9 | | | | |
10 | | CiviCRM is free software; you can copy, modify, and distribute it | | |
11 | | under the terms of the GNU Affero General Public License | | |
12 | | Version 3, 19 November 2007 and the CiviCRM Licensing Exception. | | |
13 | | | | |
14 | | CiviCRM is distributed in the hope that it will be useful, but | | |
15 | | WITHOUT ANY WARRANTY; without even the implied warranty of | | |
16 | | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. | | |
17 | | See the GNU Affero General Public License for more details. | | |
18 | | | | |
19 | | You should have received a copy of the GNU Affero General Public | | |
20 | | License and the CiviCRM Licensing Exception along | | |
21 | | with this program; if not, contact CiviCRM LLC | | |
22 | | at info[AT]civicrm[DOT]org. If you have questions about the | | |
23 | | GNU Affero General Public License or the licensing of CiviCRM, | | |
24 | | see the CiviCRM license FAQ at http://civicrm.org/licensing | | |
25 | +--------------------------------------------------------------------+ | |
26 | */ | |
27 | ||
28 | /** | |
29 | * | |
30 | * @package CRM | |
06b69b18 | 31 | * @copyright CiviCRM LLC (c) 2004-2014 |
6a488035 TO |
32 | * $Id$ |
33 | * | |
34 | */ | |
35 | class CRM_Mailing_BAO_Spool extends CRM_Mailing_DAO_Spool { | |
36 | ||
37 | /** | |
100fef9d | 38 | * Class constructor |
6a488035 TO |
39 | */ |
40 | function __construct() { | |
41 | parent::__construct(); | |
42 | } | |
43 | ||
44 | /** | |
45 | * Store Mails into Spool table. | |
46 | * | |
77b97be7 | 47 | * @param $recipient |
6a488035 TO |
48 | * @param array $headers The string of headers to send with the mail. |
49 | * | |
50 | * @param string $body The full text of the message body, including any | |
51 | * Mime parts, etc. | |
52 | * | |
100fef9d | 53 | * @param int $job_id |
77b97be7 EM |
54 | * |
55 | * @internal param mixed $recipients Either a comma-seperated list of recipients | |
56 | * (RFC822 compliant), or an array of recipients, | |
57 | * each RFC822 valid. This may contain recipients not | |
58 | * specified in the headers, for Bcc:, resending | |
59 | * messages, etc. | |
60 | * | |
6a488035 TO |
61 | * @return mixed Returns true on success, or a CRM_Eore_Error |
62 | * containing a descriptive error message on | |
63 | * failure. | |
64 | * @access public | |
65 | */ | |
66 | function send($recipient, $headers, $body, $job_id = null) { | |
67 | $headerStr = array(); | |
68 | foreach ($headers as $name => $value) { | |
69 | $headerStr[] = "$name: $value"; | |
70 | } | |
71 | $headerStr = implode("\n", $headerStr); | |
72 | ||
73 | if ( is_null( $job_id ) ) { | |
74 | // This is not a bulk mailing. Create a dummy job for it. | |
75 | ||
76 | $session = CRM_Core_Session::singleton(); | |
77 | $params = array(); | |
78 | $params['created_id'] = $session->get('userID'); | |
79 | $params['created_date'] = date('YmdHis'); | |
80 | $params['scheduled_id'] = $params['created_id']; | |
81 | $params['scheduled_date'] = $params['created_date']; | |
6a488035 TO |
82 | $params['is_completed'] = 1; |
83 | $params['is_archived'] = 1; | |
84 | $params['body_html'] = htmlspecialchars( $headerStr ) . "\n\n" . $body; | |
85 | $params['subject'] = $headers['Subject']; | |
86 | $params['name'] = $headers['Subject']; | |
87 | $ids = array(); | |
88 | $mailing = CRM_Mailing_BAO_Mailing::create($params, $ids); | |
89 | ||
90 | if ( empty( $mailing ) || is_a( $mailing, 'CRM_Core_Error' ) ) { | |
91 | return PEAR::raiseError( 'Unable to create spooled mailing.' ); | |
92 | } | |
93 | ||
9da8dc8c | 94 | $job = new CRM_Mailing_BAO_MailingJob(); |
6a488035 TO |
95 | $job->is_test = 0; // if set to 1 it doesn't show in the UI |
96 | $job->status = 'Complete'; | |
97 | $job->scheduled_date = CRM_Utils_Date::processDate(date('Y-m-d'), date('H:i:s')); | |
98 | $job->start_date = $job->scheduled_date; | |
99 | $job->end_date = $job->scheduled_date; | |
100 | $job->mailing_id = $mailing->id; | |
101 | $job->save(); | |
102 | $job_id = $job->id; // need this for parent_id below | |
103 | ||
9da8dc8c | 104 | $job = new CRM_Mailing_BAO_MailingJob(); |
6a488035 TO |
105 | $job->is_test = 0; |
106 | $job->status = 'Complete'; | |
107 | $job->scheduled_date = CRM_Utils_Date::processDate(date('Y-m-d'), date('H:i:s')); | |
108 | $job->start_date = $job->scheduled_date; | |
109 | $job->end_date = $job->scheduled_date; | |
110 | $job->mailing_id = $mailing->id; | |
111 | $job->parent_id = $job_id; | |
112 | $job->job_type = 'child'; | |
113 | $job->save(); | |
114 | $job_id = $job->id; // this is the one we want for the spool | |
115 | ||
116 | if ( is_array( $recipient ) ) { | |
117 | $recipient = implode( ';', $recipient ); | |
118 | } | |
119 | } | |
120 | ||
121 | $session = CRM_Core_Session::singleton(); | |
122 | ||
123 | $params = array( | |
124 | 'job_id' => $job_id, | |
125 | 'recipient_email' => $recipient, | |
126 | 'headers' => $headerStr, | |
127 | 'body' => $body, | |
128 | 'added_at' => date("YmdHis"), | |
129 | 'removed_at' => NULL, | |
130 | ); | |
131 | ||
132 | $spoolMail = new CRM_Mailing_DAO_Spool(); | |
133 | $spoolMail->copyValues($params); | |
134 | $spoolMail->save(); | |
135 | ||
136 | return TRUE; | |
137 | } | |
138 | } | |
139 |