openresort/accommodation/accommodation.module

<?php
// $Id: $
define('ECMAIL_TYPE_CONFIRMATION', 'Confirmation email');

define('MAILVAR_CUSTOMER_CONFIMATION', 'ec_mail_customer_confirmation');

function accommodation_exit($destination = NULL) {
  //we need to clear the cache to ensure that calanders are updated
  //if calendars aren't enable
  global $base_root;
  
  $unit = variable_get('unit_calender_unit',true);
  $hotel =variable_get('unit_calender_hotel',true);
  
  if($unit||$hotel){
	  $this_page = request_uri();
	 $result = db_result(db_query("SELECT SUBSTRING(src FROM 6) as src FROM {url_alias} WHERE dst = '%s' AND src LIKE 'node/%'",substr($this_page,1)));
	  if(strlen($result) > 0){
	  	$type = db_result(db_query("SELECT type FROM {node} WHERE nid = %d AND (type ='business' OR type='unit')",$result));
	  	if($type == 'business' && $hotel){
	  		$ecommerce = db_result(db_query('SELECT ecommerce FROM {business} WHERE nid = %d',$result));
	  	}
	  	if(($type == 'unit'&& $unit)||($type == 'business' && $hotel && $ecommerce == '1')){
	  		cache_clear_all($base_root . $this_page, 'cache_page');
	  	}
	  }
  }
  return;
}

function accommodation_access($op, $node) {
  global $user;

  if ($op == 'create' || $op == 'update' || $op == 'delete') {
    if (user_access('edit own businesses') && ($user->uid == $node->uid)) {
      return TRUE;
    }
    else {
   		return user_access('administer businesses');
    } 	
  }
}

/**
 * Implementation of hook_perm().
 */
function accommodation_perm() {
  return array('manage all availability', 'manage own availability','change ecommerce setting','administer accommodation');
}

function accommodation_payment(){
	if(is_numeric(arg(2))){
		$txn = store_transaction_load(arg(2));
	}else{
		drupal_goto(''); 
	}
	$goto = module_invoke($txn->payment_method, 'paymentapi', $txn, 'payment page');
    if (is_array($goto)) {
      call_user_func_array('drupal_goto', $goto);
    }
    elseif (isset($goto)) {
      drupal_goto($goto);
    }
    drupal_goto('');
}

function accommodation_availability_search(){
  
  $edit = $_POST ? $_POST : $_GET;
  $node = node_load(variable_get('accommodation_search_id',0));
  $node->available = unit_availability_search($node, $edit,true);
  return theme('accommodation_availability',$node,$edit);
}

/**
 * Implmentation of menu_hook()
 */
function accommodation_menu($may_cache) {

  $items = array();

  if ($may_cache) {
    $access = user_access('access content');
	$items[] = array('path' => 'booking/cart', 
			'title' => t('My Itinerary'),
      		'callback' => 'cart_view',
      		'access' => $access,
      		'weight' => 10,
      		'type' => MENU_IS_LOCAL_TASK);
    $items[] = array('path' => 'booknow/accommodation', 
			'title' => t('Accommodation'),
      		'callback' => 'accommodation_booknow',
      		'access' => $access,
      		'type' => MENU_CALLBACK);
    $items[] = array('path' => 'availability/search', 
			'title' => t('Accommodation availability'),
      		'callback' => 'accommodation_availability_search',
      		'access' => $access,
      		'type' => MENU_CALLBACK);
    $items[] = array('path' => 'accommodation/list', 
      		'callback' => 'accommodation_list',
      		'access' => $access,
      		'type' => MENU_CALLBACK);
  }else{
	  $items[] = array('path' => 'accommodation/payment',
		'access' => true,
		'type' => MENU_CALLBACK,
		'callback' => 'accommodation_payment');
	  $access = user_access('administer accommodation');
      $items[] = array('path' => 'admin/business/bedtypes',
      		'title' => t('Bed types'),
      		'callback' => 'accommodation_bedtypes_admin',
      		'access' => $access);
      $items[] = array('path' => 'admin/business/bedtypes/list',
      		'title' => t('list'),
      		'type' => MENU_DEFAULT_LOCAL_TASK,
      		'weight' => -10,
      		'access' => $access);
   	  $items[] = array('path' => 'admin/business/bedtypes/add',
      		'title' => t('add bed type'),
      		'callback' => 'accommodation_bedtypes_admin_edit',
      		'access' => $access,
      		'type' => MENU_LOCAL_TASK);
	  $items[] = array('path' => 'admin/business/bedtypes/'.arg(3).'/edit',
      		'callback' => 'accommodation_bedtypes_admin_edit',
	  		'callback arguments' => array(arg(3)),
      		'access' => $access,
      		'type' => MENU_CALLBACK);
	 $items[] = array('path' => 'admin/business/cart/timers',
      'title' => t('Reservation times'),
      'callback' => 'accommodation_cart_admin',
      'access' => $access);
     $items[] = array('path' => 'admin/business/cart/email',
      'title' => t('From email address'),
      'callback' => 'accommodation_cart_email',
      'access' => $access);
	}
  return $items;
}

function accommodation_cart_admin(){
	return drupal_get_form('accommodation_cart_admin_form');
}

function accommodation_cart_email(){
	return drupal_get_form('accommodation_cart_email_form');
}

function accommodation_cart_admin_form_submit($form_id, $form_values){
	variable_set('accommodation_cart_clear_down',$form_values['availability_cron']);
	variable_set('accommodation_hold_cust_time',$form_values['availability_reserve']);
	variable_set('accommodation_cart_accom_hold',$form_values['availability_response']);
	variable_set('accommodation_hold_instant_time',$form_values['availability_instant']);
	drupal_set_message(t('Times updated.'));
}

function accommodation_cart_email_form_submit($form_id, $form_values){
	variable_set('reservation_email',$form_values['reservation_email']);
	drupal_set_message(t('Email address updated.'));
}

function accommodation_cart_admin_form(){
	
	$options = array('604800'=>'1 week','1209600'=>'2 weeks','1814400'=>'3 weeks','2419200'=>'4 weeks','3024000'=>'5 weeks','3628800'=>'6 weeks','4233600'=>'7 weeks','4838400'=>'8 weeks');
	
	$form['availability_cron']=array(
	  '#type' => 'select',
	  '#title' => t('Availability clear down'),
	  '#default_value' => variable_get('accommodation_cart_clear_down',2419200),
	  '#options' => $options,
	  '#description' => t('How long data is retained in the availability table for after the date of the booking has passed.'),
	  '#multiple' => NULL,
	  '#required' => TRUE,
	);
	
	$options = array('300'=>'5 Minutes','600'=>'10 Minutes','900'=>'15 Minutes','1200'=>'20 Minutes','1500'=>'25 Minutes','1800'=>'30 Minutes');
	
	$form['availability_reserve']=array(
	  '#type' => 'select',
	  '#title' => t('Availability reservation'),
	  '#default_value' => variable_get('accommodation_hold_cust_time',900),
	  '#options' => $options,
	  '#description' => t('How long an item is reserved for by the customer after they have added it to their cart.'),
	  '#multiple' => NULL,
	  '#required' => TRUE,
	);
	
	$options = array(
      '0'=>'0 Minutes',
      '900'=>'15 Minutes',
      '1800'=>'30 Minutes',
      '2700'=>'45 Minutes',
      '3600'=>'60 Minutes',
      '4500' =>'75 Minutes',
      '5400' =>'90 Minutes',
      '6300' =>'105 Minutes',
      '7200' => '120 Minutes',
    );
	
	$form['availability_instant']=array(
	  '#type' => 'select',
	  '#title' => t('Availability instant hold time'),
	  '#default_value' => variable_get('accommodation_hold_instant_time',3600),
	  '#options' => $options,
	  '#description' => t('How long before an item mark as instant is processed.'),
	  '#multiple' => NULL,
	  '#required' => TRUE,
	);
	
	$options = array('21600'=>'6 hours','43200'=>'12 hours','64800'=>'18 hours','86400'=>'24 hours','108000'=>'30 hours','129600'=>'36 hours','151200'=>'42 hours','172800'=>'48 hours');
	
	$form['availability_response']=array(
	  '#type' => 'select',
	  '#title' => t('Availability response'),
	  '#default_value' => variable_get('accommodation_cart_accom_hold',86400),
	  '#options' => $options,
	  '#description' => t('How long an item is held as reserved after a transaction has been created and a response from an accommodator is required.'),
	  '#multiple' => NULL,
	  '#required' => TRUE,
	);
	
	$form['submit'] = array('#type' => 'submit', '#value' => t('Submit'));
	
	return $form;
}

function accommodation_cart_email_form(){
	
	$form['reservation_email']=array(
	  '#type' => 'textfield',
	  '#title' => t('Reservations email address'),
	  '#default_value' => variable_get('reservation_email',variable_get('site_mail','')),
	  '#description' => t('The address which will appear in from field for any openresort emails you generate.'),
	  '#required' => TRUE,
	);
	
	$form['submit'] = array('#type' => 'submit', '#value' => t('Submit'));
	
	return $form;
}

function accommodation_bedtypes_admin_edit($bed_id=null) {
	  if ($bed_id) {
		$edit = db_fetch_array(db_query("SELECT * FROM {accommodation_bed_types} WHERE bed_id = '%s'", $bed_id));
		return drupal_get_form('accommodation_bedtype_form', $edit);
	}
	else {
	  return drupal_get_form('accommodation_bedtype_form');
	}	
}

function accommodation_bedtype_form($edit = array()) {
  
  $form['name'] = array(
		'#type' => 'textfield', 
		'#title' => t('Name'),
		'#default_value' => $edit['name'], 
		'#maxlength' => 20,
		'#description' =>t('The name displayed for a given bed type'),
		'#required' => TRUE,
		'#weight' => -1 
	);
  $form['submit'] = array('#type' => 'submit', '#value' => t('Submit'));
  if ($edit['name']) {
    $form['delete'] = array('#type' => 'submit', '#value' => t('Delete'));
  	$form['savedid'] = array('#type' => 'value', '#value' => $edit['bed_id']);
  }
  return $form;
}


function accommodation_bedtype_form_submit($form_id, $form_values) {
  switch (accommodation_bedtype_form_save($form_values)) {
  case SAVED_NEW:
    drupal_set_message(t('Bed type added'));
    break;
  case SAVED_UPDATED:
    drupal_set_message(t('Bed type updated'));
    break;
  case SAVED_DELETED:
    drupal_set_message(t('Bed type deleted'));
    break;
  }
  return 'admin/business/bedtypes';
}

function accommodation_bedtype_form_save($edit) {
  $edit['op'] = $_POST['op'];
  
  if ($edit['op'] == "Delete" && $edit['savedid']) {
    db_query("DELETE FROM {accommodation_bed_types} WHERE bed_id = '%s'", $edit['savedid']);
    $status = SAVED_DELETED;
  }
  else if ($edit['savedid']) {
    db_query("UPDATE {accommodation_bed_types} SET name = '%s' WHERE bed_id = '%s'", $edit['name'],$edit['savedid']);
    $status = SAVED_UPDATED;
  }  else {
    db_query("INSERT INTO {accommodation_bed_types} (name) VALUES ('%s')", $edit['name']);
    $status = SAVED_NEW;
  }
  return $status;
}

function accommodation_bedtypes_admin() {
	
  drupal_set_title(t("Bed Types"));
  
  $header = array(t('ID'), t('Name'), t('Operations'));


  $result = db_query('SELECT * FROM {accommodation_bed_types}');
  $rows = array();
  while ($bedtype = db_fetch_object($result)) {
    $rows[] = array($bedtype->bed_id,
    					$bedtype->name,
    					l(t('edit'), "admin/business/bedtypes/$bedtype->bed_id/edit"));
  }
  if (!$rows) {
    $rows[] = array(array('data' => t('No Bed Types available.'), 'colspan' => '3'));
  }

  return theme('table', $header, $rows, array('id' => 'bedtypes'));
}

/**
 * The controller for viewing the accommodation listings.  Callback happens via menu().
 *
 * @return string Completely themed HTML page.
 */

function accommodation_availability_update($edit) {
  
  // transform days/months in American format
  $start = explode ("/", $edit['startdate']);
  $end = explode ("/", $edit['enddate']);
  $startstamp = strtotime(implode ("/", array($start[1], $start[0], $start[2])));
  $endstamp = strtotime(implode ("/", array($end[1], $end[0], $end[2])));
  $endstamp = $endstamp + (60 * 60 * 24); // include the last day in the update
  $days = intval(($endstamp - $startstamp)/(24*60*60));
  $edit['status'] ? $status = $edit['status'] : $status = 0;
  $errors =false;
   if($edit['price']){
		if(!is_numeric($edit['price'])){
			drupal_set_message(t('The price number is not numeric. Please enter a numeric value.'));
			$errors = true; 	
		}
   }
   if($edit['min_nights']){
		if(!is_numeric($edit['min_nights'])){
			drupal_set_message(t('The minimum number of nights is not numeric. Please enter a numeric value.'));
			$errors = true; 	
		}
   }
  if (!$errors){
  for ($day = $startstamp; $day < $endstamp; $day = $day + (24*60*60)) {
    $sqldate = date('Y-m-d', $day); 

    $result = db_query("SELECT iid, bid, price, min_nights,status  FROM {accommodation_availability} " .
                  "WHERE bid = %d AND iid = %d AND date = '%s'", $edit['nid'], $edit['iid'], $sqldate);
    if ($results = db_fetch_object($result)) {
      if ($edit['price']){
      	$price = $edit['price'];
      }else{
      	$price = $results->price;
      }
      if ($edit['min_nights']){
      	$min_nights = $edit['min_nights'];
      }else{
      	$min_nights = $results->min_nights;
      }
      //remove status if it isn't changing and if new item it won't have status 
      if($status == -2){
        $status = $results->status;
  	  }
  	  db_query("UPDATE {accommodation_availability} SET price = '%s', min_nights = %d, status = %d " .
        "WHERE bid = %d AND iid = %d AND date = '%s'", 
        $price, $min_nights, $status, $edit['nid'], $edit['iid'], $sqldate); 
    } else {
      //no status is set so make it unvailable 
  	  if($status == -2){
  		  $status = 0;
  	  }
      db_query("INSERT INTO {accommodation_availability} (iid, bid, date, price, min_nights, status) " .
          "VALUES (%d, %d, '%s', '%s',%d, %d)", 
          $edit['iid'], $edit['nid'], $sqldate, $edit['price'],$edit['min_nights'], $status);
    } 
  }
}
}

//hook cron clears down dates more than a 4 weeks old
function accommodation_cron(){
	_accommodation_cleardown_availability();
	_accommodation_process_instant();
}


function accommodation_confirmation_email($t){
	$variables  = token_get_values('global',$t);
  	$mid = variable_get(MAILVAR_CUSTOMER_CONFIMATION, 0);
  	if ($t->mail && valid_email_address($t->mail)) {
    	$to = $t->mail;
  	} elseif ($t->uid != 0) {
    	$to = db_result(db_query("SELECT mail FROM {users} WHERE uid = '%d'", $t->uid));
  	}
  	return ec_mail_send_mid($mid,$to,$t,variable_get('reservation_email',variable_get('site_mail','')));
}

function _accommodation_process_instant(){
	$time = time();
	$result = db_query('SELECT txnid FROM {ec_transaction} WHERE (payment_status =7 OR payment_status =2) AND workflow =1 AND created < %d',$time - variable_get('accommodation_hold_instant_time',3600));
	while($txnid = db_fetch_object($result)){
		$t = store_transaction_load($txnid->txnid);
		$t->workflow = 3;
		
		if(! module_exists('openresort')){
			$items = db_query("SELECT item_status FROM {ec_transaction_product} WHERE txnid = %d",$t->txnid);
	    	 while($transaction = db_fetch_object($items)){
	    	 	if($t->workflow != 2){
		 	   	  if($transaction->item_status != 1){
		    	  	$t->workflow = 2;
		    	  	break;
		    	  }
			    }
	    	 }
		}
    	
		$from = variable_get('reservation_email', ini_get('sendmail_from'));
		$mail = variable_get('reservation_email', ini_get('sendmail_from'));
		$subject = t('Transaction %tran automatically process (status change)', array('%tran' => $t->txnid));
    	if($t->workflow == 3){
    		accommodation_confirmation_email($t);
  			$body = t('Transaction %tran has had it status changed to booking confirmed', array('%tran' => $t->txnid));
  			watchdog('openresort', t('Transaction txnid %tran automatically processed (confirmed)', array('%tran' => $t->txnid)),WATCHDOG_NOTICE);
    	}else{
    		//if openresort is enabled this will never run as cron in that module will deal with it
			if($t->workflow == 2){
				$body = t('Transaction %tran has had it status changed to awaiting accommodator response', array('%tran' => $t->txnid));
				watchdog('openresort', t('Transaction txnid %tran automatically processed (awaiting response)', array('%tran' => $t->txnid)),WATCHDOG_NOTICE);
    		}
		}
		accommodation_mail($mail, $subject, $body, "From: $from\nReply-to: $from\nX-Mailer: Drupal\nReturn-path: $from\nErrors-to: $from");
    	store_transaction_save($t);
	}
}

/**
 * Send an e-mail message.
 */
function accommodation_mail($mail, $subject, $message, $header) {
  if (variable_get('smtp_library', '') && file_exists(variable_get('smtp_library', ''))) {
   include_once './' . variable_get('smtp_library', '');
    return drupal_mail_wrapper($mail, $subject, $message, $header);
  }
  else {
    return mail(
      $mail,
      mime_header_encode($subject),
      str_replace("\r", '', $message),
      "MIME-Version: 1.0\nContent-Type: text/plain; charset=UTF-8; format=flowed\nContent-transfer-encoding: 8Bit\n" . $header
    );
  }
}


function _accommodation_cleardown_availability(){
	$cleardowntime = variable_get('accommodation_cart_clear_down',2419200);
	$adjusteddate = date('Y-m-d',time() - $cleardowntime);
	db_query("DELETE FROM {accommodation_availability} where date < '%s'",$adjusteddate);
}

function accommodation_list($string) {
  $matches = array();
  $result = db_query_range("SELECT title FROM {node} n JOIN {business} b ON n.nid = b.nid WHERE type = 'business' AND ecommerce = 1 AND LOWER(title) LIKE LOWER('%s%%')", $string, 0, 10);
  while ($business = db_fetch_object($result)) {
    $matches[$business->title] = check_plain($business->title);
  }
  print drupal_to_js($matches);
  exit();
}

/**
 * Implementation of hook_block().
 */
function accommodation_block($op = 'list', $delta = 0, $edit = array()) {
  global $user;
  
  switch($op){
  	case 'list':
  	 $blocks[0]['info'] = t('Accommodation availability');
     $blocks[1]['info'] = t('Outstanding payments');
     $blocks[2]['info'] = t('Accommodation availability - any page');
     return $blocks;
     
    case 'view':
	    $block = array();
	    switch ($delta) {
	      case 0:
	        if (user_access('access content')&& accommodation_availability_block_access()) {
		      	$block['subject'] = t('Availability search');
					  $block['content'] = accommodation_availability_block_form();
	      	}
	    	return $block;
	      case 1:
	    	if($user->uid > 0){
		    	$txnid = db_result(db_query("SELECT txnid FROM {ec_transaction} WHERE workflow = 1 AND payment_status = 1 AND uid = %d",$user->uid));
		        if (user_access('access content')&& $txnid) {
		        	$block['subject'] = t('Outstanding payments');
					 $block['content'] = accommodation_outstanding_block($txnid);
		        }
	    	}
	    	return $block;
	      case 2:
	        if (user_access('access content') && (! function_exists('unit_availability_block_access')||(function_exists('unit_availability_block_access')&& !unit_availability_block_access())) && !accommodation_availability_block_access() && variable_get('accommodation_search_id',0) > 0) {
		      	$block['subject'] = t('Availability search');
			    $block['content'] = accommodation_availability_block_form(false);
	      	}
	    	return $block;
	    }
	  case 'configure':
	  	switch($delta){
	  		case 1:
	  			$form['accommodation_payment_link_text']= array(
	  				'#type' => 'textfield',
	  				'#title' => t('Link text'),
	  				'#default_value' => variable_get('accommodation_payment_link_text','You have outstanding payments')
	  			);
	  			$form['accommodation_payment_html_ind']= array(
	  				'#type' => 'checkbox',
	  				'#title' => t('Link is html'),
	  				'#return_value' => true,
	  				'#default_value' => variable_get('accommodation_payment_html_ind',false),
	  				'#description' => t('Use this if an image is required'),
	  			);
	  			return $form;
	  		case 2:
	  			$node = node_load(variable_get('accommodation_search_id',0));
	  			$form['accommodation_search_id']= array(
	  				'#type' => 'textfield',
	  				'#title' => t('Name of property'),
	  				'#default_value' => $node->title?$node->title:'',
	  				'#description' => 'Please enter the name of the business that you want to make the search availabile for.',
	  				'#autocomplete_path' => 'accommodation/list',
	  			);
	  			return $form;
	  	}
	  case 'save':
	  	switch($delta){
	  		case 1:
	  			variable_set('accommodation_payment_link_text',$edit['accommodation_payment_link_text']);
	  			variable_set('accommodation_payment_html_ind',$edit['accommodation_payment_html_ind']);
	  			break;
	  	    case 2:
	  			if ($node = node_load(array('title' => $edit['accommodation_search_id']))) {
                   $node_id = $node->nid;
                }
                else {
                  $node_id = 0;
                }
	  			variable_set('accommodation_search_id',$node_id);
	  	}
  	}
}

function accommodation_outstanding_block($txnid){
	//load the image and the create the link
	return l(variable_get('accommodation_payment_link_text','You have outstanding payments'),'accommodation/payment/'.$txnid,array(),null,null,null,variable_get('accommodation_payment_html_ind',false));
}

/**
 * called by the block configuration
 */
function accommodation_availability_block_access() {
	if (arg(0) == 'node' && is_numeric(arg(1)) && ! arg(2)) {
	  $node = node_load(array('nid' => arg(1)));

		// If it can be booked, only show on the view page
		if ($node && $node->type == 'business'&& $node->ecommerce && ! arg(3)) {
		  return TRUE; 
		}
	}  
	return FALSE;
}


function accommodation_availability_block_form($ajax = true) {
  $form = null;
  if($ajax){
    drupal_add_js('misc/progress.js');
    $path = drupal_get_path('module', 'accommodation');
    module_invoke('jstools', 'add_js',$path . '/js/accommodation.js');
  }
  $output = drupal_get_form('accommodation_unit_block', $form,$ajax);
		
  return $output;
}

function accommodation_unit_block_submit($form_id, $form_values){
  $edit = $_POST;
  if($edit['ajax'] == 'true'){
    $node = node_load($_COOKIE['bid']);
    $node->available = unit_availability_search($node, $edit,true);
    print drupal_to_js(array('status' => TRUE, 'data' => theme('accommodation_availability',$node,$edit)));
    exit();
  }
}

function accommodation_unit_block($form,$ajax = true){
	
  // Load values from cookies or set some defaults
	$_COOKIE['arrive'] ? $edit['arrive'] = $_COOKIE['arrive'] : $edit['arrive'] = date("d/m/Y", strtotime('next Friday + 1 week')); 
	$_COOKIE['depart'] ? $edit['depart'] = $_COOKIE['depart'] : $edit['depart'] = date("d/m/Y", strtotime('next Friday + 1 week') + (60 * 60 * 24 * 3));
	$_COOKIE['num_people'] ? $edit['num_people'] = $_COOKIE['num_people'] : $edit['num_people'] = 2;
	
	$form['ajax'] = array(
	  '#type' => 'hidden',
	  '#value' => $ajax?'true':'false',
	);
	
	if(!$ajax){
		$form['#action'] = url('availability/search');
		$form['#redirect'] = FALSE;
	}
	
  	$form['arrive'] = array(
	  '#type' => 'textfield',
	  '#title' => t('Arrival'),
	  '#size' => 10,
	  '#maxlength' => 10,
	  '#default_value' => $edit['arrive'],
	  '#description' => 'dd/mm/yyyy',
	  '#required' => TRUE,
	  '#attributes' => array('class' => 'jscalendar'),
	  '#jscalendar_ifFormat' => '%d/%m/%Y',
    // Don't show time.
    '#jscalendar_showsTime' => 'false',
    // Show 24-hour clock.
    '#jscalendar_timeFormat' => '24',
	);
	$form['depart'] = array(
	  '#type' => 'textfield',
	  '#title' => t('Departure'),
	  '#description' => 'dd/mm/yyyy',
	  '#size' => 10,
	  '#maxlength' => 10,
	  '#default_value' => $edit['depart'],
	  '#required' => TRUE,
	  '#attributes' => array('class' => 'jscalendar'),
	  '#jscalendar_ifFormat' => '%d/%m/%Y',
    // Don't show time.
    '#jscalendar_showsTime' => 'false',
    // Show 24-hour clock.
    '#jscalendar_timeFormat' => '24',
	);
	$form['num_people'] = array(
	  '#type' => 'select',
	  '#title' => t('Number of people'),
	  '#default_value' => $edit['num_people'],
	  '#options' => array(1 => 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15),
	  '#description' => '',
	  '#extra' => 0,
	  '#multiple' => 0,
	  '#required' => 0,
	  '#prefix' => '<div class="other-selection">',
	  '#suffix' => '</div>',
	);
  	$form['op'] = array(
	  '#type' => 'submit',
	  '#value' => t('Check Availability'),
	  '#attributes' => array('class' => 'check'),
	);
	
    if (isset($_POST['accommodation'])) {
      $form['op']['accommodation'] = array();
    }
	return $form;
}

/**
 * Validates a search request and sets timestamp and MySQL conversions of the dates
 */
function accommodation_search_validate(&$edit,$clear = false) {
	static $datachecked;
	
	if($datachecked !== true && $datachecked !== false || $clear == true){
		if ($edit['arrive'] && $edit['depart']) {
			$date = explode("/", $edit['arrive']); // Convert to US format for strtotime
			$edit['arrive_ts'] = strtotime(implode ("/", array($date[1], $date[0], $date[2])));
			if (! $edit['arrive_db'] = date("Y-m-d", $edit['arrive_ts'])) {
				drupal_set_message("Your arrival date seems invalid.  Please use the format 'dd/mm/yy'.", "error");
				return 0;
			}
			$date = explode("/", $edit['depart']); // Convert to US format for strtotime
			$edit['depart_ts'] = strtotime(implode ("/", array($date[1], $date[0], $date[2])));
			if (! $edit['depart_db'] = date("Y-m-d", $edit['depart_ts'])) {
				drupal_set_message("Your arrival date seems invalid.  Please use the format 'dd/mm/yy'.", "error");
				return 0;
			}
			$adjustedtime = $edit['arrive_ts'];
			$localtime = time() + (60*60*24);
			if ( $adjustedtime < $localtime) {
	  			drupal_set_message(t("The arrival date cannot be within 24 hours."), "error");
	    		return 0;
			}
			// Calculate length of stay
	  	$edit['num_nights'] = floor(($edit['depart_ts'] - $edit['arrive_ts']) / (60 * 60 * 24));
			
			// Set cookies to remember last search
			setcookie("arrive", $edit['arrive']);
	  	setcookie("depart", $edit['depart']);
	  	setcookie("num_people", $edit['num_people']);
	  	setcookie("room_type", $edit['room_type']);
	  		setcookie("property_location", $edit['property_location']);
	  		setcookie("property_price", $edit['property_price']);
		} else {
			$datachecked = false;
			return 0;
		}
		$datachecked = true;
		return 1;
	}else{
		if($datachecked == true){
			return 1;
		}else{
			return 0;
		}
	}
}

function accommodation_availability_block_validate(&$edit) {
	if ($edit['arrive'] && $edit['depart']) {
		$date = explode("/", $edit['arrive']); // Convert to US format for strtotime
		$edit['arrive_ts'] = strtotime(implode ("/", array($date[1], $date[0], $date[2])));
		if (! $edit['arrive_db'] = date("Y-m-d", $edit['arrive_ts'])) {
			drupal_set_message(t("Your dates seems invalid.  Please use the format 'dd/mm/yy'."), "error");
			return 0;
		}
		$date = explode("/", $edit['depart']); // Convert to US format for strtotime
		$edit['depart_ts'] = strtotime(implode ("/", array($date[1], $date[0], $date[2])));
		if (! $edit['depart_db'] = date("Y-m-d", $edit['depart_ts'])) {
			drupal_set_message(t("Your dates seems invalid.  Please use the format 'dd/mm/yy'."), "error");
			return 0;
		}
		// Calculate length of stay
  	$edit['num_nights'] = floor(($edit['depart_ts'] - $edit['arrive_ts']) / (60 * 60 * 24));
		
		// Set cookies to remember last search
		setcookie("arrive", $edit['arrive']);
  	setcookie("depart", $edit['depart']);
  	setcookie("num_people", $edit['num_people']);
  	setcookie("room_type", $edit['room_type']);
  	setcookie("room_type", $edit['property_type']);
  		setcookie("room_type", $edit['property_price']);
	} else {
		return 0;
	}
	return 1;
}

function accommodation_validate_dates($edit) {
	// Make sure valid dates have been submitted
	if (! $edit['dbrangestart'] or ! $edit['dbrangeend']) {
	  if ($edit['startdate'] and $edit['enddate']) {
			$date = array();
			$date = explode("/", $edit['startdate']);  
			$edit['dbrangestart'] = date('Y-m-d', mktime(0, 0, 0, $date[1], $date[0], $date[2]));
			$date = explode("/", $edit['enddate']);  
			$edit['dbrangeend'] = date('Y-m-d', mktime(0, 0, 0, $date[1], $date[0], $date[2]));
	  }
	}
	if (! $edit['dbrangestart'] or ! $edit['dbrangeend']) {
  	drupal_set_message(t("You must first select arrival and departure dates."), "error");
    return 0;
	}
	
	if (strtotime($edit['dbrangestart']) < time()) {
  	drupal_set_message(t("The arrival date must be in the future."), "error");
    return 0;
	}
	$adjustedtime = strtotime($edit['dbrangestart']);
	$localtime = time() + (60*60*24);
	if ( $adjustedtime < $localtime) {
  		drupal_set_message(t("The arrival date cannot be within 24 hours."), "error");
    	return 0;
	}
	return 1;
}

/**
 * Validates a booknow request, takng params from the url
 */
function accommodation_booknow_validate(&$edit) {
	// we need to convert the vars from the url to pass back  
	if (is_numeric(arg(2)) && arg(3) && arg(4)) {
		$edit['nid'] = arg(2);
		$edit['dbrangestart'] = arg(3);
		$edit['dbrangeend'] = arg(4);
		$edit['iid'] = arg(5);
		$edit['occupants'] = arg(6);
	}
	else {
	  return 0;
	}
	return 1;
}

/**
 * Add an accommodation to the cart
 */
function accommodation_booknow() {
  $edit = null;
  $subitem = array();
  
	if (! accommodation_booknow_validate($edit)) {
	  drupal_set_message(t("Validation error"), "error");
	  return;
	}
		$unit_id = db_result(db_query("SELECT unit_id FROM {accommodation_inventory} WHERE iid = %d",$edit['iid']));
		$iid_list = db_query("SELECT iid FROM {accommodation_inventory} WHERE unit_id = %d",$unit_id);
		while ($iid_item = db_fetch_object($iid_list)) {
			//do we get enough nights returned
			$rows_returned = db_result(db_query(
					"SELECT count(*) " .
					"FROM {accommodation_availability} a " .
					"INNER JOIN {node} n ON a.bid = n.nid " .
					"INNER JOIN {business} b ON n.nid = b.nid " .
					"WHERE a.bid = %d " .
					"AND a.iid = %d " . 
					"AND a.date >= '%s' " .
					"AND a.date < '%s' " .
					//virtual units are set to -1 so it only nodes with zero that we ignore
					"AND a.status <> 0 AND a.status <> 3 " .
					"AND n.status = 1 " .
					"AND b.ecommerce = 1 " .
					"AND a.reserved_date <=  '". date('Y-m-d H:i:s',time()) ."' ".
					"ORDER BY a.date asc",
					$edit['nid'], $iid_item->iid, $edit['dbrangestart'], $edit['dbrangeend']
			));
			//convert arrive and depart into a number of days then test against min_nights
			$arriveexplode = explode('-',$edit['dbrangestart']);
			$departexplode = explode('-',$edit['dbrangeend']);
			$daysstay = (gmmktime (0, 0, 0,$departexplode['1'],$departexplode['2'],$departexplode['0']) - gmmktime (0, 0, 0,$arriveexplode['1'],$arriveexplode['2'],$arriveexplode['0']))/60/60/24;
			//if we do we use the current iid and book the rooms
			if($daysstay == $rows_returned){			
				$result = db_query(
					"SELECT n.title as title, a.aid as aid, a.date as date, a.price as price, a.iid as iid " .
					"FROM {accommodation_availability} a " .
					"INNER JOIN {node} n ON a.bid = n.nid " .
					"INNER JOIN {business} b ON n.nid = b.nid " .
					"WHERE a.bid = %d " .
					"AND a.iid = %d " . 
					"AND a.date >= '%s' " .
					"AND a.date < '%s' " .
					//virtual units are set to -1 so it only nodes with zero that we ignore
					"AND a.status <> 0 AND a.status <> 3 " .
					"AND n.status = 1 " .
					"AND b.ecommerce = 1 " .
					"AND a.reserved_date <=  '". date('Y-m-d H:i:s',time()) ."' ".
					"ORDER BY a.date asc",
					$edit['nid'], $iid_item->iid, $edit['dbrangestart'], $edit['dbrangeend']);
			$holdtime = variable_get('accommodation_hold_cust_time',900);
	  		while ($item = db_fetch_object($result)) {
		  		$subitem[$item->aid]->title = $item->title;
				$subitem[$item->aid]->date = $item->date;
				$subitem[$item->aid]->price = $item->price;		
				$subitem[$item->aid]->status = $item->status;
				
				$price += $item->price;
				$days += 1;
				$dates[$days] = $item->date;
				$title = $item->title;
				if(module_exists('virtual_unit')){
					virtual_unit_update_availability($item,$holdtime);
				}
				db_query("UPDATE {accommodation_availability} SET reserved_date = '%s' WHERE aid = %d", date('Y-m-d H:i:s',time() + ($holdtime)),$item->aid);
			}
		
			$data->type = 'business'; 
			$data->title = $days . ($days > 1 ? t(" nights ") : t(" night ")) . t("stay at ") . $title;
			$data->subitem = $subitem;
			$data->price = $price;
			$data->days = $days;
			$data->occupants = $edit['occupants'];
		
			// Insert or update, depending if this node is already in the cart or not
			//Do we allow the item to added to the cart as many times as they want this will be
			//different for activities as it will have a quantity field.	
			$item_count = db_result(db_query("SELECT qty FROM {ec_cart} WHERE cookie_id = '%s' AND nid = %d", cart_get_id(), $edit['nid']));
			if ($item_count == 0) {
		    	db_query("INSERT INTO {ec_cart} (cookie_id, nid, qty, changed, data) VALUES ('%s', %d, %d, %d, '%s')", cart_get_id(), $edit['nid'], 1, time(), serialize($data));	  
		    	drupal_set_message(t('<strong>%product-title</strong> added to <a href="%cart_view">your itinerary</a>', array('%cart_view' => url('cart/view'), '%product-title' => $data->title)));
		   }else{
		   		db_query("INSERT INTO {ec_cart} (cookie_id, nid, qty, changed, data) VALUES ('%s', %d, %d, %d, '%s')", cart_get_id(), $edit['nid'], $item_count, time(), serialize($data));
			  	drupal_set_message(t('<strong>%product-title</strong> added to <a href="%cart_view">your itinerary</a>', array('%cart_view' => url('cart/view'), '%product-title' => $data->title)));
		   }
	
	  		cache_clear_all();
	  		drupal_goto('cart');		
	  }
	}
	//if get here no room was found
	drupal_set_message(t('The property you have selected is no longer available. Another customer currently has it reserved. Please try again in 15 minutes as the property may become available.'));
	drupal_goto('booking/accommodation');
}


/**
 * Misc helper functions
 */

/**
 * Gets all the availability info for a accommodation unit for the current month
 */ 
function accommodation_get_available(&$edit) {

	accommodation_get_display_month($edit);
  $displaystart = date('Y-m-d', mktime(0, 0, 0, substr($edit['displaymonth'], 0, 2), 1, substr($edit['displaymonth'], 2, 4)));
  $displayend = date('Y-m-d', mktime(0, 0, 0, substr($edit['displaymonth'], 0, 2), 31, substr($edit['displaymonth'], 2, 4)));

  $query = "SELECT a.*, UNIX_TIMESTAMP(a.date) as timestamp  FROM {accommodation_availability} a " .
  		"WHERE a.bid = %d AND " .
  		" a.iid = %d AND " .
      "a.date >= '%s' AND a.date <= '%s' ORDER BY date ASC";
  
  $result = db_query($query,$edit[nid],$edit['iid'],$displaystart,$displayend);
  while ($eventobj = db_fetch_object($result)) {
    $eventdate = getdate($eventobj->timestamp);
    $event[$eventdate['year']][$eventdate['mon']][$eventdate['mday']] = $eventobj;
  }
	return $event;	
}

/**
 * Works out which month to display
 */
function accommodation_get_display_month(&$edit) {
	if (! is_numeric($edit['displaymonth'])) {
		if (arg(3) && strlen(arg(5)) == 6) {
			$edit['displaymonth'] = arg(5);
		}else {
			if(is_numeric($edit['availdate']) && strlen($edit['availdate']) ==6){
				$edit['displaymonth'] = $edit['availdate'];
			}else{
    			$today = getdate();
    			$edit['displaymonth'] = _accommodation_pad($today['mon']) . $today['year'];
			}
		}
	}
}

/**
 * Overwrites current date range with the values from the url and converts them to db format
 */
function accommodation_dates_from_get(&$edit) { 
	
	accommodation_get_display_month($edit);
	
	if (! is_numeric($edit['rangestart']) && arg(6) && (strlen(arg(6)) == 8)) {
	  $edit['start_day'] = substr(arg(6), 0, 2);
		$edit['start_month'] = substr(arg(6), 2, 2);
		$edit['start_year'] = substr(arg(6), 4, 4);
		if ($edit['dbrangestart'] = date('Y-m-d', mktime(0, 0, 0, substr(arg(6), 2, 2), substr(arg(6), 0, 2), substr(arg(6), 4, 4)))) { 
	  	$edit['rangestart'] = arg(6);
		}
	} 
	if (! is_numeric($edit['rangeend']) && arg(7) && (strlen(arg(7)) == 8)) {
		$edit['end_day'] = substr(arg(7), 0, 2);
		$edit['end_month'] = substr(arg(7), 2, 2);
		$edit['end_year'] = substr(arg(7), 4, 4);
		if ($edit['dbrangeend'] = date('Y-m-d', mktime(0, 0, 0, substr(arg(7), 2, 2), substr(arg(7), 0, 2), substr(arg(7), 4, 4)))) { 
	   	$edit['rangeend'] = arg(7);
		}
	} 
	return $edit;
}

/**
 * Overwrites current date range with the values from post vars and converts them to db format
 */
function accommodation_postdates_to_db(&$edit) {
	
	accommodation_get_display_month($edit);
		
	if (! is_numeric($edit['displaymonth'])) {
		if (arg(3) && strlen(arg(3)) == 6) {
			$edit['displaymonth'] = arg(3);
		}
		else {
    	$today = getdate();
    	$edit['displaymonth'] = _accommodation_pad($today['mon']) . $today['year'];
		}
	}

	$start = explode("/", $edit['startdate']);
	$edit['rangestart'] = $start[0] . $start[1] . $start[2];
	$edit['dbrangestart'] = date('Y-m-d', strtotime(implode ("/", array($start[1], $start[0], $start[2]))));
	 
	$end = explode("/", $edit['enddate']);
	$edit['rangeend'] = $end[0] . $end[1] . $end[2];
	$edit['dbrangeend'] = date('Y-m-d', strtotime(implode ("/", array($end[1], $end[0], $end[2]))));

  return $edit;
}

function _accommodation_days_in_month($month, $year) {
  if(checkdate($month, 31, $year)) return 31<