<?php

class CustomersController extends AppController {
  var $sidemenu_links =
    array(array('name' => 'Customers',     'header' => true),
          array('name' => 'Current',       'url' => array('controller' => 'customers', 'action' => 'current')),
          array('name' => 'Past',          'url' => array('controller' => 'customers', 'action' => 'past')),
          array('name' => 'All',           'url' => array('controller' => 'customers', 'action' => 'all')),
          array('name' => 'Add Customer',  'url' => array('controller' => 'customers', 'action' => 'add')),
          );

  //var $components = array('RequestHandler');


  /**************************************************************************
   **************************************************************************
   **************************************************************************
   * override: sideMenuLinks
   *  - Generates controller specific links for the side menu
   */
  function sideMenuLinks() {
    return array_merge(parent::sideMenuLinks(), $this->sidemenu_links);
  }

  
  /**************************************************************************
   **************************************************************************
   **************************************************************************
   * action: index / current / past / all
   *  - Creates a list of customers
   */

  function index()   { $this->current(); }
  function current() { $this->jqGridView('Current Tenants', 'current'); }
  function past()    { $this->jqGridView('Past Tenants'); }
  function all()     { $this->jqGridView('All Customers'); }


  /**************************************************************************
   **************************************************************************
   **************************************************************************
   * virtuals: jqGridData
   *  - With the application controller handling the jqGridData action,
   *    these virtual functions ensure that the correct data is passed
   *    to jqGrid.
   */

  function jqGridDataSetup(&$params) {
    parent::jqGridDataSetup($params);
    if (!isset($params['action']))
      $params['action'] = 'all';
  }

  function jqGridDataCountTables(&$params, &$model) {
    return array
      ('link' =>
       array(// Models
	    'PrimaryContact',
	    'CurrentLease' => array('fields' => array()),
	     ),
       );
  }

  function jqGridDataTables(&$params, &$model) {
    $link = $this->jqGridDataCountTables($params, $model);
    $link['link']['DoubleEntry'] = array('fields' => array());
    $link['link']['DoubleEntry']['Ledger'] = array('fields' => array());
    $link['link']['DoubleEntry']['Ledger']['Account'] = array('fields' => array());
    // INNER JOIN would be great, as it would ensure we're only looking
    // at the ledger entries that we truly want.  However, this also
    // removes from the query any units that do not yet have a ledger
    // entry in A/R.  A solution would be to INNER JOIN these tables,
    // and LEFT JOIN it to the rest.  Grouping of JOINs, however, is
    // implemented with the 'joins' tag, and is not available through
    // the Linkable behavior interface.
    //$link['link']['DoubleEntry']['Ledger']['Account']['type'] = 'INNER';
    $link['link']['DoubleEntry']['Ledger']['Account']['conditions']
      = array('Account.id' =>
	      $this->Customer->DoubleEntry->Ledger->Account->accountReceivableAccountID());
    return $link;
  }

  function jqGridDataFields(&$params, &$model) {
    $db = &$model->getDataSource();
    $fields = $db->fields($model, $model->alias);
    $fields[] = ('COUNT(DISTINCT CurrentLease.id) AS lease_count');
    $fields[] = ("SUM(IF(Account.id IS NULL, 0," .
		 "       IF(DoubleEntry.debit_ledger_id = Account.id," .
		 "          1, -1))" .
		 "    * IF(DoubleEntry.amount IS NULL, 0, DoubleEntry.amount))" .
		 " AS 'balance'");
    return $fields;
  }

  function jqGridDataConditions(&$params, &$model) {
    $conditions = parent::jqGridDataConditions($params, $model);

    if ($params['action'] === 'current') {
      $conditions[] = 'CurrentLease.id IS NOT NULL';
    }
    elseif ($params['action'] === 'past') {
      $conditions[] = 'CurrentLease.id IS NULL';
    }

    return $conditions;
  }

  function jqGridDataOrder(&$params, &$model, $index, $direction) {
    $order = array();
    $order[] = parent::jqGridDataOrder($params, $model, $index, $direction);

    if ($index !== 'PrimaryContact.last_name')
      $order[] = parent::jqGridDataOrder($params, $model,
					 'PrimaryContact.last_name', $direction);
    if ($index !== 'PrimaryContact.first_name')
      $order[] = parent::jqGridDataOrder($params, $model,
					 'PrimaryContact.first_name', $direction);
    if ($index !== 'Customer.id')
      $order[] = parent::jqGridDataOrder($params, $model,
					 'Customer.id', $direction);

    return $order;
  }

  function jqGridDataRecordCount(&$params, &$model, $query) {

    // We don't have a good way to use the query to obtain
    // our count.  The problem is that we're relying on the
    // group by for the query, which will destroy the count,
    // whether we omit the group by or leave it in.
    // So, build a fresh query for counting.

    $query['conditions'] = parent::jqGridDataConditions($params, $model);

    $count = $model->find('count',
			  array_merge(array('link' => array_diff_key($query['link'],
								     array('CurrentLease'=>1))),
				      array_diff_key($query, array('link'=>1))));
				      
    if ($params['action'] === 'all')
      return $count;

    $query['conditions'][] = 'CurrentLease.id IS NULL';
    $count_past = $model->find('count', $query);

    // Since we can't easily count 'current' directly, we
    // can quickly derive it since 'current' customers
    // are mutually exclusive to 'past' customers.
    if ($params['action'] == 'current')
      $count = $count - $count_past;
    elseif ($params['action'] == 'past') {
      $count = $count_past;
    }

    return $count;
  }

  function jqGridDataRecords(&$params, &$model, $query) {
    $customers = parent::jqGridDataRecords($params, $model, $query);

    // Get the balance on each customer.
    foreach ($customers AS &$customer) {
      $stats = $this->Customer->stats($customer['Customer']['id']);
      $customer['Customer']['balance'] = $stats['balance'];
    }

    return $customers;
  }

  function jqGridRecordLinks(&$params, &$model, &$records, $links) {
    $links['Customer'] = array('name');
    return parent::jqGridRecordLinks($params, $model, $records, $links);
  }


  /**************************************************************************
   **************************************************************************
   **************************************************************************
   * action: move_in
   *  - Sets up the move-in page for the given customer.
   */

  function move_in($id = null) {
    $customer = array();
    $unit = array();

    if (isset($id)) {
      $this->Customer->recursive = -1;
      $customer = current($this->Customer->read(null, $id));
    }
    $this->set(compact('customer', 'unit'));

    $title = 'Customer Move-In';
    $this->set(compact('title'));
    $this->render('/leases/move');
  }


  /**************************************************************************
   **************************************************************************
   **************************************************************************
   * action: move_out
   *  - prepare to move a customer out of one of their units
   */

  function move_out($id) {

    $customer = $this->Customer->find
      ('first', array
       ('contain' => array
	(// Models
	 'Lease' =>
	 array('conditions' => array('Lease.moveout_date' => null),
	       // Models
	       'Unit' =>
	       array('order'  => array('sort_order'),
		     'fields' => array('id', 'name'),
		     ),
	       ),
	 ),

	'conditions' => array('Customer.id' => $id),
	));
    $this->set('customer', $lease['Customer']);
    $this->set('unit',     array());

    $redirect = array('controller' => 'customers',
		      'action' => 'view',
		      $id);

    $title = $customer['Customer']['name'] . ': Prepare Move-Out';
    $this->set(compact('title', 'customer', 'redirect'));
    $this->render('/leases/move');
  }


  /**************************************************************************
   **************************************************************************
   **************************************************************************
   * action: view
   *  - Displays information about a specific customer
   */

  function view($id = null) {
    if (!$id) {
      $this->Session->setFlash(__('Invalid Item.', true));
      $this->redirect(array('action'=>'index'));
    }

/*     //$result = $this->Customer->securityDeposits($id); */
/*     $result = $this->Customer->excessPayments($id); */
/*     //$result = $this->Customer->unreconciledCharges($id); */
/*     echo('<HR>'); */
/*     pr($result); */
/*     $this->autoRender = false; */
/*     return; */

    $customer = $this->Customer->details($id);
    //pr($customer);
    $outstanding_balance = $customer['stats']['balance'];
    $outstanding_deposit = $customer['deposits']['summary']['Payment']['reconciled'];

    // Figure out if this customer has any non-closed leases
    $show_moveout = false;
    $show_payment = false;
    foreach ($customer['Lease'] AS $lease) {
      if (!isset($lease['close_date']))
	$show_payment = true;
      if (!isset($lease['moveout_date']))
	$show_moveout = true;
    }

    // Set up dynamic menu items
    $this->sidemenu_links[] =
      array('name' => 'Operations', 'header' => true);

    $this->sidemenu_links[] =
      array('name' => 'Edit',
	    'url' => array('action' => 'edit',
			   $id));

    $this->sidemenu_links[] =
      array('name' => 'Move-In',
	    'url' => array('action' => 'move_in',
			   $id));

/*     if ($show_moveout) { */
/*       $this->sidemenu_links[] = */
/* 	array('name' => 'Move-Out', */
/* 	      'url' => array('action' => 'move_out', */
/* 			     $id)); */
/*     } */

    if ($show_payment) {
      $this->sidemenu_links[] =
	array('name' => 'Payment',
	      'url' => array('action' => 'receipt',
			     $id));
    }

    // Prepare to render.
    $title = 'Customer: ' . $customer['Customer']['name'];
    $this->set(compact('customer', 'title',
                       'outstanding_balance',
                       'outstanding_deposit'));
  }


  /**************************************************************************
   **************************************************************************
   **************************************************************************
   * action: edit
   *  - Edit customer information
   */

  function edit($id = null) {
    if (isset($this->data)) {
      // Check to see if the operation was cancelled.
      if (isset($this->params['form']['cancel'])) {
	if (isset($this->data['Customer']['id']))
	  $this->redirect(array('action'=>'view', $this->data['Customer']['id']));
	else
	  $this->redirect(array('action'=>'index'));
	return;
      }

      // Make sure we have at least one contact
      if (!isset($this->data['Contact']) || count($this->data['Contact']) == 0) {
	$this->Session->setFlash("MUST SPECIFY AT LEAST ONE CONTACT", true);
	$this->redirect(array('action'=>'view', $this->data['Customer']['id']));
	return;
      }

      // Make sure there is a primary contact
      if (!isset($this->data['Customer']['primary_contact_entry'])) {
	$this->Session->setFlash("MUST SPECIFY A PRIMARY CONTACT", true);
	$this->redirect(array('action'=>'view', $this->data['Customer']['id']));
	return;
      }

      // Go through each customer and strip the bogus ID if new
      foreach ($this->data['Contact'] AS &$contact) {
	if (isset($contact['source']) && $contact['source'] === 'new')
	  unset($contact['id']);
      }

      // Save the customer and all associated data
      if (!$this->Customer->saveCustomer($this->data['Customer']['id'],
					 $this->data,
					 $this->data['Customer']['primary_contact_entry'])) {
	$this->Session->setFlash("CUSTOMER SAVE FAILED", true);
	pr("CUSTOMER SAVE FAILED");
      }

      // If existing customer, then view it.  Otherwise, since
      // this is a new customer, go to the move in screen.
      if ($this->data['Customer']['id'])
	$this->redirect(array('action'=>'view', $this->Customer->id));
      else
	$this->redirect(array('action'=>'move_in', $this->Customer->id));

      // For debugging, only if the redirects above have been
      // commented out, otherwise this section isn't reached.
      $this->render('/empty');
      return;
    }

    if ($id) {
      $this->data = $this->Customer->details($id);
      $title = 'Customer: ' . $this->data['Customer']['name'] . " : Edit";
    }
    else {
      $title = "Enter New Customer";
      $this->data = array('Contact' => array(), 'PrimaryContact' => null);
    }

    $contact_types = array_flip($this->Customer->ContactsCustomer->getEnumValues('type'));
    unset($contact_types[0]);
    $contact_types = array_combine($contact_types, $contact_types);
    $this->set(compact('contact_types'));

    $contacts = $this->Customer->Contact->contactList();
    $this->set(compact('contacts'));

    // Prepare to render.
    //pr($this->data);
    $this->set(compact('title'));
    $this->render('edit');
  }

  /**************************************************************************
   **************************************************************************
   **************************************************************************
   * action: add
   *  - Add a new customer
   */

  function add() {
    $this->edit();
  }

  /**************************************************************************
   **************************************************************************
   **************************************************************************
   * action: receipt
   *  - Sets up the receipt entry page for the given customer.
   */

  function receipt($id = null) {
    if (isset($id)) {
      $this->Customer->recursive = -1;
      $customer = $this->Customer->read(null, $id);
      $customer = $customer['Customer'];
      $unreconciled = $this->Customer->findUnreconciledLedgerEntries($id);
      $charges = $unreconciled['debit'];
    }
    else {
      $customer = null;
      $charges = array('balance' => 0, 'entry' => array());
    }

    $A = new Account();
    $payment_accounts = $A->paymentAccounts();
    $default_account = $A->cashAccountID();
    $this->set(compact('payment_accounts', 'default_account'));

    $title = ($customer['name'] . ': Payment Entry');
    $this->set(compact('customer', 'charges', 'title'));
  }


  /**************************************************************************
   **************************************************************************
   **************************************************************************
   * action: refund
   *  - Refunds customer charges
   */

  function refund() {
    $entries = $this->Customer->DoubleEntry->find
      ('all', array
       ('contain' => false,
	'conditions' => array('DoubleEntry.id' =>
			      //array(199,200,201)
			      61
			      ),
	));
    pr(compact('entries'));

    $this->Customer->DoubleEntry->reverse($entries);
  }


  /**************************************************************************
   **************************************************************************
   **************************************************************************
   * action: unreconciledEntries
   *  - returns the list of unreconciled entries
   */

  function unreconciled($id) {

    //$this->layout = 'ajax';
    $this->layout = null;
    $this->autoLayout = false;
    $this->autoRender = false;
    //Configure::write('debug', '0');
    //header("Content-type: text/xml;charset=utf-8");

    App::import('Helper', 'Xml');
    $xml = new XmlHelper();

    // Find the unreconciled entries, then manipulate the structure
    // slightly to accomodate the format necessary for XML Helper.
    $unreconciled = $this->Customer->unreconciledCharges($id);
    $unreconciled = array('entries' =>
			  array_intersect_key($unreconciled['debit'],
					      array('entry'=>1, 'balance'=>1)));

    // XML Helper will dump an empty tag if the array is empty
    if (!count($unreconciled['entries']['entry']))
      unset($unreconciled['entries']['entry']);

    //pr($unreconciled);
    //$reconciled = $cust->reconcileNewDoubleEntry($cust_id, 'credit', $amount);

    $opts = array();
    //$opts['format'] = 'tags';
    echo $xml->header();
    echo $xml->serialize($unreconciled, $opts);
  }

}