Merge pull request #12383 from civicrm/5.3
[civicrm-core.git] / CRM / Admin / Form / Job.php
1 <?php
2 /*
3 +--------------------------------------------------------------------+
4 | CiviCRM version 5 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2018 |
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-2018
32 */
33
34 /**
35 * Class for configuring jobs.
36 */
37 class CRM_Admin_Form_Job extends CRM_Admin_Form {
38 protected $_id = NULL;
39
40 public function preProcess() {
41
42 parent::preProcess();
43
44 CRM_Utils_System::setTitle(ts('Manage - Scheduled Jobs'));
45
46 if ($this->_id) {
47 $refreshURL = CRM_Utils_System::url('civicrm/admin/job',
48 "reset=1&action=update&id={$this->_id}",
49 FALSE, NULL, FALSE
50 );
51 }
52 else {
53 $refreshURL = CRM_Utils_System::url('civicrm/admin/job',
54 "reset=1&action=add",
55 FALSE, NULL, FALSE
56 );
57 }
58
59 $this->assign('refreshURL', $refreshURL);
60 }
61
62 /**
63 * Build the form object.
64 *
65 * @param bool $check
66 */
67 public function buildQuickForm($check = FALSE) {
68 parent::buildQuickForm();
69
70 if ($this->_action & CRM_Core_Action::DELETE) {
71 return;
72 }
73
74 $attributes = CRM_Core_DAO::getAttribute('CRM_Core_DAO_Job');
75
76 $this->add('text', 'name', ts('Name'),
77 $attributes['name'], TRUE
78 );
79
80 $this->addRule('name', ts('Name already exists in Database.'), 'objectExists', array(
81 'CRM_Core_DAO_Job',
82 $this->_id,
83 ));
84
85 $this->add('text', 'description', ts('Description'),
86 $attributes['description']
87 );
88
89 $this->add('text', 'api_entity', ts('API Call Entity'),
90 $attributes['api_entity'], TRUE
91 );
92
93 $this->add('text', 'api_action', ts('API Call Action'),
94 $attributes['api_action'], TRUE
95 );
96
97 $this->add('select', 'run_frequency', ts('Run frequency'), CRM_Core_SelectValues::getJobFrequency());
98
99 // CRM-17686
100 $this->add('datepicker', 'scheduled_run_date', ts('Scheduled Run Date'), NULL, FALSE, array('minDate' => time()));
101
102 $this->add('textarea', 'parameters', ts('Command parameters'),
103 "cols=50 rows=6"
104 );
105
106 // is this job active ?
107 $this->add('checkbox', 'is_active', ts('Is this Scheduled Job active?'));
108
109 $this->addFormRule(array('CRM_Admin_Form_Job', 'formRule'));
110 }
111
112 /**
113 * @param $fields
114 *
115 * @return array|bool
116 * @throws API_Exception
117 */
118 public static function formRule($fields) {
119
120 $errors = array();
121
122 require_once 'api/api.php';
123
124 /** @var \Civi\API\Kernel $apiKernel */
125 $apiKernel = \Civi::service('civi_api_kernel');
126 $apiRequest = \Civi\API\Request::create($fields['api_entity'], $fields['api_action'], array('version' => 3), NULL);
127 try {
128 $apiKernel->resolve($apiRequest);
129 }
130 catch (\Civi\API\Exception\NotImplementedException $e) {
131 $errors['api_action'] = ts('Given API command is not defined.');
132 }
133
134 if (!empty($errors)) {
135 return $errors;
136 }
137
138 return empty($errors) ? TRUE : $errors;
139 }
140
141 /**
142 * @return array
143 */
144 public function setDefaultValues() {
145 $defaults = array();
146
147 if (!$this->_id) {
148 $defaults['is_active'] = $defaults['is_default'] = 1;
149 return $defaults;
150 }
151 $domainID = CRM_Core_Config::domainID();
152
153 $dao = new CRM_Core_DAO_Job();
154 $dao->id = $this->_id;
155 $dao->domain_id = $domainID;
156 if (!$dao->find(TRUE)) {
157 return $defaults;
158 }
159
160 CRM_Core_DAO::storeValues($dao, $defaults);
161
162 // CRM-17686
163 if (!empty($dao->scheduled_run_date)) {
164 $ts = strtotime($dao->scheduled_run_date);
165 $defaults['scheduled_run_date'] = date("Y-m-d H:i:s", $ts);
166 }
167
168 // CRM-10708
169 // job entity thats shipped with core is all lower case.
170 // this makes sure camel casing is followed for proper working of default population.
171 if (!empty($defaults['api_entity'])) {
172 $defaults['api_entity'] = ucfirst($defaults['api_entity']);
173 }
174
175 return $defaults;
176 }
177
178 /**
179 * Process the form submission.
180 */
181 public function postProcess() {
182
183 CRM_Utils_System::flushCache();
184
185 if ($this->_action & CRM_Core_Action::DELETE) {
186 CRM_Core_BAO_Job::del($this->_id);
187 CRM_Core_Session::setStatus("", ts('Scheduled Job Deleted.'), "success");
188 return;
189 }
190
191 $values = $this->controller->exportValues($this->_name);
192 $domainID = CRM_Core_Config::domainID();
193
194 $dao = new CRM_Core_DAO_Job();
195
196 $dao->id = $this->_id;
197 $dao->domain_id = $domainID;
198 $dao->run_frequency = $values['run_frequency'];
199 $dao->parameters = $values['parameters'];
200 $dao->name = $values['name'];
201 $dao->api_entity = $values['api_entity'];
202 $dao->api_action = $values['api_action'];
203 $dao->description = $values['description'];
204 $dao->is_active = CRM_Utils_Array::value('is_active', $values, 0);
205
206 // CRM-17686
207 $ts = strtotime($values['scheduled_run_date']);
208 // if a date/time is supplied and not in the past, then set the next scheduled run...
209 if ($ts > time()) {
210 $dao->scheduled_run_date = CRM_Utils_Date::currentDBDate($ts);
211 // warn about monthly/quarterly scheduling, if applicable
212 if (($dao->run_frequency == 'Monthly') || ($dao->run_frequency == 'Quarter')) {
213 $info = getdate($ts);
214 if ($info['mday'] > 28) {
215 CRM_Core_Session::setStatus(
216 ts('Relative month values are calculated based on the length of month(s) that they pass through.
217 The result will land on the same day of the month except for days 29-31 when the target month contains fewer days than the previous month.
218 For example, if a job is scheduled to run on August 31st, the following invocation will occur on October 1st, and then the 1st of every month thereafter.
219 To avoid this issue, please schedule Monthly and Quarterly jobs to run within the first 28 days of the month.'),
220 ts('Warning'), 'info', array('expires' => 0));
221 }
222 }
223 }
224 // ...otherwise, if this isn't a new scheduled job, clear the next scheduled run
225 elseif ($dao->id) {
226 $job = new CRM_Core_ScheduledJob(array('id' => $dao->id));
227 $job->clearScheduledRunDate();
228 }
229
230 $dao->save();
231
232 // CRM-11143 - Give warning message if update_greetings is Enabled (is_active) since it generally should not be run automatically via execute action or runjobs url.
233 if ($values['api_action'] == 'update_greeting' && CRM_Utils_Array::value('is_active', $values) == 1) {
234 // pass "wiki" as 6th param to docURL2 if you are linking to a page in wiki.civicrm.org
235 $docLink = CRM_Utils_System::docURL2("Managing Scheduled Jobs", NULL, NULL, NULL, NULL, "wiki");
236 $msg = ts('The update greeting job can be very resource intensive and is typically not necessary to run on a regular basis. If you do choose to enable the job, we recommend you do not run it with the force=1 option, which would rebuild greetings on all records. Leaving that option absent, or setting it to force=0, will only rebuild greetings for contacts that do not currently have a value stored. %1', array(1 => $docLink));
237 CRM_Core_Session::setStatus($msg, ts('Warning: Update Greeting job enabled'), 'alert');
238 }
239
240 }
241
242 }