CRM-16238 - Implement "Re-use Mailing"
[civicrm-core.git] / CRM / Mailing / Controller / Send.php
1 <?php
2 /*
3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.6 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2015 |
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
31 * @copyright CiviCRM LLC (c) 2004-2015
32 * $Id$
33 *
34 */
35 class CRM_Mailing_Controller_Send extends CRM_Core_Controller {
36
37 /**
38 * Class constructor.
39 *
40 * @param null $title
41 * @param bool|int $action
42 * @param bool $modal
43 *
44 * @throws \Exception
45 */
46 public function __construct($title = NULL, $action = CRM_Core_Action::NONE, $modal = TRUE) {
47 parent::__construct($title, $modal, NULL, FALSE, TRUE);
48
49 if (!defined('CIVICRM_CIVIMAIL_UI_LEGACY')) {
50 // New: civicrm/mailing/send?reset=1
51 // Re-use: civicrm/mailing/send?reset=1&mid=%%mid%%
52 // Continue: civicrm/mailing/send?reset=1&mid=%%mid%%&continue=true
53 $mid = CRM_Utils_Request::retrieve('mid', 'Positive');
54 $continue = CRM_Utils_Request::retrieve('continue', 'String');
55 if (!$mid) {
56 CRM_Utils_System::redirect(CRM_Utils_System::url('civicrm/a/', NULL, TRUE, '/mailing/new'));
57 }
58 if ($mid && $continue) {
59 //CRM-15979 - check if abtest exist for mailing then redirect accordingly
60 $abtest = CRM_Mailing_BAO_MailingAB::getABTest($mid);
61 if (!empty($abtest) && !empty($abtest->id)) {
62 $redirect = CRM_Utils_System::url('civicrm/a/', NULL, TRUE, '/abtest/' . $abtest->id);
63 }
64 else {
65 $redirect = CRM_Utils_System::url('civicrm/a/', NULL, TRUE, '/mailing/' . $mid);
66 }
67 CRM_Utils_System::redirect($redirect);
68 }
69 if ($mid && !$continue) {
70 $clone = civicrm_api3('Mailing', 'clone', array('id' => $mid));
71 CRM_Utils_System::redirect(CRM_Utils_System::url('civicrm/a/', NULL, TRUE, '/mailing/' . $clone['id']));
72 }
73 }
74
75 $mailingID = CRM_Utils_Request::retrieve('mid', 'String', $this, FALSE, NULL);
76
77 // also get the text and html file
78 $txtFile = CRM_Utils_Request::retrieve('txtFile', 'String',
79 CRM_Core_DAO::$_nullObject, FALSE, NULL
80 );
81 $htmlFile = CRM_Utils_Request::retrieve('htmlFile', 'String',
82 CRM_Core_DAO::$_nullObject, FALSE, NULL
83 );
84
85 $config = CRM_Core_Config::singleton();
86 if ($txtFile &&
87 file_exists($config->uploadDir . $txtFile)
88 ) {
89 $this->set('textFilePath', $config->uploadDir . $txtFile);
90 }
91
92 if ($htmlFile &&
93 file_exists($config->uploadDir . $htmlFile)
94 ) {
95 $this->set('htmlFilePath', $config->uploadDir . $htmlFile);
96 }
97
98 $this->_stateMachine = new CRM_Mailing_StateMachine_Send($this, $action, $mailingID);
99
100 // create and instantiate the pages
101 $this->addPages($this->_stateMachine, $action);
102
103 // add all the actions
104 $uploadNames = array_merge(array('textFile', 'htmlFile'),
105 CRM_Core_BAO_File::uploadNames()
106 );
107
108 $config = CRM_Core_Config::singleton();
109 $this->addActions($config->uploadDir,
110 $uploadNames
111 );
112 }
113
114 }