3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.5 |
5 +--------------------------------------------------------------------+
6 | Copyright (C) 2011 Marty Wright |
7 | Licensed to CiviCRM under the Academic Free License version 3.0. |
8 +--------------------------------------------------------------------+
9 | This file is a part of CiviCRM. |
11 | CiviCRM is free software; you can copy, modify, and distribute it |
12 | under the terms of the GNU Affero General Public License |
13 | Version 3, 19 November 2007 and the CiviCRM Licensing Exception. |
15 | CiviCRM is distributed in the hope that it will be useful, but |
16 | WITHOUT ANY WARRANTY; without even the implied warranty of |
17 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. |
18 | See the GNU Affero General Public License for more details. |
20 | You should have received a copy of the GNU Affero General Public |
21 | License and the CiviCRM Licensing Exception along |
22 | with this program; if not, contact CiviCRM LLC |
23 | at info[AT]civicrm[DOT]org. If you have questions about the |
24 | GNU Affero General Public License or the licensing of CiviCRM, |
25 | see the CiviCRM license FAQ at http://civicrm.org/licensing |
26 +--------------------------------------------------------------------+
32 * @copyright CiviCRM LLC (c) 2004-2014
38 * This class contains functions for managing Label Formats
40 class CRM_Core_BAO_LabelFormat
extends CRM_Core_DAO_OptionValue
{
43 * static holder for the Label Formats Option Group ID
45 private static $_gid = NULL;
48 * Label Format fields stored in the 'value' field of the Option Value table.
50 private static $optionValueFields = array(
51 'paper-size' => array(
52 // Paper size: names defined in option_value table (option_group = 'paper_size')
53 'name' => 'paper-size',
54 'type' => CRM_Utils_Type
::T_STRING
,
55 'default' => 'letter',
57 'orientation' => array(
58 // Paper orientation: 'portrait' or 'landscape'
59 'name' => 'orientation',
60 'type' => CRM_Utils_Type
::T_STRING
,
61 'default' => 'portrait',
64 // Font name: 'courier', 'helvetica', 'times'
65 'name' => 'font-name',
66 'type' => CRM_Utils_Type
::T_STRING
,
67 'default' => 'helvetica',
70 // Font size: always in points
71 'name' => 'font-size',
72 'type' => CRM_Utils_Type
::T_INT
,
75 'font-style' => array(
76 // Font style: 'B' bold, 'I' italic, 'BI' bold+italic
77 'name' => 'font-style',
78 'type' => CRM_Utils_Type
::T_STRING
,
82 // Number of labels horizontally
84 'type' => CRM_Utils_Type
::T_INT
,
88 // Number of labels vertically
90 'type' => CRM_Utils_Type
::T_INT
,
94 // Unit of measurement for all of the following fields
96 'type' => CRM_Utils_Type
::T_STRING
,
102 'type' => CRM_Utils_Type
::T_FLOAT
,
109 'type' => CRM_Utils_Type
::T_FLOAT
,
114 // Horizontal space between two labels
116 'type' => CRM_Utils_Type
::T_FLOAT
,
118 'default' => 3.96875,
121 // Vertical space between two labels
123 'type' => CRM_Utils_Type
::T_FLOAT
,
130 'type' => CRM_Utils_Type
::T_FLOAT
,
137 'type' => CRM_Utils_Type
::T_FLOAT
,
142 // Space between text and left edge of label
143 'name' => 'lPadding',
144 'type' => CRM_Utils_Type
::T_FLOAT
,
149 // Space between text and top edge of label
150 'name' => 'tPadding',
151 'type' => CRM_Utils_Type
::T_FLOAT
,
158 * Get page orientations recognized by the DOMPDF package used to create PDF letters.
162 * @return array array of page orientations
166 public static function getPageOrientations() {
168 'portrait' => ts('Portrait'),
169 'landscape' => ts('Landscape'),
174 * Get font names supported by the TCPDF package used to create PDF labels.
176 * @param string $name group name
178 * @return array array of font names
182 public static function getFontNames($name='label_format') {
183 $label = new CRM_Utils_PDF_Label(self
::getDefaultValues($name));
184 return $label->getFontNames();
188 * Get font sizes supported by the TCPDF package used to create PDF labels.
192 * @return array array of font sizes
196 public static function getFontSizes() {
197 $fontSizes = array();
198 for ($i = 6; $i <= 60; $i++
) {
199 $fontSizes[$i] = ts('%1 pt', array(1 => $i));
206 * Get measurement units recognized by the TCPDF package used to create PDF labels.
210 * @return array array of measurement units
214 public static function getUnits() {
216 'in' => ts('Inches'),
217 'cm' => ts('Centimeters'),
218 'mm' => ts('Millimeters'),
219 'pt' => ts('Points'),
224 * Get text alignment recognized by the TCPDF package used to create PDF labels.
228 * @return array array of alignments
232 public static function getTextAlignments() {
241 * Get text alignment recognized by the TCPDF package used to create PDF labels.
245 * @return array array of alignments
249 public static function getFontStyles() {
258 * Get Option Group ID for Label Formats
260 * @param string $name
262 * @internal param $void
264 * @return int Group ID (null if Group ID doesn't exist)
267 private static function _getGid($name='label_format') {
268 if (!isset(self
::$_gid[$name]) ||
!self
::$_gid[$name]) {
269 self
::$_gid[$name] = CRM_Core_DAO
::getFieldValue('CRM_Core_DAO_OptionGroup', $name, 'id', 'name');
270 if (!self
::$_gid[$name]) {
271 CRM_Core_Error
::fatal(ts('Label Format Option Group not found in database.'));
274 return self
::$_gid[$name];
278 * Add ordering fields to Label Format list
280 * @param array (reference) $list List of Label Formats
281 * @param string $returnURL URL of page calling this function
283 * @return array (reference) List of Label Formats
287 static function addOrder(&$list, $returnURL) {
288 $filter = "option_group_id = " . self
::_getGid();
289 CRM_Utils_Weight
::addOrder($list, 'CRM_Core_DAO_OptionValue', 'id', $returnURL, $filter);
293 * Retrieve list of Label Formats.
295 * @param bool $namesOnly return simple list of names
296 * @param string $groupName group name of the label format option group
298 * @return array (reference) label format list
302 static function &getList($namesOnly = FALSE, $groupName='label_format') {
303 static $list = array();
304 if (self
::_getGid($groupName)) {
305 // get saved label formats from Option Value table
306 $dao = new CRM_Core_DAO_OptionValue();
307 $dao->option_group_id
= self
::_getGid($groupName);
309 $dao->orderBy('weight');
311 while ($dao->fetch()) {
313 $list[$groupName][$dao->name
] = $dao->label
;
316 CRM_Core_DAO
::storeValues($dao, $list[$groupName][$dao->id
]);
320 return $list[$groupName];
324 * retrieve the default Label Format values
326 * @param string $groupName label format group name
328 * @return array Name/value pairs containing the default Label Format values.
332 static function &getDefaultValues($groupName = 'label_format') {
333 $params = array('is_active' => 1, 'is_default' => 1);
335 if (!self
::retrieve($params, $defaults, $groupName)) {
336 foreach (self
::$optionValueFields as $name => $field) {
337 $defaults[$name] = $field['default'];
339 $filter = array('option_group_id' => self
::_getGid($groupName));
340 $defaults['weight'] = CRM_Utils_Weight
::getDefaultWeight('CRM_Core_DAO_OptionValue', $filter);
346 * Get Label Format from the DB
348 * @param string $field Field name to search by
349 * @param int $val Field value to search for
351 * @param string $groupName
353 * @return array $values (reference) associative array of name/value pairs
356 static function &getLabelFormat($field, $val, $groupName = 'label_format') {
357 $params = array('is_active' => 1, $field => $val);
358 $labelFormat = array();
359 if (self
::retrieve($params, $labelFormat, $groupName)) {
363 return self
::getDefaultValues($groupName);
368 * Get Label Format by Name
370 * @param int $name Label format name. Empty = get default label format
372 * @return array $values (reference) associative array of name/value pairs
375 static function &getByName($name) {
376 return self
::getLabelFormat('name', $name);
380 * Get Label Format by ID
382 * @param int $id label format id. 0 = get default label format
383 * @param string $groupName group name
385 * @return array $values (reference) associative array of name/value pairs
388 static function &getById($id, $groupName = 'label_format') {
389 return self
::getLabelFormat('id', $id, $groupName);
393 * Get Label Format field from associative array
395 * @param string $field name of a label format field
396 * @param array (reference) $values associative array of name/value pairs containing
397 * label format field selections
399 * @param null $default
405 static function getValue($field, &$values, $default = NULL) {
406 if (array_key_exists($field, self
::$optionValueFields)) {
407 switch (self
::$optionValueFields[$field]['type']) {
408 case CRM_Utils_Type
::T_INT
:
409 return (int)CRM_Utils_Array
::value($field, $values, $default);
411 case CRM_Utils_Type
::T_FLOAT
:
412 // Round float values to three decimal places and trim trailing zeros.
413 // Add a leading zero to values less than 1.
414 $f = sprintf('%05.3f', $values[$field]);
417 return (float)(empty($f) ?
'0' : $f);
419 return CRM_Utils_Array
::value($field, $values, $default);
425 * Takes a bunch of params that are needed to match certain criteria and
426 * retrieves the relevant objects. Typically the valid params are only
427 * label id. It also stores all the retrieved values in the default array.
429 * @param array $params (reference ) an assoc array of name/value pairs
430 * @param array $values (reference ) an assoc array to hold the flattened values
432 * @param string $groupName
434 * @return object CRM_Core_DAO_OptionValue object
438 static function retrieve(&$params, &$values, $groupName='label_format') {
439 $optionValue = new CRM_Core_DAO_OptionValue();
440 $optionValue->copyValues($params);
441 $optionValue->option_group_id
= self
::_getGid($groupName);
442 if ($optionValue->find(TRUE)) {
443 // Extract fields that have been serialized in the 'value' column of the Option Value table.
444 $values = json_decode($optionValue->value
, TRUE);
445 // Add any new fields that don't yet exist in the saved values.
446 foreach (self
::$optionValueFields as $name => $field) {
447 if (!isset($values[$name])) {
448 $values[$name] = $field['default'];
449 if ($field['metric']) {
450 $values[$name] = CRM_Utils_PDF_Utils
::convertMetric($field['default'],
451 self
::$optionValueFields['metric']['default'],
457 // Add fields from the OptionValue base class
458 CRM_Core_DAO
::storeValues($optionValue, $values);
465 * Return the name of the group for customized labels
472 public static function customGroupName() {
477 * Save the Label Format in the DB
479 * @param array (reference) $values associative array of name/value pairs
480 * @param int $id id of the database record (null = new record)
481 * @param string $groupName group name of the label format
486 function saveLabelFormat(&$values, $id = NULL, $groupName = 'label_format') {
487 // get the Option Group ID for Label Formats (create one if it doesn't exist)
488 $group_id = self
::_getGid($groupName);
490 // clear other default if this is the new default label format
491 if ($values['is_default']) {
492 $query = "UPDATE civicrm_option_value SET is_default = 0 WHERE option_group_id = $group_id";
493 CRM_Core_DAO
::executeQuery($query, CRM_Core_DAO
::$_nullArray);
496 // fetch existing record
504 $list = self
::getList(TRUE,$groupName);
506 while (array_key_exists("custom_$cnt", $list)) $cnt++
;
507 $values['name'] = "custom_$cnt";
508 $values['grouping'] = self
::customGroupName();
510 // copy the supplied form values to the corresponding Option Value fields in the base class
511 foreach ($this->fields() as $name => $field) {
512 $this->$name = trim(CRM_Utils_Array
::value($name, $values, $this->$name));
513 if (empty($this->$name)) {
514 $this->$name = 'null';
518 $this->option_group_id
= $group_id;
519 $this->is_active
= 1;
521 // serialize label format fields into a single string to store in the 'value' column of the Option Value table
522 $v = json_decode($this->value
, TRUE);
523 foreach (self
::$optionValueFields as $name => $field) {
524 if (!isset($v[$name])) {
527 $v[$name] = self
::getValue($name, $values, $v[$name]);
529 $this->value
= json_encode($v);
531 // make sure serialized array will fit in the 'value' column
532 $attribute = CRM_Core_DAO
::getAttribute('CRM_Core_BAO_LabelFormat', 'value');
533 if (strlen($this->value
) > $attribute['maxlength']) {
534 CRM_Core_Error
::fatal(ts('Label Format does not fit in database.'));
538 // fix duplicate weights
539 $filter = array('option_group_id' => self
::_getGid());
540 CRM_Utils_Weight
::correctDuplicateWeights('CRM_Core_DAO_OptionValue', $filter);
544 * Function to delete a Label Format
546 * @param int $id ID of the label format to be deleted.
547 * @param string $groupName group name
551 static function del($id, $groupName) {
553 $dao = new CRM_Core_DAO_OptionValue();
555 if ($dao->find(TRUE)) {
556 if ($dao->option_group_id
== self
::_getGid($groupName)) {
557 $filter = array('option_group_id' => self
::_getGid($groupName));
558 CRM_Utils_Weight
::delWeight('CRM_Core_DAO_OptionValue', $id, $filter);
564 CRM_Core_Error
::fatal(ts('Invalid value passed to delete function.'));