modules/multiforms/multiforms_ui.module

<?php
// $Id: multiforms_ui.module,v 1.64 2008/12/17 18:11:29 mcantelon Exp $

/**
 * Implementation of hook_help().
 */
function multiforms_ui_help($section = '') {

  $output = '';

  switch ($section)  {
    case 'admin/modules#description':
      $output = t('Provides multi-page form UI functionality.');
      break;

    case "admin/help":
      $output = t('Provides multi-page form UI functionality.');
      break;

    case 'node/add#multiforms':
      $output = t('A multiform allows you to create multi-page forms to collect data from users.');
      break;
  }

  return $output;
}

/**
 * Implementation of hook_perm().
 */
function multiforms_ui_perm() {

  return array('access multiform content');
}

/**
 * Implementation of hook_menu().
 */
function multiforms_ui_menu($may_cache) {

  $items = array();

  if (!$may_cache) {

    if (arg(0) == 'node' && is_numeric(arg(1))) {

      $node = node_load(arg(1));

      if ($node->nid && $node->type == 'multiforms') {

        $items[] = array('path' => 'node/'. arg(1) .'/multiform',
          'callback' => 'multiforms_ui_dispatch',
          'type' => MENU_CALLBACK_CUSTOM,
          'access' => user_access('access multiform content')
        );
      }
    }
  }

  return $items;
}

function multiforms_ui_access($op) {

  switch ($op) {
    case 'create':
      return user_access('access multiform administration');
  }
}

function multiforms_ui_view(&$node, $teaser, $page, $links) {

  if (user_access('access multiform content') || $teaser) {

    // If submission forms hasn't yet been submitted and viewing as page, unset submission ID
    // (in case user was previously editing a submission, then aborted before completion)
    if (!sizeof($_POST['edit']) && $page) {

      unset($_SESSION['multiforms_submission_id']);
    }

    // determine ID of multiform data
    $multiform_id =  _multiforms_get_multiform_id_from_nid($node->nid);

    // if in teaser mode and the node has a predefined teaser, then don't render form
    if (!$teaser || !$node->teaser) {

      $node->content['multiforms'] = array('#value' => multiforms_view_render($multiform_id, $teaser));
    }

    $node = node_prepare($node, $teaser);

    $node->content['multiforms']['#value'] = str_replace(
      '{multiform form html}',
      drupal_get_form('multiforms_view', $multiform_id),
      $node->content['multiforms']['#value']
    );

    return $node;
  }
  else {

    drupal_access_denied();
  }
}

function multiforms_view($multiform_id) {
  return _multiforms_render_section_fields(0 - $multiform_id, 'multiforms_view', $multiform_id);
}

function multiforms_ui_form(&$node, &$param) {

  $form['title'] = array(
    '#type'=> 'textfield',
    '#title' => t('Title'),
    '#required' => TRUE,
    '#default_value' => $node->title
  );

  $form['body_filter']['body'] = array('#type' => 'textarea',
    '#title' => t('Body'),
    '#default_value' => $node->body,
    '#rows' => 20
  );

  $form['body_filter']['format'] = filter_form($node->format);

  return $form;
}

function multiforms_ui_delete(&$node) {

  if (function_exists('multiforms_admin_delete')) {

    multiforms_admin_delete(_multiforms_get_multiform_id_from_nid($node->nid));
  }
  else {

    drupal_set_message(t('Please contact your administrator! Multiforms cannot be deleted properly unless the main Multiforms module is enabled.'), 'error');
  }
}

function multiforms_node_info() {

  return array(
    'multiforms' => array('name' => t('multiform'),
      'module' => 'multiforms_ui',
      'description' => t('A multiform is a form, or series of forms, for collecting data from users.')
    )
  );
}

function multiforms_ui_dispatch() {

  drupal_set_title(_multiforms_ui_get_title());

  $command_arg    = arg(3);
  $subcommand_arg = arg(4);

  switch ($command_arg) {

    case 'sections':
      multiforms_section_list_page();
      break;

    case 'section':
      multiforms_view_section_page($subcommand_arg);
      break;

    case 'complete':
      multiforms_complete_page();
      break;

    case 'share':
      multiforms_share_page($subcommand_arg);
      break;

    case 'thanks':
      multiforms_thanks_page();
      break;
  }
}

function _multiforms_ui_get_title() {

  $title = _multiforms_get_table_property('node', 'nid', arg(1), 'title');
  drupal_set_title($node->title);

  return $node->title;
}

function _multiforms_ui_check_close_status($multiform_id) {

  $closed = FALSE;

  if (_multiforms_get_property($multiform_id, 'multiform_closing_enabled')) {

    $closing_date = str_replace('-', '/', _multiforms_get_property($multiform_id, 'multiform_closing_date'));
    $current_date = date('n/j/Y');

    if ($closing_date == $current_date) {

      // if today is the closing date and no time is set, close...
      // if a time is set, go by the time
      $closing_time = _multiforms_get_property($multiform_id, 'multiform_closing_time');

      if ($closing_time) {

        if ($closing_time <= date('H:i:s')) {

          $closed = TRUE;
        }
      }
      else {

        $closed = TRUE;
      }
    }
    elseif (_multiforms_date_array_greater($current_date, $closing_date)) {

      $closed = TRUE;
    }
  }

  return $closed;
}

function multiforms_view_render($multiform_id, $teaser = FALSE) {

  // Check to see if multiform is closed
  $closed = _multiforms_ui_check_close_status($multiform_id);

  // If closed, return closing text
  if ($closed && $closing_text = t(_multiforms_get_property($multiform_id, 'multiform_closing_text'))) {

    return $closing_text;
  }

  // Get intro text from node body
  $nid = _multiforms_get_property($multiform_id, 'nid');
  $node = node_load($nid);

  if (!$teaser) {

    if (!$closed) {

      $output .= '{multiform form html}';

      $output .= t(_multiforms_get_property($multiform_id, 'multiform_footer'));
    }
    else {

      $output .= theme('multiforms_ui_closed_message');
    }
  }

  return $output;
}

function theme_multiforms_ui_closed_message() {

  return t('This contest is now closed.') .'<p></p>';
}

function multiforms_view_submit($form_id, $form_values) {

  $is_duplicate = FALSE;

  $field_values = $form_values['multiforms_view'];

  // If a submission ID hasn't been set and the user isn't hitting the back button from
  // the completion, create a new submission
  if (!$_SESSION['multiforms_submission_id']) {

    $submission_metadata = _multiforms_ui_view_submit_metadata($field_values);

    // If primary section has fields, check for duplicate submissions
    if ($submission_metadata['dynamic_field_count']) {

      // Check to see if submission is a duplicate
      $is_duplicate = _multiforms_ui_view_submit_duplicate_check(
        $field_values['multiform_id'],
        $submission_metadata['unique_key_fields'],
        $submission_metadata['submission_unique_value']
      );
    }

    // If no duplicates have been detected, create submission and set submission ID
    if (!$is_duplicate) {

      // Create submission record in database
      _multiforms_ui_view_submit_create_submission(
        $field_values['multiform_id'],
        $submission_metadata['submission_unique_value']
      );

      // Note current submission ID in session
      _multiforms_ui_view_submit_set_session();

      // If no duplication, store dynamic submission fields
      _multiforms_submit_section_data(0 - $field_values['multiform_id'], $field_values);
    }
  }

  // If submission isn't a duplicate, trigger actions and list sections (or skip to completion)
  if (!$is_duplicate) {

    // Submit actions, if any
    multiforms_view_submit_actions(0 - $field_values['multiform_id'], 'section', 'submit');

    $query = "SELECT count(multiform_section_id) AS total_sections FROM {". MULTIFORM_SECTION_TABLE ."} WHERE multiform_section_multiform_id='%d'";

    $result = db_query($query, $field_values['multiform_id']);
    if ($result) {

      if ($row = db_fetch_object($result)) {

        return _multiforms_ui_primary_submission_response_path($row->total_sections, arg(1), $field_values['multiform_id']);

      }
    }
  }
  else {

    drupal_set_message(t('You have already filled out this form.'), 'error');
  }
}

function _multiforms_ui_primary_submission_response_path($total_sections, $nid, $multiform_id) {

  if ($total_sections) {

    $flow_type = _multiforms_get_property($multiform_id, 'multiform_flow_type');

    if ($flow_type == MULTIFORMS_FLOW_TYPE_NORMAL) {

      return 'node/'. $nid .'/multiform/sections';
    }
    elseif ($flow_type == MULTIFORMS_FLOW_TYPE_LINEAR) {

      return 'node/'. $nid .'/multiform/section/'. _multiforms_ui_first_section_id($multiform_id);
    }
  }
  else {

    // multiform has no sections, so skip to completion
    return 'node/'. $nid .'/multiform/complete';
  }
}

function _multiforms_ui_first_section_id($multiform_id) {

  $query = "SELECT multiform_section_id FROM {". MULTIFORM_SECTION_TABLE ."} \r
    WHERE multiform_section_multiform_id='%d' \r
    ORDER BY multiform_section_sortorder ASC \r
    LIMIT 1";

  $params = array($multiform_id);

  $result = db_query($query, $params);

  if ($result) {

    if ($first_section = db_fetch_object($result)) {

      return $first_section->multiform_section_id;
    }
  }
}

function _multiforms_ui_next_section_id($multiform_id, $current_section_id) {

  return _multiforms_ui_section_id_in_sequence($multiform_id, $current_section_id, 'ASC');
}

function _multiforms_ui_previous_section_id($multiform_id, $current_section_id) {

  return _multiforms_ui_section_id_in_sequence($multiform_id, $current_section_id, 'DESC');
}

function _multiforms_ui_section_id_in_sequence($multiform_id, $current_section_id, $sort_direction = 'ASC') {

  $query = "SELECT multiform_section_id FROM {". MULTIFORM_SECTION_TABLE ."} \r
    WHERE multiform_section_multiform_id='%d' \r
    ORDER BY multiform_section_sortorder ". $sort_direction;

  $params = array($multiform_id);

  $result = db_query($query, $params);

  if ($result) {

    while ($section = db_fetch_object($result)) {

      if ($last_section_id == $current_section_id) {

        // Section ID in sequence found
        return $section->multiform_section_id;
      }

      $last_section_id = $section->multiform_section_id;
    }
  }

  // Section ID in sequence not found
  return FALSE;
}

function _multiforms_ui_view_submit_metadata($field_values) {

  // see if dynamic submission fields exist for this multiform
  $dynamic_field_count = 0;
  $submission_unique_value = '';
  $unique_key_fields = 0;

  $query = "SELECT * FROM {" . MULTIFORM_FIELD_TABLE . "} WHERE multiform_field_section_id='%d'";

  $result = db_query($query, 0 - $field_values['multiform_id']);

  if ($result) {

    while ($row = db_fetch_object($result)) {

      switch ($row->multiform_field_type) {

        case 'unique_text':
          $submission_unique_value .= trim($field_values[$row->multiform_field_id]) . '|';
          $unique_key_fields++;
          break;

        case 'unique_phone':
          $submission_unique_value .= _multiforms_filter_phone_number($field_values[$row->multiform_field_id]) . '|';
          $unique_key_fields++;
          break;

        default:
          break;
      }

      $dynamic_field_count++;
    }
  }

  return array(
    'dynamic_field_count' => $dynamic_field_count,
    'submission_unique_value' => $submission_unique_value,
    'unique_key_fields' => $unique_key_fields
  );
}

function _multiforms_ui_view_submit_duplicate_check($multiform_id, $unique_key_fields, $submission_unique_value) {

  if ($unique_key_fields) {

    $query = "SELECT multiform_submission_id FROM {". MULTIFORM_SUBMISSION_TABLE ."} \r
      WHERE multiform_submission_parent_multiform_id='%d' AND \r
      multiform_submission_unique_key='%s'";

    $result = db_query($query, $multiform_id, $submission_unique_value);

    if ($result) {

      if ($row = db_fetch_object($result)) {

        return TRUE;
      }
    }
  }

  return FALSE;
}

function _multiforms_ui_view_submit_create_submission($multiform_id, $submission_unique_value) {

  $query = "INSERT INTO {" . MULTIFORM_SUBMISSION_TABLE . "} \r
    (multiform_submission_parent_multiform_id, \r
    multiform_submission_ip, \r
    multiform_submission_datetime, \r
    multiform_submission_unique_key) \r
    VALUES ('%d', '%s', now(), '%s')";

  $result = db_query($query,
    $multiform_id,
    $_SERVER['REMOTE_ADDR'],
    $submission_unique_value
  );
}

function _multiforms_ui_view_submit_set_session() {

  $query = "SELECT multiform_submission_id FROM {". MULTIFORM_SUBMISSION_TABLE ."} ORDER BY multiform_submission_id DESC LIMIT 1";

  $result = db_query($query);

  if ($result) {

    if ($row = db_fetch_object($result)) {

      if (!$_SESSION['multiforms_submission_id']) {

        $_SESSION['multiforms_submission_id'] = $row->multiform_submission_id;
      }
    }
  }
}

function multiforms_section_list_page() {
 
  $multiform_id = _multiforms_get_multiform_id_from_nid(arg(1));
 
  print theme('page', _multiforms_list_sections($multiform_id));
}

function _multiforms_list_sections($multiform_id) {

  $output = '';
  $rows = array();

  $query = "SELECT * FROM {" . MULTIFORM_SECTION_TABLE . "} WHERE multiform_section_multiform_id='%d' ORDER BY multiform_section_sortorder ASC";

  $result = db_query($query, $multiform_id);

  if ($result) {

    while ($row = db_fetch_object($result)) {

      // Find number of fields in this section
      $field_count = _multiforms_get_total_input_fields($multiform_id, $row->multiform_section_id);

      // Find number of fields answered
      $answered = _multiforms_list_section_fields_answered($multiform_id, $row->multiform_section_id);

      $rows[] = array(
        l($row->multiform_section_name, 'node/' . arg(1) . '/multiform/section/' . $row->multiform_section_id, array('class' => 'multiform_section_link')) . '&nbsp;',
        $row->multiform_section_description .'&nbsp;',
        $field_count . '&nbsp;',
        $answered
      );
    }
  }

  return theme('multiforms_section_list', $multiform_id, $rows);
}

function _multiforms_list_section_fields_answered($multiform_id, $section_id) {

  $answered = 0;

  $submitted_values = _multiforms_return_existing_section_data($section_id);

  reset($submitted_values);

  while (list($key, $value) = each($submitted_values)) {

    if (trim($value)) {

      $answered++;
    }
  }

  return $answered;
}

function theme_multiforms_section_list($multiform_id, $section_rows) {

  $output = '';

  if ($section_text = _multiforms_get_property($multiform_id, 'multiform_section_text')) {
    $output .= t($section_text) .'<p></p>';
  }

  $headers = array(
    'Section',
    'Description',
    'Questions',
    'Answered'
  );

  $output .= theme_table($headers, $section_rows) .'<br />';

  if (_multiforms_check_completion($multiform_id)) {

    $output .= theme('multiforms_section_list_completion_form', $multiform_id);

  }
  else {

    $output .= theme('multiforms_section_list_progress_display', $multiform_id);
  }

  $output .= _multiforms_get_property($multiform_id, 'multiform_section_footer');

  return $output;
}

function theme_multiforms_section_list_completion_form($multiform_id) {

  $output = '';

  // show completion notification, if any
  if ($end_notification = _multiforms_get_property($multiform_id, 'multiform_end_notification')) {

    $output .= t($end_notification) .'<br></br>';
  }

  $output .= drupal_get_form('multiforms_complete_form', $multiform_id);

  return $output;
}

function theme_multiforms_section_list_progress_display($multiform_id) {

  $output = '';

  $output .= t('Click on any of the above links to answer questions.') .'<br /><br />';
  $output .= t('You have answered %answered of %possible possible questions.', array(
    '%answered' => _multiforms_get_answered_fields($multiform_id),
    '%possible' => _multiforms_get_total_input_fields($multiform_id)));
  $output .= '<br /><br />';

  return $output;
}

function multiforms_complete_form($multiform_id) {

  $form = array();

  $form['#action'] = url('node/'. arg(1) .'/multiform/complete/'. $multiform_id);

  $multiform_name = _multiforms_get_property($multiform_id, 'multiform_name');
  $form['#attributes'] = array(
    'class' => 'multiform_finish_button multiform_finish_button_'. $multiform_name
  );

  $completion_submit_button_text = _multiforms_get_property($multiform_id, 'multiform_completion_submit_button_text');
  $submit_value = ($completion_submit_button_text) ? $completion_submit_button_text : t('Finish');

  $form['submit'] = array(
    '#type' => 'submit',
    '#value' => $submit_value
  );

  return $form;
}

function _multiforms_check_completion($multiform_id) {

  $threshold = _multiforms_get_property($multiform_id, 'multiform_completion_threshold');

  $answered = _multiforms_get_answered_fields($multiform_id);
  $total = _multiforms_get_total_input_fields($multiform_id);

  return (!$threshold || ($answered >= $threshold));
}

function _multiforms_get_answered_fields($multiform_id, $submission_id = 0) {

  $total_answered = 0;

  $query = "SELECT COUNT(f.multiform_field_id) AS field_count FROM {". MULTIFORM_TABLE ."} AS m \r
    LEFT JOIN {". MULTIFORM_SECTION_TABLE ."} AS s ON m.multiform_id=s.multiform_section_multiform_id \r
    LEFT JOIN {". MULTIFORM_FIELD_TABLE ."} AS f ON s.multiform_section_id=f.multiform_field_section_id \r
    INNER JOIN {". MULTIFORM_FIELD_SUBMISSION_TABLE ."} AS fs ON f.multiform_field_id=fs.multiform_field_submission_parent_field_id \r
    WHERE m.multiform_id='%d' AND fs.multiform_field_submission_parent_submission_id='%d' AND fs.multiform_field_submission_value != ''";

  $submission_to_check = ($submission_id) ? $submission_id : $_SESSION['multiforms_submission_id'];

  $result = db_query($query, $multiform_id, $submission_to_check);

  if ($result) {

    if ($row = db_fetch_object($result)) {

      $total_answered = $row->field_count;
    }
  }

  return $total_answered;
}

function _multiforms_add_draw_entry($multiform_id, $submission_id) {

  $query = "INSERT INTO {". MULTIFORM_DRAW_ENTRY_TABLE ."} \r
    (multiform_draw_entry_parent_multiform_id, \r
    multiform_draw_entry_parent_submission_id) \r
    VALUES ('%d', '%d')";

  $result = db_query($query, $multiform_id, $submission_id);

  if ($result) {

    // Increment submission's draw entry counter
    $query = "SELECT multiform_submission_draw_entry_counter FROM {". MULTIFORM_SUBMISSION_TABLE . "} \r
      WHERE multiform_submission_id='%d'";

    $result = db_query($query, $submission_id);

    if ($result) {

      if ($submission = db_fetch_object($result)) {

        $counter = $submission->multiform_submission_draw_entry_counter + 1;

        $query = "UPDATE {". MULTIFORM_SUBMISSION_TABLE . "} \r
          SET multiform_submission_draw_entry_counter='%d' \r
          WHERE  multiform_submission_id='%d'";

        $result = db_query($query, $counter, $submission_id);

        if ($result) {
          return TRUE;
        }
      }
    }
  }

  return FALSE;
}

function multiforms_complete_page() {

  $multiform_id = _multiforms_get_multiform_id_from_nid(arg(1));

  $output = '';

  if (_multiforms_check_completion($multiform_id)) {

    $output .= t(_multiforms_end_text($multiform_id));

    if (isset($_SESSION['multiforms_submission_id'])) {

      // mark submission as closed
      $query = "UPDATE {". MULTIFORM_SUBMISSION_TABLE ."} SET multiform_submission_status='complete', multiform_submission_total_answered='%d' \r
        WHERE multiform_submission_id='%d'";

      $result = db_query($query, _multiforms_get_answered_fields($multiform_id), $_SESSION['multiforms_submission_id']);

      // if applicable, add to draw
      if (_multiforms_get_property($multiform_id, 'multiform_draw_entry_on_submission')) {

        _multiforms_add_draw_entry($multiform_id, $_SESSION['multiforms_submission_id']);
      }
    }

    // if applicable, process actions
    multiforms_view_submit_actions($multiform_id, 'multiform', 'complete');

    // if applicable, show form for emailing friends about survey
    if (_multiforms_get_property($multiform_id, 'multiform_email_allow')) {

      $output .= drupal_get_form('multiforms_share', $multiform_id, $_SESSION['multiforms_submission_id']);

      // take note that user has gone through completion...
      // mark to prevent creation of new submission if back button is clicked
      unset($_SESSION['multiforms_submission_id']);

      print theme('page', $output);
    }
    else {

      // take note that user has gone through completion...
      // mark to prevent creation of new submission if back button is clicked
      unset($_SESSION['multiforms_submission_id']);

      multiforms_output_final_text($output);
    }

  }
  else {

    $threshold = _multiforms_get_property($multiform_id, 'multiform_completion_threshold');

    $output .= t(
      'Error: multiform not complete. %threshold questions need to be answered after the initial form is completed.',
      array('%threshold' => $threshold)
    );

    print theme('page', $output);
  }
}

function multiforms_output_final_text($text) {

  $multiform_id =  _multiforms_get_multiform_id_from_nid(arg(1));

  $redirect_path = _multiforms_get_property($multiform_id, 'multiform_completion_redirect');

  if ($redirect_path) {

    drupal_set_message($text);
    drupal_goto($redirect_path);
  }
  else {

    print theme('page', $text);
  }
}

function _multiforms_end_text($multiform_id) {

  return ($end_text = _multiforms_get_property($multiform_id, 'multiform_end_text')) ?
    t($end_text) : t(variable_get('multiform_default_completion_text', ''));
}

# session variable no longer lives, so optional submission ID is passed
function multiforms_share($multiform_id, $submission_id = '') {

  $output = '';

  $form_name = "multiforms_share";
  $multiform_name = _multiforms_get_property($multiform_id, 'multiform_name');

  $form = array(
    '#action' => url('node/'. arg(1) .'/multiform/share/'. $multiform_id),
    '#attributes' => array('class' =>  'multiform multiform_email multiform_'. $multiform_name .' multiform_'. $multiform_name .'_email')
  );

  $form[$form_name] = array(
    '#type' => 'fieldset',
    '#title' => t($form_title),
    '#tree' => TRUE
  );

  $form[$form_name]['submission_id'] = array(
    '#type' => 'hidden',
    '#default_value' => $submission_id
  );

  $form[$form_name]['from'] = array(
    '#type' => 'fieldset',
    '#title' => t('From Email Address'),
    '#collapsible' => FALSE,
    '#collapsed' => FALSE,
    '#tree' => TRUE,
  );

  $form[$form_name]['from']['email'] = array(
    '#type' => 'textfield',
    '#title' => t('Your Email')
  );

  $form[$form_name]['to'] = array(
    '#type' => 'fieldset',
    '#title' => t('Friends to Email'),
    '#collapsible' => FALSE,
    '#collapsed' => FALSE,
    '#tree' => TRUE,
  );

  for ($index = 0; $index < 5; $index++) {
    $field_name = 'email'. ($index + 1);
    $form[$form_name]['to'][$field_name] = array(
      '#title' => t('Email Address') .' '. ($index + 1),
      '#type' => 'textfield',
    );
  }

  $form[$form_name]['submit'] = array(
    '#type' => 'submit',
    '#value' => t('Email')
  );

  $form[$form_name]['skip'] = array(
    '#type' => 'markup',
    '#value' => '<p>'. l(t('Skip'), 'node/'. arg(1) .'/multiform/thanks') .'</p>'
  );

  return $form;
}

function multiforms_share_submit($form_id, $form_data) {

  $multiform_id = _multiforms_get_multiform_id_from_nid(arg(1));

  $form_values = $form_data['multiforms_share'];

  // get email subect and body
  $query = "SELECT multiform_email_subject, multiform_email_body FROM {". MULTIFORM_TABLE ."} WHERE multiform_id='%d'";

  $result = db_query($query, $multiform_id);

  if ($result) {

    if ($row = db_fetch_object($result)) {

      // cycle through and send
      for ($index = 0; $index < 5; $index++) {

        $field_name = "email" . ($index + 1);

        if ($form_values['to'][$field_name]) {

          $from_address = ($form_values['from']['email']) ? $form_values['from']['email'] : variable_get('site_mail', '');

          // send email
          theme(
            'multiforms_mail_referral',
            $from_address,
            $form_values['to'][$field_name],
            $row->multiform_email_subject,
            $row->multiform_email_body
          );

          // if multiform is being shared by someone who has submitted a form,
          // add extra entries into the draw 
          if (
            $form_values['submission_id'] &&
            _multiforms_get_property($multiform_id, 'multiform_draw_entry_on_rererral')
          ) {

            _multiforms_add_draw_entry($multiform_id, $form_values['submission_id']);
          }
        }
      }
    }
  }

  return 'node/'. arg(1) .'/multiform/thanks';
}

function multiforms_thanks_page() {

  $multiform_id = _multiforms_get_multiform_id_from_nid(arg(1));

  multiforms_output_final_text(t(_multiforms_get_property($multiform_id, 'multiform_email_thanks')));
}

function theme_multiforms_mail_referral($from, $to, $subject, $body) {

  // If mimemail is installed, use it for mailing
  if (function_exists('mimemail')) {
    mimemail($from, $to, $subject, $body);
  }
  else {
    drupal_mail('multiforms_email_referral', $to, $subject, $body, $from);
  }
}

function multiforms_share_page($multiform_id) {

  print theme('page', drupal_get_form('multiforms_share', $multiform_id, $_SESSION['multiform_submission_id']));
}

function multiforms_view_section_page($section_id) {

  $output = '';

  $section_name = _multiforms_get_section_property($section_id, 'multiform_section_name');

  if ($section_name) {
    $output .= '<h1>'. t($section_name) .'</h1><p></p>';
  }

  $section_description = _multiforms_get_section_property($section_id, 'multiform_section_description');

  if ($section_description) {
    $output .= t($section_description) .'<p></p>';
  }

  $output .= drupal_get_form('multiforms_view_section', $section_id);

  print theme('page', $output);
}

function multiforms_view_section($section_id) {

  $multiform_id =  _multiforms_get_multiform_id_from_nid (arg(1));

  return _multiforms_render_section_fields($section_id, 'multiforms_view_section', $multiform_id);
}

function multiforms_view_section_submit($form_id, $form_values) {

  $output = '';

  $field_values = $form_values['multiforms_view_section'];

  _multiforms_submit_section_data($field_values['section_id'], $field_values);

  $multiform_id = _multiforms_get_multiform_id_from_nid(arg(1));

  // Submit actions, if any
  multiforms_view_submit_actions($field_values['section_id'], 'section', 'submit');

  $next_section_id = _multiforms_ui_next_section_id($multiform_id, $field_values['section_id']);
  $flow_type = _multiforms_get_property($multiform_id, 'multiform_flow_type');

  if ($flow_type == MULTIFORMS_FLOW_TYPE_NORMAL) {

    return 'node/'. arg(1) .'/multiform/sections';
  }
  elseif ($flow_type == MULTIFORMS_FLOW_TYPE_LINEAR) {

    if ($next_section_id) {

      return 'node/'. arg(1) .'/multiform/section/'. $next_section_id;
    }
    else {

      return 'node/'. arg(1) .'/multiform/complete';
    }
  }
}

function multiforms_view_submit_actions($parent_id, $parent_type, $parent_trigger) {

  $actions_performed = 0;

  $query = "SELECT * FROM {" . MULTIFORM_ACTION_TABLE . "} \r
    WHERE multiform_action_parent_id='%d' AND multiform_action_parent_type='%s' AND multiform_action_parent_trigger='%s'";

  $result = db_query($query, $parent_id, $parent_type, $parent_trigger);

  if ($result) {

    while ($action = db_fetch_object($result)) {

      multiforms_perform_action($action);
      $actions_performed++;
    }
  }

  return $actions_performed;
}

function multiforms_perform_action($action) {

  $action_function = $action->multiform_action_type;
  $params = unserialize($action->multiform_action_params);
  $node = node_load(arg(1));

  return (function_exists($action_function)) ?
    $action_function('do', $params, $node) :
    '';
}

function _multiforms_render_section_fields($section_id, $form_name = 'multiforms_view_section', $multiform_id = '') {

  $field_values = _multiforms_return_existing_section_data($section_id);

  $form = array();

  $form[$form_name] = array(
    '#type' => 'fieldset',
    '#title' => t($form_title),
    '#tree' => TRUE
  );

  if ($multiform_id) {
    $form[$form_name]['multiform_id'] = array(
      '#type' => 'hidden',
      '#value' => $multiform_id
    );
  }

  $multiform_name =
    _multiforms_get_property(
      _multiforms_get_section_property($section_id, 'multiform_section_multiform_id'), 'multiform_name'
    );
  $form['#attributes'] = array(
    'class' => 'multiform multiform_section multiform_'. $multiform_name .' multiform_'. $multiform_name .'_section multiform_'. $multiform_name .'_section_'. $section_id
  );

  $form[$form_name]['section_id'] = array(
    '#type' => 'hidden',
    '#value' => $section_id
  );

  $type_handlers = module_invoke_all('multiforms_field_handlers');

  $fields_output = 0;
  $show_submit = 0;

  $query = "SELECT * FROM {". MULTIFORM_FIELD_TABLE ."} WHERE multiform_field_section_id='%d' ORDER BY multiform_field_sortorder";

  $result = db_query($query, $section_id);

  if ($result) {

    while ($row = db_fetch_object($result)) {

      $handler = $type_handlers[$row->multiform_field_type];

      // Handle non-system field types
      if (function_exists($handler)) {

        $form[$form_name][$row->multiform_field_id] = $handler('form', $field_values[$row->multiform_field_id], $row);

        // This is a bit of a klude, to avoid exploding the stored value twice
        $form[$form_name][$row->multiform_field_id]['#default_value'] = $field_values[$row->multiform_field_id];
      }
      // Handle system field types
      else {

        $form_type = _multiforms_ui_field_form_type($row->multiform_field_type);
        $form[$form_name][$row->multiform_field_id] = array(
          '#title' => t($row->multiform_field_name),
          '#type' => $form_type,
          '#default_value' => $field_values[$row->multiform_field_id],
          '#description' => t($row->multiform_field_description)
        );
      }

      if ($row->multiform_field_validation_type == 'not_empty') {

        $form[$form_name][$row->multiform_field_id]['#required'] = TRUE;
      }

      $form[$form_name][$row->multiform_field_id]['#attributes'] = array(
        'class' => 'multiform multiform_field multiform_'. $multiform_name .' multiform_'. $multiform_name .'_field multiform_'. $multiform_name .'_field_'. $row->multiform_field_id
      );

      if ($row->multiform_field_type != 'markup') {
        $show_submit = 1;
      }

      $fields_output++;
    }
  }

  // If no fields have been output and section isn't primary, allow no form to be defined
  if (!$fields_output && $section_id > 0) {
    return;
  }

  // If section has any form fields or section is primary section, then show submit
  if ($show_submit || $section_id < 0) {
    $form[$form_name]['submit'] = theme('multiforms_section_form_submit_element', $multiform_id, $section_id);
  }

  return $form;
}

function theme_multiforms_section_form_submit_element($multiform_id, $section_id) {

  if ($section_id > 0) {
    $submit_button_text = _multiforms_get_section_property($section_id, 'multiform_section_submit_button_text');
  }
  else {
    $submit_button_text = _multiforms_get_property($multiform_id, 'multiform_submit_button_text');
  }

  $element_value = ($submit_button_text) ? t($submit_button_text) : t('Submit');

  return array(
    '#type' => 'submit',
    '#value' => $element_value
  );
}

function _multiforms_ui_field_form_type($field_type) {

  switch ($field_type) {
    case 'unique_text':
    case 'unique_phone':
      return 'textfield';
    default:
      return $field_type;
  }
}

function _multiforms_submit_section_data($section_id, $field_values) {

  $existing_field_values = _multiforms_return_existing_section_data($section_id);

  $type_handlers = module_invoke_all('multiforms_field_handlers');

  $query = "SELECT * FROM {". MULTIFORM_FIELD_TABLE ."} WHERE multiform_field_section_id='%d'";

  $result = db_query($query, $section_id);

  if ($result) {

    while ($row = db_fetch_object($result)) {

      $handler = $type_handlers[$row->multiform_field_type];

      if (function_exists($handler)) {

        $field_value = $handler('store', $field_values[$row->multiform_field_id]);
      }
      else {

        $field_value = $field_values[$row->multiform_field_id];
      }

      if (!($field_value === FALSE)) {
        if (!sizeof($existing_field_values)) {

          $query = "INSERT INTO {". MULTIFORM_FIELD_SUBMISSION_TABLE ."} \r
            (multiform_field_submission_parent_submission_id, \r
            multiform_field_submission_parent_field_id, \r
            multiform_field_submission_value) \r
            VALUES \r
            ('%d', '%d', '%s')";

          $result2 = db_query(
            $query,
            $_SESSION['multiforms_submission_id'],
            $row->multiform_field_id,
            $field_value
          );
        }
        else {

          $query = "UPDATE {". MULTIFORM_FIELD_SUBMISSION_TABLE ."} \r
            SET multiform_field_submission_value='%s' WHERE \r
            multiform_field_submission_parent_submission_id='%d' AND \r
            multiform_field_submission_parent_field_id='%d'";

          $result2 = db_query(
            $query,
            $field_value,
            $_SESSION['multiforms_submission_id'],
            $row->multiform_field_id
          );
        }
      }
    }
  }
}

function _multiforms_return_existing_section_data($section_id) {

  $type_handlers = module_invoke_all('multiforms_field_handlers');

  $field_values = array();

  if ($_SESSION['multiforms_submission_id']) {

    $query = "SELECT fs.*, f.multiform_field_type FROM {". MULTIFORM_FIELD_TABLE ."} AS f \r
      INNER JOIN {". MULTIFORM_FIELD_SUBMISSION_TABLE ."} AS fs \r
      ON f.multiform_field_id=fs.multiform_field_submission_parent_field_id \r
      WHERE f.multiform_field_section_id='%d' AND \r
      fs.multiform_field_submission_parent_submission_id='%d'";

    $result = db_query($query, $section_id, $_SESSION['multiforms_submission_id']);

    if ($result) {

      while ($row = db_fetch_object($result)) {

        $handler = $type_handlers[$row->multiform_field_type];

        if (function_exists($handler)) {

          $form_element = $handler('form', $row->multiform_field_submission_value, $row);
          $field_value = $form_element['#default_value'];
        }
        else {

          $field_value = $row->multiform_field_submission_value;
        }

        $field_values[$row->multiform_field_submission_parent_field_id] = 
          $field_value;
      }
    }
  }

  return $field_values;
}

function _multiforms_date_array_greater($this_date, $that_date) {

  return (strtotime($this_date) > strtotime($that_date));
}
