Commit | Line | Data |
---|---|---|
6a488035 TO |
1 | <?php |
2 | /* | |
3 | +--------------------------------------------------------------------+ | |
39de6fd5 | 4 | | CiviCRM version 4.6 | |
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 | ||
36 | /** | |
37 | * This file is used to build the form configuring mailing details | |
38 | */ | |
39 | class CRM_Mailing_Form_Settings extends CRM_Core_Form { | |
40 | ||
41 | /** | |
100fef9d | 42 | * Set variables up before form is built |
6a488035 TO |
43 | * |
44 | * @return void | |
6a488035 TO |
45 | */ |
46 | public function preProcess() { | |
47 | //when user come from search context. | |
48 | $ssID = $this->get('ssID'); | |
49 | $this->assign('ssid',$ssID); | |
50 | $this->_searchBasedMailing = CRM_Contact_Form_Search::isSearchContext($this->get('context')); | |
51 | if(CRM_Contact_Form_Search::isSearchContext($this->get('context')) && !$ssID){ | |
52 | $params = array(); | |
53 | $result = CRM_Core_BAO_PrevNextCache::getSelectedContacts(); | |
54 | $this->assign("value", $result); | |
55 | } | |
56 | } | |
57 | ||
58 | /** | |
c490a46a | 59 | * Set default values for the form. |
6a488035 TO |
60 | * the default values are retrieved from the database |
61 | * | |
6a488035 | 62 | * |
355ba699 | 63 | * @return void |
6a488035 | 64 | */ |
00be9182 | 65 | public function setDefaultValues() { |
6a488035 | 66 | $mailingID = CRM_Utils_Request::retrieve('mid', 'Integer', $this, FALSE, NULL); |
2267460c | 67 | // CRM-14716 - Pick up mailingID from session since most of the time it's not in the URL |
902d0e66 DG |
68 | if (!$mailingID) { |
69 | $mailingID = $this->get('mailing_id'); | |
70 | } | |
6a488035 TO |
71 | $count = $this->get('count'); |
72 | $this->assign('count', $count); | |
73 | $defaults = array(); | |
74 | ||
75 | $componentFields = array( | |
76 | 'reply_id' => 'Reply', | |
77 | 'optout_id' => 'OptOut', | |
78 | 'unsubscribe_id' => 'Unsubscribe', | |
79 | 'resubscribe_id' => 'Resubscribe', | |
80 | ); | |
81 | ||
82 | foreach ($componentFields as $componentVar => $componentType) { | |
83 | $defaults[$componentVar] = CRM_Mailing_PseudoConstant::defaultComponent($componentType, ''); | |
84 | } | |
85 | ||
86 | if ($mailingID) { | |
87 | $dao = new CRM_Mailing_DAO_Mailing(); | |
88 | $dao->id = $mailingID; | |
89 | $dao->find(TRUE); | |
90 | // override_verp must be flipped, as in 3.2 we reverted | |
91 | // its meaning to ‘should CiviMail manage replies?’ – i.e., | |
92 | // ‘should it *not* override Reply-To: with VERP-ed address?’ | |
93 | $dao->override_verp = !$dao->override_verp; | |
94 | $dao->storeValues($dao, $defaults); | |
95 | $defaults['visibility'] = $dao->visibility; | |
96 | } | |
d75f2f47 | 97 | |
6a488035 TO |
98 | return $defaults; |
99 | } | |
100 | ||
101 | /** | |
c490a46a | 102 | * Build the form object |
6a488035 | 103 | * |
355ba699 | 104 | * @return void |
6a488035 TO |
105 | */ |
106 | public function buildQuickForm() { | |
107 | ||
108 | $this->addElement('checkbox', 'override_verp', ts('Track Replies?')); | |
109 | ||
110 | $defaults['override_verp'] = CRM_Core_BAO_Setting::getItem(CRM_Core_BAO_Setting::MAILING_PREFERENCES_NAME, | |
111 | 'track_civimail_replies', NULL, FALSE | |
112 | ); | |
113 | ||
114 | $this->add('checkbox', 'forward_replies', ts('Forward Replies?')); | |
115 | $defaults['forward_replies'] = FALSE; | |
116 | ||
117 | $this->add('checkbox', 'url_tracking', ts('Track Click-throughs?')); | |
118 | $defaults['url_tracking'] = TRUE; | |
119 | ||
120 | $this->add('checkbox', 'open_tracking', ts('Track Opens?')); | |
121 | $defaults['open_tracking'] = TRUE; | |
122 | ||
123 | $this->add('checkbox', 'auto_responder', ts('Auto-respond to Replies?')); | |
124 | $defaults['auto_responder'] = FALSE; | |
125 | ||
93bfa565 | 126 | $this->add('select', 'visibility', ts('Mailing Visibility'), CRM_Core_SelectValues::groupVisibility(), TRUE); |
6a488035 TO |
127 | |
128 | $this->add('select', 'reply_id', ts('Auto-responder'), | |
129 | CRM_Mailing_PseudoConstant::component('Reply'), TRUE | |
130 | ); | |
131 | ||
132 | $this->add('select', 'unsubscribe_id', ts('Unsubscribe Message'), | |
133 | CRM_Mailing_PseudoConstant::component('Unsubscribe'), TRUE | |
134 | ); | |
135 | ||
136 | $this->add('select', 'resubscribe_id', ts('Resubscribe Message'), | |
137 | CRM_Mailing_PseudoConstant::component('Resubscribe'), TRUE | |
138 | ); | |
139 | ||
140 | $this->add('select', 'optout_id', ts('Opt-out Message'), | |
141 | CRM_Mailing_PseudoConstant::component('OptOut'), TRUE | |
142 | ); | |
143 | ||
144 | $buttons = array( | |
145 | array('type' => 'back', | |
146 | 'name' => ts('<< Previous'), | |
147 | ), | |
148 | array( | |
149 | 'type' => 'next', | |
150 | 'name' => ts('Next >>'), | |
151 | 'spacing' => ' ', | |
152 | 'isDefault' => TRUE, | |
153 | ), | |
154 | array( | |
155 | 'type' => 'submit', | |
156 | 'name' => ts('Save & Continue Later'), | |
157 | ), | |
158 | array( | |
159 | 'type' => 'cancel', | |
160 | 'name' => ts('Cancel'), | |
161 | ), | |
162 | ); | |
163 | ||
164 | $this->addButtons($buttons); | |
165 | ||
166 | $this->setDefaults($defaults); | |
167 | } | |
168 | ||
169 | public function postProcess() { | |
170 | $params = $ids = array(); | |
171 | ||
172 | $session = CRM_Core_Session::singleton(); | |
173 | $params['created_id'] = $session->get('userID'); | |
174 | ||
175 | $uploadParams = array('reply_id', 'unsubscribe_id', 'optout_id', 'resubscribe_id'); | |
176 | $uploadParamsBoolean = array('override_verp', 'forward_replies', 'url_tracking', 'open_tracking', 'auto_responder'); | |
177 | ||
178 | $qf_Settings_submit = $this->controller->exportValue($this->_name, '_qf_Settings_submit'); | |
179 | ||
180 | foreach ($uploadParams as $key) { | |
181 | $params[$key] = $this->controller->exportvalue($this->_name, $key); | |
182 | $this->set($key, $this->controller->exportvalue($this->_name, $key)); | |
183 | } | |
184 | ||
185 | foreach ($uploadParamsBoolean as $key) { | |
186 | if ($this->controller->exportvalue($this->_name, $key)) { | |
187 | $params[$key] = TRUE; | |
188 | } | |
189 | else { | |
190 | $params[$key] = FALSE; | |
191 | } | |
192 | $this->set($key, $this->controller->exportvalue($this->_name, $key)); | |
193 | } | |
194 | ||
195 | $params['visibility'] = $this->controller->exportvalue($this->_name, 'visibility'); | |
196 | ||
197 | // override_verp must be flipped, as in 3.2 we reverted | |
198 | // its meaning to ‘should CiviMail manage replies?’ – i.e., | |
199 | // ‘should it *not* override Reply-To: with VERP-ed address?’ | |
200 | $params['override_verp'] = !$params['override_verp']; | |
201 | ||
202 | $ids['mailing_id'] = $this->get('mailing_id'); | |
203 | ||
204 | // update mailing | |
205 | CRM_Mailing_BAO_Mailing::create($params, $ids); | |
206 | ||
207 | if ($qf_Settings_submit) { | |
208 | //when user perform mailing from search context | |
209 | //redirect it to search result CRM-3711. | |
210 | $ssID = $this->get('ssID'); | |
211 | if ($ssID && $this->_searchBasedMailing) { | |
212 | if ($this->_action == CRM_Core_Action::BASIC) { | |
213 | $fragment = 'search'; | |
214 | } | |
215 | elseif ($this->_action == CRM_Core_Action::PROFILE) { | |
216 | $fragment = 'search/builder'; | |
217 | } | |
218 | elseif ($this->_action == CRM_Core_Action::ADVANCED) { | |
219 | $fragment = 'search/advanced'; | |
220 | } | |
221 | else { | |
222 | $fragment = 'search/custom'; | |
223 | } | |
224 | ||
225 | $context = $this->get('context'); | |
226 | if (!CRM_Contact_Form_Search::isSearchContext($context)) { | |
227 | $context = 'search'; | |
228 | } | |
229 | $urlParams = "force=1&reset=1&ssID={$ssID}&context={$context}"; | |
230 | $qfKey = CRM_Utils_Request::retrieve('qfKey', 'String', $this); | |
231 | if (CRM_Utils_Rule::qfKey($qfKey)) { | |
232 | $urlParams .= "&qfKey=$qfKey"; | |
233 | } | |
234 | ||
235 | $draftURL = CRM_Utils_System::url('civicrm/mailing/browse/unscheduled', 'scheduled=false&reset=1'); | |
236 | $status = ts("You can continue later by clicking the 'Continue' action to resume working on it.<br />From <a href='%1'>Draft and Unscheduled Mailings</a>.", array(1 => $draftURL)); | |
237 | ||
238 | // Redirect user to search. | |
239 | $url = CRM_Utils_System::url('civicrm/contact/' . $fragment, $urlParams); | |
240 | } | |
241 | else { | |
242 | $status = ts("Click the 'Continue' action to resume working on it."); | |
243 | $url = CRM_Utils_System::url('civicrm/mailing/browse/unscheduled', 'scheduled=false&reset=1'); | |
244 | } | |
245 | CRM_Core_Session::setStatus($status, ts('Mailing Saved'), 'success'); | |
246 | CRM_Utils_System::redirect($url); | |
247 | } | |
248 | } | |
249 | ||
250 | /** | |
251 | * Display Name of the form | |
252 | * | |
6a488035 TO |
253 | * |
254 | * @return string | |
255 | */ | |
256 | public function getTitle() { | |
257 | return ts('Track and Respond'); | |
258 | } | |
259 | } |