memberdashboard.php

   1 <?php
   2
   3 require_once 'memberdashboard.civix.php';
   4
   5 define('MEMBERDASHBOARD_SETTINGS_GROUP', 'Member Dashboard Preferences');
   6 define('MEMBERDASHBOARD_MAX_EMAIL_ALIASES', 5);
   7
   8 /**
   9  * Implementation of hook_civicrm_config
  10  *
  11  * @link http://wiki.civicrm.org/confluence/display/CRMDOC/hook_civicrm_config
  12  */
  13 function memberdashboard_civicrm_config(&$config) {
  14   _memberdashboard_civix_civicrm_config($config);
  15 }
  16
  17 /**
  18  * Implementation of hook_civicrm_xmlMenu
  19  *
  20  * @param $files array(string)
  21  *
  22  * @link http://wiki.civicrm.org/confluence/display/CRMDOC/hook_civicrm_xmlMenu
  23  */
  24 function memberdashboard_civicrm_xmlMenu(&$files) {
  25   _memberdashboard_civix_civicrm_xmlMenu($files);
  26 }
  27
  28 /**
  29  * Implementation of hook_civicrm_install
  30  *
  31  * @link http://wiki.civicrm.org/confluence/display/CRMDOC/hook_civicrm_install
  32  */
  33 function memberdashboard_civicrm_install() {
  34   _memberdashboard_civix_civicrm_install();
  35 }
  36
  37 /**
  38  * Implementation of hook_civicrm_uninstall
  39  *
  40  * @link http://wiki.civicrm.org/confluence/display/CRMDOC/hook_civicrm_uninstall
  41  */
  42 function memberdashboard_civicrm_uninstall() {
  43   _memberdashboard_civix_civicrm_uninstall();
  44 }
  45
  46 /**
  47  * Implementation of hook_civicrm_enable
  48  *
  49  * @link http://wiki.civicrm.org/confluence/display/CRMDOC/hook_civicrm_enable
  50  */
  51 function memberdashboard_civicrm_enable() {
  52   _memberdashboard_civix_civicrm_enable();
  53 }
  54
  55 /**
  56  * Implementation of hook_civicrm_disable
  57  *
  58  * @link http://wiki.civicrm.org/confluence/display/CRMDOC/hook_civicrm_disable
  59  */
  60 function memberdashboard_civicrm_disable() {
  61   _memberdashboard_civix_civicrm_disable();
  62 }
  63
  64 /**
  65  * Implementation of hook_civicrm_upgrade
  66  *
  67  * @param $op string, the type of operation being performed; 'check' or 'enqueue'
  68  * @param $queue CRM_Queue_Queue, (for 'enqueue') the modifiable list of pending up upgrade tasks
  69  *
  70  * @return mixed  based on op. for 'check', returns array(boolean) (TRUE if upgrades are pending)
  71  *                for 'enqueue', returns void
  72  *
  73  * @link http://wiki.civicrm.org/confluence/display/CRMDOC/hook_civicrm_upgrade
  74  */
  75 function memberdashboard_civicrm_upgrade($op, CRM_Queue_Queue $queue = NULL) {
  76   return _memberdashboard_civix_civicrm_upgrade($op, $queue);
  77 }
  78
  79 /**
  80  * Implementation of hook_civicrm_managed
  81  *
  82  * Generate a list of entities to create/deactivate/delete when this module
  83  * is installed, disabled, uninstalled.
  84  *
  85  * @link http://wiki.civicrm.org/confluence/display/CRMDOC/hook_civicrm_managed
  86  */
  87 function memberdashboard_civicrm_managed(&$entities) {
  88   _memberdashboard_civix_civicrm_managed($entities);
  89 }
  90
  91 /**
  92  * Implementation of hook_civicrm_caseTypes
  93  *
  94  * Generate a list of case-types
  95  *
  96  * Note: This hook only runs in CiviCRM 4.4+.
  97  *
  98  * @link http://wiki.civicrm.org/confluence/display/CRMDOC/hook_civicrm_caseTypes
  99  */
 100 function memberdashboard_civicrm_caseTypes(&$caseTypes) {
 101   _memberdashboard_civix_civicrm_caseTypes($caseTypes);
 102 }
 103
 104 /**
 105  * Implementation of hook_civicrm_alterSettingsFolders
 106  *
 107  * @link http://wiki.civicrm.org/confluence/display/CRMDOC/hook_civicrm_alterSettingsFolders
 108  */
 109 function memberdashboard_civicrm_alterSettingsFolders(&$metaDataFolders = NULL) {
 110   _memberdashboard_civix_civicrm_alterSettingsFolders($metaDataFolders);
 111 }
 112
 113 /**
 114  * Implementation of hook_civicrm_post
 115  *
 116  * @link http://wiki.civicrm.org/confluence/display/CRMDOC/hook_civicrm_post
 117  */
 118 function memberdashboard_civicrm_post($op, $objectName, $objectId, &$objectRef) {
 119   // When a membership is modified, make a RPC to regenerate the
 120   // member button for the contact.
 121   $triggerOps = array('create', 'edit', 'delete');
 122
 123   if($objectName == 'Membership' && in_array($op, $triggerOps)) {
 124     try {
 125       // TODO: Extract all of this to a class for clarity and
 126       // organization's sake.
 127
 128       $contactId = $objectRef->contact_id;
 129
 130       $getDao = function () use ($contactId) {
 131
 132           // Get the oldest join date for the contact's memberships.
 133           $dao = CRM_Core_DAO::executeQuery(
 134             'SELECT join_date FROM civicrm_membership WHERE contact_id=%1 ORDER BY join_date ASC LIMIT 1',
 135             array( 1 => array($contactId, 'Integer') )
 136           );
 137           return $dao;
 138       };
 139
 140       $dao = $getDao();
 141       $fetchResult = $dao->fetch();
 142
 143       if(!$fetchResult) {
 144           // retry after sleeping 2 seconds in order to avoid a race condition
 145           usleep(2000000);
 146           $dao->free();
 147
 148           $dao = $getDao();
 149           $fetchResult = $dao->fetch();
 150       }
 151
 152       if($fetchResult) {
 153         // Make the API call.
 154         $joinDate = $dao->join_date;
 155         $apiUrl = civicrm_api3('setting', 'getvalue', array(
 156           'name' => 'memberdashboard_button_api_url',
 157           'group' => MEMBERDASHBOARD_SETTINGS_GROUP
 158         ));
 159         $user = civicrm_api3('setting', 'getvalue', array(
 160           'name' => 'memberdashboard_button_api_user',
 161           'group' => MEMBERDASHBOARD_SETTINGS_GROUP
 162         ));
 163         $password = civicrm_api3('setting', 'getvalue', array(
 164           'name' => 'memberdashboard_button_api_password',
 165           'group' => MEMBERDASHBOARD_SETTINGS_GROUP
 166         ));
 167
 168         if(!empty($apiUrl) && !empty($user) && !empty($password)) {
 169           $url = "$apiUrl?contact_id=" . $contactId . "&date=" . $joinDate;
 170           $curl = curl_init();
 171           curl_setopt($curl, CURLOPT_HTTPAUTH, CURLAUTH_BASIC);
 172           curl_setopt($curl, CURLOPT_USERPWD, "$user:$password");
 173           curl_setopt($curl, CURLOPT_URL, $url);
 174           curl_exec($curl);
 175         }
 176       }
 177
 178       $dao->free();
 179     } catch(Exception $e) {
 180       // Ignore it.  Not the end of the world if this fails.
 181     }
 182   }
 183 }
 184
 185 function memberdashboard_civicrm_buildForm($formName, &$form) {
 186   // Hack to fix state select box in 4.4.x
 187   if($formName == 'CRM_Profile_Form_Edit') {
 188     $contactId = CRM_Core_Session::singleton()->get('userID');
 189     if($contactId) {
 190       $contact = civicrm_api3('contact', 'getsingle', array( 'id' => $contactId ));
 191       $defaults['state_province-Primary'] = $contact['state_province_id'];
 192       $form->setDefaults($defaults);
 193     }
 194   }
 195 }
 196
 197 function memberdashboard_civicrm_postProcess($formName, &$form) {
 198   // Redirect to Member Dashboard after updating billing info.  The
 199   // default behavior is to go to the standard CiviCRM dashboard,
 200   // which is undesirable.
 201   if($formName == 'CRM_Contribute_Form_UpdateBilling') {
 202     CRM_Utils_System::redirect(CRM_Utils_System::url(
 203       'civicrm/member-dashboard'
 204     ));
 205   }
 206 }