modules/eventfinder/eventfinder.module

<?php
// $Id: eventfinder.module
include(drupal_get_path('module', 'eventfinder') .'/eventfinder_themes.inc');

/**
 * @defgroup ef_ss EventFinder saved search methods
 */
/**
 * removes old events from the saved search table
 * @ingroup ef_ss
 */
function eventfinder_ss_remove_old_events(){
  $sql = "DELETE FROM {ef_ss_node} WHERE begin < %d";
  db_query(db_prefix_tables($sql), time());
  return TRUE;
}
/**
 * checks for new events in the system
 * @ingroup ef_ss
 * @return date of most recently created event
 */
function eventfinder_check_new_events(){
  $sql = "SELECT MAX(created) latest FROM {node} n "
  . "INNER JOIN {event} e ON n.nid = e.nid "
	. "WHERE e.event_start > %d";
  $dat = db_query(db_prefix_tables($sql), time());
  $check = db_fetch_object($dat);
  return $check->latest;
}
/**
 * Checks for saved searches that need to be run based on the date content was created
 * @ingroup ef_ss
 * @param $created The date of the most recently created event-enabled node type
 *   created is compared with the time a saved search was last run
 *   if created is greater than that value, the search needs to be run
 * @return dataset of saved searches that need to be run
 */
function eventfinder_get_new_ss($created){
  $dat = db_query(db_prefix_tables('SELECT sid, ss_sql, last_run FROM {ef_saved_searches} WHERE last_run < %d'), $created);
  return $dat;
}
/**
 * Runs a saved search within the system
 * @param $edit A row containing saved search criteria
 */
function eventfinder_ss_get_ev($edit){
  $dat = db_query($edit->ss_sql, time(), $edit->last_run);
  eventfinder_get_new_events_alt($edit->ss_sql, $edit->last_run, $edit->sid);
	/*  while($row = db_fetch_object($dat)){
	  	print '<pre>';
	  	var_export($row);
	  	print '</pre>';
	    eventfinder_get_new_events_alt($edit->ss_sql, $edit->last_run, $edit->sid);
	  }
	*/
  eventfinder_ss_remove_old_events();
}
/**
 * performs saved search and accesses methods for recording results as well as 
 *    sending mailings
 * @param $sql The prebuilt SQL statement for a saved search
 * @param $dlr DATE LAST RUN, time the saved search was last run
 *    used to ensure only new events are returned
 * @param $sid Saved search ID, used to relate events to searches
 */
function eventfinder_get_new_events_alt($sql, $dlr, $sid){
  $ev_dat = db_query($sql, time(), $dlr);
  while($row = db_fetch_array($ev_dat)){
   eventfinder_record_event($sid, $row['nid'], $row['event_start']); // This is an array, not an object
    $rows[] = $row;
  }
 if (count($rows) > 0) { // Only send mail if we have events to report
   eventfinder_send_ss_mail($sid, $rows);
 }
  eventfinder_set_last_run($sid);
}


/**
 * sends saved search email
 * @param $sid Saved Search ID
 * @param $rows array Array of objects used to send the mailing
 */
function eventfinder_send_ss_mail($sid, $rows){
  $thisuser = eventfinder_ss_get_owner($sid);
  if($thisuser->mail != ''){
	  foreach ($rows as $row){
	  	$data = eventfinder_prep_array(object2array(node_load(array('nid' => $row['nid']))));
	    $content .= t(variable_get('ef_ss_ev_desc', ''), $data);
	  }
	  $body = t(variable_get(ef_ss_body, $content), array('%content' => $content));
	  mail($thisuser->mail, variable_get('ef_ss_subj', ''), $body, eventfinder_mail_options());
  }
}
/**
 * records events discovered within a saved search
 * @param $sid Saved Search ID
 * @param $nid Node ID for the event item
 * @param $begin Date an event begins
 */
function eventfinder_record_event($sid, $nid, $begin){
  $sql = "INSERT INTO {ef_ss_node} (sid, nid, begin) VALUES (%d, %d, %d)";
  db_query(db_prefix_tables($sql), $sid, $nid, $begin);
  return TRUE;
}
/**
 * sets the time a saved search was last run
 * @param $sid Saved Search ID to update
 */
function eventfinder_set_last_run($sid){
  $sql = "UPDATE {ef_saved_searches} SET last_run = %d WHERE sid = %d";
  db_query(db_prefix_tables($sql), time(), $sid);
  return TRUE;
}
/**
 * retrieve user info for the owner of a saved search
 * @param $sid Saved search ID
 * @return user info
 */
function eventfinder_ss_get_owner($sid){
  $sql = "SELECT ss.uid, u.name, u.mail FROM {ef_saved_searches} ss LEFT JOIN users u ON ss.uid = u.uid WHERE sid = %d";
  $dat = db_query(db_prefix_tables($sql), $sid);
  return db_fetch_object($dat);
}
/**
 * Prepares an array for insertion into content
 * @ingroup ef_data
 * @param $row Array to prepare
 * @return associative array with all keys prefixed with a percent sign
 */
function eventfinder_prep_array($row) {
	$new_arr = array();
	foreach ($row as $key => $value) {
   $new_arr['%' . $key] = $value;
	}
	return $new_arr;
}
/**
 * @defgroup ef_core Core drupal hooks
 */
/**
 * Implementation of hook_cron().
 * @ingroup ef_core
 */
function eventfinder_cron() {
	if(variable_get('ef_ss', 0) == 1){
		$new = eventfinder_check_new_events();
		$last_run = eventfinder_get_new_ss($new);
		if(db_num_rows($last_run) > 0){
		  while($row = db_fetch_object($last_run)){
		    $content .= eventfinder_ss_get_ev($row);
		  }
		}
	}
}
/**
 * Implementation of hook_perm
 * @ingroup ef_core
 * @return permissions for the module
 */
function eventfinder_perm () {
  return array('search eventfinder', 'saved searches', 'host event', 'admin eventfinder', 'my events'); 
}
 
/**
 * Provides a link to the CSS stylesheet associated with this module.
 * @ingroup ef_core
 * @return a &lt;style&gt; tag that indicates what file browsers should import
 */
function eventfinder_html_head() {
  return '<style type="text/css">@import url(modules/eventfinder/eventfinder.css);</style>';
}
/**
 * Implementation of hook_user
 * @ingroup ef_core
 */
function eventfinder_user($op, &$edit, &$user, $category = NULL) {
  switch ($op){
    case 'load':
      eventfinder_host_reg($user);
    break;
  }
}
/**
 * Provides the links that should be displayed when viewing events.
 * @ingroup ef_core
 * @param $type the type of link (for example, 'node', 'page', or 'system') being requested
 * @param $node the node that is requesting the link.  This is used in conjunction with $type to further determine
 *        what sort of link to display.
 * @param $main unused in this method.
 * @return an array of links, or an empty array if no links apply for the criteria passed to this method.
 */
function eventfinder_link($type, $node = NULL, $teaser = FALSE) {
  switch ($type) {
    case 'node':
      if(!$teaser){
        if ((event_enabled_state($node->type) == 'all' || event_enabled_state($node->type) == 'solo') && isset($_SESSION['criteria']) && user_access('seach eventfinder')) {
          $links[] = l(t('back to search'), 'eventfinder/search/return');
        }
      }
      break;
  }
  return $links ? $links : array();
}
/**
 * Implementation of hook_view().
 * @ingroup ef_core
 */
function eventfinder_nodeapi(&$node, $op, $teaser = NULL, $page = NULL){
  switch ($op) {
    case 'load':
      if (variable_get('event_nodeapi_'. $node->type, 'never') != 'never') {
        $object = db_fetch_object(db_query(db_prefix_tables('SELECT count(r.uid) registered FROM {ef_register} r WHERE r.nid = %d'), $node->nid));
        $obj2 = db_fetch_object(db_query(db_prefix_tables('SELECT enable_reg, max_reg FROM {ef_details} d WHERE d.nid = %d'), $node->nid));
        return array('registered_users' => $object->registered, 'enable_reg' => $obj2->enable_reg, 'max_reg' => $obj2->max_reg);
      }
      break;
    case 'view':
    	// if the node is an event enabled node
      if (variable_get('event_nodeapi_'. $node->type, 'never') != 'never') {
      	eventfinder_host_reg();
      	if (variable_get('ef_display_opts', 0) == 0) {
      		$node->body = theme_eventfinder_nodeoptions(eventfinder_options($node->nid)) . $node->body;
      	}
      	else if (variable_get('ef_display_opts', 0) == 1) {
      		$node->body = $node->body . theme_eventfinder_nodeoptions(eventfinder_options($node->nid));
      	}
      }
      break;
    case 'form post':
      if(user_access('host event')){
        if (variable_get('event_nodeapi_'. $node->type, 'never') != 'never') {
          $form = form_checkbox (t('Enable Online Registration for this Event'), 'enable_reg', 1, ($node->enable_reg == 1 ? true : false));
          $form .= form_textfield(t('Maximum Number of Online Registrants'), 'max_reg', (is_numeric($node->max_reg) ? $node->max_reg: 0), 3, 3, t('Enter the maximum number of people who can register for this event online. Enter a 0 for unlimited registrations.'), NULL, TRUE);
          $form = form_group(t('EventFinder Options'), $form);
        }
        return $form;
      }
      break;
    case 'insert':
      if (variable_get('event_nodeapi_'. $node->type, 'never') != 'never') {
        global $user;
        $fields = array('nid', 'enable_reg', 'max_reg');
        db_query(db_prefix_tables('INSERT INTO {ef_details} (nid, enable_reg, max_reg) VALUES (%d, %d, %d)'), $node->nid, $node->enable_reg, $node->max_reg);
        db_query(db_prefix_tables('INSERT INTO {ef_host} (nid, uid, created) VALUES (%d, %d, %d)'), $node->nid, $user->uid, time());
        watchdog('EventFinder', 'New saved search was created by user ' . $user->name);
        if(variable_get('ef_mailer_create', 0) == 1 && strlen(variable_get('eventfinder_host_body', '')) > 0){
          eventfinder_host_mail($node->nid);
        }
      }
      break;
    case 'update':
      if (variable_get('event_nodeapi_'. $node->type, 'never') != 'never') {
        global $user;
        $fields = array('nid', 'enable_reg', 'max_reg');
        // Deleting and inserting new records because of problems caused when 
        // eventfinder is installed on top of existing event and location installations
        db_query(db_prefix_tables('DELETE FROM {ef_details} WHERE nid = %d'), $node->nid);
        db_query(db_prefix_tables('DELETE FROM {ef_host} WHERE nid = %d AND uid = %d'), $node->nid, $user->uid);
        db_query(db_prefix_tables('INSERT INTO {ef_details} (nid, enable_reg, max_reg) VALUES (%d, %d, %d)'), $node->nid, $node->enable_reg, $node->max_reg);
        db_query(db_prefix_tables('INSERT INTO {ef_host} (nid, uid, created) VALUES (%d, %d, %d)'), $node->nid, $user->uid, time());
        if(variable_get('ef_mailer_create', 0) == 1 && strlen(variable_get('eventfinder_host_body', '')) > 0){
          eventfinder_host_mail($node->nid);
        }
      }
      break;
    case 'delete':
      if (variable_get('event_nodeapi_'. $node->type, 'never') != 'never') {
        db_query('DELETE FROM {ef_details} WHERE nid = %d', $node->nid);
        db_query('DELETE FROM {ef_host} WHERE nid = %d AND uid = %d', $node->nid, $user->uid);
        db_query('DELETE FROM {ef_register} WHERE nid = %d', $node->nid);
      }
    break;
  }
}

/**
 * Implementation of hook_help().
 * @ingroup ef_core
 */
function eventfinder_help($section) {
  $output = '';
  switch ($section) {
    case 'admin/help#eventfinder':
      $output = '<p>'. t('EventFinder is a module for accessing event information  on your site.  It is very useful for communities that have many events.  The ability to find events in many ways facilitates bringing community members together in person which makes communities stronger.') .'</p>';
      $output .= '<p>'. t('This module allows the user to seach for events based on event type, category, geographic location and proximity to major metropolitan areas.  A user can also register for events, and it is helpful for event hosts to retrieve lists of contacts for events they have created on the site.  Users can access lists of events which they have created and registered for.  Event allows users to create saved searches, which monitor the system for new events matching criteria they have specified.') .'</p>';
      $output .= t('<p>You can:</p>
<ul>
<li>enable <strong>required</strong> civicrm, event, and location modules at <a href="%admin-modules">administer &gt;&gt; modules</a>.</li>
<li>configure a <strong>required</strong> default registration page through the CiviCRM Administration profile forms by selecting the <strong>Display in Registration Form?</strong> checkbox next to fields you are going to collect.</li>
<li>configure a <strong>required</strong> CiviCRM email profile field to select <strong>Key to Match Contacts?</strong>.</li>
<li>set permission for event searches, saved searches, event hosting, and administration at <a href="%admin-access">administer &gt;&gt; access control</a>.</li>
<li>view eventfinder prerequisites, module configuration, and contact repository settings at <a href="%admin-eventfinder">administer &gt;&gt; eventfinder</a>.</li>
<li>clear registration information or submit feedback about event finder at <a href="%admin-eventfinder">administer &gt;&gt; eventfinder</a>.</li>
<li>configure search settings for event taxonomy, event type, location proximity, state , metropolitan areas at <a href="%admin-settings-eventfinder">administer &gt;&gt; settings &gt;&gt; eventfinder</a>.</li>
<li>configure display, registration, mailer options, and saved search options at <a href="%admin-settings-eventfinder">administer &gt;&gt; settings &gt;&gt; eventfinder</a>.</li>
', array('%admin-modules' => url('admin/modules'), '%admin-access' => url('admin/access'), '%admin-eventfinder' => url('admin/eventfinder'), '%admin-settings-eventfinder' => url('admin/settings/eventfinder'))) .'</ul>';
      $output .= '<p>'. t('For more information please read the configuration and customization handbook <a href="%eventfinder">EventFinder page</a>.', array('%eventfinder' => 'http://www.drupal.org/handbook/modules/eventfinder/')) .'</p>';
      return $output;
    case 'admin/modules#description':
        return t('Lets users search for events based on location and event type.');
      break;
    case 'admin/settings/eventfinder':
      $output = t("Options on this page control what types of searches are displayed to users looking for events.<br><br>'Enable Event Taxonomy Searches' allows users to search by vocabulary terms associated with event-enabled content.<br><br>'Enable Event Type Searches' enables users to search by event-enabled content types.<br><br>'Enable Location Proximity Searches' enables users to search by proximity to a US zip code.<br><br>'Enable State Searches' enables users to search by state.<br><br>'Enable Major Metropolitan Area Searches' enables users to search by major metropolitan area.");
      break;
    case 'admin/settings/eventfinder/display_settings':
      $output = t("Options on this page control the information presented to users while they use EventFinder.<br><br><strong>'Display EventFinder Options'</strong> controls where registration options appear for users.<br><br><strong>'Search Description'</strong> controls what instructions are presented to users when they perform a search.<br><br><strong>'My Events Description'</strong> controls what instructions are presented to users when they view the My Events page.<br><br><strong>'Host an Event Description'</strong> controls what instructions are presented to users when they view the Host an Event page.<br><br><strong>'Send Message to Registered Users Description'</strong> controls what information is presented to event hosts when they send messages to people registered for events.");
      break;
    case 'admin/settings/eventfinder/email_settings':
      $output = t("Options on this page control what emails get sent from EventFinder.");
      break;
    case 'eventfinder/register/':
      $output = t('You are about to register for an event. Please review the options below to proceed.');
      break;
  }
  return $output;
}
/**
 * Implementation of hook_settings().
 * @ingroup ef_core
 */
function eventfinder_settings() {
  $group .= form_checkbox('Enable Event Taxonomy Searches', 'ef_ev_tax', 1, (variable_get('ef_ev_tax', 0) ? true : false));
  $group .= form_checkbox('Enable Event Type Searches', 'ef_ev_type', 1, (variable_get('ef_ev_type', 0) ? true : false));
  $group .= form_checkbox('Enable Location Proximity Searches', 'ef_loc_prox', 1, (variable_get('ef_loc_prox', 0) ? true : false));
  $group .= form_checkbox('Enable State Searches', 'ef_state', 1, (variable_get('ef_state', 0) ? true : false));
  $group .= form_checkbox('Enable Major Metropolitan Area Searches', 'ef_mma', 1, (variable_get('ef_mma', 0) ? true : false));
  $output = form_group('Search Settings', $group);

  return $output;
}

/**
 * Email option settings
 * @ingroup ef_core
 */
function eventfinder_settings_registration () {
  $edit = $_POST['edit'];
  $op = $_POST['op'];
  
  if($op == t('Save Configuration')){
    variable_set('ef_reg_list_desc', $edit['ef_reg_list_desc']);
    variable_set('ef_reg_opt', $edit['ef_reg_opt']);
    variable_set('ef_reg_store', $edit['ef_reg_store']);
    variable_set('ef_contact_source', $edit['ef_contact_source']);
    variable_set('ef_civi_contact_form', $edit['ef_civi_contact_form']);
    variable_set('ef_civi_reg_group', $edit['ef_civi_reg_group']);
  }
  
  $group = form_textarea('Registration List Description', 'ef_reg_list_desc', variable_get('ef_reg_list_desc', ''), '70', 3, 'Description to appear at the top of the event registration screen.');

  $opts = array('One click. Users must have an account on the Web site to register.', 'Registration page. Users are taken to a registration page. Allows anonymous registration.');
  $group .= form_item('Instructions', 'These fields are used to control how users register for an event and where registration information is kept. Changing these options after users have begun registering for events requires the registration table to be cleared of all previous registration information. You can clear the registration table ' . l('using the form on this page.', 'admin/eventfinder'));
  $group .= form_radios('Registration Workflow', 'ef_reg_opt', variable_get('ef_reg_opt', 0), $opts, 'Select the type of registration to use for EventFinder.');

  $opts_alt = array('Contact Manager', 'CiviCRM');
  
  $repos_options = array();
  $repos_options[''] = 'Please choose...';
  
  if(module_exist('contact_manager')){
    $repos_options['contact_manager'] = 'Contact Manager';
  }
  if(module_exist('civicrm')){
    $repos_options['civicrm'] = 'CiviCRM';
  }
  if(module_exist('civicrm') || module_exist('contact_manager')){
    $group .= form_select('Contact Repository', 'ef_reg_store', variable_get('ef_reg_store', ''), $repos_options, 'Please select where to store EventFinder registration information. This field is only necessary if you have selected the Registration Page option above.');
  }
  
  // choose group with which to store contact manager registrations
  if(module_exist('contact_manager')){
    $dat = db_query(db_prefix_tables('SELECT csid, name FROM {contact_manager_sources} ORDER BY weight'));
    while($row = db_fetch_object($dat)){
      $options[$row->csid] = $row->name;
    }
    $group .= form_select('Contact Manager Source Group', 'ef_contact_source', variable_get('ef_contact_source', ''), $options, 'The contact source for contacts signing up through EventFinder registration. You should probably define a unique group for EventFinder registration so as to avoid contaminating other lists. This field is only necessary if the contacts module is being used for registration information.');
  }
  else {
    $group .= form_item('Contact Manager Source Group', 'Contact Manager is not enabled. Source groups are unavailable.');
  }

  // civicrm contact options
  if (function_exists('civicrm_initialize')) {
    civicrm_initialize(TRUE);
    $ufGroups = crm_uf_get_profile_groups( );
    $group .= form_select('CiviCRM Contact Form', 'ef_civi_contact_form', variable_get('ef_civi_contact_form', ''), $ufGroups, 'The contact form to use for capturing contact information when a user registers for an event. This field is only necessary if CiviCRM is being used for registration information.');
    $groups = crm_get_groups();
    $i = 0;
    while ($i < count($groups) ) {
      $group_options[$groups[$i]->id] = $groups[$i]->name;
      ++$i;
    }
    $group .= form_select('Registration Groups', 'ef_civi_reg_group', variable_get('ef_civi_reg_group', ''), $group_options, 'Select the CiviCRM group(s) with which to associate users when they register for events.', 0, TRUE, TRUE);
  }
  $output .= form_group('Registration Settings', $group);  
  
  $output .= form_submit(t('Save Configuration'));
  $output = form($output);
  print theme('page', $output);

}  
/**
 * Email option settings
 * @ingroup ef_core
 */
function eventfinder_settings_email () {
  $edit = $_POST['edit'];
  $op = $_POST['op'];
  
  if($op == t('Save Configuration')){
    variable_set('ef_send_html', $edit['ef_send_html']);
    variable_set('ef_mailer_create', $edit['ef_mailer_create']);
    variable_set('ef_mailer_register', $edit['ef_mailer_register']);
    variable_set('ef_email_name', $edit['ef_email_name']);
    variable_set('ef_email_addr', $edit['ef_email_addr']);
    variable_set('eventfinder_host_subj', $edit['eventfinder_host_subj']);
    variable_set('eventfinder_host_body', $edit['eventfinder_host_body']);
    variable_set('ef_reg_subj', $edit['ef_reg_subj']);
    variable_set('ef_reg_body', $edit['ef_reg_body']);  
  }

  $group = form_checkbox('Enable EventFinder to send HTML emails', 'ef_send_html', 1, (variable_get('ef_send_html', 0) ? true : false), 'Controls whether eventfinder sends HTML emails to users. Defaults to straight text.');
  $group .= form_checkbox('Enable EventFinder to send a confirmation mail to people who enter events', 'ef_mailer_create', 1, (variable_get('ef_mailer_create', 0) ? true : false), 'This message will be sent out every time a user registers an event-enabled content type.');
  $group .= form_checkbox('Enable registration confirmation email', 'ef_mailer_register', 1, (variable_get('ef_mailer_register', 0) ? true : false), 'This message will be sent out each time a user registers for an event in the system.');
  $group .= form_textfield('Email Name', 'ef_email_name', variable_get('ef_email_name', ''), '70', '255', 'The name to be associated with emails coming from EventFinder', NULL, FALSE);
  $group .= form_textfield('Email Address', 'ef_email_addr', variable_get('ef_email_addr', ''), '70', '255', 'The email address for emails coming from EventFinder.', NULL, FALSE);
  $group .= form_textfield('Host Email Subject Line', 'eventfinder_host_subj', variable_get('eventfinder_host_subj', ''), '70', '255', 'The subject line of emails to send to users after creating an event.', NULL, FALSE);
  $group .= form_textarea('Host Email Body', 'eventfinder_host_body', variable_get('eventfinder_host_body', ''), '70', 5, 'The body of the message to send to event hosts after creating an event. You can dynamically include any fields present in the content types that are event and location enabled by prefixing them with a percent (%) sign. Acceptable variables include %title, %start, %end, $postal_code, %province, %street, and %city.');
  $group .= form_textfield('Register Email Subject Line', 'ef_reg_subj', variable_get('ef_reg_subj', ''), '70', '255', 'The subject line of emails to send to users after registering for an event.', NULL, FALSE);
  $group .= form_textarea('Register Email Body', 'ef_reg_body', variable_get('ef_reg_body', ''), '70', 5, 'The body of the message to send to event hosts after registering for an event. You can dynamically include any fields present in the content types that are event and location enabled by prefixing them with a percent (%) sign. Acceptable variables include %title, %start, %end, $postal_code, %province, %street, and %city.');
  $output .= form_group('Email Options', $group);  
  
  $output .= form_submit(t('Save Configuration'));
  $output = form($output);
  print theme('page', $output);
}

/**
 * Saved search settings for eventfinder
 * @ingroup ef_core
 */
function eventfinder_settings_saved_searches () {
  $edit = $_POST['edit'];
  $op = $_POST['op'];
  
  if($op == t('Save Configuration')){

    variable_set('ef_ss', $edit['ef_ss']);
    variable_set('ef_ss_max', $edit['ef_ss_max']);
    variable_set('ef_ss_desc', $edit['ef_ss_desc']);
    variable_set('ef_ss_create_desc', $edit['ef_ss_create_desc']);
    variable_set('ef_ss_subj', $edit['ef_ss_subj']);
    variable_set('ef_ss_body', $edit['ef_ss_body']);
    variable_set('ef_ss_ev_desc', $edit['ef_ss_ev_desc']);
  
  }

  $group = form_checkbox('Enable Saved Searches', 'ef_ss', 1, (variable_get('ef_ss', 0) ? true : false), 'Enables saved searches throughout EventFinder. Overrides all permissions throughout the system. Best to disable it if you have concerns over server performance.');
  $group .= form_textfield ('Maximum Saved Searches per User', 'ef_ss_max', variable_get('ef_ss_max', 5), 5, 2, $description='The maximum number of saved searches a single user can create.');
  $group .= form_textarea('Saved Search Description', 'ef_ss_desc', variable_get('ef_ss_desc', ''), '70', 3, 'Description for the Saved Search page.');
  $group .= form_textarea('Create Saved Search Instructions', 'ef_ss_create_desc', variable_get('ef_ss_create_desc', ''), '70', 3, 'Description for the Saved Search page.');
  $group .= form_textfield('Saved Search Email Subject Line', 'ef_ss_subj', variable_get('ef_ss_subj', ''), '70', 255, 'The subject line of emails to send to users when new events are found.', NULL, FALSE);
  $group .= form_textarea('Saved Search Email Body', 'ef_ss_body', variable_get('ef_ss_body', ''), '70', 5, 'The body of the message to send to users when new events are found. Acceptable variables include %content, which represents the text for new events.');
  $group .= form_textarea('Saved Search Event Description', 'ef_ss_ev_desc', variable_get('ef_ss_ev_desc', ''), '70', 5, 'Handles the display of event details within saved search mailings from the system. You can dynamically include any fields present in the content types that are event and location enabled by prefixing them with a percent (%) sign. Acceptable variables include %title, %start, %end, $postal_code, %province, %street, and %city.');
  $output .= form_group('Saved Search Options', $group);
  
  $output .= form_submit(t('Save Configuration'));
  $output = form($output);
  print theme('page', $output);
  
}
/**
 * Display settings for eventfinder
 * @ingroup ef_core
 */
function eventfinder_settings_display () {
  $edit = $_POST['edit'];
  $op = $_POST['op'];
  
  if($op == t('Save Configuration')){
    variable_set('ef_display_opts', $edit['ef_display_opts']);
    variable_set('ef_search_desc', $edit['ef_search_desc']);
    variable_set('eventfinder_myevents_desc', $edit['eventfinder_myevents_desc']);
    variable_set('eventfinder_host_desc', $edit['eventfinder_host_desc']);
    variable_set('ef_message_desc', $edit['ef_message_desc']);
  }
  
  $opts = array('Above Event Details', 'Below Event Details', 'In a Block');
  $group = form_radios('Display EventFinder Options', 'ef_display_opts', variable_get('ef_display_opts', 1), $opts,'Configure where to place EventFinder options.');
  $group .= form_textarea('Search Description', 'ef_search_desc', variable_get('ef_search_desc', ''), '70', 3, 'Description for the main search interface.');
  $group .= form_textarea('My Events Description', 'eventfinder_myevents_desc', variable_get('eventfinder_myevents_desc', ''), '70', 3, 'Description for the My Events page.');
  $group .= form_textarea('Host an Event Description', 'eventfinder_host_desc', variable_get('eventfinder_host_desc', ''), '70', 3, 'Description for the Host an Event page.');
  $group .= form_textarea('Send Message to Registered Users Description', 'ef_message_desc', variable_get('ef_message_desc', ''), '70', 3, 'Description for the Send Message to Registered Users page.');
  $output .= form_group('Display Settings', $group);
  $output .= form_submit(t('Save Configuration'));
  $output = form($output);
  print theme('page', $output);
}
/**
 * Implementation of hook_menu().
 * @ingroup ef_core
 */
function eventfinder_menu($may_cache) {
  $items = array();
  if ($may_cache) {
    
    // settings pages
    $items[] = array('path' => 'admin/settings/eventfinder/main', 
      'title' => t('main settings'), 
      'type' => MENU_DEFAULT_LOCAL_TASK, 
      'weight' => -10
    );
    $items[] = array('path' => 'admin/settings/eventfinder/display_settings', 
      'title' => t('display settings'), 
      'callback' => 'eventfinder_settings_display', 
      'access' => user_access('administer site configuration'), 
      'type' => MENU_LOCAL_TASK,
      'weight' => -9      
    );
    $items[] = array('path' => 'admin/settings/eventfinder/email_settings', 
      'title' => t('email options'), 
      'callback' => 'eventfinder_settings_email', 
      'access' => user_access('administer site configuration'), 
      'type' => MENU_LOCAL_TASK,
      'weight' => -8 
    );
    $items[] = array('path' => 'admin/settings/eventfinder/registration_settings', 
      'title' => t('registration settings'), 
      'callback' => 'eventfinder_settings_registration', 
      'access' => user_access('administer site configuration'), 
      'type' => MENU_LOCAL_TASK,
      'weight' => -7 
    );
    $items[] = array('path' => 'admin/settings/eventfinder/saved_searches', 
      'title' => t('saved search settings'), 
      'callback' => 'eventfinder_settings_saved_searches', 
      'access' => user_access('administer site configuration'), 
      'type' => MENU_LOCAL_TASK,
      'weight' => -6 
    );

    
    if(user_access('search eventfinder')){
      $items[] = array('path' => 'admin/eventfinder',
        'title' => t('eventfinder'),
        'callback' => 'eventfinder_debug',
        'access' => user_access('admin eventfinder')
      );
      $items[] = array('path' => 'eventfinder',
        'title' => t('EventFinder'),
        'callback' => 'eventfinder_search_items',
        'access' => user_access('search eventfinder')
      );
      $items[] = array('path' => 'eventfinder/search',
        'title' => t('Search Events'),
        'callback' => 'eventfinder_search_items',
        'type' => MENU_DEFAULT_LOCAL_TASK,
        'weight' => -10);
      if(user_access('access content')){
        $items[] = array('path' => 'eventfinder/host',
          'title' => t('Host An Event'),
          'callback' => 'eventfinder_host_event',
          'access' => user_access('host event'),
          'type' => MENU_LOCAL_TASK,
          'weight' => -9);
      }
      $items[] = array('path' => 'eventfinder/my_events',
        'title' => t('My Events'),
        'callback' => 'eventfinder_my_events',
        'access' => user_access('my events'),
        'type' => MENU_LOCAL_TASK,
        'weight' => -8);
      $items[] = array('path' => 'eventfinder/my_events/registered',
        'title' => t('Registered Events'),
        'callback' => 'eventfinder_my_events_registered',
        'access' => user_access('my events'),
        'type' => MENU_LOCAL_TASK,
        'weight' => -10);
      $items[] = array('path' => 'eventfinder/my_events/hosted',
        'title' => t('Hosted Events'),
        'callback' => 'eventfinder_my_events_host',
        'access' => user_access('my events'),
        'type' => MENU_LOCAL_TASK,
        'weight' => -9);
      if(variable_get('ef_ss', 0) == 1){
        $items[] = array('path' => 'eventfinder/saved_searches',
          'title' => t('Saved Searches'),
          'callback' => 'eventfinder_saved_searches',
          'access' => user_access('saved searches'),
          'type' => MENU_LOCAL_TASK,
          'weight' => -8);
        $items[] = array('path' => 'eventfinder/saved_searches/list',
          'title' => t('List Saved Searches'),
          'callback' => 'eventfinder_saved_searches',
          'access' => user_access('saved searches'),
          'type' => MENU_DEFAULT_LOCAL_TASK,
          'weight' => -10);
        $items[] = array('path' => 'eventfinder/saved_searches/create',
          'title' => t('Create New Saved Search'),
          'callback' => 'eventfinder_create_saved_search',
          'access' => user_access('saved searches'),
          'type' => MENU_LOCAL_TASK,
          'weight' => -9);
    }
  }
  $items[] = array('path' => 'eventfinder/saved_searches/delete',
    'callback' => 'eventfinder_saved_search_delete',
    'access' => user_access('search eventfinder'),
    'type' => MENU_CALLBACK
    );
  $items[] = array('path' => 'eventfinder/saved_searches/edit',
    'callback' => 'eventfinder_saved_search_edit',
    'access' => user_access('search eventfinder'),
    'type' => MENU_CALLBACK
    );
  $items[] = array('path' => 'eventfinder/saved_searches/run',
    'callback' => 'eventfinder_run_saved_search',
    'access' => user_access('search eventfinder'),
    'type' => MENU_CALLBACK
    );
  $items[] = array('path' => 'eventfinder/details',
    'title' => t('Event Details'),
    'callback' => 'eventfinder_details',
    'access' => user_access('search eventfinder'),
    'type' => MENU_CALLBACK
    );
  $items[] = array('path' => 'eventfinder/register',
    'title' => t('Register'),
    'callback' => 'eventfinder_reg_page',
    'access' => user_access('search eventfinder'),
    'type' => MENU_CALLBACK
    );
  $items[] = array('path' => 'eventfinder/mail',
    'title' => t('Send a Message to Registered Persons'),
    'callback' => 'eventfinder_send_mail',
    'access' => user_access('search eventfinder'),
    'type' => MENU_CALLBACK
    );
  $items[] = array('path' => 'eventfinder/register/print',
    'title' => t('Registered Attendees'),
    'callback' => 'eventfinder_view_register_list',
    'access' => user_access('search eventfinder'),
    'type' => MENU_CALLBACK
    );
  }
  drupal_set_html_head(eventfinder_html_head());
  return $items;
}
/**
 * Sends an email to users registered for an event
 * @ingroup ef_core
 */
function eventfinder_send_mail ($arg1 = FALSE) {
  if($arg1){
    $edit = $_POST['edit'];
    $op = $_POST['op'];
    global $user;
    eventfinder_host_reg();
    drupal_set_breadcrumb(
      array(
        l(t('Home'), ''), 
        l(t('EventFinder'), 'eventfinder'), 
        l(t('Event Details'), 'eventfinder/search_events/' . $arg1), 
        t('Send Message to Registered Users')
      )
     );
    drupal_set_title(t('Send Message to Registered Users'));
    $error = form_get_errors();
    // get users registered under one click registration
    if($op == 'Send Message'){
      if(strlen($edit['ef_mail_subject']) > 0 && strlen($edit['ef_mail_body']) > 0){
        if(variable_get('ef_reg_opt', 0) == 0){
          $dat = db_query(db_prefix_tables('SELECT u.mail FROM {users} u INNER JOIN {ef_register} er ON u.uid = er.uid WHERE er.nid = %d'), $arg1);
          while($row = db_fetch_object($dat)){
            mail($row->mail, $edit['ef_mail_subject'], $edit['ef_mail_body'], eventfinder_mail_options());
          }
          drupal_set_message('Your message has been sent.');
          drupal_goto('eventfinder/search_events/' . $arg1);
        } else if (variable_get('ef_reg_store', 0) == 'contact_manager') {// contact manager integration

          $dat = db_query(db_prefix_tables('SELECT cm.mail FROM {contact_manager} cm INNER JOIN {ef_register} er ON cm.nid = er.uid WHERE er.nid = %d'), $arg1);
          while($row = db_fetch_object($dat)){
            mail($row->mail, $edit['ef_mail_subject'], $edit['ef_mail_body'], eventfinder_mail_options());
          }
          drupal_set_message('Your message has been sent.');
          drupal_goto('eventfinder/search_events/' . $arg1);
        } else if (variable_get('ef_reg_store', 0) == 'civicrm') { // civicrm integration 
          $dat = db_query(db_prefix_tables('SELECT uid FROM {ef_register} WHERE nid = %d'), $arg1);
          while($row = db_fetch_object($dat)){
            $contact = crm_get_contact(array('contact_id' => $row->uid));
            mail($contact->location[1]->email[1]->email, $edit['ef_mail_subject'], $edit['ef_mail_body'], eventfinder_mail_options());
          }
          drupal_set_message('Your message has been sent.');
          drupal_goto('eventfinder/search_events/' . $arg1);
        }
      } else {
        if(strlen($edit['ef_mail_subject']) == 0){
          form_set_error('ef_mail_subject', t('You must provide a subject for this message'));
        }
        if(strlen($edit['ef_mail_body']) == 0){
          form_set_error('ef_mail_body', t('You must provide a body for this message'));
        }
      }
    } else if ($op == 'Cancel'){
      drupal_goto('eventfinder/search_events/' . $arg1);
    }
    $content .= theme('eventfinder_desc', variable_get('ef_message_desc', ''));
    if (variable_get('ef_display_opts', 0) != 2) {
    	 $content .= eventfinder_options($arg1);
    }   
    $output .= form_item('From', $user->mail);
    $output .= form_textfield ('Subject', 'ef_mail_subject', $edit['ef_mail_subject'], 40, 255, $error['ef_mail_subject'], NULL, TRUE);
    $output .= form_textarea('Body', 'ef_mail_body', $edit['ef_mail_body'], '60', 3, $error['ef_mail_body'], NULL, TRUE);
    $output .= form_submit('Send Message');
    $output .= form_submit('Cancel');
    $output = form($output);
    $content = $content . $output;
    print theme('eventfinder_main', $content);
  }
}
/**
 * Displays a registraion page
 * @ingroup ef_core
 * @param $nid the node id for the event for which the user is registering
 * @return form for signing up
 */
function eventfinder_reg_page($nid) {
  $repos = variable_get('ef_reg_store', 'civicrm');
  if($repos === 'civicrm'){
    eventfinder_reg_page_civi ($nid);
  } else {
    eventfinder_reg_page_cm ($nid);
  }
}
/**
 * Displays a registraion page from contact manager
 * @ingroup ef_core
 * @param $nid the node id for the event for which the user is registering
 * @return form for signing up
 */
function eventfinder_reg_page_cm ($nid) {
  eventfinder_host_reg();
  $edit = $_POST['edit'];
  $op = $_POST['op'];
  drupal_set_breadcrumb(
    array(
      l(t('Home'), ''), 
      l(t('EventFinder'), 'eventfinder'), 
      l(t('Event Details'), 'eventfinder/search_events/' . $arg1), 
      t('Register')
    )
   );
  drupal_set_title(t('Register for this event'));
  // registers a user under one click regisration
  if(variable_get('ef_reg_opt', 0) == 0){
    global $user;
    eventfinder_reg_contact($user->uid, $nid); // register the user
    drupal_goto('eventfinder/search_events/' . $nid);
  }
  // handles contact form registration
  if($op == 'Cancel'){
    drupal_goto('eventfinder/search_events/' . $nid . '/register/');
  }
  if($op == 'Register for this Event'){
    // TODO: Make the verification happen HERE
    $check = eventfinder_reg_contact_info($edit, $nid, $edit['mail']);
  }
  $error = form_get_errors();
  $node = node_load(array('nid' => $nid));
  if($user->contact_nid){
    // get existing contact form information for the user
    $get_ucid = node_load(array('nid' => $user->contact_nid));
  }
  $i = 0;
  if(!$edit){
    $edit = array();
  }
  $fields = array_keys($edit);
  while ($i < sizeof($fields)) {
    $node->{$fields[$i]} = $edit[$fields[$i]];
    //    print $field . '<br>';
    $i++;
  }
  if (variable_get('ef_display_opts', 0) != 2) {
  	 $content .= eventfinder_options($nid);
  }  
  $content .= form_textfield ('Email Address', 'mail', $edit['mail'], '', '', NULL, NULL, TRUE);
  $content .= _contact_manager_form($node);
  $content .= form_hidden('nid', $nid);
  $content .= form_submit('Register for this Event');
  $content .= form_submit('Cancel');
  $content = form($content);
  $content = theme('eventfinder_registration_form', $node->title, $content);
  print theme('eventfinder_main', $content);
}
/**
 * Displays a registraion page from civicrm
 * @ingroup ef_core
 * @param $nid the node id for the event for which the user is registering
 * @return form for signing up
 */
function eventfinder_reg_page_civi ($nid) {
  eventfinder_host_reg();
  $edit = $_POST['edit'];
  $op = $_POST['op'];
  drupal_set_breadcrumb(
    array(
      l(t('Home'), ''), 
      l(t('EventFinder'), 'eventfinder'), 
      l(t('Event Details'), 'eventfinder/search_events/' . $arg1), 
      t('Register')
    )
   );
  drupal_set_title(t('Register for this event'));
  // registers a user under one click regisration
  if(variable_get('ef_reg_opt', 0) == 0){
    global $user;
    eventfinder_reg_contact($user->uid, $nid); // register the user
    drupal_goto('eventfinder/search_events/' . $nid);
  }
  // handles contact form registration
  if($op == 'Cancel'){
    drupal_goto('eventfinder/search_events/' . $nid . '/register/');
  }
  if($op == 'Register for this Event'){
    // TODO: Make the verification happen HERE
    $check = eventfinder_reg_contact_info_civi($edit, $nid, $edit['email']);
  }
  $error = form_get_errors();
  $node = node_load(array('nid' => $nid));
  if($user->contact_nid){
    // get existing contact form information for the user
    $get_ucid = node_load(array('nid' => $user->contact_nid));
  }
  $i = 0;
  if(!$edit){
    $edit = array();
  }
  $fields = array_keys($edit);
  while ($i < sizeof($fields)) {
    $node->{$fields[$i]} = $edit[$fields[$i]];
    //print $field . '<br>';
    $i++;
  }
  if (variable_get('ef_display_opts', 0) != 2) {
    $content .= eventfinder_options($nid);
  } 
  if (function_exists('civicrm_initialize')) {
    civicrm_initialize(TRUE);
    $content .= crm_uf_get_profile_html( null, $title, null, true, true );  
  }
  $content .= form_hidden('nid', $nid);
  $content .= form_submit('Register for this Event');
  $content .= form_submit('Cancel');
  $content = form($content);
  $content = theme('eventfinder_registration_form', $node->title, $content);
  print theme('eventfinder_main', $content);
}

/**
 * Registers someone under Contact Manager
 * @ingroup groupname
 * @return description of what is returned
 */
function eventfinder_reg_contact_info ($edit, $nid = FALSE, $arg1 = FALSE) {
  if($arg1){
    global $user;
    // verify the contact info
    $node = eventfinder_validate_contact($edit, $arg1);
    $error = form_get_errors();
    if (count($error) == 0) {
      // check to see if the user is already associated with a contact
      if($user->contact_nid > 0 && $user->uid > 0){
        // if so, save changes to contact info and save registration
        // print 'adding contact info';
        $node->nid = $user->contact_nid;
        node_save($node);
        $reg_id = $user->contact_nid;
      } // is not, save contact and save registration
        else if ($user->contact_nid > 0 && $user->uid > 0) {
        $new_nid = node_save($node);
        $reg_id = $new_nid;
        eventfinder_user_contact($user->uid, $new_nid);
        // print 'CREATING NEW CONTACT';
        // TODO: INSERT REG
      }// if user is not logged in, save contact info
        else {
          // print 'ADDING NEW CONTACT WIHTOUT USER ID';
          $check = eventfinder_reg_check_contact($edit['mail']); // checks to see whether there is a contact for this email address
          if($check){
            $reg_id = $check;
          } else {
            $new_nid = node_save($node);
            $reg_id = $new_nid;
          }
      }
      // this is where we insert the contact registration
      // need to get the nid passed into this function...
      // still need to do the insert when a user is not logged in
      if($reg_id){
        eventfinder_reg_contact($reg_id, $nid, $arg1);
        drupal_set_message(t('You are now registered for this event.'));
        drupal_goto('eventfinder/search_events/' . $edit['nid']);
      }
    }
  }
}

/**
 * Registers someone under CiviCRM
 * @ingroup groupname
 * @return description of what is returned
 */
function eventfinder_reg_contact_info_civi ($edit, $nid = FALSE, $arg1 = FALSE) {
  global $user;
  if ($user->uid) {
    $userID = crm_uf_get_match_id( $user->uid );
    if ($userID) {
      civicrm_form_data($edit, $user, $title, false);
      $contact = crm_get_contact(array('contact_id' => $userID));
    }
    else {
      civicrm_register_data($edit, $user, $title, false);
      $contact = crm_get_contact(array('email' => $user->mail));
    }
  }
  else {
    $contact = crm_create_contact($edit);
  }
  if ($contact->id) {
    $groups = variable_get('ef_civi_reg_group', array());
    foreach ($groups as $group_id) {
      $group = crm_get_groups(array('id' => $group_id));
      $group = $group[0];
      $contact_array = array($contact);
      crm_add_group_contacts($group, $contact_array);
    }
    $act_params = array(
			'entity_table'     => 'civicrm_contact',
			'entity_id'        => $contact->id,
			'activity_type'    => 'Registered For an Event',
			'module'           => 'EventFinder',
			'activity_id'      => $arg1,
			'activity_summary' => "This personed registered to attend an event - " . $event->title,
			'activity_date'    => date('YmdHis')
			);          
    $activity =& crm_create_activity_history($act_params);
    eventfinder_reg_contact($contact->id, $nid, $arg1);
    drupal_set_message(t('You are now registered for this event.'));
    drupal_goto('eventfinder/search_events/' . $edit['nid']);
  }
}
/**
 *
 * Description goes here
 *
 * @ingroup groupname
 * @return description of what is returned
 *
 */
function eventfinder_user_contact($uid, $nid) {
  db_query(db_prefix_tables('UPDATE {users} SET contact_nid = %d WHERE uid = %d'), $nid, $uid);
}

/**
 *
 * Description goes here
 *
 * @ingroup groupname
 * @return description of what is returned
 *
 */
function eventfinder_validate_contact($edit, $arg1) {
  global $user;
  $reg_check = FALSE;
  $node->type = 'contact_manager';
  $node->mail = $arg1;
  $node->source = variable_get('ef_contact_source', '');
  $form = _contact_manager_get_form();
  foreach ($form->fields as $field) {
    $node->{$field->name} = $edit[$field->name];
  }
  if(valid_email_address($node->mail)){
    contact_manager_validate($node, FALSE);
  } else {
    contact_manager_validate($node);
  }
  return $node;
}

/**
 *
 * Creates a new contact in the database
 *
 * @ingroup ef_core
 * @param $mail the email address to register
 * @return new contact id
 *
 */
function eventfinder_save_contact_info ($mail) {
  global $user;
  $reg_check = FALSE;
  $node->type = 'contact_manager';
  $node->mail = $mail;
  $node->source = variable_get('ef_contact_source', '');
  $form = _contact_manager_get_form();
  foreach ($form->fields as $field) {
    $node->{$field->name} = $edit[$field->name];
  }
  // need to check what was returned from contact_manager_validate and handle failure...
  // probably can check session to find errors
  contact_manager_validate($node);
  if (count(form_get_errors()) > 0) {
    drupal_set_message(t('The information you provided is invalid, please correct it below.'));
  } else {
    $new_nid = node_save($node);
    if ($new_nid) {
      drupal_set_message('You are now registered for this event.');
      $reg_check = TRUE;
    } else {
      drupal_set_message('There was a problem with your registration. Please ensure the form is filled out completely to proceed with registration.', 'error');
    }
  }
  return $reg_check;