CRM/Financial/BAO/ExportFormat.php

   1 <?php
   2 /*
   3  +--------------------------------------------------------------------+
   4  | CiviCRM version 5                                               |
   5  +--------------------------------------------------------------------+
   6  | Copyright CiviCRM LLC (c) 2004-2019                                |
   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-2019
  32  */
  33
  34 /**
  35  * Base class for Export Formats
  36  * Create a subclass for a specific format.
  37  * @see http://wiki.civicrm.org/confluence/display/CRM/CiviAccounts+Specifications+-++Batches#CiviAccountsSpecifications-Batches-%C2%A0Overviewofimplementation
  38  */
  39 abstract class CRM_Financial_BAO_ExportFormat {
  40
  41   /**
  42    * data which the individual export formats will output in the desired format.
  43    * @var array
  44    */
  45   protected $_exportParams;
  46
  47   /**
  48    * smarty template.
  49    * @var CRM_Core_Smarty
  50    */
  51   static protected $_template;
  52
  53   /**
  54    * Download Exported file.
  55    * @var boolean
  56    */
  57   public $_isDownloadFile;
  58
  59   /**
  60    * Class constructor.
  61    */
  62   public function __construct() {
  63     if (!isset(self::$_template)) {
  64       self::$_template = CRM_Core_Smarty::singleton();
  65     }
  66   }
  67
  68   /**
  69    * Override to assemble the appropriate subset of financial data for the specific export format.
  70    * @param array $exportParams
  71    *
  72    * @return mixed
  73    */
  74   public function export($exportParams) {
  75     $this->_exportParams = $exportParams;
  76     return $exportParams;
  77   }
  78
  79   /**
  80    * Exports sbatches in $this->_batchIds, and saves to file.
  81    *
  82    * @param string $fileName - use this file name (if applicable)
  83    */
  84   public function output($fileName = NULL) {
  85     // Default behaviour, override if needed:
  86     self::createActivityExport($this->_batchIds, $fileName);
  87   }
  88
  89   /**
  90    * Abstract function that generates exports, and downloads them as zip file.
  91    *
  92    * @param $exportDaos array with DAO's for queries to be exported.
  93    */
  94   public abstract function makeExport($exportDaos);
  95
  96   /**
  97    * @return string
  98    */
  99   public function getMimeType() {
 100     return 'text/plain';
 101   }
 102
 103   /**
 104    * Returns some kind of identification for your export format.
 105    *
 106    * This does not really has to be a file extension, you can name your
 107    * file as you wish as you override output.
 108    *
 109    * @return string
 110    */
 111   public abstract function getFileExtension();
 112
 113   /**
 114    * @return object
 115    */
 116   public static function &getTemplate() {
 117     return self::$_template;
 118   }
 119
 120   /**
 121    * @param $var
 122    * @param null $value
 123    */
 124   public function assign($var, $value = NULL) {
 125     self::$_template->assign($var, $value);
 126   }
 127
 128   /*
 129    * This gets called for every item of data being compiled before being sent to the exporter for output.
 130    *
 131    * Depending on the output format might want to override this, e.g. for IIF tabs need to be escaped etc,
 132    * but for CSV it doesn't make sense because php has built in csv output functions.
 133    */
 134   /**
 135    * @param $s
 136    * @param string $type
 137    *
 138    * @return null
 139    */
 140   public static function format($s, $type = 'string') {
 141     if (!empty($s)) {
 142       return $s;
 143     }
 144     else {
 145       return NULL;
 146     }
 147   }
 148
 149   public function initiateDownload() {
 150     if (!$this->_isDownloadFile) {
 151       return NULL;
 152     }
 153     $config = CRM_Core_Config::singleton();
 154     // zip files if more than one.
 155     if (count($this->_downloadFile) > 1) {
 156       $zip = $config->customFileUploadDir . 'Financial_Transactions_' . date('YmdHis') . '.zip';
 157       $result = $this->createZip($this->_downloadFile, $zip, TRUE);
 158       if ($result) {
 159         CRM_Utils_System::setHttpHeader('Content-Type', 'application/zip');
 160         CRM_Utils_System::setHttpHeader('Content-Disposition', 'attachment; filename=' . CRM_Utils_File::cleanFileName(basename($zip)));
 161         CRM_Utils_System::setHttpHeader('Content-Length', '' . filesize($zip));
 162         ob_clean();
 163         flush();
 164         readfile($config->customFileUploadDir . CRM_Utils_File::cleanFileName(basename($zip)));
 165         unlink($zip); //delete the zip to avoid clutter.
 166         CRM_Utils_System::civiExit();
 167       }
 168     }
 169     else {
 170       CRM_Utils_System::setHttpHeader('Content-Type', 'text/plain');
 171       CRM_Utils_System::setHttpHeader('Content-Disposition', 'attachment; filename=' . CRM_Utils_File::cleanFileName(basename($this->_downloadFile[0])));
 172       CRM_Utils_System::setHttpHeader('Content-Length', '' . filesize($this->_downloadFile[0]));
 173       ob_clean();
 174       flush();
 175       readfile($config->customFileUploadDir . CRM_Utils_File::cleanFileName(basename($this->_downloadFile[0])));
 176       CRM_Utils_System::civiExit();
 177     }
 178   }
 179
 180   /**
 181    * @param $batchIds
 182    * @param string $fileName
 183    *
 184    * @throws CRM_Core_Exception
 185    */
 186   public static function createActivityExport($batchIds, $fileName) {
 187     $session = CRM_Core_Session::singleton();
 188     $values = array();
 189     $params = array('id' => $batchIds);
 190     CRM_Batch_BAO_Batch::retrieve($params, $values);
 191     $createdBy = CRM_Contact_BAO_Contact::displayName($values['created_id']);
 192     $modifiedBy = CRM_Contact_BAO_Contact::displayName($values['modified_id']);
 193
 194     $values['payment_instrument_id'] = '';
 195     if (isset($values['payment_instrument_id'])) {
 196       $paymentInstrument = array_flip(CRM_Contribute_PseudoConstant::paymentInstrument('label'));
 197       $values['payment_instrument_id'] = array_search($values['payment_instrument_id'], $paymentInstrument);
 198     }
 199     $details = '<p>' . ts('Record:') . ' ' . $values['title'] . '</p><p>' . ts('Description:') . '</p><p>' . ts('Created By:') . " $createdBy" . '</p><p>' . ts('Created Date:') . ' ' . $values['created_date'] . '</p><p>' . ts('Last Modified By:') . ' ' . $modifiedBy . '</p><p>' . ts('Payment Method:') . ' ' . $values['payment_instrument_id'] . '</p>';
 200     $subject = '';
 201     if (!empty($values['total'])) {
 202       $subject .= ts('Total') . '[' . CRM_Utils_Money::format($values['total']) . '],';
 203     }
 204     if (!empty($values['item_count'])) {
 205       $subject .= ' ' . ts('Count') . '[' . $values['item_count'] . '],';
 206     }
 207
 208     // create activity.
 209     $subject .= ' ' . ts('Batch') . '[' . $values['title'] . ']';
 210     $activityTypes = CRM_Core_PseudoConstant::activityType(TRUE, FALSE, FALSE, 'name');
 211     $activityParams = array(
 212       'activity_type_id' => array_search('Export Accounting Batch', $activityTypes),
 213       'subject' => $subject,
 214       'status_id' => 2,
 215       'activity_date_time' => date('YmdHis'),
 216       'source_contact_id' => $session->get('userID'),
 217       'source_record_id' => $values['id'],
 218       'target_contact_id' => $session->get('userID'),
 219       'details' => $details,
 220       'attachFile_1' => array(
 221         'uri' => $fileName,
 222         'type' => 'text/csv',
 223         'location' => $fileName,
 224         'upload_date' => date('YmdHis'),
 225       ),
 226     );
 227
 228     CRM_Activity_BAO_Activity::create($activityParams);
 229   }
 230
 231   /**
 232    * @param array $files
 233    * @param null $destination
 234    * @param bool $overwrite
 235    *
 236    * @return bool
 237    */
 238   public function createZip($files = array(), $destination = NULL, $overwrite = FALSE) {
 239     // if the zip file already exists and overwrite is false, return false
 240     if (file_exists($destination) && !$overwrite) {
 241       return FALSE;
 242     }
 243     $valid_files = array();
 244     if (is_array($files)) {
 245       foreach ($files as $file) {
 246         // make sure the file exists
 247         if (file_exists($file)) {
 248           $validFiles[] = $file;
 249         }
 250       }
 251     }
 252     if (count($validFiles)) {
 253       $zip = new ZipArchive();
 254       if ($zip->open($destination, $overwrite ? ZIPARCHIVE::OVERWRITE : ZIPARCHIVE::CREATE) !== TRUE) {
 255         return FALSE;
 256       }
 257       foreach ($validFiles as $file) {
 258         $zip->addFile($file, CRM_Utils_File::cleanFileName(basename($file)));
 259       }
 260       $zip->close();
 261       return file_exists($destination);
 262     }
 263     else {
 264       return FALSE;
 265     }
 266   }
 267
 268 }