Commit | Line | Data |
---|---|---|
8ffdec17 ARW |
1 | <?php |
2 | /* | |
3 | +--------------------------------------------------------------------+ | |
fee14197 | 4 | | CiviCRM version 5 | |
8ffdec17 | 5 | +--------------------------------------------------------------------+ |
8c9251b3 | 6 | | Copyright CiviCRM LLC (c) 2004-2018 | |
8ffdec17 ARW |
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 | */ |
8ffdec17 ARW |
27 | |
28 | /** | |
29 | * | |
30 | * @package CRM | |
8c9251b3 | 31 | * @copyright CiviCRM LLC (c) 2004-2018 |
8ffdec17 ARW |
32 | */ |
33 | ||
34 | /** | |
67d19299 | 35 | * This class contains the functions for Case Type management. |
8ffdec17 ARW |
36 | */ |
37 | class CRM_Case_BAO_CaseType extends CRM_Case_DAO_CaseType { | |
38 | ||
39 | /** | |
d2e5d2ce | 40 | * Static field for all the case information that we can potentially export. |
8ffdec17 ARW |
41 | * |
42 | * @var array | |
8ffdec17 ARW |
43 | */ |
44 | static $_exportableFields = NULL; | |
45 | ||
46 | /** | |
d2e5d2ce | 47 | * Takes an associative array and creates a Case Type object. |
8ffdec17 ARW |
48 | * |
49 | * the function extract all the params it needs to initialize the create a | |
50 | * case type object. the params array could contain additional unused name/value | |
51 | * pairs | |
52 | * | |
64bd5a0e TO |
53 | * @param array $params |
54 | * (reference ) an assoc array of name/value pairs. | |
77b97be7 | 55 | * |
c490a46a | 56 | * @throws CRM_Core_Exception |
8ffdec17 | 57 | * |
16b10e64 | 58 | * @return CRM_Case_BAO_CaseType |
8ffdec17 | 59 | */ |
00be9182 | 60 | public static function add(&$params) { |
8ffdec17 | 61 | $caseTypeDAO = new CRM_Case_DAO_CaseType(); |
20173e0e | 62 | |
c7bccb5f | 63 | // form the name only if missing: CRM-627 |
64 | $nameParam = CRM_Utils_Array::value('name', $params, NULL); | |
65 | if (!$nameParam && empty($params['id'])) { | |
66 | $params['name'] = CRM_Utils_String::titleToVar($params['title']); | |
67 | } | |
46ec593d TO |
68 | |
69 | // Old case-types (pre-4.5) may keep their ucky names, but new case-types must satisfy isValidName() | |
70 | if (empty($params['id']) && !empty($params['name']) && !CRM_Case_BAO_CaseType::isValidName($params['name'])) { | |
71 | throw new CRM_Core_Exception("Cannot create new case-type with malformed name [{$params['name']}]"); | |
076f81b6 | 72 | } |
c7bccb5f | 73 | |
32f1c917 TO |
74 | $caseTypeName = (isset($params['name'])) ? $params['name'] : CRM_Core_DAO::getFieldValue('CRM_Case_DAO_CaseType', $params['id'], 'name', 'id', TRUE); |
75 | ||
20173e0e | 76 | // function to format definition column |
c2f2bbe6 | 77 | if (isset($params['definition']) && is_array($params['definition'])) { |
32f1c917 | 78 | $params['definition'] = self::convertDefinitionToXML($caseTypeName, $params['definition']); |
ba3228d1 | 79 | CRM_Core_ManagedEntities::scheduleReconciliation(); |
c2f2bbe6 | 80 | } |
20173e0e | 81 | |
88396939 | 82 | $caseTypeDAO->copyValues($params); |
e492e278 TO |
83 | $result = $caseTypeDAO->save(); |
84 | CRM_Case_XMLRepository::singleton()->flush(); | |
85 | return $result; | |
8ffdec17 ARW |
86 | } |
87 | ||
cd5823ae EM |
88 | /** |
89 | * Generate and assign an arbitrary value to a field of a test object. | |
90 | * | |
91 | * @param string $fieldName | |
92 | * @param array $fieldDef | |
93 | * @param int $counter | |
94 | * The globally-unique ID of the test object. | |
95 | */ | |
1753bd71 | 96 | protected function assignTestValue($fieldName, &$fieldDef, $counter) { |
e547f744 | 97 | if ($fieldName == 'definition') { |
1753bd71 | 98 | $this->{$fieldName} = "<CaseType><name>TestCaseType{$counter}</name></CaseType>"; |
0db6c3e1 TO |
99 | } |
100 | else { | |
1753bd71 TO |
101 | parent::assignTestValue($fieldName, $fieldDef, $counter); |
102 | } | |
103 | } | |
104 | ||
105 | ||
20173e0e | 106 | /** |
100fef9d | 107 | * Format / convert submitted array to xml for case type definition |
20173e0e | 108 | * |
10b0bbee | 109 | * @param string $name |
64bd5a0e | 110 | * @param array $definition |
b44e3f84 | 111 | * The case-type definition expressed as an array-tree. |
a6c01b45 CW |
112 | * @return string |
113 | * XML | |
20173e0e | 114 | */ |
00be9182 | 115 | public static function convertDefinitionToXML($name, $definition) { |
c9c175f9 | 116 | $xmlFile = '<?xml version="1.0" encoding="utf-8" ?>' . "\n\n<CaseType>\n"; |
e0d34d59 | 117 | $xmlFile .= "<name>" . self::encodeXmlString($name) . "</name>\n"; |
20173e0e | 118 | |
466fba66 TO |
119 | if (array_key_exists('forkable', $definition)) { |
120 | $xmlFile .= "<forkable>" . ((int) $definition['forkable']) . "</forkable>\n"; | |
121 | } | |
122 | ||
728b5029 | 123 | if (isset($definition['activityTypes'])) { |
20173e0e | 124 | $xmlFile .= "<ActivityTypes>\n"; |
10b0bbee | 125 | foreach ($definition['activityTypes'] as $values) { |
20173e0e | 126 | $xmlFile .= "<ActivityType>\n"; |
127 | foreach ($values as $key => $value) { | |
e0d34d59 | 128 | $xmlFile .= "<{$key}>" . self::encodeXmlString($value) . "</{$key}>\n"; |
20173e0e | 129 | } |
130 | $xmlFile .= "</ActivityType>\n"; | |
131 | } | |
132 | $xmlFile .= "</ActivityTypes>\n"; | |
133 | } | |
134 | ||
7c2b40d1 CW |
135 | if (!empty($definition['statuses'])) { |
136 | $xmlFile .= "<Statuses>\n"; | |
137 | foreach ($definition['statuses'] as $value) { | |
138 | $xmlFile .= "<Status>$value</Status>\n"; | |
139 | } | |
140 | $xmlFile .= "</Statuses>\n"; | |
141 | } | |
142 | ||
728b5029 | 143 | if (isset($definition['activitySets'])) { |
20173e0e | 144 | $xmlFile .= "<ActivitySets>\n"; |
10b0bbee | 145 | foreach ($definition['activitySets'] as $k => $val) { |
834bc8e2 | 146 | $xmlFile .= "<ActivitySet>\n"; |
147 | foreach ($val as $index => $setVal) { | |
2f58fb09 TO |
148 | switch ($index) { |
149 | case 'activityTypes': | |
150 | if (!empty($setVal)) { | |
151 | $xmlFile .= "<ActivityTypes>\n"; | |
152 | foreach ($setVal as $values) { | |
153 | $xmlFile .= "<ActivityType>\n"; | |
154 | foreach ($values as $key => $value) { | |
e0d34d59 | 155 | $xmlFile .= "<{$key}>" . self::encodeXmlString($value) . "</{$key}>\n"; |
2f58fb09 TO |
156 | } |
157 | $xmlFile .= "</ActivityType>\n"; | |
834bc8e2 | 158 | } |
2f58fb09 | 159 | $xmlFile .= "</ActivityTypes>\n"; |
20173e0e | 160 | } |
2f58fb09 | 161 | break; |
e547f744 | 162 | |
2f58fb09 TO |
163 | case 'sequence': // passthrough |
164 | case 'timeline': | |
165 | if ($setVal) { | |
166 | $xmlFile .= "<{$index}>true</{$index}>\n"; | |
167 | } | |
168 | break; | |
e547f744 | 169 | |
2f58fb09 | 170 | default: |
e0d34d59 | 171 | $xmlFile .= "<{$index}>" . self::encodeXmlString($setVal) . "</{$index}>\n"; |
20173e0e | 172 | } |
173 | } | |
834bc8e2 | 174 | |
175 | $xmlFile .= "</ActivitySet>\n"; | |
20173e0e | 176 | } |
177 | ||
20173e0e | 178 | $xmlFile .= "</ActivitySets>\n"; |
179 | } | |
180 | ||
728b5029 | 181 | if (isset($definition['caseRoles'])) { |
20173e0e | 182 | $xmlFile .= "<CaseRoles>\n"; |
10b0bbee | 183 | foreach ($definition['caseRoles'] as $values) { |
20173e0e | 184 | $xmlFile .= "<RelationshipType>\n"; |
185 | foreach ($values as $key => $value) { | |
e0d34d59 | 186 | $xmlFile .= "<{$key}>" . self::encodeXmlString($value) . "</{$key}>\n"; |
20173e0e | 187 | } |
188 | $xmlFile .= "</RelationshipType>\n"; | |
189 | } | |
190 | $xmlFile .= "</CaseRoles>\n"; | |
191 | } | |
192 | ||
193 | $xmlFile .= '</CaseType>'; | |
10b0bbee | 194 | return $xmlFile; |
20173e0e | 195 | } |
196 | ||
e0d34d59 TO |
197 | /** |
198 | * Ugh. This shouldn't exist. Use a real XML-encoder. | |
199 | * | |
200 | * Escape a string for use in XML. | |
201 | * | |
202 | * @param string $str | |
203 | * A string which should outputted to XML. | |
204 | * @return string | |
205 | * @deprecated | |
206 | */ | |
207 | protected static function encodeXmlString($str) { | |
208 | // PHP 5.4: return htmlspecialchars($str, ENT_XML1, 'UTF-8') | |
209 | return htmlspecialchars($str); | |
210 | } | |
211 | ||
20173e0e | 212 | /** |
d2e5d2ce | 213 | * Get the case definition either from db or read from xml file. |
20173e0e | 214 | * |
64bd5a0e TO |
215 | * @param SimpleXmlElement $xml |
216 | * A single case-type record. | |
20173e0e | 217 | * |
a6c01b45 CW |
218 | * @return array |
219 | * the definition of the case-type, expressed as PHP array-tree | |
20173e0e | 220 | */ |
00be9182 | 221 | public static function convertXmlToDefinition($xml) { |
93d47462 TO |
222 | // build PHP array based on definition |
223 | $definition = array(); | |
20173e0e | 224 | |
466fba66 TO |
225 | if (isset($xml->forkable)) { |
226 | $definition['forkable'] = (int) $xml->forkable; | |
227 | } | |
228 | ||
20173e0e | 229 | // set activity types |
728b5029 TO |
230 | if (isset($xml->ActivityTypes)) { |
231 | $definition['activityTypes'] = array(); | |
232 | foreach ($xml->ActivityTypes->ActivityType as $activityTypeXML) { | |
233 | $definition['activityTypes'][] = json_decode(json_encode($activityTypeXML), TRUE); | |
234 | } | |
ae195e71 | 235 | } |
236 | ||
7c2b40d1 CW |
237 | // set statuses |
238 | if (isset($xml->Statuses)) { | |
239 | $definition['statuses'] = (array) $xml->Statuses->Status; | |
240 | } | |
241 | ||
728b5029 TO |
242 | // set activity sets |
243 | if (isset($xml->ActivitySets)) { | |
244 | $definition['activitySets'] = array(); | |
245 | foreach ($xml->ActivitySets->ActivitySet as $activitySetXML) { | |
246 | // parse basic properties | |
2f58fb09 TO |
247 | $activitySet = array(); |
248 | $activitySet['name'] = (string) $activitySetXML->name; | |
249 | $activitySet['label'] = (string) $activitySetXML->label; | |
250 | if ('true' == (string) $activitySetXML->timeline) { | |
251 | $activitySet['timeline'] = 1; | |
252 | } | |
253 | if ('true' == (string) $activitySetXML->sequence) { | |
254 | $activitySet['sequence'] = 1; | |
255 | } | |
728b5029 | 256 | |
728b5029 TO |
257 | if (isset($activitySetXML->ActivityTypes)) { |
258 | $activitySet['activityTypes'] = array(); | |
259 | foreach ($activitySetXML->ActivityTypes->ActivityType as $activityTypeXML) { | |
260 | $activitySet['activityTypes'][] = json_decode(json_encode($activityTypeXML), TRUE); | |
261 | } | |
ae195e71 | 262 | } |
728b5029 | 263 | $definition['activitySets'][] = $activitySet; |
ae195e71 | 264 | } |
b6e48667 | 265 | } |
20173e0e | 266 | |
267 | // set case roles | |
728b5029 TO |
268 | if (isset($xml->CaseRoles)) { |
269 | $definition['caseRoles'] = array(); | |
270 | foreach ($xml->CaseRoles->RelationshipType as $caseRoleXml) { | |
271 | $definition['caseRoles'][] = json_decode(json_encode($caseRoleXml), TRUE); | |
272 | } | |
273 | } | |
20173e0e | 274 | |
93d47462 | 275 | return $definition; |
20173e0e | 276 | } |
277 | ||
8ffdec17 ARW |
278 | /** |
279 | * Given the list of params in the params array, fetch the object | |
280 | * and store the values in the values array | |
281 | * | |
64bd5a0e TO |
282 | * @param array $params |
283 | * Input parameters to find object. | |
284 | * @param array $values | |
285 | * Output values of the object. | |
77b97be7 | 286 | * |
8ffdec17 | 287 | * @return CRM_Case_BAO_CaseType|null the found object or null |
8ffdec17 | 288 | */ |
00be9182 | 289 | public static function &getValues(&$params, &$values) { |
8ffdec17 ARW |
290 | $caseType = new CRM_Case_BAO_CaseType(); |
291 | ||
292 | $caseType->copyValues($params); | |
293 | ||
294 | if ($caseType->find(TRUE)) { | |
295 | CRM_Core_DAO::storeValues($caseType, $values); | |
296 | return $caseType; | |
297 | } | |
298 | return NULL; | |
299 | } | |
300 | ||
301 | /** | |
d2e5d2ce | 302 | * Takes an associative array and creates a case type object. |
8ffdec17 | 303 | * |
64bd5a0e TO |
304 | * @param array $params |
305 | * (reference ) an assoc array of name/value pairs. | |
77b97be7 | 306 | * |
16b10e64 | 307 | * @return CRM_Case_BAO_CaseType |
8ffdec17 | 308 | */ |
00be9182 | 309 | public static function &create(&$params) { |
8ffdec17 ARW |
310 | $transaction = new CRM_Core_Transaction(); |
311 | ||
312 | if (!empty($params['id'])) { | |
313 | CRM_Utils_Hook::pre('edit', 'CaseType', $params['id'], $params); | |
314 | } | |
315 | else { | |
316 | CRM_Utils_Hook::pre('create', 'CaseType', NULL, $params); | |
317 | } | |
318 | ||
319 | $caseType = self::add($params); | |
320 | ||
321 | if (is_a($caseType, 'CRM_Core_Error')) { | |
322 | $transaction->rollback(); | |
323 | return $caseType; | |
324 | } | |
325 | ||
326 | if (!empty($params['id'])) { | |
327 | CRM_Utils_Hook::post('edit', 'CaseType', $caseType->id, $case); | |
328 | } | |
329 | else { | |
330 | CRM_Utils_Hook::post('create', 'CaseType', $caseType->id, $case); | |
331 | } | |
332 | $transaction->commit(); | |
10ffff26 | 333 | CRM_Case_XMLRepository::singleton(TRUE); |
31c28ed5 | 334 | CRM_Core_OptionGroup::flushAll(); |
8ffdec17 ARW |
335 | |
336 | return $caseType; | |
337 | } | |
338 | ||
339 | /** | |
fe482240 EM |
340 | * Retrieve DB object based on input parameters. |
341 | * | |
342 | * It also stores all the retrieved values in the default array. | |
8ffdec17 | 343 | * |
64bd5a0e TO |
344 | * @param array $params |
345 | * (reference ) an assoc array of name/value pairs. | |
346 | * @param array $defaults | |
347 | * (reference ) an assoc array to hold the name / value pairs. | |
8ffdec17 | 348 | * in a hierarchical manner |
da6b46f4 | 349 | * |
16b10e64 | 350 | * @return CRM_Case_BAO_CaseType |
8ffdec17 | 351 | */ |
00be9182 | 352 | public static function retrieve(&$params, &$defaults) { |
8ffdec17 ARW |
353 | $caseType = CRM_Case_BAO_CaseType::getValues($params, $defaults); |
354 | return $caseType; | |
355 | } | |
356 | ||
4c6ce474 | 357 | /** |
100fef9d | 358 | * @param int $caseTypeId |
4c6ce474 | 359 | * |
c490a46a | 360 | * @throws CRM_Core_Exception |
4c6ce474 EM |
361 | * @return mixed |
362 | */ | |
00be9182 | 363 | public static function del($caseTypeId) { |
8ffdec17 ARW |
364 | $caseType = new CRM_Case_DAO_CaseType(); |
365 | $caseType->id = $caseTypeId; | |
10ffff26 TO |
366 | $refCounts = $caseType->getReferenceCounts(); |
367 | $total = array_sum(CRM_Utils_Array::collect('count', $refCounts)); | |
368 | if ($total) { | |
84dfe0f2 | 369 | throw new CRM_Core_Exception(ts("You can not delete this case type -- it is assigned to %1 existing case record(s). If you do not want this case type to be used going forward, consider disabling it instead.", array(1 => $total))); |
10ffff26 TO |
370 | } |
371 | $result = $caseType->delete(); | |
372 | CRM_Case_XMLRepository::singleton(TRUE); | |
373 | return $result; | |
8ffdec17 | 374 | } |
076f81b6 | 375 | |
376 | /** | |
377 | * Determine if a case-type name is well-formed | |
378 | * | |
379 | * @param string $caseType | |
380 | * @return bool | |
381 | */ | |
00be9182 | 382 | public static function isValidName($caseType) { |
e547f744 | 383 | return preg_match('/^[a-zA-Z0-9_]+$/', $caseType); |
076f81b6 | 384 | } |
32f1c917 TO |
385 | |
386 | /** | |
387 | * Determine if the case-type has *both* DB and file-based definitions. | |
388 | * | |
389 | * @param int $caseTypeId | |
72b3a70c CW |
390 | * @return bool|null |
391 | * TRUE if there are *both* DB and file-based definitions | |
32f1c917 | 392 | */ |
00be9182 | 393 | public static function isForked($caseTypeId) { |
32f1c917 TO |
394 | $caseTypeName = CRM_Core_DAO::getFieldValue('CRM_Case_DAO_CaseType', $caseTypeId, 'name', 'id', TRUE); |
395 | if ($caseTypeName) { | |
396 | $dbDefinition = CRM_Core_DAO::getFieldValue('CRM_Case_DAO_CaseType', $caseTypeId, 'definition', 'id', TRUE); | |
397 | $fileDefinition = CRM_Case_XMLRepository::singleton()->retrieveFile($caseTypeName); | |
398 | return $fileDefinition && $dbDefinition; | |
399 | } | |
400 | return NULL; | |
401 | } | |
402 | ||
403 | /** | |
404 | * Determine if modifications are allowed on the case-type | |
405 | * | |
406 | * @param int $caseTypeId | |
a6c01b45 CW |
407 | * @return bool |
408 | * TRUE if the definition can be modified | |
32f1c917 | 409 | */ |
00be9182 | 410 | public static function isForkable($caseTypeId) { |
32f1c917 TO |
411 | $caseTypeName = CRM_Core_DAO::getFieldValue('CRM_Case_DAO_CaseType', $caseTypeId, 'name', 'id', TRUE); |
412 | if ($caseTypeName) { | |
413 | // if file-based definition explicitly disables "forkable" option, then don't allow changes to definition | |
414 | $fileDefinition = CRM_Case_XMLRepository::singleton()->retrieveFile($caseTypeName); | |
2210eab6 | 415 | if ($fileDefinition && isset($fileDefinition->forkable)) { |
e547f744 | 416 | return CRM_Utils_String::strtobool((string) $fileDefinition->forkable); |
32f1c917 TO |
417 | } |
418 | } | |
419 | return TRUE; | |
420 | } | |
96025800 | 421 | |
8ffdec17 | 422 | } |