3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.6 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2015 |
7 +--------------------------------------------------------------------+
8 | This file is a part of CiviCRM. |
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. |
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. |
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 +--------------------------------------------------------------------+
31 * @copyright CiviCRM LLC (c) 2004-2015
35 class CRM_Mailing_Controller_Send
extends CRM_Core_Controller
{
41 * @param bool|int $action
46 public function __construct($title = NULL, $action = CRM_Core_Action
::NONE
, $modal = TRUE) {
47 parent
::__construct($title, $modal, NULL, FALSE, TRUE);
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');
56 CRM_Utils_System
::redirect(CRM_Utils_System
::url('civicrm/a/', NULL, TRUE, '/mailing/new'));
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
);
65 $redirect = CRM_Utils_System
::url('civicrm/a/', NULL, TRUE, '/mailing/' . $mid);
67 CRM_Utils_System
::redirect($redirect);
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']));
75 $mailingID = CRM_Utils_Request
::retrieve('mid', 'String', $this, FALSE, NULL);
77 // also get the text and html file
78 $txtFile = CRM_Utils_Request
::retrieve('txtFile', 'String',
79 CRM_Core_DAO
::$_nullObject, FALSE, NULL
81 $htmlFile = CRM_Utils_Request
::retrieve('htmlFile', 'String',
82 CRM_Core_DAO
::$_nullObject, FALSE, NULL
85 $config = CRM_Core_Config
::singleton();
87 file_exists($config->uploadDir
. $txtFile)
89 $this->set('textFilePath', $config->uploadDir
. $txtFile);
93 file_exists($config->uploadDir
. $htmlFile)
95 $this->set('htmlFilePath', $config->uploadDir
. $htmlFile);
98 $this->_stateMachine
= new CRM_Mailing_StateMachine_Send($this, $action, $mailingID);
100 // create and instantiate the pages
101 $this->addPages($this->_stateMachine
, $action);
103 // add all the actions
104 $uploadNames = array_merge(array('textFile', 'htmlFile'),
105 CRM_Core_BAO_File
::uploadNames()
108 $config = CRM_Core_Config
::singleton();
109 $this->addActions($config->uploadDir
,