Merge pull request #14981 from eileenmcnaughton/load_extract
[civicrm-core.git] / api / v3 / Mailing.php
CommitLineData
6a488035 1<?php
6a488035
TO
2/*
3 +--------------------------------------------------------------------+
fee14197 4 | CiviCRM version 5 |
6a488035 5 +--------------------------------------------------------------------+
6b83d5bd 6 | Copyright CiviCRM LLC (c) 2004-2019 |
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 +--------------------------------------------------------------------+
d25dd0ee 26 */
6a488035
TO
27
28/**
29 *
30 * APIv3 functions for registering/processing mailing events.
31 *
32 * @package CiviCRM_APIv3
6a488035
TO
33 */
34
6a488035
TO
35/**
36 * Handle a create event.
37 *
38 * @param array $params
22242c87 39 *
1747ab99 40 * @return array
7c31ae57 41 * API Success Array
c23f45d3
EM
42 * @throws \API_Exception
43 * @throws \Civi\API\Exception\UnauthorizedException
6a488035 44 */
c23f45d3 45function civicrm_api3_mailing_create($params) {
6bc3944a 46 if (isset($params['template_options']) && is_array($params['template_options'])) {
cf8f0fff 47 $params['template_options'] = ($params['template_options'] === []) ? '{}' : json_encode($params['template_options']);
6bc3944a 48 }
6818346a 49 if (CRM_Mailing_Info::workflowEnabled()) {
360d6097
TO
50 // Note: 'schedule mailings' and 'approve mailings' can update certain fields, but can't create.
51
52 if (empty($params['id'])) {
53 if (!CRM_Core_Permission::check('access CiviMail') && !CRM_Core_Permission::check('create mailings')) {
54 throw new \Civi\API\Exception\UnauthorizedException("Cannot create new mailing. Required permission: 'access CiviMail' or 'create mailings'");
55 }
56 }
57
cf8f0fff 58 $safeParams = [];
3efe22a0
TO
59 $fieldPerms = CRM_Mailing_BAO_Mailing::getWorkflowFieldPerms();
60 foreach (array_keys($params) as $field) {
61 if (CRM_Core_Permission::check($fieldPerms[$field])) {
62 $safeParams[$field] = $params[$field];
63 }
6818346a
TO
64 }
65 }
3efe22a0
TO
66 else {
67 $safeParams = $params;
68 }
2fc6d711 69 $timestampCheck = TRUE;
1f87b2a5 70 if (!empty($params['id']) && !empty($params['modified_date'])) {
2fc6d711
SL
71 $timestampCheck = _civicrm_api3_compare_timestamps($safeParams['modified_date'], $safeParams['id'], 'Mailing');
72 unset($safeParams['modified_date']);
73 }
74 if (!$timestampCheck) {
75 throw new API_Exception("Mailing has not been saved, Content maybe out of date, please refresh the page and try again");
76 }
236adf6a 77
fad7b105 78 // FlexMailer is a refactoring of CiviMail which provides new hooks/APIs/docs. If the sysadmin has opted to enable it, then use that instead of CiviMail.
236adf6a 79 $safeParams['_evil_bao_validator_'] = \CRM_Utils_Constant::value('CIVICRM_FLEXMAILER_HACK_SENDABLE', 'CRM_Mailing_BAO_Mailing::checkSendable');
5044f0fe 80 $result = _civicrm_api3_basic_create(_civicrm_api3_get_BAO(__FUNCTION__), $safeParams, 'Mailing');
c26f9b8c 81 return _civicrm_api3_mailing_get_formatResult($result);
6a488035
TO
82}
83
c23f45d3 84/**
9950a1c9
CW
85 * Get tokens for one or more entity type
86 *
87 * Output will be formatted either as a flat list,
88 * or pass sequential=1 to retrieve as a hierarchy formatted for select2.
22242c87 89 *
c23f45d3 90 * @param array $params
9950a1c9 91 * Should contain an array of entities to retrieve tokens for.
22242c87 92 *
c23f45d3
EM
93 * @return array
94 * @throws \API_Exception
95 */
1d280e03 96function civicrm_api3_mailing_gettokens($params) {
cf8f0fff 97 $tokens = [];
1d280e03 98 foreach ((array) $params['entity'] as $ent) {
9950a1c9 99 $func = lcfirst($ent) . 'Tokens';
1d280e03
CW
100 if (!method_exists('CRM_Core_SelectValues', $func)) {
101 throw new API_Exception('Unknown token entity: ' . $ent);
102 }
103 $tokens = array_merge(CRM_Core_SelectValues::$func(), $tokens);
7e6e8bd6 104 }
1d280e03
CW
105 if (!empty($params['sequential'])) {
106 $tokens = CRM_Utils_Token::formatTokensForDisplay($tokens);
7e6e8bd6 107 }
1d280e03
CW
108 return civicrm_api3_create_success($tokens, $params, 'Mailing', 'gettokens');
109}
a95acf21 110
1d280e03
CW
111/**
112 * Adjust Metadata for Create action.
113 *
114 * The metadata is used for setting defaults, documentation & validation.
115 *
116 * @param array $params
117 * Array of parameters determined by getfields.
118 */
119function _civicrm_api3_mailing_gettokens_spec(&$params) {
cf8f0fff
CW
120 $params['entity'] = [
121 'api.default' => ['contact'],
1d280e03 122 'api.required' => 1,
7b6c5043 123 'api.multiple' => 1,
1d280e03 124 'title' => 'Entity',
cf8f0fff
CW
125 'options' => [],
126 ];
9950a1c9 127 // Fetch a list of token functions and format to look like entity names
1d280e03
CW
128 foreach (get_class_methods('CRM_Core_SelectValues') as $func) {
129 if (strpos($func, 'Tokens')) {
9950a1c9 130 $ent = ucfirst(str_replace('Tokens', '', $func));
1d280e03
CW
131 $params['entity']['options'][$ent] = $ent;
132 }
133 }
7e6e8bd6 134}
2b5e4108 135
11e09c59 136/**
0aa0303c
EM
137 * Adjust Metadata for Create action.
138 *
139 * The metadata is used for setting defaults, documentation & validation.
11e09c59 140 *
cf470720 141 * @param array $params
b081365f 142 * Array of parameters determined by getfields.
11e09c59 143 */
6a488035 144function _civicrm_api3_mailing_create_spec(&$params) {
fddd185d 145 $params['created_id']['api.default'] = 'user_contact_id';
b0a31714 146
1a574627 147 $params['override_verp']['api.default'] = !CRM_Core_BAO_Setting::getItem(CRM_Core_BAO_Setting::MAILING_PREFERENCES_NAME, 'track_civimail_replies');
b0a31714 148 $params['visibility']['api.default'] = 'Public Pages';
1a574627 149 $params['dedupe_email']['api.default'] = CRM_Core_BAO_Setting::getItem(CRM_Core_BAO_Setting::MAILING_PREFERENCES_NAME, 'dedupe_email_default');
b0a31714
TO
150
151 $params['forward_replies']['api.default'] = FALSE;
152 $params['auto_responder']['api.default'] = FALSE;
153 $params['open_tracking']['api.default'] = TRUE;
154 $params['url_tracking']['api.default'] = TRUE;
155
156 $params['header_id']['api.default'] = CRM_Mailing_PseudoConstant::defaultComponent('Header', '');
157 $params['footer_id']['api.default'] = CRM_Mailing_PseudoConstant::defaultComponent('Footer', '');
158 $params['optout_id']['api.default'] = CRM_Mailing_PseudoConstant::defaultComponent('OptOut', '');
159 $params['reply_id']['api.default'] = CRM_Mailing_PseudoConstant::defaultComponent('Reply', '');
160 $params['resubscribe_id']['api.default'] = CRM_Mailing_PseudoConstant::defaultComponent('Resubscribe', '');
161 $params['unsubscribe_id']['api.default'] = CRM_Mailing_PseudoConstant::defaultComponent('Unsubscribe', '');
f72b68c0 162 $params['mailing_type']['api.default'] = 'standalone';
beac1417 163 $defaultAddress = CRM_Core_BAO_Domain::getNameAndEmail(TRUE, TRUE);
a98504a7 164 foreach ($defaultAddress as $value) {
b0a31714
TO
165 if (preg_match('/"(.*)" <(.*)>/', $value, $match)) {
166 $params['from_email']['api.default'] = $match[2];
167 $params['from_name']['api.default'] = $match[1];
168 }
169 }
6a488035
TO
170}
171
70599df6 172/**
173 * Adjust metadata for clone spec action.
174 *
175 * @param array $spec
176 */
00dc999a
TO
177function _civicrm_api3_mailing_clone_spec(&$spec) {
178 $mailingFields = CRM_Mailing_DAO_Mailing::fields();
179 $spec['id'] = $mailingFields['id'];
180 $spec['id']['api.required'] = 1;
181}
182
70599df6 183/**
184 * Clone mailing.
185 *
186 * @param array $params
187 *
188 * @return array
189 * @throws \CiviCRM_API3_Exception
190 */
00dc999a 191function civicrm_api3_mailing_clone($params) {
cf8f0fff 192 $BLACKLIST = [
00dc999a
TO
193 'id',
194 'is_completed',
195 'created_id',
196 'created_date',
197 'scheduled_id',
198 'scheduled_date',
199 'approver_id',
200 'approval_date',
201 'approval_status_id',
202 'approval_note',
203 'is_archived',
204 'hash',
a18a5128 205 'mailing_type',
cf8f0fff 206 ];
00dc999a 207
cf8f0fff 208 $get = civicrm_api3('Mailing', 'getsingle', ['id' => $params['id']]);
00dc999a 209
cf8f0fff 210 $newParams = [];
00dc999a 211 $newParams['debug'] = CRM_Utils_Array::value('debug', $params);
cf8f0fff
CW
212 $newParams['groups']['include'] = [];
213 $newParams['groups']['exclude'] = [];
214 $newParams['mailings']['include'] = [];
215 $newParams['mailings']['exclude'] = [];
00dc999a
TO
216 foreach ($get as $field => $value) {
217 if (!in_array($field, $BLACKLIST)) {
218 $newParams[$field] = $value;
219 }
220 }
221
222 $dao = new CRM_Mailing_DAO_MailingGroup();
223 $dao->mailing_id = $params['id'];
224 $dao->find();
225 while ($dao->fetch()) {
226 // CRM-11431; account for multi-lingual
227 $entity = (substr($dao->entity_table, 0, 15) == 'civicrm_mailing') ? 'mailings' : 'groups';
228 $newParams[$entity][strtolower($dao->group_type)][] = $dao->entity_id;
229 }
230
231 return civicrm_api3('Mailing', 'create', $newParams);
232}
233
e37b4b04 234/**
eb1823ac 235 * Handle a delete event.
e37b4b04 236 *
237 * @param array $params
77b97be7 238 *
a6c01b45 239 * @return array
72b3a70c 240 * API Success Array
e37b4b04 241 */
906e6120 242function civicrm_api3_mailing_delete($params) {
7e6e8bd6 243 return _civicrm_api3_basic_delete(_civicrm_api3_get_BAO(__FUNCTION__), $params);
e37b4b04 244}
245
6a488035
TO
246/**
247 * Handle a get event.
248 *
249 * @param array $params
d1b0d05e 250 *
6a488035
TO
251 * @return array
252 */
e37b4b04 253function civicrm_api3_mailing_get($params) {
f487e358 254 $result = _civicrm_api3_basic_get(_civicrm_api3_get_BAO(__FUNCTION__), $params, TRUE, 'Mailing');
6bc3944a
TO
255 return _civicrm_api3_mailing_get_formatResult($result);
256}
257
258/**
259 * Format definition.
260 *
261 * @param array $result
262 *
263 * @return array
264 * @throws \CRM_Core_Exception
265 */
266function _civicrm_api3_mailing_get_formatResult($result) {
267 if (isset($result['values']) && is_array($result['values'])) {
268 foreach ($result['values'] as $key => $caseType) {
269 if (isset($result['values'][$key]['template_options']) && is_string($result['values'][$key]['template_options'])) {
270 $result['values'][$key]['template_options'] = json_decode($result['values'][$key]['template_options'], TRUE);
271 }
272 }
273 }
274 return $result;
6a488035
TO
275}
276
c23f45d3 277/**
22242c87
EM
278 * Adjust metadata for mailing submit api function.
279 *
c23f45d3
EM
280 * @param array $spec
281 */
6818346a
TO
282function _civicrm_api3_mailing_submit_spec(&$spec) {
283 $mailingFields = CRM_Mailing_DAO_Mailing::fields();
284 $spec['id'] = $mailingFields['id'];
285 $spec['scheduled_date'] = $mailingFields['scheduled_date'];
286 $spec['approval_date'] = $mailingFields['approval_date'];
2c1e4dc1
TO
287 $spec['approval_status_id'] = $mailingFields['approval_status_id'];
288 $spec['approval_note'] = $mailingFields['approval_note'];
768c558c 289 // _skip_evil_bao_auto_recipients_: bool
6818346a
TO
290}
291
292/**
22242c87
EM
293 * Mailing submit.
294 *
6818346a 295 * @param array $params
22242c87 296 *
768c558c
TO
297 * @return array
298 * @throws API_Exception
6818346a
TO
299 */
300function civicrm_api3_mailing_submit($params) {
cf8f0fff 301 civicrm_api3_verify_mandatory($params, 'CRM_Mailing_DAO_Mailing', ['id']);
6818346a
TO
302
303 if (!isset($params['scheduled_date']) && !isset($updateParams['approval_date'])) {
304 throw new API_Exception("Missing parameter scheduled_date and/or approval_date");
305 }
306 if (!is_numeric(CRM_Core_Session::getLoggedInContactID())) {
307 throw new API_Exception("Failed to determine current user");
308 }
309
cf8f0fff 310 $updateParams = [];
6818346a
TO
311 $updateParams['id'] = $params['id'];
312
dc64d047
EM
313 // Note: we'll pass along scheduling/approval fields, but they may get ignored
314 // if we don't have permission.
6818346a
TO
315 if (isset($params['scheduled_date'])) {
316 $updateParams['scheduled_date'] = $params['scheduled_date'];
317 $updateParams['scheduled_id'] = CRM_Core_Session::getLoggedInContactID();
318 }
768c558c 319 if (isset($params['approval_date'])) {
6818346a
TO
320 $updateParams['approval_date'] = $params['approval_date'];
321 $updateParams['approver_id'] = CRM_Core_Session::getLoggedInContactID();
322 $updateParams['approval_status_id'] = CRM_Utils_Array::value('approval_status_id', $updateParams, CRM_Core_OptionGroup::getDefaultValue('mail_approval_status'));
323 }
2c1e4dc1
TO
324 if (isset($params['approval_note'])) {
325 $updateParams['approval_note'] = $params['approval_note'];
326 }
768c558c
TO
327 if (isset($params['_skip_evil_bao_auto_recipients_'])) {
328 $updateParams['_skip_evil_bao_auto_recipients_'] = $params['_skip_evil_bao_auto_recipients_'];
329 }
6818346a
TO
330
331 $updateParams['options']['reload'] = 1;
332 return civicrm_api3('Mailing', 'create', $updateParams);
333}
334
6a488035
TO
335/**
336 * Process a bounce event by passing through to the BAOs.
337 *
338 * @param array $params
339 *
77b97be7 340 * @throws API_Exception
6a488035
TO
341 * @return array
342 */
343function civicrm_api3_mailing_event_bounce($params) {
7e6e8bd6
TO
344 $body = $params['body'];
345 unset($params['body']);
6a488035 346
7e6e8bd6 347 $params += CRM_Mailing_BAO_BouncePattern::match($body);
6a488035 348
7e6e8bd6
TO
349 if (CRM_Mailing_Event_BAO_Bounce::create($params)) {
350 return civicrm_api3_create_success($params);
351 }
352 else {
244bbdd8 353 throw new API_Exception(ts('Queue event could not be found'), 'no_queue_event');
7e6e8bd6 354 }
6a488035
TO
355}
356
11e09c59 357/**
22242c87 358 * Adjust Metadata for bounce_spec action.
11e09c59 359 *
0aa0303c
EM
360 * The metadata is used for setting defaults, documentation & validation.
361 *
cf470720 362 * @param array $params
b081365f 363 * Array of parameters determined by getfields.
11e09c59 364 */
6a488035
TO
365function _civicrm_api3_mailing_event_bounce_spec(&$params) {
366 $params['job_id']['api.required'] = 1;
4c41ecb2 367 $params['job_id']['title'] = 'Job ID';
6a488035 368 $params['event_queue_id']['api.required'] = 1;
4c41ecb2 369 $params['event_queue_id']['title'] = 'Event Queue ID';
6a488035 370 $params['hash']['api.required'] = 1;
4c41ecb2 371 $params['hash']['title'] = 'Hash';
6a488035 372 $params['body']['api.required'] = 1;
4c41ecb2 373 $params['body']['title'] = 'Body';
6a488035
TO
374}
375
376/**
22242c87
EM
377 * Handle a confirm event.
378 *
6a488035
TO
379 * @deprecated
380 *
381 * @param array $params
382 *
383 * @return array
384 */
385function civicrm_api3_mailing_event_confirm($params) {
244bbdd8 386 return civicrm_api('MailingEventConfirm', 'create', $params);
6a488035
TO
387}
388
a14e9d08 389/**
d1b0d05e
EM
390 * Declare deprecated functions.
391 *
a14e9d08 392 * @deprecated api notice
a6c01b45 393 * @return array
16b10e64 394 * Array of deprecated actions
a14e9d08
CW
395 */
396function _civicrm_api3_mailing_deprecation() {
cf8f0fff 397 return ['event_confirm' => 'Mailing api "event_confirm" action is deprecated. Use the mailing_event_confirm api instead.'];
a14e9d08
CW
398}
399
6a488035 400/**
22242c87 401 * Handle a reply event.
6a488035
TO
402 *
403 * @param array $params
404 *
405 * @return array
406 */
407function civicrm_api3_mailing_event_reply($params) {
7e6e8bd6
TO
408 $job = $params['job_id'];
409 $queue = $params['event_queue_id'];
410 $hash = $params['hash'];
411 $replyto = $params['replyTo'];
412 $bodyTxt = CRM_Utils_Array::value('bodyTxt', $params);
413 $bodyHTML = CRM_Utils_Array::value('bodyHTML', $params);
414 $fullEmail = CRM_Utils_Array::value('fullEmail', $params);
415
416 $mailing = CRM_Mailing_Event_BAO_Reply::reply($job, $queue, $hash, $replyto);
417
418 if (empty($mailing)) {
419 return civicrm_api3_create_error('Queue event could not be found');
420 }
6a488035 421
7e6e8bd6 422 CRM_Mailing_Event_BAO_Reply::send($queue, $mailing, $bodyTxt, $replyto, $bodyHTML, $fullEmail);
6a488035 423
7e6e8bd6 424 return civicrm_api3_create_success($params);
6a488035
TO
425}
426
11e09c59 427/**
22242c87 428 * Adjust Metadata for event_reply action.
11e09c59 429 *
0aa0303c
EM
430 * The metadata is used for setting defaults, documentation & validation.
431 *
cf470720 432 * @param array $params
b081365f 433 * Array of parameters determined by getfields.
11e09c59 434 */
6a488035
TO
435function _civicrm_api3_mailing_event_reply_spec(&$params) {
436 $params['job_id']['api.required'] = 1;
4c41ecb2 437 $params['job_id']['title'] = 'Job ID';
6a488035 438 $params['event_queue_id']['api.required'] = 1;
4c41ecb2 439 $params['event_queue_id']['title'] = 'Event Queue ID';
6a488035 440 $params['hash']['api.required'] = 1;
4c41ecb2 441 $params['hash']['title'] = 'Hash';
fb18363b 442 $params['replyTo']['api.required'] = 0;
7c31ae57
SL
443 //doesn't really explain adequately
444 $params['replyTo']['title'] = 'Reply To';
6a488035
TO
445}
446
447/**
22242c87 448 * Handle a forward event.
6a488035
TO
449 *
450 * @param array $params
451 *
452 * @return array
453 */
454function civicrm_api3_mailing_event_forward($params) {
7e6e8bd6
TO
455 $job = $params['job_id'];
456 $queue = $params['event_queue_id'];
457 $hash = $params['hash'];
458 $email = $params['email'];
459 $fromEmail = CRM_Utils_Array::value('fromEmail', $params);
460 $params = CRM_Utils_Array::value('params', $params);
6a488035 461
7e6e8bd6 462 $forward = CRM_Mailing_Event_BAO_Forward::forward($job, $queue, $hash, $email, $fromEmail, $params);
6a488035 463
7e6e8bd6
TO
464 if ($forward) {
465 return civicrm_api3_create_success($params);
466 }
6a488035 467
7e6e8bd6 468 return civicrm_api3_create_error('Queue event could not be found');
6a488035
TO
469}
470
11e09c59 471/**
22242c87 472 * Adjust Metadata for event_forward action.
11e09c59 473 *
0aa0303c
EM
474 * The metadata is used for setting defaults, documentation & validation.
475 *
cf470720 476 * @param array $params
b081365f 477 * Array of parameters determined by getfields.
11e09c59 478 */
6a488035
TO
479function _civicrm_api3_mailing_event_forward_spec(&$params) {
480 $params['job_id']['api.required'] = 1;
48280907 481 $params['job_id']['title'] = 'Job ID';
6a488035 482 $params['event_queue_id']['api.required'] = 1;
4c41ecb2 483 $params['event_queue_id']['title'] = 'Event Queue ID';
6a488035 484 $params['hash']['api.required'] = 1;
4c41ecb2 485 $params['hash']['title'] = 'Hash';
6a488035 486 $params['email']['api.required'] = 1;
4c41ecb2 487 $params['email']['title'] = 'Forwarded to Email';
6a488035
TO
488}
489
490/**
22242c87 491 * Handle a click event.
6a488035
TO
492 *
493 * @param array $params
494 *
495 * @return array
496 */
497function civicrm_api3_mailing_event_click($params) {
7e6e8bd6
TO
498 civicrm_api3_verify_mandatory($params,
499 'CRM_Mailing_Event_DAO_TrackableURLOpen',
cf8f0fff 500 ['event_queue_id', 'url_id'],
7e6e8bd6
TO
501 FALSE
502 );
6a488035 503
7e6e8bd6
TO
504 $url_id = $params['url_id'];
505 $queue = $params['event_queue_id'];
6a488035 506
7e6e8bd6 507 $url = CRM_Mailing_Event_BAO_TrackableURLOpen::track($queue, $url_id);
6a488035 508
cf8f0fff 509 $values = [];
7e6e8bd6
TO
510 $values['url'] = $url;
511 $values['is_error'] = 0;
6a488035 512
7e6e8bd6 513 return civicrm_api3_create_success($values);
6a488035
TO
514}
515
516/**
22242c87 517 * Handle an open event.
6a488035
TO
518 *
519 * @param array $params
520 *
521 * @return array
522 */
523function civicrm_api3_mailing_event_open($params) {
524
7e6e8bd6
TO
525 civicrm_api3_verify_mandatory($params,
526 'CRM_Mailing_Event_DAO_Opened',
cf8f0fff 527 ['event_queue_id'],
7e6e8bd6
TO
528 FALSE
529 );
6a488035 530
7e6e8bd6
TO
531 $queue = $params['event_queue_id'];
532 $success = CRM_Mailing_Event_BAO_Opened::open($queue);
6a488035 533
7e6e8bd6
TO
534 if (!$success) {
535 return civicrm_api3_create_error('mailing open event failed');
536 }
6a488035 537
7e6e8bd6 538 return civicrm_api3_create_success($params);
6a488035
TO
539}
540
c23f45d3 541/**
22242c87
EM
542 * Preview mailing.
543 *
c23f45d3 544 * @param array $params
22242c87
EM
545 * Array per getfields metadata.
546 *
c23f45d3
EM
547 * @return array
548 * @throws \API_Exception
549 */
7811a84b 550function civicrm_api3_mailing_preview($params) {
7811a84b 551 $fromEmail = NULL;
552 if (!empty($params['from_email'])) {
553 $fromEmail = $params['from_email'];
554 }
555
7811a84b 556 $mailing = new CRM_Mailing_BAO_Mailing();
0075b0cb 557 $mailingID = CRM_Utils_Array::value('id', $params);
558 if ($mailingID) {
559 $mailing->id = $mailingID;
560 $mailing->find(TRUE);
561 }
562 else {
563 $mailing->copyValues($params);
564 }
565
566 $session = CRM_Core_Session::singleton();
7811a84b 567
568 CRM_Mailing_BAO_Mailing::tokenReplace($mailing);
569
570 // get and format attachments
571 $attachments = CRM_Core_BAO_File::getEntityFile('civicrm_mailing', $mailing->id);
572
573 $returnProperties = $mailing->getReturnProperties();
574 $contactID = CRM_Utils_Array::value('contact_id', $params);
575 if (!$contactID) {
f4377975
SL
576 // If we still don't have a userID in a session because we are annon then set contactID to be 0
577 $contactID = empty($session->get('userID')) ? 0 : $session->get('userID');
7811a84b 578 }
cf8f0fff 579 $mailingParams = ['contact_id' => $contactID];
7811a84b 580
f4377975
SL
581 if (!$contactID) {
582 $details = CRM_Utils_Token::getAnonymousTokenDetails($mailingParams, $returnProperties, TRUE, TRUE, NULL, $mailing->getFlattenedTokens());
1246fd4c 583 $details = CRM_Utils_Array::value(0, $details[0]);
f4377975
SL
584 }
585 else {
586 $details = CRM_Utils_Token::getTokenDetails($mailingParams, $returnProperties, TRUE, TRUE, NULL, $mailing->getFlattenedTokens());
1246fd4c 587 $details = $details[0][$contactID];
f4377975 588 }
7811a84b 589
f4377975 590 $mime = $mailing->compose(NULL, NULL, NULL, $contactID, $fromEmail, $fromEmail,
1246fd4c 591 TRUE, $details, $attachments
7811a84b 592 );
593
cf8f0fff 594 return civicrm_api3_create_success([
3d8aa9b2 595 'id' => $mailingID,
bd6658bd 596 'contact_id' => $contactID,
d8c20bdb 597 'subject' => CRM_Utils_Array::value('Subject', $mime->headers(), ''),
51ae62c4
TO
598 'body_html' => $mime->getHTMLBody(),
599 'body_text' => $mime->getTXTBody(),
cf8f0fff 600 ]);
6a488035
TO
601}
602
c23f45d3 603/**
22242c87
EM
604 * Adjust metadata for send test function.
605 *
c23f45d3
EM
606 * @param array $spec
607 */
7ada2376
TO
608function _civicrm_api3_mailing_send_test_spec(&$spec) {
609 $spec['test_group']['title'] = 'Test Group ID';
610 $spec['test_email']['title'] = 'Test Email Address';
480a9346 611 $spec['mailing_id']['api.required'] = TRUE;
612 $spec['mailing_id']['title'] = ts('Mailing Id');
7ada2376
TO
613}
614
c23f45d3 615/**
22242c87
EM
616 * Send test mailing.
617 *
c23f45d3 618 * @param array $params
22242c87 619 *
c23f45d3
EM
620 * @return array
621 * @throws \API_Exception
622 * @throws \CiviCRM_API3_Exception
623 */
425723d9 624function civicrm_api3_mailing_send_test($params) {
625 if (!array_key_exists('test_group', $params) && !array_key_exists('test_email', $params)) {
481a74f4 626 throw new API_Exception("Mandatory key(s) missing from params array: test_group and/or test_email field are required");
425723d9 627 }
628 civicrm_api3_verify_mandatory($params,
629 'CRM_Mailing_DAO_MailingJob',
cf8f0fff 630 ['mailing_id'],
425723d9 631 FALSE
632 );
7811a84b 633
425723d9 634 $testEmailParams = _civicrm_api3_generic_replace_base_params($params);
480a9346 635 if (isset($testEmailParams['id'])) {
636 unset($testEmailParams['id']);
637 }
638
7811a84b 639 $testEmailParams['is_test'] = 1;
a49b32a6 640 $testEmailParams['status'] = 'Scheduled';
38001e70 641 $testEmailParams['scheduled_date'] = CRM_Utils_Date::processDate(date('Y-m-d'), date('H:i:s'));
2dd8a2cb 642 $testEmailParams['is_calling_function_updated_to_reflect_deprecation'] = TRUE;
7811a84b 643 $job = civicrm_api3('MailingJob', 'create', $testEmailParams);
2dd8a2cb 644 CRM_Mailing_BAO_Mailing::getRecipients($testEmailParams['mailing_id']);
425723d9 645 $testEmailParams['job_id'] = $job['id'];
291dfe43 646 $testEmailParams['emails'] = array_key_exists('test_email', $testEmailParams) ? explode(',', strtolower($testEmailParams['test_email'])) : NULL;
425723d9 647 if (!empty($params['test_email'])) {
932c73e7 648 $query = CRM_Utils_SQL_Select::from('civicrm_email e')
7c31ae57
SL
649 ->select(['e.id', 'e.contact_id', 'e.email'])
650 ->join('c', 'INNER JOIN civicrm_contact c ON e.contact_id = c.id')
651 ->where('e.email IN (@emails)', ['@emails' => $testEmailParams['emails']])
652 ->where('e.on_hold = 0')
653 ->where('c.is_opt_out = 0')
654 ->where('c.do_not_email = 0')
655 ->where('c.is_deceased = 0')
656 ->where('c.is_deleted = 0')
657 ->groupBy('e.id')
658 ->orderBy(['e.is_bulkmail DESC', 'e.is_primary DESC'])
659 ->toSQL();
425723d9 660 $dao = CRM_Core_DAO::executeQuery($query);
cf8f0fff 661 $emailDetail = [];
425723d9 662 // fetch contact_id and email id for all existing emails
663 while ($dao->fetch()) {
cf8f0fff 664 $emailDetail[strtolower($dao->email)] = [
425723d9 665 'contact_id' => $dao->contact_id,
666 'email_id' => $dao->id,
cf8f0fff 667 ];
425723d9 668 }
425723d9 669 foreach ($testEmailParams['emails'] as $key => $email) {
670 $email = trim($email);
671 $contactId = $emailId = NULL;
672 if (array_key_exists($email, $emailDetail)) {
673 $emailId = $emailDetail[$email]['email_id'];
674 $contactId = $emailDetail[$email]['contact_id'];
675 }
676 if (!$contactId) {
677 //create new contact.
678 $contact = civicrm_api3('Contact', 'create',
cf8f0fff 679 [
6ea503d4 680 'contact_type' => 'Individual',
425723d9 681 'email' => $email,
cf8f0fff
CW
682 'api.Email.get' => ['return' => 'id'],
683 ]
425723d9 684 );
685 $contactId = $contact['id'];
686 $emailId = $contact['values'][$contactId]['api.Email.get']['id'];
687 }
688 civicrm_api3('MailingEventQueue', 'create',
cf8f0fff 689 [
6ea503d4 690 'job_id' => $job['id'],
425723d9 691 'email_id' => $emailId,
21dfd5f5 692 'contact_id' => $contactId,
cf8f0fff 693 ]
425723d9 694 );
695 }
696 }
7811a84b 697
425723d9 698 $isComplete = FALSE;
480a9346 699
425723d9 700 while (!$isComplete) {
97b7d4a0
TO
701 // Q: In CRM_Mailing_BAO_Mailing::processQueue(), the three runJobs*()
702 // functions are all called. Why does Mailing.send_test only call one?
703 // CRM_Mailing_BAO_MailingJob::runJobs_pre($mailerJobSize, NULL);
425723d9 704 $isComplete = CRM_Mailing_BAO_MailingJob::runJobs($testEmailParams);
97b7d4a0 705 // CRM_Mailing_BAO_MailingJob::runJobs_post(NULL);
425723d9 706 }
7811a84b 707
708 //return delivered mail info
709 $mailDelivered = CRM_Mailing_Event_BAO_Delivered::getRows($params['mailing_id'], $job['id'], TRUE, NULL, NULL, NULL, TRUE);
710
711 return civicrm_api3_create_success($mailDelivered);
425723d9 712}
713
7811a84b 714/**
22242c87 715 * Adjust Metadata for send_mail action.
7811a84b 716 *
0aa0303c
EM
717 * The metadata is used for setting defaults, documentation & validation.
718 *
cf470720 719 * @param array $params
b081365f 720 * Array of parameters determined by getfields.
7811a84b 721 */
722function _civicrm_api3_mailing_stats_spec(&$params) {
723 $params['date']['api.default'] = 'now';
bd6658bd 724 $params['date']['title'] = 'Date';
5f5e0ad6 725 $params['is_distinct']['api.default'] = FALSE;
fe38c896 726 $params['is_distinct']['title'] = 'Is Distinct';
7811a84b 727}
6a488035 728
c23f45d3 729/**
22242c87
EM
730 * Function which needs to be explained.
731 *
c23f45d3 732 * @param array $params
22242c87 733 *
c23f45d3
EM
734 * @return array
735 * @throws \API_Exception
736 */
7811a84b 737function civicrm_api3_mailing_stats($params) {
738 civicrm_api3_verify_mandatory($params,
739 'CRM_Mailing_DAO_MailingJob',
cf8f0fff 740 ['mailing_id'],
7811a84b 741 FALSE
742 );
743
744 if ($params['date'] == 'now') {
745 $params['date'] = date('YmdHis');
746 }
747 else {
748 $params['date'] = CRM_Utils_Date::processDate($params['date'] . ' ' . $params['date_time']);
749 }
750
cf8f0fff 751 $stats[$params['mailing_id']] = [];
7811a84b 752 if (empty($params['job_id'])) {
753 $params['job_id'] = NULL;
754 }
cf8f0fff 755 foreach (['Delivered', 'Bounces', 'Unsubscribers', 'Unique Clicks', 'Opened'] as $detail) {
7811a84b 756 switch ($detail) {
757 case 'Delivered':
cf8f0fff 758 $stats[$params['mailing_id']] += [
5861634e 759 $detail => CRM_Mailing_Event_BAO_Delivered::getTotalCount($params['mailing_id'], $params['job_id'], (bool) $params['is_distinct'], $params['date']),
cf8f0fff 760 ];
7811a84b 761 break;
ea100cb5 762
7811a84b 763 case 'Bounces':
cf8f0fff 764 $stats[$params['mailing_id']] += [
5861634e 765 $detail => CRM_Mailing_Event_BAO_Bounce::getTotalCount($params['mailing_id'], $params['job_id'], (bool) $params['is_distinct'], $params['date']),
cf8f0fff 766 ];
7811a84b 767 break;
ea100cb5 768
7811a84b 769 case 'Unsubscribers':
cf8f0fff 770 $stats[$params['mailing_id']] += [
5861634e 771 $detail => CRM_Mailing_Event_BAO_Unsubscribe::getTotalCount($params['mailing_id'], $params['job_id'], (bool) $params['is_distinct'], NULL, $params['date']),
cf8f0fff 772 ];
7811a84b 773 break;
ea100cb5 774
7811a84b 775 case 'Unique Clicks':
cf8f0fff 776 $stats[$params['mailing_id']] += [
5861634e 777 $detail => CRM_Mailing_Event_BAO_TrackableURLOpen::getTotalCount($params['mailing_id'], $params['job_id'], (bool) $params['is_distinct'], NULL, $params['date']),
cf8f0fff 778 ];
7811a84b 779 break;
ea100cb5 780
7811a84b 781 case 'Opened':
cf8f0fff 782 $stats[$params['mailing_id']] += [
5861634e 783 $detail => CRM_Mailing_Event_BAO_Opened::getTotalCount($params['mailing_id'], $params['job_id'], (bool) $params['is_distinct'], $params['date']),
cf8f0fff 784 ];
7811a84b 785 break;
786 }
787 }
796b4348
SL
788 $stats[$params['mailing_id']]['delivered_rate'] = $stats[$params['mailing_id']]['opened_rate'] = $stats[$params['mailing_id']]['clickthrough_rate'] = '0.00%';
789 if (!empty(CRM_Mailing_Event_BAO_Queue::getTotalCount($params['mailing_id'], $params['job_id']))) {
790 $stats[$params['mailing_id']]['delivered_rate'] = round((100.0 * $stats[$params['mailing_id']]['Delivered']) / CRM_Mailing_Event_BAO_Queue::getTotalCount($params['mailing_id'], $params['job_id']), 2) . '%';
791 }
792 if (!empty($stats[$params['mailing_id']]['Delivered'])) {
793 $stats[$params['mailing_id']]['opened_rate'] = round($stats[$params['mailing_id']]['Opened'] / $stats[$params['mailing_id']]['Delivered'] * 100.0, 2) . '%';
794 $stats[$params['mailing_id']]['clickthrough_rate'] = round($stats[$params['mailing_id']]['Unique Clicks'] / $stats[$params['mailing_id']]['Delivered'] * 100.0, 2) . '%';
795 }
7811a84b 796 return civicrm_api3_create_success($stats);
797}
798
6a488035 799/**
22242c87
EM
800 * Fix the reset dates on the email record based on when a mail was last delivered.
801 *
6a488035
TO
802 * We only consider mailings that were completed and finished in the last 3 to 7 days
803 * Both the min and max days can be set via the params
22242c87 804 *
d0997921 805 * @param array $params
22242c87 806 *
645ee340 807 * @return array
6a488035
TO
808 */
809function civicrm_api3_mailing_update_email_resetdate($params) {
7e6e8bd6
TO
810 CRM_Mailing_Event_BAO_Delivered::updateEmailResetDate(
811 CRM_Utils_Array::value('minDays', $params, 3),
812 CRM_Utils_Array::value('maxDays', $params, 3)
813 );
814 return civicrm_api3_create_success();
6a488035 815}