modules/multiforms/multiforms.module

<?php
// $Id: multiforms.module,v 1.44 2008/12/04 22:47:53 mcantelon Exp $

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

  $output= '';

  switch ($section)  {

    case "admin/modules#description":
      $output = t("Provides multi-page form functionality.");
      break;

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

    case 'node/add#multiform':
      $output = t("A multiform collects private user data through one or more forms.");
      break;
  }

  return $output;
}

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

  return array('access multiform administration');
}

/**
 * Implementation of hook_menu().
 */
function multiforms_menu($may_cache) {
  $items = array();

  if ($may_cache) {
  }
  else {

    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) .'/setup',
          'title' => t('Setup'),
          'weight' => '1',
          'callback' => 'multiforms_admin_edit_page',
          'callback arguments' => array(_multiforms_get_multiform_id_from_nid(arg(1))),
          'type' => MENU_LOCAL_TASK,
          'access' => user_access('access multiform administration')
        );

        $items[] = array('path' => 'node/'. arg(1) .'/sections',
          'title' => t('Forms'),
          'weight' => '3',
          'callback' => 'multiforms_admin_section_page',
          'callback arguments' => array(_multiforms_get_multiform_id_from_nid(arg(1)), arg(3)),
          'type' => MENU_LOCAL_TASK,
          'access' => user_access('access multiform administration')
        );

        $items[] = array('path' => 'node/'. arg(1) .'/sections/add',
          'title' => t('Add Section'),
          'callback' => 'multiforms_admin_section_add_page',
          'callback arguments' => array(_multiforms_get_multiform_id_from_nid(arg(1))),
          'type' => MENU_LOCAL_TASK,
          'access' => user_access('access multiform administration')
        );

       $items[] = array('path' => 'node/'. arg(1) .'/sections/promote',
          'title' => t('Promote Section'),
          'callback' => 'multiforms_admin_section_promote',
          'callback arguments' => array(arg(4)),
          'type' => MENU_CALLBACK_CUSTOM,
          'access' => user_access('access multiform administration')
        );

       $items[] = array('path' => 'node/'. arg(1) .'/sections/demote',
          'title' => t('Demote Section'),
          'callback' => 'multiforms_admin_section_demote',
          'callback arguments' => array(arg(4)),
          'type' => MENU_CALLBACK_CUSTOM,
          'access' => user_access('access multiform administration')
        );

       $items[] = array('path' => 'node/'. arg(1) .'/sections/delete',
          'callback' => 'multiforms_admin_section_delete_page',
          'callback arguments' => array(arg(4)),
          'type' => MENU_CALLBACK_CUSTOM,
          'access' => user_access('access multiform administration')
        );

        $items[] = array('path' => 'node/'. arg(1) .'/sections/fields/add',
          'title' => t('Add Field'),
          'callback' => 'multiforms_admin_field_add_page',
          'callback arguments' => array(arg(5)),
          'type' => MENU_CALLBACK_CUSTOM,
          'access' => user_access('access multiform administration')
        );

        $items[] = array('path' => 'node/'. arg(1) .'/sections/fields/edit',
          'title' => t('Edit Field'),
          'callback' => 'multiforms_admin_field_edit_page',
          'callback arguments' => array(arg(5)),
          'type' => MENU_CALLBACK_CUSTOM,
          'access' => user_access('access multiform administration')
        );

       $items[] = array('path' => 'node/'. arg(1) .'/sections/fields/promote',
          'title' => t('Promote Field'),
          'callback' => 'multiforms_admin_field_promote',
          'callback arguments' => array(arg(5)),
          'type' => MENU_CALLBACK_CUSTOM,
          'access' => user_access('access multiform administration')
        );

       $items[] = array('path' => 'node/'. arg(1) .'/sections/fields/demote',
          'callback' => 'multiforms_admin_field_demote',
          'callback arguments' => array(arg(5)),
          'type' => MENU_CALLBACK_CUSTOM,
          'access' => user_access('access multiform administration')
        );

       $items[] = array('path' => 'node/'. arg(1) .'/sections/fields/delete',
          'callback' => 'multiforms_admin_field_delete_page',
          'callback arguments' => array(arg(5)),
          'type' => MENU_CALLBACK_CUSTOM,
          'access' => user_access('access multiform administration')
        );

        $items[] = array('path' => 'node/'. arg(1) .'/submissions/draw',
          'title' => t('Draw'),
          'weight' => '1',
          'callback' => 'multiforms_admin_draw_page',
          'type' => MENU_LOCAL_TASK,
          'access' => user_access('access multiform administration')
        );

        $items[] = array('path' => 'node/'. arg(1) .'/submissions/export',
          'title' => t('Export'),
          'weight' => '2',
          'callback' => 'multiforms_admin_export_page',
          'type' => MENU_LOCAL_TASK,
          'access' => user_access('access multiform administration')
        );

        $items[] = array('path' => 'node/'. arg(1) .'/submissions/purge',
          'title' => t('Purge'),
          'weight' => '3',
          'callback' => 'multiforms_admin_purge_page',
          'type' => MENU_LOCAL_TASK,
          'access' => user_access('access multiform administration')
        );

        $items[] = array('path' => 'node/'. arg(1) .'/submissions',
          'title' => t('Submissions'),
          'weight' => '4',
          'callback' => 'multiforms_admin_submission_dispatch',
          'callback arguments' => array(arg(3), arg(4)),
          'type' => MENU_LOCAL_TASK,
          'access' => user_access('access multiform administration')
        );

        $items[] = array('path' => 'node/'. arg(1) .'/snippet/save',
          'title' => t('Save Snippet'),
          'callback' => 'multiforms_admin_snippet_save_page',
          'callback arguments' => array(arg(4)),
          'type' => MENU_CALLBACK_CUSTOM,
          'access' => user_access('access multiform administration')
        );

        $items[] = array('path' => 'node/'. arg(1) .'/snippet',
          'title' => t('Load Snippet'),
          'callback' => 'multiforms_admin_snippet_page',
          'callback arguments' => array(arg(3)),
          'type' => MENU_CALLBACK_CUSTOM,
          'access' => user_access('access multiform administration')
        );

        $items[] = array('path' => 'node/' . arg(1) . '/snippet/delete',
          'title' => t('Delete Snippet'),
          'callback' => 'multiforms_admin_snippet_delete_submit',
          'callback arguments' => array(arg(4)),
          'type' => MENU_CALLBACK_CUSTOM,
          'access' => user_access('access multiform administration')
        );

        $items[] = array('path' => 'node/' . arg(1) . '/multiforms/action',
          'title' => t('add action'),
          'callback' => 'multiforms_admin_action_page',
          'callback arguments' => array(arg(4)),
          'type' => MENU_CALLBACK_CUSTOM,
          'access' => user_access('access multiform administration')
        );

        $items[] = array('path' => 'node/' . arg(1) . '/multiforms/action/delete',
          'title' => t('delete action'),
          'callback' => 'multiforms_admin_action_delete_page',
          'callback arguments' => array(arg(5)),
          'type' => MENU_CALLBACK_CUSTOM,
          'access' => user_access('access multiform administration')
        );
      }
    }
  }

  return $items;
}

function _multiforms_return_form_array($form_name, $form_title, $submit_label, $multiform_id = '', $row = '') {

  $form = array();

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

  // Including title and body only in add form
  if ($form_name == 'multiforms_admin_add') {

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

    $form[$form_name]['body'] = array(
      '#title' => t('Body'),
      '#type' => 'textarea',
      '#description' => t('What text should be shown above the submission form?')
    );
  }

  $form[$form_name]['footer'] = array(
    '#title' => t('Footer Text'),
    '#type' => 'textarea',
    '#description' => t('What text should be shown under the submission form?')
  );

  $form[$form_name]['end_text'] = array(
    '#title' => t('Completion Text'),
    '#type' => 'textarea',
    '#description' => t('What text should be shown to the user upon multiform completion?')
  );

  $form[$form_name]['submit_button_text'] = array(
    '#title' => t('Submit Button Text'),
    '#type' => 'textfield',
    '#description' => t('Defaults to "Submit".')
  );

  $form[$form_name]['end_redirect'] = array(
    '#title' => t('Completion Redirection Path/URL'),
    '#type' => 'textfield',
    '#description' => t('Where should the user be redirected to upon multiform completion?')
  );

  $form[$form_name]['completion_submit_button_text'] = array(
    '#title' => t('Completion Submit Button Text'),
    '#type' => 'textfield',
    '#description' => t('Defaults to "Finish".')
  );

  $flow_options = array(
    MULTIFORMS_FLOW_TYPE_NORMAL => 'Normal',
    MULTIFORMS_FLOW_TYPE_LINEAR => 'Linear'
  );

  $form[$form_name]['flow_type'] = array(
    '#title' => t('Flow Type'),
    '#type' => 'select',
    '#options' => $flow_options,
    '#description' => t('If using sections, should there be a list of sections, allowing user to fill in select sections (normal flow), \r
      or should user be shown the next section immediately after one has been completed (linear flow)?')
  );

  $form[$form_name]['closing'] = array(
    '#type' => 'fieldset',
    '#title' => t('Closing Date'),
    '#collapsible' => TRUE,
    '#collapsed' => TRUE,
    '#tree' => TRUE,
  );

  $form[$form_name]['closing']['closing_date_enable'] = array(
    '#title' => t('Enable Closing Date'),
    '#type' => 'checkbox',
    '#description' => t('Should the multiform be closed for submissions at a certain date?')
  );

  $form[$form_name]['closing']['closing_date'] = array(
    '#title' => t('Closing Date'),
    '#type' => 'date',
    '#description' => t('At what date should the multiform be closed for submissions?')
  );

  $form[$form_name]['closing']['closing_time'] = array(
    '#title' => 'Closing Time',
    '#type' => 'textfield',
    '#description' => t('At what time should the multiform be closed for submissions (HH:MM:SS)?')
  );

  $form[$form_name]['closing']['closing_text'] = array(
    '#title' => 'Closing Text',
    '#type' => 'textarea',
    '#description' => t('What text should be shown when the multiform is closed for submissions?')
  );

  $form[$form_name]['completion'] = array(
    '#type' => 'fieldset',
    '#title' => t('Completion Criteria'),
    '#collapsible' => TRUE,
    '#collapsed' => TRUE,
    '#tree' => TRUE,
  );

  $form[$form_name]['completion']['threshold'] = array(
    '#title' => t('Completion Threshold'),
    '#type' => 'textfield',
    '#description' => t('How many section fields must be filled in before the multiform can be considered complete?')
  );

  $form[$form_name]['completion']['end_notification'] = array(
    '#title' => t('Notification Message'),
    '#type' => 'textarea',
    '#description' => t('What message should be shown to notify the user that they can complete their submission?')
  );

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

  $form[$form_name]['email']['allow'] = array(
    '#title' => t('Display Email Form'),
    '#type' => 'checkbox',
    '#description' => t('Would you like a form shown upon completion that allows the submitter to refer friends to the multiform?')
  );

  $form[$form_name]['email']['subject'] = array(
    '#title' => t('Email Subject'),
    '#type' => 'textfield',
    '#description' => t('What would you like the subject of any emails sent to be?')
  );

  $form[$form_name]['email']['body'] = array(
    '#title' => t('Email Body'),
    '#type' => 'textarea',
    '#description' => t('What would you like the body text of any emails sent to be?')
  );

  $form[$form_name]['email']['thank_you'] = array(
    '#title' => t('Thank-You Text'),
    '#type' => 'textarea',
    '#description' => t('After emails are sent, what text should be displayed?')
  );

  $form[$form_name]['draw'] = array(
    '#type' => 'fieldset',
    '#title' => t('Draw Entries'),
    '#collapsible' => TRUE,
    '#collapsed' => TRUE,
    '#tree' => TRUE,
  );

  $form[$form_name]['draw']['create_on_submission'] = array(
    '#title' => t('Create Draw Entries When Submitting?'),
    '#type' => 'checkbox',
    '#description' => t('Would you like a draw entry created for each submission?')
  );

  $form[$form_name]['draw']['create_on_referral'] = array(
    '#title' => t('Create Draw Entries When Referring?'),
    '#type' => 'checkbox',
    '#description' => t('Would you like a draw entry created for each email referral?')
  );

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

  if ($row) {

    $date_raw_array = explode('-', $row->multiform_closing_date);

    $date_array = array(
      'year'  => $date_raw_array[0],
      'month' => $date_raw_array[1],
      'day'   => $date_raw_array[2]
    );

    $form[$form_name]['name']['#default_value'] =
      $row->multiform_name;
    $form[$form_name]['friendly_name']['#default_value'] =
      $row->multiform_friendly_name;
    $form[$form_name]['body']['#default_value'] =
      'bodytext'. $row->multiform_description;
    $form[$form_name]['footer']['#default_value'] =
      $row->multiform_footer;
    $form[$form_name]['flow_type']['#default_value'] =
      $row->multiform_flow_type;

    $form[$form_name]['closing']['closing_date_enable']['#default_value'] =
      $row->multiform_closing_enabled;
    $form[$form_name]['closing']['closing_date']['#default_value'] =
      $date_array;
    $form[$form_name]['closing']['closing_time']['#default_value'] =
      $row->multiform_closing_time;
    $form[$form_name]['closing']['closing_text']['#default_value'] =
      $row->multiform_closing_text;
    $form[$form_name]['completion']['end_notification']['#default_value'] =
      $row->multiform_end_notification;
    $form[$form_name]['end_text']['#default_value'] =
      $row->multiform_end_text;
    $form[$form_name]['end_redirect']['#default_value'] =
      $row->multiform_completion_redirect;
    $form[$form_name]['submit_button_text']['#default_value'] =
      $row->multiform_submit_button_text;
    $form[$form_name]['completion_submit_button_text']['#default_value'] =
      $row->multiform_completion_submit_button_text;
    $form[$form_name]['completion']['threshold']['#default_value'] =
      $row->multiform_completion_threshold;
    $form[$form_name]['email']['allow']['#default_value'] =
      $row->multiform_email_allow;
    $form[$form_name]['email']['subject']['#default_value'] =
      $row->multiform_email_subject;
    $form[$form_name]['email']['thank_you']['#default_value'] =
      $row->multiform_email_thanks;
    $form[$form_name]['email']['body']['#default_value'] =
      $row->multiform_email_body;
    $form[$form_name]['draw']['create_on_submission']['#default_value'] =
      $row->multiform_draw_entry_on_submission;
    $form[$form_name]['draw']['create_on_referral']['#default_value'] =
      $row->multiform_draw_entry_on_rererral;

    $form[$form_name]['email']['allow']['#title'] .=
      ' ('. l('View', 'node/'. arg(1) .'/multiform/share/'. $multiform_id) .')';
  }

  return $form;
}

function multiforms_nodeapi(&$node, $op) {

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

    $query = "INSERT INTO {". MULTIFORM_TABLE ."} \r
      (nid, multiform_draw_entry_on_submission, multiform_draw_entry_on_rererral) VALUES ('%d', 1, 1)";

    $params = array($node->nid);

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

    if (!$result) {

      drupal_set_message('error', t('There was an error creating your multiform.'));
    }
    else {

      drupal_set_message(l(t('Edit setup here.'), 'node/'. $node->nid .'/setup'));

      $query = "SELECT multiform_id FROM {". MULTIFORM_TABLE ."} WHERE nid='%d'";

      $params = array($node->nid);

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

      if ($result) {

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

          drupal_set_message(l(
              t('Edit submission form here.'),
              'node/'. $node->nid .'/sections/'. (0 - $multiform->multiform_id)
          ));
        }
      }
    }
  }

}

function _multiforms_section_list($multiform_id) {

  $output = '';

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

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

  $rows = array();

  if ($result) {

    $row_count = db_num_rows($result);
    $count = 0;

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

      $field_count = 0;

      $query = "SELECT count(multiform_field_id) AS field_count FROM \r
        {". MULTIFORM_FIELD_TABLE ."} \r
        WHERE multiform_field_section_id='%d'";

      $result2 = db_query($query, $row->multiform_section_id);

      if ($result2) {

        if ($row2 = db_fetch_object($result2)) {

          $field_count = $row2->field_count;
        }
      }

      if (!$field_count) {

        $field_count = t('None');
      }

      if ($count) {

        $promote_link = l(t('Promote'), 'node/'. arg(1) .'/sections/promote/'. $row->multiform_section_id);
      }
      else {

        $promote_link = '';
      }

      if ($count < ($row_count - 1)) {
        $demote_link = l(t('Demote'), 'node/'. arg(1) .'/sections/demote/'. $row->multiform_section_id);
      }
      else {

        $demote_link = '';
      }

      $rows[] = array(
        $row->multiform_section_name .'&nbsp',
        $field_count .'&nbsp',
        l(t('Edit'), 'node/'. arg(1) .'/sections/'. $row->multiform_section_id) .'&nbsp;',
        l(t('Delete'), 'node/'. arg(1) .'/sections/delete/'. $row->multiform_section_id) .'&nbsp;',
        l(t('View'), 'node/'. arg(1) .'/multiform/section/'. $row->multiform_section_id) .'&nbsp;',
        $promote_link .'&nbsp;',
        $demote_link .'&nbsp;'
      );

      $count++;
    }
  }

  if ($row_count) {

    $headers = array(t('Name'), t('Fields'), '', '', '', '', '');

    $output .= theme_table($headers, $rows);
  }
  else {

    $output .= t('No sections yet created.') .'<p />';
  }

  $output .= '&raquo; '. l(t('Add New Section'), 'node/'. arg(1) .'/sections/add/'. $multiform_id);

  return $output;
}

function multiforms_admin_edit_page($multiform_id) {

  $output = '';

  $form_name = 'multiforms_admin_edit';

  $query = "SELECT * FROM {". MULTIFORM_TABLE ."} WHERE multiform_id='%d'";

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

  if ($result) {

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

      $output .= drupal_get_form('multiforms_admin_edit', $multiform_id, $row);

      if (module_exists('actions')) {

        $output .= multiforms_admin_actions('multiform', $multiform_id, t('These actions will occur upon multiform completion.'));
      }
    }
  }

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

function multiforms_admin_edit($multiform_id, $row) {

  return _multiforms_return_form_array('multiforms_admin_edit', 'Edit Multiform', 'Update', $multiform_id, $row);
}

function multiforms_admin_edit_submit($form_id, $form_data) {

  $field_values = $form_data[$form_id];

  $multiform_id = _multiforms_get_multiform_id_from_nid(arg(1));

  if ($multiform_id) {

    $query = "UPDATE {". MULTIFORM_TABLE ."} SET \r
      multiform_footer='%s', \r
      multiform_end_notification='%s', \r
      multiform_end_text='%s', \r
      multiform_completion_redirect='%s', \r
      multiform_submit_button_text='%s', \r
      multiform_completion_submit_button_text='%s', \r
      multiform_completion_threshold='%s', \r
      multiform_email_allow='%s', \r
      multiform_email_subject='%s', \r
      multiform_email_body='%s', \r
      multiform_email_thanks='%s', \r
      multiform_draw_entry_on_submission='%s', \r
      multiform_draw_entry_on_rererral='%s', \r
      multiform_closing_enabled='%d', \r
      multiform_closing_date='%s', \r
      multiform_closing_time='%s', \r
      multiform_closing_text='%s', \r
      multiform_flow_type='%d' \r
      WHERE multiform_id='%d'";

    $result = db_query(
      $query,
      $field_values['footer'],
      $field_values['completion']['end_notification'],
      $field_values['end_text'],
      $field_values['end_redirect'],
      $field_values['submit_button_text'],
      $field_values['completion_submit_button_text'],
      $field_values['completion']['threshold'],
      $field_values['email']['allow'],
      $field_values['email']['subject'],
      $field_values['email']['body'],
      $field_values['email']['thank_you'],
      $field_values['draw']['create_on_submission'],
      $field_values['draw']['create_on_referral'],
      $field_values['closing']['closing_date_enable'],
      _multiforms_implode_date($field_values['closing']['closing_date']),
      $field_values['closing']['closing_time'],
      $field_values['closing']['closing_text'],
      $field_values['flow_type'],
      $multiform_id
    );

    if ($result) {

      drupal_set_message(t('Multiform updated.'));
    }
    else {

      drupal_set_message(t('Error updating multiform!'), 'error');
    }
  }
  else {

    drupal_set_message(t('Could not find multiform associated with this node.'), 'error');
  }

  drupal_goto('node/'. arg(1) .'/view');
}

function multiforms_admin_delete($multiform_id) {

  $error_message                    = '';
  $multiform_deletion_error         = 0;
  $multiform_section_deletion_error = 0;
  $multiform_field_deletion_error   = 0;

  // purge data
  $purge_error_message = _multiforms_admin_do_purge($multiform_id);

  // delete multiform
  _multiforms_admin_delete('multiform', MULTIFORM_TABLE, 'multiform_id', $multiform_id);

  // delete multiform fields
  $query = "SELECT multiform_section_id \r
    FROM {". MULTIFORM_SECTION_TABLE ."} \r
    WHERE multiform_section_multiform_id='%d'";

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

  if ($result) {

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

      _multiforms_admin_delete('field', MULTIFORM_FIELD_TABLE, 'multiform_field_section_id', $row->multiform_section_id);
    }
  }

  // delete multiform sections
  if (!_multiforms_admin_delete('sections', MULTIFORM_SECTION_TABLE, 'multiform_section_multiform_id', $multiform_id)) {

    $multiform_section_deletion_error = 1;
  }

  drupal_goto('admin');
}

function _multiforms_return_section_overview_form_array($form_name) {

  $form = array();

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

  $form[$form_name]['submission']['link'] = array(
    '#type' => 'markup',
  );

  $form[$form_name]['section']['list'] = array(
    '#type' => 'markup',
  );

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

  $form[$form_name]['section']['list'] = array(
    '#title' => t('Section List'),
    '#type' => 'markup',
  );

  $form[$form_name]['section']['intro'] = array(
    '#title' => t('Section List Introduction/Header Text'),
    '#type' => 'textarea',
    '#description' => t('What text should be shown above the list of sections?')
  );

  $form[$form_name]['section']['footer'] = array(
    '#title' => t('Section List Footer Text'),
    '#type' => 'textarea',
    '#description' => t('What text should be shown below the list of sections?')
  );

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

  return $form;
}

function multiforms_admin_section_page($multiform_id, $section_to_edit = '') {

  if (is_numeric($section_to_edit)) {

    multiforms_admin_section_edit_page($section_to_edit);

  }
  else {

    $section_list_html = _multiforms_section_list($multiform_id);

    $query = "SELECT * FROM {". MULTIFORM_TABLE ."} WHERE multiform_id='%d'";

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

    if ($result) {

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

        $output .= drupal_get_form('multiforms_admin_section', $multiform_id, $section_list_html);
      }
    }

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

function multiforms_admin_section($multiform_id, $section_list_html) {

  $form = _multiforms_return_section_overview_form_array('multiforms_admin_section');
  $form_name = 'multiforms_admin_section';

  $form[$form_name]['submission']['link']['#value'] =
    '&raquo; '. l(t('Edit Submission Form'), 'node/'. arg(1) .'/sections/-'. $multiform_id);

  $form[$form_name]['section']['list']['#value'] = $section_list_html;

  $query = "SELECT multiform_section_text, multiform_section_footer \r
    FROM {". MULTIFORM_TABLE ."} \r
    WHERE multiform_id='%d'";

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

  if ($result) {

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

      $form[$form_name]['section']['intro']['#default_value'] =
        $row->multiform_section_text;
      $form[$form_name]['section']['footer']['#default_value'] =
        $row->multiform_section_footer;
    }
  }

  return $form;
}

function multiforms_admin_section_submit($form_id, $form_values) {

  $multiform_id = _multiforms_get_multiform_id_from_nid(arg(1));

  if ($multiform_id > 0) {

    $field_values = $form_values['section'];

    $query = "UPDATE {". MULTIFORM_TABLE ."} SET \r
      multiform_section_text='%s', \r
      multiform_section_footer='%s' \r
      WHERE multiform_id='%d'";

    $result = db_query($query,
      $field_values['intro'],
      $field_values['footer'],
      $multiform_id
    );

    if ($result) {

      drupal_set_message(t('Multiform section setup updated.'));
    }
    else {

      drupal_set_message(t('Error updating multiform section setup.'), 'error');
    }
  }

  $_POST = '';
  multiforms_admin_section_page($multiform_id);
}

function _multiforms_return_section_form_array($multiform_id, $form_name, $form_title, $submit_label) {

  $form = array();

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

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

  $form[$form_name]['name'] = array(
    '#title' => t('Name'),
    '#type' => 'textfield',
    '#required' => TRUE
  );

  $form[$form_name]['description'] = array(
    '#title' => t('Description'),
    '#type' => 'textarea'
  );

  $form[$form_name]['submit_button_text'] = array(
    '#title' => t('Submit Button Text'),
    '#type' => 'textfield',
    '#description' => t('Defaults to "submit".')
  );

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

  return $form;
}

function multiforms_admin_section_add_page($multiform_id) {

  $output = '';

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

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

function multiforms_admin_section_add($multiform_id) {

  return _multiforms_return_section_form_array($multiform_id, 'multiforms_admin_section_add', 'Add Section', 'Add');
}

function multiforms_admin_section_add_submit($form_id, $form_values) {

  $field_values = $form_values['multiforms_admin_section_add'];

  $next_sortorder = _multiforms_admin_get_new_sortorder('multiform_sections', 'multiform_section_sortorder', 'multiform_section_multiform_id', $field_values['multiform_id']);

  if ($next_sortorder) {

    $query = "INSERT INTO {". MULTIFORM_SECTION_TABLE ."} \r
      (multiform_section_multiform_id, multiform_section_name, multiform_section_description, \r
       multiform_section_submit_button_text, multiform_section_sortorder) \r
      VALUES ('%d', '%s', '%s', '%s', '%s')";

    $result = db_query(
      $query,
      $field_values['multiform_id'],
      $field_values['name'],
      $field_values['description'],
      $field_values['submit_button_text'],
      $next_sortorder
    );
  }
  else {

    drupal_set_message(t("Error: Couldn't generate next sortorder."), 'error');
  }

  multiforms_admin_section_page($field_values['multiform_id']);
}

function multiforms_admin_section_edit_page($section_id) {

  $output = "";

  $form_name = 'multiforms_admin_section_edit';

  // show name and description if not editing the submission form
  if ($section_id > 0) {

    $output .= drupal_get_form($form_name, $form);

    $output .= '<h3>'. t('Section Fields') .'</h3>';

  }
  else {

    $output .= '<h3>'. t('Submission Form Fields') .'</h3>';
  }

  $output .= _multiforms_admin_section_field_list($section_id);

  $output .= '&raquo; '. l(t('Add New Field'), 'node/'. arg(1) .'/sections/fields/add/'. $section_id);

  $output .= '<p />';

  $output .= drupal_get_form('multiforms_admin_snippet');

  if (module_exists('actions')) {

    $output .= multiforms_admin_actions('section', $section_id, t('These actions will occur upon form submission.'));
  }

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

function multiforms_admin_section_edit() {

  $form_name = 'multiforms_admin_section_edit';

  $query = "SELECT * FROM {". MULTIFORM_SECTION_TABLE ."} WHERE multiform_section_id='%d'";

  $result = db_query($query, arg(3));

  if ($result) {

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

      $form = _multiforms_return_section_form_array($row->multiform_section_multiform_id, $form_name, 'Edit Section', 'Update');

      $form[$form_name]['name']['#default_value'] = $row->multiform_section_name;
      $form[$form_name]['description']['#default_value'] = $row->multiform_section_description;
      $form[$form_name]['submit_button_text']['#default_value'] = $row->multiform_section_submit_button_text;

      return $form;
    }
  }
}

function multiforms_admin_section_edit_submit($form_id, $form_values) {

  $field_values = $form_values['multiforms_admin_section_edit'];

  $query = "UPDATE {". MULTIFORM_SECTION_TABLE ."} SET \r
    multiform_section_name='%s', \r
    multiform_section_description='%s', \r
    multiform_section_submit_button_text='%s', \r
    multiform_section_multiform_id='%d' \r
    WHERE multiform_section_id='%d'";

  $result = db_query(
    $query,
    $field_values['name'],
    $field_values['description'],
    $field_values['submit_button_text'],
    $field_values['multiform_id'],
    arg(3)
  );

  if ($result) {

    drupal_set_message(t('Section updated.'));
  }
  else {

    drupal_set_message(t('Error updating section!'), 'error');
    
  }

  multiforms_admin_section_page($field_values['multiform_id']);
}

function _multiforms_admin_section_field_list($section_id) {

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

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

  $rows = array();

  if ($result) {

    $row_count = db_num_rows($result);
    $count = 0;

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

      if ($count) {

        $promote_link = l(t('Promote'), 'node/'. arg(1) .'/sections/fields/promote/'. $row->multiform_field_id);
      }
      else {

        $promote_link = '';
      }

      if ($count < ($row_count - 1)) {

        $demote_link = l(t('Demote'), 'node/'. arg(1) .'/sections/fields/demote/'. $row->multiform_field_id);
      }
      else {

        $demote_link = '';
      }

      $rows[] = array(
        $row->multiform_field_name .'&nbsp;',
        $row->multiform_field_type .'&nbsp;',
        $row->multiform_field_validation_type .'&nbsp;',
        l(t('Edit'), 'node/'. arg(1) .'/sections/fields/edit/'. $row->multiform_field_id) .'&nbsp;',
        l(t('Delete'), 'node/'. arg(1) .'/sections/fields/delete/'. $row->multiform_field_id),
        $promote_link .'&nbsp;',
        $demote_link .'&nbsp;'
      );

      $count++;
    }
  }

  if ($row_count) {

    $headers = array('Name', 'Type', 'Validation', '', '', '', '');

    $output .= theme_table($headers, $rows);
  }
  else {

    $output .= t('No fields yet created. You should create one.') .'<p />';
  }

  return $output;
}

function _multiforms_implode_date($date_array) {

  return implode('-', $date_array);
}

function _multiforms_admin_change_sortorder($database_table, $primary_key_column, $primary_key_value, $sortcolumn, $sortaction, $parent_column, $parent_id) {

  if ($sortaction == "promote") {

    $sortorder = "ASC";
  }
  else {

    $sortorder = "DESC";
  }

  $query = "SELECT %s, %s FROM {%s} WHERE %s='%d' ORDER BY %s %s";

  $result = db_query($query, $sortcolumn, $primary_key_column, $database_table, $parent_column, $parent_id, $sortcolumn, $sortorder);

  $current_sortorder = 0;

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

    // check if we've reached target row
    if ($row->$primary_key_column == $primary_key_value) {

      $query = "UPDATE {%s} SET %s=%s WHERE %s='%d'";

      $result2 = db_query($query, $database_table, $sortcolumn, $previous_sortorder, $primary_key_column, $primary_key_value);
      $result2 = db_query($query, $database_table, $sortcolumn, $row->$sortcolumn, $primary_key_column, $previous_primary_key_value);
    }

    $previous_primary_key_value = $row->$primary_key_column;
    $previous_sortorder = $row->$sortcolumn;
  }
}

function _multiforms_admin_get_new_sortorder($database_table, $sortcolumn, $parent_column, $parent_id) {

  $query = "SELECT %s FROM {%s} WHERE %s='%d' ORDER BY %s DESC";

  $result = db_query($query, $sortcolumn, $database_table, $parent_column, $parent_id, $sortcolumn);

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

    $new_sortorder = $row->$sortcolumn + 1;
  }
  else {

    $new_sortorder = 1;
  }

  return $new_sortorder;
}

function multiforms_admin_section_promote($section_id) {

  $multiform_id  = _multiforms_get_multiform_id_from_nid (arg(1));

  _multiforms_admin_change_sortorder(
    'multiform_sections',
    'multiform_section_id',
    $section_id,
    'multiform_section_sortorder',
    'promote',
    'multiform_section_multiform_id',
    $multiform_id
  );

  drupal_set_message(t('Section promoted.'));

  drupal_goto('node/' . arg(1) . '/sections');
}

function multiforms_admin_section_demote($section_id) {

  $multiform_id  = _multiforms_get_multiform_id_from_nid (arg(1));

  _multiforms_admin_change_sortorder(
    'multiform_sections',
    'multiform_section_id',
    $section_id,
    'multiform_section_sortorder',
    'demote',
    'multiform_section_multiform_id',
    $multiform_id
  );

  drupal_set_message(t('Section demoted.'));

  drupal_goto('node/' . arg(1) . '/sections');