Short array syntax - auto-convert api dir
[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
7c550ca0 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;
4c41ecb2 443 $params['replyTo']['title'] = 'Reply To';//doesn't really explain adequately
6a488035
TO
444}
445
446/**
22242c87 447 * Handle a forward event.
6a488035
TO
448 *
449 * @param array $params
450 *
451 * @return array
452 */
453function civicrm_api3_mailing_event_forward($params) {
7e6e8bd6
TO
454 $job = $params['job_id'];
455 $queue = $params['event_queue_id'];
456 $hash = $params['hash'];
457 $email = $params['email'];
458 $fromEmail = CRM_Utils_Array::value('fromEmail', $params);
459 $params = CRM_Utils_Array::value('params', $params);
6a488035 460
7e6e8bd6 461 $forward = CRM_Mailing_Event_BAO_Forward::forward($job, $queue, $hash, $email, $fromEmail, $params);
6a488035 462
7e6e8bd6
TO
463 if ($forward) {
464 return civicrm_api3_create_success($params);
465 }
6a488035 466
7e6e8bd6 467 return civicrm_api3_create_error('Queue event could not be found');
6a488035
TO
468}
469
11e09c59 470/**
22242c87 471 * Adjust Metadata for event_forward action.
11e09c59 472 *
0aa0303c
EM
473 * The metadata is used for setting defaults, documentation & validation.
474 *
cf470720 475 * @param array $params
b081365f 476 * Array of parameters determined by getfields.
11e09c59 477 */
6a488035
TO
478function _civicrm_api3_mailing_event_forward_spec(&$params) {
479 $params['job_id']['api.required'] = 1;
48280907 480 $params['job_id']['title'] = 'Job ID';
6a488035 481 $params['event_queue_id']['api.required'] = 1;
4c41ecb2 482 $params['event_queue_id']['title'] = 'Event Queue ID';
6a488035 483 $params['hash']['api.required'] = 1;
4c41ecb2 484 $params['hash']['title'] = 'Hash';
6a488035 485 $params['email']['api.required'] = 1;
4c41ecb2 486 $params['email']['title'] = 'Forwarded to Email';
6a488035
TO
487}
488
489/**
22242c87 490 * Handle a click event.
6a488035
TO
491 *
492 * @param array $params
493 *
494 * @return array
495 */
496function civicrm_api3_mailing_event_click($params) {
7e6e8bd6
TO
497 civicrm_api3_verify_mandatory($params,
498 'CRM_Mailing_Event_DAO_TrackableURLOpen',
cf8f0fff 499 ['event_queue_id', 'url_id'],
7e6e8bd6
TO
500 FALSE
501 );
6a488035 502
7e6e8bd6
TO
503 $url_id = $params['url_id'];
504 $queue = $params['event_queue_id'];
6a488035 505
7e6e8bd6 506 $url = CRM_Mailing_Event_BAO_TrackableURLOpen::track($queue, $url_id);
6a488035 507
cf8f0fff 508 $values = [];
7e6e8bd6
TO
509 $values['url'] = $url;
510 $values['is_error'] = 0;
6a488035 511
7e6e8bd6 512 return civicrm_api3_create_success($values);
6a488035
TO
513}
514
515/**
22242c87 516 * Handle an open event.
6a488035
TO
517 *
518 * @param array $params
519 *
520 * @return array
521 */
522function civicrm_api3_mailing_event_open($params) {
523
7e6e8bd6
TO
524 civicrm_api3_verify_mandatory($params,
525 'CRM_Mailing_Event_DAO_Opened',
cf8f0fff 526 ['event_queue_id'],
7e6e8bd6
TO
527 FALSE
528 );
6a488035 529
7e6e8bd6
TO
530 $queue = $params['event_queue_id'];
531 $success = CRM_Mailing_Event_BAO_Opened::open($queue);
6a488035 532
7e6e8bd6
TO
533 if (!$success) {
534 return civicrm_api3_create_error('mailing open event failed');
535 }
6a488035 536
7e6e8bd6 537 return civicrm_api3_create_success($params);
6a488035
TO
538}
539
c23f45d3 540/**
22242c87
EM
541 * Preview mailing.
542 *
c23f45d3 543 * @param array $params
22242c87
EM
544 * Array per getfields metadata.
545 *
c23f45d3
EM
546 * @return array
547 * @throws \API_Exception
548 */
7811a84b 549function civicrm_api3_mailing_preview($params) {
7811a84b 550 $fromEmail = NULL;
551 if (!empty($params['from_email'])) {
552 $fromEmail = $params['from_email'];
553 }
554
7811a84b 555 $mailing = new CRM_Mailing_BAO_Mailing();
0075b0cb 556 $mailingID = CRM_Utils_Array::value('id', $params);
557 if ($mailingID) {
558 $mailing->id = $mailingID;
559 $mailing->find(TRUE);
560 }
561 else {
562 $mailing->copyValues($params);
563 }
564
565 $session = CRM_Core_Session::singleton();
7811a84b 566
567 CRM_Mailing_BAO_Mailing::tokenReplace($mailing);
568
569 // get and format attachments
570 $attachments = CRM_Core_BAO_File::getEntityFile('civicrm_mailing', $mailing->id);
571
572 $returnProperties = $mailing->getReturnProperties();
573 $contactID = CRM_Utils_Array::value('contact_id', $params);
574 if (!$contactID) {
575 $contactID = $session->get('userID');
576 }
cf8f0fff 577 $mailingParams = ['contact_id' => $contactID];
7811a84b 578
6bea4a47 579 $details = CRM_Utils_Token::getTokenDetails($mailingParams, $returnProperties, TRUE, TRUE, NULL, $mailing->getFlattenedTokens());
7811a84b 580
73cc3546 581 $mime = $mailing->compose(NULL, NULL, NULL, $session->get('userID'), $fromEmail, $fromEmail,
7811a84b 582 TRUE, $details[0][$contactID], $attachments
583 );
584
cf8f0fff 585 return civicrm_api3_create_success([
bd6658bd
TO
586 'id' => $params['id'],
587 'contact_id' => $contactID,
afa5a47b 588 'subject' => $mime->headers()['Subject'],
51ae62c4
TO
589 'body_html' => $mime->getHTMLBody(),
590 'body_text' => $mime->getTXTBody(),
cf8f0fff 591 ]);
6a488035
TO
592}
593
c23f45d3 594/**
22242c87
EM
595 * Adjust metadata for send test function.
596 *
c23f45d3
EM
597 * @param array $spec
598 */
7ada2376
TO
599function _civicrm_api3_mailing_send_test_spec(&$spec) {
600 $spec['test_group']['title'] = 'Test Group ID';
601 $spec['test_email']['title'] = 'Test Email Address';
480a9346 602 $spec['mailing_id']['api.required'] = TRUE;
603 $spec['mailing_id']['title'] = ts('Mailing Id');
7ada2376
TO
604}
605
c23f45d3 606/**
22242c87
EM
607 * Send test mailing.
608 *
c23f45d3 609 * @param array $params
22242c87 610 *
c23f45d3
EM
611 * @return array
612 * @throws \API_Exception
613 * @throws \CiviCRM_API3_Exception
614 */
425723d9 615function civicrm_api3_mailing_send_test($params) {
616 if (!array_key_exists('test_group', $params) && !array_key_exists('test_email', $params)) {
481a74f4 617 throw new API_Exception("Mandatory key(s) missing from params array: test_group and/or test_email field are required");
425723d9 618 }
619 civicrm_api3_verify_mandatory($params,
620 'CRM_Mailing_DAO_MailingJob',
cf8f0fff 621 ['mailing_id'],
425723d9 622 FALSE
623 );
7811a84b 624
425723d9 625 $testEmailParams = _civicrm_api3_generic_replace_base_params($params);
480a9346 626 if (isset($testEmailParams['id'])) {
627 unset($testEmailParams['id']);
628 }
629
7811a84b 630 $testEmailParams['is_test'] = 1;
a49b32a6 631 $testEmailParams['status'] = 'Scheduled';
38001e70 632 $testEmailParams['scheduled_date'] = CRM_Utils_Date::processDate(date('Y-m-d'), date('H:i:s'));
7811a84b 633 $job = civicrm_api3('MailingJob', 'create', $testEmailParams);
425723d9 634 $testEmailParams['job_id'] = $job['id'];
291dfe43 635 $testEmailParams['emails'] = array_key_exists('test_email', $testEmailParams) ? explode(',', strtolower($testEmailParams['test_email'])) : NULL;
425723d9 636 if (!empty($params['test_email'])) {
932c73e7 637 $query = CRM_Utils_SQL_Select::from('civicrm_email e')
cf8f0fff 638 ->select(['e.id', 'e.contact_id', 'e.email'])
932c73e7 639 ->join('c', 'INNER JOIN civicrm_contact c ON e.contact_id = c.id')
cf8f0fff 640 ->where('e.email IN (@emails)', ['@emails' => $testEmailParams['emails']])
932c73e7
TO
641 ->where('e.on_hold = 0')
642 ->where('c.is_opt_out = 0')
643 ->where('c.do_not_email = 0')
644 ->where('c.is_deceased = 0')
196c4f47 645 ->where('c.is_deleted = 0')
932c73e7 646 ->groupBy('e.id')
cf8f0fff 647 ->orderBy(['e.is_bulkmail DESC', 'e.is_primary DESC'])
932c73e7 648 ->toSQL();
425723d9 649 $dao = CRM_Core_DAO::executeQuery($query);
cf8f0fff 650 $emailDetail = [];
425723d9 651 // fetch contact_id and email id for all existing emails
652 while ($dao->fetch()) {
cf8f0fff 653 $emailDetail[strtolower($dao->email)] = [
425723d9 654 'contact_id' => $dao->contact_id,
655 'email_id' => $dao->id,
cf8f0fff 656 ];
425723d9 657 }
425723d9 658 foreach ($testEmailParams['emails'] as $key => $email) {
659 $email = trim($email);
660 $contactId = $emailId = NULL;
661 if (array_key_exists($email, $emailDetail)) {
662 $emailId = $emailDetail[$email]['email_id'];
663 $contactId = $emailDetail[$email]['contact_id'];
664 }
665 if (!$contactId) {
666 //create new contact.
667 $contact = civicrm_api3('Contact', 'create',
cf8f0fff 668 [
6ea503d4 669 'contact_type' => 'Individual',
425723d9 670 'email' => $email,
cf8f0fff
CW
671 'api.Email.get' => ['return' => 'id'],
672 ]
425723d9 673 );
674 $contactId = $contact['id'];
675 $emailId = $contact['values'][$contactId]['api.Email.get']['id'];
676 }
677 civicrm_api3('MailingEventQueue', 'create',
cf8f0fff 678 [
6ea503d4 679 'job_id' => $job['id'],
425723d9 680 'email_id' => $emailId,
21dfd5f5 681 'contact_id' => $contactId,
cf8f0fff 682 ]
425723d9 683 );
684 }
685 }
7811a84b 686
425723d9 687 $isComplete = FALSE;
480a9346 688
425723d9 689 while (!$isComplete) {
97b7d4a0
TO
690 // Q: In CRM_Mailing_BAO_Mailing::processQueue(), the three runJobs*()
691 // functions are all called. Why does Mailing.send_test only call one?
692 // CRM_Mailing_BAO_MailingJob::runJobs_pre($mailerJobSize, NULL);
425723d9 693 $isComplete = CRM_Mailing_BAO_MailingJob::runJobs($testEmailParams);
97b7d4a0 694 // CRM_Mailing_BAO_MailingJob::runJobs_post(NULL);
425723d9 695 }
7811a84b 696
697 //return delivered mail info
698 $mailDelivered = CRM_Mailing_Event_BAO_Delivered::getRows($params['mailing_id'], $job['id'], TRUE, NULL, NULL, NULL, TRUE);
699
700 return civicrm_api3_create_success($mailDelivered);
425723d9 701}
702
7811a84b 703/**
22242c87 704 * Adjust Metadata for send_mail action.
7811a84b 705 *
0aa0303c
EM
706 * The metadata is used for setting defaults, documentation & validation.
707 *
cf470720 708 * @param array $params
b081365f 709 * Array of parameters determined by getfields.
7811a84b 710 */
711function _civicrm_api3_mailing_stats_spec(&$params) {
712 $params['date']['api.default'] = 'now';
bd6658bd 713 $params['date']['title'] = 'Date';
5f5e0ad6 714 $params['is_distinct']['api.default'] = FALSE;
fe38c896 715 $params['is_distinct']['title'] = 'Is Distinct';
7811a84b 716}
6a488035 717
c23f45d3 718/**
22242c87
EM
719 * Function which needs to be explained.
720 *
c23f45d3 721 * @param array $params
22242c87 722 *
c23f45d3
EM
723 * @return array
724 * @throws \API_Exception
725 */
7811a84b 726function civicrm_api3_mailing_stats($params) {
727 civicrm_api3_verify_mandatory($params,
728 'CRM_Mailing_DAO_MailingJob',
cf8f0fff 729 ['mailing_id'],
7811a84b 730 FALSE
731 );
732
733 if ($params['date'] == 'now') {
734 $params['date'] = date('YmdHis');
735 }
736 else {
737 $params['date'] = CRM_Utils_Date::processDate($params['date'] . ' ' . $params['date_time']);
738 }
739
cf8f0fff 740 $stats[$params['mailing_id']] = [];
7811a84b 741 if (empty($params['job_id'])) {
742 $params['job_id'] = NULL;
743 }
cf8f0fff 744 foreach (['Delivered', 'Bounces', 'Unsubscribers', 'Unique Clicks', 'Opened'] as $detail) {
7811a84b 745 switch ($detail) {
746 case 'Delivered':
cf8f0fff 747 $stats[$params['mailing_id']] += [
5861634e 748 $detail => CRM_Mailing_Event_BAO_Delivered::getTotalCount($params['mailing_id'], $params['job_id'], (bool) $params['is_distinct'], $params['date']),
cf8f0fff 749 ];
7811a84b 750 break;
ea100cb5 751
7811a84b 752 case 'Bounces':
cf8f0fff 753 $stats[$params['mailing_id']] += [
5861634e 754 $detail => CRM_Mailing_Event_BAO_Bounce::getTotalCount($params['mailing_id'], $params['job_id'], (bool) $params['is_distinct'], $params['date']),
cf8f0fff 755 ];
7811a84b 756 break;
ea100cb5 757
7811a84b 758 case 'Unsubscribers':
cf8f0fff 759 $stats[$params['mailing_id']] += [
5861634e 760 $detail => CRM_Mailing_Event_BAO_Unsubscribe::getTotalCount($params['mailing_id'], $params['job_id'], (bool) $params['is_distinct'], NULL, $params['date']),
cf8f0fff 761 ];
7811a84b 762 break;
ea100cb5 763
7811a84b 764 case 'Unique Clicks':
cf8f0fff 765 $stats[$params['mailing_id']] += [
5861634e 766 $detail => CRM_Mailing_Event_BAO_TrackableURLOpen::getTotalCount($params['mailing_id'], $params['job_id'], (bool) $params['is_distinct'], NULL, $params['date']),
cf8f0fff 767 ];
7811a84b 768 break;
ea100cb5 769
7811a84b 770 case 'Opened':
cf8f0fff 771 $stats[$params['mailing_id']] += [
5861634e 772 $detail => CRM_Mailing_Event_BAO_Opened::getTotalCount($params['mailing_id'], $params['job_id'], (bool) $params['is_distinct'], $params['date']),
cf8f0fff 773 ];
7811a84b 774 break;
775 }
776 }
796b4348
SL
777 $stats[$params['mailing_id']]['delivered_rate'] = $stats[$params['mailing_id']]['opened_rate'] = $stats[$params['mailing_id']]['clickthrough_rate'] = '0.00%';
778 if (!empty(CRM_Mailing_Event_BAO_Queue::getTotalCount($params['mailing_id'], $params['job_id']))) {
779 $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) . '%';
780 }
781 if (!empty($stats[$params['mailing_id']]['Delivered'])) {
782 $stats[$params['mailing_id']]['opened_rate'] = round($stats[$params['mailing_id']]['Opened'] / $stats[$params['mailing_id']]['Delivered'] * 100.0, 2) . '%';
783 $stats[$params['mailing_id']]['clickthrough_rate'] = round($stats[$params['mailing_id']]['Unique Clicks'] / $stats[$params['mailing_id']]['Delivered'] * 100.0, 2) . '%';
784 }
7811a84b 785 return civicrm_api3_create_success($stats);
786}
787
6a488035 788/**
22242c87
EM
789 * Fix the reset dates on the email record based on when a mail was last delivered.
790 *
6a488035
TO
791 * We only consider mailings that were completed and finished in the last 3 to 7 days
792 * Both the min and max days can be set via the params
22242c87 793 *
d0997921 794 * @param array $params
22242c87 795 *
645ee340 796 * @return array
6a488035
TO
797 */
798function civicrm_api3_mailing_update_email_resetdate($params) {
7e6e8bd6
TO
799 CRM_Mailing_Event_BAO_Delivered::updateEmailResetDate(
800 CRM_Utils_Array::value('minDays', $params, 3),
801 CRM_Utils_Array::value('maxDays', $params, 3)
802 );
803 return civicrm_api3_create_success();
6a488035 804}