modules/casetracker_work/casetracker_work.module

<?php

define('CT_WORK_HOUR', 60 * 60);
define('CT_WORK_DAY', 60 * 60 * 24);
define('CT_WORK_WEEK', 60 * 60 * 24 * 7);

define('CT_WORK_STARTFIN', 0);
define('CT_WORK_DURATION', 1);
define('CT_WORK_STARTFIN_AND', 2);
define('CT_WORK_DURATION_AND', 3);


/**
 * Implementation of hook_help
 */
function casetracker_work_help($section) {
  switch ($section) {
  case 'admin/build/modules#description':
  return t('Keep track of time spent working.');
  }
}

/**
 * Implementation of hook_user().
 */
function casetracker_work_user($type, $edit, &$user, $category = NULL) {
  $rates = casetracker_work_get_rates(true);
  if ($type == 'form' && $category == 'account' && user_access('manage work and rates')) {
    // Present a form for selecting a default rate per user.
    $form['casetracker_work'] = array(
      '#type'=>'fieldset',
      '#title' => t('Case Tracker settings'),
      '#weight' => 6,
      '#collapsible' => true,
    );
    $form['casetracker_work']['casetracker_rate'] = array(
      '#type' => 'select',
      '#title' => t('Default rate type'),
      '#default_value' => strlen($edit['casetracker_rate']) ? $edit['casetracker_rate'] : '',
      '#options' => $rates,
      '#description' => t('Select the default rate for this user.'),
    );
  }
  return $form;
}

/**
 * Implementation of hook_perm().
 */
function casetracker_work_perm() {
  return array('manage work and rates', 'log work',);
}

/**
 * Implementation of hook_menu().
 */
function casetracker_work_menu($may_cache) {
  $items = array();
  if ($may_cache) {
    $items[] = array(
      'path' => 'casetracker/work/add', 'title' => t('Log time'),
      'access' => user_access('log work'),
      'callback' => 'casetracker_work_entry',
      'callback arguments' => array('add'),
      'type' => MENU_CALLBACK,
    );
    $items[] = array(
      'path' => 'casetracker/work/edit', 'title' => t('Edit time'),
      'access' => user_access('manage work and rates'),
      'callback' => 'casetracker_work_entry',
      'callback arguments' => array('edit'),
      'type' => MENU_CALLBACK,
    );
    $items[] = array(
      'access'             => user_access('administer case tracker'),
      'callback'           => 'drupal_get_form',
      'callback arguments' => array('casetracker_work_admin_settings'),
      'description' => t('Settings for casetracker work, timesheets.'),
      'path'               => 'admin/settings/casetracker_work',
      'title'              => t('Case Tracker work'),
    );
  }
  return $items;
}

function casetracker_work_admin_settings() {
  $form = array();
  $form['casetracker_work'] = array(
    '#type'          => 'fieldset',
    '#title'         => t('General settings'),
    '#collapsible'   => TRUE,
    '#collapsed'     => FALSE,
  );
  $form['casetracker_work_locked'] = array(
    '#type'          => 'fieldset',
    '#title'         => t('Settings edited in settings.php'),
    '#description'   => t('You need to edit the $conf array in settings.php. (This will not be necessary in future versions.)'),
    '#collapsible'   => TRUE,
    '#collapsed'     => FALSE,
  );

  $vocabs = array(0 => '-- N/A --');
  foreach (taxonomy_get_vocabularies() AS $v) {
    $vocabs[$v->vid] = $v->name;
  }

  foreach (node_get_types() AS $type) {
    $node_types[$type->type] = $type->name;
  }
  
//  $conf['casetracker_work_base_cost'] = 70;
  // Currency
  //$conf['casetracker_work_base_currency'] = 'AUD';
  // Default rate if none for user
//  $conf['casetracker_work_rate_default'] = 'L1';
  
  $rates = casetracker_work_get_rates(true);
  
  $form['casetracker_work']['casetracker_work_attach_types'] = array(
    '#type'              => 'select',
    '#multiple'          => TRUE,
    '#title'             => t('Relate work to'),
    '#default_value'     => variable_get('casetracker_work_attach_types', 'casetracker_basic_case'),
    '#options'           => $node_types,
    '#description'       => t('Work can be associated with these node types.'),
  );
  $form['casetracker_work']['casetracker_work_category'] = array(
    '#type'              => 'select',
    '#title'             => t('Categorize by taxonomy'),
    '#autocomplete_path' => 'casetracker/autocomplete',
    '#default_value'     => variable_get('casetracker_work_category', 0),
    '#options'           => $vocabs,
    '#description'       => t('Allow categorization of work by this vocabulary. Note that casetracker_work will look for a default by looking at the parent node.'),
  );
  $options_time_types = array(
    CT_WORK_STARTFIN => 'Start-Finish Only',
    CT_WORK_DURATION => 'Duration Only',
    CT_WORK_STARTFIN_AND => 'Start-Finish (Duration Optional)',
    CT_WORK_DURATION_AND => 'Duration (Start-Finish Optional)',
  );
  $form['casetracker_work']['casetracker_work_time_type'] = array(
    '#type'              => 'select',
    '#title'             => t('Data entry type'),
    '#default_value'     => variable_get('casetracker_work_time_type', 0),
    '#options'           => $options_time_types,
    '#description'       => t('Options for layout of time data entry.'),
  );

  // These values are locked while they are set in settings.php. They will be
  // unlocked once the rates logic is bedded down and the settings move to the database.
  $form['casetracker_work_locked']['casetracker_work_rate_default'] = array(
    '#type'              => 'select',
    '#title'             => t('Default rate'),
    '#disabled'          => true,
    '#options'           => $rates,
    '#default_value'     => $rates[variable_get('casetracker_work_rate_default', '')],
    '#description'       => t('Rate to use by default (if rate not found for current user).'),
  );
  $form['casetracker_work_locked']['casetracker_work_base_cost'] = array(
    '#type'              => 'textfield',
    '#size'              => 10,
    '#title'             => 'Base cost/hr',
    '#disabled'          => true,
    '#default_value'     => variable_get('casetracker_work_base_cost', 0),
  );
  $form['casetracker_work_locked']['casetracker_work_base_currency'] = array(
    '#type'              => 'textfield',
    '#size'              => 10,
    '#title'             => 'Base currency',
    '#disabled'          => true,
    '#default_value'     => variable_get('casetracker_work_base_currency', ''),
  );
  return system_settings_form($form);
}

/*
 * Get rates list.
 * @param $options bool
 *   If for an form select list.
 *
 */
function casetracker_work_get_rates($options = false) {
  $saved_rates = variable_get('casetracker_work_rates', array());
  foreach ($saved_rates as $rate) {
    $rates[$rate['code']] = ($options) ? $rate['title'] : $rate;
  }
  return $rates;
}

/*
 * Catch the casetracker/work/edit path and direct to the main work entry routine.
 *
 */
function casetracker_work_edit() {
  return casetracker_work_load(arg(3));
}

function casetracker_work_load($ctwid) {
  return db_fetch_object(db_query('SELECT * FROM casetracker_work WHERE ctwid = %d', $ctwid));
}

function casetracker_work_entry($op, $arg1 = null) {
  return drupal_get_form('casetracker_work_entry_form', $op, ($arg1) ? $arg1 : arg(3));
}
  

/*
 * This is the main work entry add/edit (also called by casetracker_work_edit).
 * @param $op string
 *   'add' = a new entry, $values must be a nid
 *   'edit' = edit an entry, $values must be a ctwid, or $values a work object by casetracker_work_load($ctwid)
 * @param $arg1 mixed
 *   a work object or a nid or a ctwid depending on op.
 *
 * Form values:                     Database values:
 * ------------                     ----------------
 * [ctwid] => 99                    `ctwid` = 99
 * [nid] => 9                       `nid` = 9
 * [activity] => Blah blah          `activity` = Blah blah
 * [date_start] => 2006-11-16       --
 * [start] => 21:00                 `start` = 1163088960
 * [finish] => 22:00                `finish` = 1163092620 (`finish` = 0 if the entry is duration only)
 * [date_finish] => 2006-11-16      --
 * [duration] => 1:00               `duration` = 3600
 * [uid] => Bon Jovi                 `uid` = 7
 * [rate] => L1                     `rate` = L1
 *
 */

function casetracker_work_entry_form($op, $arg1 = null) {

  global $user;

  // Prepare an array of the default values.
  $defaults = array();

  // Build some basic values
  if ($op == 'edit') {
    // Don't allow non admin to edit times 
    if (!user_access('manage work and rates')) {
      // TODO: better control of editing old times. Need a lock field in the table.
      return array();
    }
    $edit = true;
    if (is_numeric($arg1)) {
      $values = casetracker_work_load($arg1);
    }
    $defaults = (array)$values;
  }
  else {
    if (!user_access('log work')) {
      return array();
    }
    $edit = false;
    $defaults['nid'] = $arg1;
    $defaults['rate'] = (isset($user->casetracker_rate)) ? $user->casetracker_rate : variable_get('casetracker_work_rate_default', '');
    $defaults['activity'] = '';
  }

  // Get the type and name of the default node
  if (is_numeric($defaults['nid'])) {
    $node = node_load($defaults['nid']);
  }
  if (!isset($node->type)) {
    drupal_set_message('Error, unable to determine a parent node for this work entry.', 'error');
    return array();
  }    

  $defaults['title'] = $node->title;
  $defaults['type'] = $node->type;
  $defaults['type_name'] = node_get_types('name', $defaults['type']);

  // Determine the project info if applicable
  $defaults['project'] = 0;
  if (casetracker_work_project_types($defaults['type'])) {
    // Find the parent project for the taxonomy default and list of cases.
    $defaults['project'] = db_result(db_query('SELECT pid FROM {casetracker_case} WHERE nid = %d', $defaults['nid']));
  }

  // Find a vocab to use if applicable
  $vid = variable_get('casetracker_work_category', 0);

  if ($vid) {
    // We have a vocabulary associated with a work entry. Build the select list.
    $term_options = array();
    $result = db_query('SELECT td.tid, td.name FROM term_data AS td WHERE td.vid = %d ORDER BY weight, name', $vid);
    while ($row = db_fetch_object($result)) {
      $term_options[$row->tid] = $row->name;
    }

    if ($edit) {
      $defaults['tid'] = $values->tid;
    }
    else {
      // Look for a default term to apply to this work, by looking for an
      // existing vocab/term on the node (usually the 'case' node).
      // Define the query.
      $get_term_qry =
        'SELECT td.tid
        FROM {node} AS n
        INNER JOIN {term_node} AS tn ON n.nid = tn.nid
        INNER JOIN {term_data} AS td ON tn.tid = td.tid
        INNER JOIN {vocabulary} AS v ON td.vid = v.vid
        WHERE n.nid = %d AND v.vid = %d';

      // Look at the node to which we are attaching this work entry.
      $defaults['tid'] = db_result( db_query($get_term_qry, $defaults['nid'], $vid));

      // If the node type we are attaching to is a 'case' and we haven't found an
      // appropriate term yet, look at the case's project node.
      if (!$defaults['tid'] && $defaults['project']) {
        $defaults['tid'] = db_result( db_query($get_term_qry, $defaults['project'], $vid));
      }
    }
  }
  /*
   * Finish finding default term.
   */

  // Determine if this is a duration time entry.
  if ($op == 'edit') {
    $duration = ($values->finish == 0) ? TRUE : FALSE;
    // Some extra logic to raise a watchdog warning if the entry being edited
    // contravenes current settings. (Eg. settings allow only Duration,
    // but we are editing a Start-finish entry from the database.
    // After raising the warning, we make the data entry page look nice,
    // however this will fail in the validation unless the user changes the
    // values appropriately.
    $time_type = variable_get('casetracker_work_time_type', CT_WORK_DURATION_AND);
    if ($duration && ($time_type == CT_WORK_STARTFIN)) {
      watchdog('casetracker', 'A work entry has been viewed/edited that is a Duration entry, however current casetracker_case settings stipulate that only Start-Finish entries are allowed', WATCHDOG_WARNING, l('view', 'casetracker/work/edit/'. $defaults['ctwid']));
      $time_type = CT_WORK_STARTFIN_AND;
      $duration = !$duration;
    }
    elseif (!$duration && ($time_type == CT_WORK_DURATION)) {
      watchdog('casetracker', 'A work entry has been viewed/edited that is a Start-Finish entry, however current casetracker_case settings stipulate that only Start-Finish entries are allowed', WATCHDOG_WARNING, l('view', 'casetracker/work/edit/'. $defaults['ctwid']));
      $time_type = CT_WORK_DURATION_AND;
      $duration = !$duration;
    }
  }
  else {
    $time_type = variable_get('casetracker_work_time_type', CT_WORK_DURATION_AND);
    $duration = ($time_type == CT_WORK_DURATION_AND || $time_type == CT_WORK_DURATION) ? TRUE : FALSE;
  }

  // Calculate date/time in timestamps/seconds.
  // Use the $clock array to store the raw time data (database format).
  // Then use the $input array to store the default visible data-entry values.

  $clock = array();
  if ($edit && $duration) {
    // Editing a database duration entry.
    $clock['start'] = $values->start;
    $clock['duration'] = $values->duration;
  }
  elseif ($edit && !$duration) {
    // Editing a database start-finish entry.
    $clock['start'] = $values->start ;
    $clock['finish'] = $values->finish;
  }
  elseif (!$edit && !$duration) {
    // Editing a new start-finish entry.
    $clock['start'] = _casetracker_work_time_round(time(), 'down', 'hour');
    $clock['finish'] = $clock['start'] + (CT_WORK_HOUR);
  }
  else {
    // Editing a new duration entry.
    $clock['start'] = _casetracker_work_time_round(time(), 'down', 'hour');
    $clock['duration'] = CT_WORK_HOUR;
  }

  // Calculate form values in human-readable format.
  $input = array();
  $input['date_start'] = format_date($clock['start'], 'custom', 'Y-m-d');
  $input['start'] = ($duration) ? '' : format_date($clock['start'],'custom','H:i');
  $input['finish'] = ($duration) ? '' : format_date($clock['finish'],'custom','H:i');
  $input['date_finish'] = ($duration) ? '' : format_date($clock['finish'], 'custom', 'Y-m-d');
  $input['duration'] = ($duration) ? _casetracker_work_seconds_display($clock['duration'], 'hh:mm') : '';

  $form['work']['ctwid'] = array(
    '#type' => 'hidden',
    '#default_value' => $defaults['ctwid'],
  );

  $form['work']['nid'] = array(
    '#type' => 'hidden',
    '#default_value' => $defaults['nid'],
  );
  drupal_set_title(t('Add time to ') . t($defaults['type_name']));
  $form['work']['activity'] = array(
    '#type' => 'textfield',
    '#title' => t('Activity summary'),
    '#required' => TRUE,
    '#default_value' => $values->activity,
    '#rows' => 1,
    '#maxlength' => 2048,
  );

  if ($vid) {
    $form['work']['tid'] = array(
      '#type' => 'select',
      '#title' => t('Category'),
      '#required' => TRUE,
      '#options' => $term_options,
      '#default_value' => $defaults['tid'],
    );
  }
  else {
    $form['work']['tid'] = array(
      '#type' => 'hidden',
      '#default_value' => 0,
    );
  }
  $form['work']['rate'] = array(
    '#type' => 'select',
    '#title' => t('Rate'),
    '#weight' => 11,
    '#options' => casetracker_work_get_rates(true),
    '#default_value' => ($edit) ? $defaults['rate'] : $user->casetracker_rate,
    '#description' => t('Hourly rate based on agreed terms.'),
  );
  $form['work']['date_start'] = array(
    '#type' => 'textfield',
    '#title' => ($duration) ? t('Date') : t('Start date'),
    '#required' => TRUE,
    '#maxlength' => 12,
    '#size' => 20,
    '#default_value' => $input['date_start'],
    '#description' => t('Enter yyyy-mm-dd'),
  );
  $form['work']['start'] = array(
    '#type' => 'textfield',
    '#title' => t('Start'),
    '#maxlength' => 8,
    '#size' => 20,
    '#default_value' => $input['start'],
    '#description' => t('Enter hh:mm'),
  );
  $form['work']['finish'] = array(
    '#type' => 'textfield',
    '#title' => t('Finish'),
    '#maxlength' => 8,
    '#size' => 20,
    '#default_value' => $input['finish'],
    '#description' => t('Enter hh:mm'),
  );
  $form['work']['date_finish'] = array(
    '#type' => 'textfield',
    '#title' => t('Finish date'),
    '#maxlength' => 12,
    '#size' => 20,
    '#default_value' => $input['date_finish'],
    '#description' => t('Enter yyyy-mm-dd'),
  );
  $form['work']['duration'] = array(
    '#type' => 'textfield',
    '#size' => 20,
    '#title' => 'Duration',
    '#default_value' => $input['duration'],
    '#description' => t('Enter duration as <em>h:mm</em>, <em>mm</em>, <em>h,mm</em> etc.'),
  );

  $form['work']['extra'] = array(
    '#type' => 'fieldset',
    '#title' => t('Optional information'),
    '#collapsible' => TRUE,
    '#collapsed' => TRUE,
  );

  // Worker/rate are can be set
  $form['work']['extra']['uid'] = array(
    '#type' => 'textfield',
    '#title' => t('Person'),
    '#size' => 20,
    '#weight' => 10,
    '#disabled' => !user_access('manage work and rates'),
    '#autocomplete_path' => 'casetracker/autocomplete',
    '#default_value' => ($edit) ? casetracker_get_name($defaults->uid) : $user->name,
  );

  // Information for theming.
  $form['theme']['#duration'] = $duration;
  $form['theme']['#vid'] = $vid;
  $form['theme']['#clock'] = $clock;
  $form['theme']['#defaults'] = $defaults;

  $form['work']['submit'] = array(
    '#type' => 'submit',
    '#value' => t('Save time'),
  );

  // Modify the form array based on the data-entry type specified
  // in the casetracker_work settings.

  // Modify form based on duration-entry only.
  if ($time_type == CT_WORK_DURATION) {
    $form['work']['duration']['#required'] = TRUE;
    $form['work']['start']['#type'] = 'hidden';
    $form['work']['finish']['#type'] = 'hidden';
    $form['work']['date_finish']['#type'] = 'hidden';
  }
  // Modify form based on start-finish-entry only.
  if ($time_type == CT_WORK_STARTFIN) {
    $form['work']['start']['#required'] = TRUE;
    $form['work']['finish']['#required'] = TRUE;
    $form['work']['date_finish']['#required'] = TRUE;
    $form['work']['duration']['#type'] = HIDDEN;
  }
  // Modify form based on duration-entry preferred.
  if ($time_type == CT_WORK_DURATION_AND) {
    // This won't be necessary when javascript is added to automatically
    // remove the other values if duration is entered as an over-ride:
    $form['work']['start']['#description'] = $form['work']['start']['#description'] .'<br /><strong>Note:</strong> To enter start-finish times instead of duration, you need to delete the value from the duration field';
    $form['work']['extra']['start'] = $form['work']['start'];
    $form['work']['extra']['finish'] = $form['work']['finish'];
    $form['work']['extra']['date_finish'] = $form['work']['date_finish'];
    unset($form['work']['start']);
    unset($form['work']['finish']);
    unset($form['work']['date_finish']);
  }
  // Modify form based on start-finish-entry preferred.
  if ($time_type == CT_WORK_STARTFIN_AND) {
    // This won't be necessary when javascript is added to automatically
    // remove the other values if duration is entered as an over-ride:
    $form['work']['duration']['#description'] = $form['work']['duration']['#description'] .'<br /><strong>Note:</strong> To enter a duration you need to delete the times from the Start & Finish Fields';
    $form['work']['extra']['duration'] = $form['work']['duration'];
    unset($form['work']['duration']);
  }

  return $form;
}

/*
 */
function theme_casetracker_work_entry_form(&$form) {
  /*
   * Style here for development purposes
   * move to appropriate style sheet later.(?)
   */

  // Themers: useful display data can found on the $form['theme'] element.

  drupal_set_title('Record work on '. $form['theme']['#defaults']['type_name']);

  $output .= '<div class="casetracker-work">';

  $output .= '<h3>'. $form['theme']['#defaults']['title'] .'</h3>';

  $rows = array();
  if ($form['theme']['#duration']) {
    $rows[1] = array();
    if ($form['theme']['#vid']) {
      $rows[2][] = drupal_render($form['work']['tid']);
    }
    $rows[2][] = drupal_render($form['work']['date_start']);
    $rows[2][] = drupal_render($form['work']['duration']);
    $rows[2][] = drupal_render($form['work']['rate']);
    $rows[1][] = array('data' => drupal_render($form['work']['activity']), 'colspan' => count($rows[2]),);
  }
  else {
    // First row.
    $r = array();
    if ($form['theme']['#vid']) {
      $r[] = drupal_render($form['work']['tid']);
      $r[] = array('data' => drupal_render($form['work']['activity']), 'colspan' => 3, );
    }
    else {
      $r[] = array('data' => drupal_render($form['work']['activity']), 'colspan' => 4, );
    }
    $rows[] = $r;
    // Second row.
    $r = array();
    $r[] = drupal_render($form['work']['date_start']);
    $r[] = drupal_render($form['work']['start']);
    $r[] = drupal_render($form['work']['finish']);
    $r[] = drupal_render($form['work']['date_finish']);
    $rows[] = $r;
  }

  $output .= theme('table', array(), $rows);

  $output .= drupal_render($form);
  $output .= '</div>';
  return $output;
}


function casetracker_work_entry_form_validate($form_id, &$values) {

  // TODO: make sure that worker and rate are default if user cannot administer resources

  // Perform the conversions used by _submit which will trigger various errors.
  _casetracker_work_string_to_timestamp($values['date_start'],'date');

  // Check for either start-finish or duration scenario.
  // Eg. don't test for an end-time if it's a duration entry only.
  $enough_startfin = ($values['date_start'] && $values['start'] && $values['finish']) ? TRUE : FALSE;
  $enough_duration = ($values['date_start'] && $values['duration']) ? TRUE : FALSE;

  $date_start = _casetracker_work_string_to_timestamp($values['date_start'],'date');

  switch (variable_get('casetracker_work_time_type', CT_WORK_DURATION_AND)) {
    case CT_WORK_DURATION:
      if (!$enough_duration) {
        form_set_error('work', t('Date and duration required.'));
      }
      _casetracker_work_string_to_timestamp($values['duration'], 'duration');
      break;

    case CT_WORK_STARTFIN:
      if (!$enough_startfin) {
        form_set_error('work', t('Date and start/finish times are required.'));
      }
      $date_finish = _casetracker_work_string_to_timestamp($values['date_finish'],'date');
      _casetracker_work_string_to_timestamp($values['start'], 'time', $date_start);
      _casetracker_work_string_to_timestamp($values['finish'], 'time', $date_finish);
      break;

    case CT_WORK_DURATION_AND:
    case CT_WORK_STARTFIN_AND:
      if ($enough_duration) {
        _casetracker_work_string_to_timestamp($values['duration'], 'duration');
      }
      elseif ($enough_startfin) {
        $date_finish = _casetracker_work_string_to_timestamp($values['date_finish'],'date');
        _casetracker_work_string_to_timestamp($values['start'], 'time', $date_start);
        _casetracker_work_string_to_timestamp($values['finish'], 'time', $date_finish);
      }
      else {
        form_set_error('work', (CT_WORK_DURATION_AND) ? t('CDate and duration required.') : t('DDate and start/finish times are required.'));
      }
  }
  if (!casetracker_get_uid($values['uid'])) {
    form_set_error('work', 'Invalid user name.');
  }

}

function casetracker_work_entry_form_submit($form_id, &$values) {
  // Determine which type of time entry we have.
  // Assume values are already checked in _validate.

  // Determine the type of entry we are making, "start-finish" or "duration".
  $time_type = variable_get('casetracker_work_time_type', CT_WORK_DURATION_AND);

  // Make a firm decision about the type of entry if we happen to be unsure.
  switch ($time_type) {
    case CT_WORK_DURATION_AND:
      $enough_duration = ($values['date_start'] && $values['duration']) ? TRUE : FALSE;
      $time_type = ($enough_duration) ? CT_WORK_DURATION : CT_WORK_STARTFIN;
      break;
    case CT_WORK_STARTFIN_AND:
      $enough_startfin = ($values['date_start'] && $values['start'] && $values['finish']) ? TRUE : FALSE;
      $time_type = ($enough_startfin) ? CT_WORK_STARTFIN : CT_WORK_DURATION;
      break;
  }

  // We always need the start date.
  $date_start = _casetracker_work_string_to_timestamp($values['date_start'],'date');

  // Convert other strings to timestamps or seconds.
  if ($time_type == CT_WORK_DURATION) {
    $db['seconds'] = _casetracker_work_string_to_timestamp($values['duration'], 'duration');
    $db['start'] = $date_start;
  }
  else {
    $date_finish = _casetracker_work_string_to_timestamp($values['date_finish'],'date');
    $db['start'] = _casetracker_work_string_to_timestamp($values['start'], 'time', $date_start);
    $db['finish'] = _casetracker_work_string_to_timestamp($values['finish'], 'time', $date_finish);
    $db['seconds'] = $db['finish'] - $db['start'];
  }


  $db['uid'] = casetracker_get_uid($values['uid']);

  if ($values['ctwid'] == 0) {

    db_query("INSERT INTO {casetracker_work}
              (activity, nid, uid, tid, start, finish, duration, rate)
              VALUES ('%s', %d, %d, %d, %d, %d, %d, '%s')",
              $values['activity'], $values['nid'], $db['uid'], $values['tid'],
              $db['start'], $db['finish'], $db['seconds'], $values['rate']);
  }
  else {
    db_query("UPDATE {casetracker_work}
              SET activity = '%s', nid = %d, uid = %d, tid = %d,
              start = %d, finish = %d,
              duration = %d, rate = '%s'
              WHERE ctwid = %d",
              $values['activity'], $values['nid'], $db['uid'], $values['tid'],
              $db['start'], $db['finish'], $db['seconds'],
              $values['rate'], $values['ctwid']);
  }

  drupal_goto('node/'. $values['nid']);
}

function casetracker_work_link($type, $node = NULL, $teaser = FALSE) {

  if ($type != 'node' || !user_access('log work')) {
    return;
  }
  $valid_types = variable_get('casetracker_work_attach_types', array('casetracker_basic_case' => 'casetracker_basic_case'));
  if (isset($valid_types[$node->type])) {
    $links = array();
    $links['casetrack_work_add_work'] = array(
      'href' => "casetracker/work/add/$node->nid",
      'title' => t('Log time'),
    );
  }
  return $links;
}

/**
 * Implementation of hook_delete().
 */
function casetracker_work_delete($node) {
  db_query('DELETE FROM {casetracker_work} WHERE nid=%d', $node->casetracker_work->nid);
}

/*
 * Time rounding for various uses, especially default form inputs
 * for user convenience.
 *
 */

function _casetracker_work_time_round($timestamp, $op, $interval) {

  $time_values = array('z','w','j','H','i','s');
  $time_string = format_date($timestamp, 'custom', implode(',', $time_values));
  $t = array_combine( $time_values, explode(',', $time_string) );

  switch ($op) {
    case 'down':
      switch ($interval) {
        case 'hour':
          return $timestamp - ($t['i']*60) - $t['s'];
          break;
        default:
          return 0;
      }
    default:
      return 0;
  }
}

/*
 * Get hour minute second in an array for fine handling.
 * If there is a $format argument then return the elements
 * in the desired format.
 *
 * If there is a better function for this I'm interested.
 * Core format_interval() seems too wordy.
 * Avoid date() and format_date() to avoid timezone shifts.
 *
 */
function _casetracker_work_seconds_display($seconds, $format = 'array') {

  $time['day'] = (int)($seconds / CT_WORK_DAY);
  $seconds = ($seconds % CT_WORK_DAY);
  $time['hour'] = (int)($seconds / CT_WORK_HOUR);
  $seconds = ($seconds % CT_WORK_HOUR);
  $time['minute'] = (int)($seconds / 60);
  $time['second'] = ($seconds % 60);

  switch ($format) {
    case 'array':
      return $time;
      break;
    case 'hh:mm':
      // Nice and clear: format seconds in hh:mm without timezone effects.
      return ($time['day'] * 24) + $time['hour'] .':'. str_pad($time['minute'], 2, "0", STR_PAD_LEFT);
      break;
   }
}

/*
 * We want to give the user flexibility entering data,
 * so we expect a narrow range of formats and a wide range of
 * delimiters.
 */
function _casetracker_work_string_to_timestamp($time_string, $op, $date_timestamp = NULL) {

  if ($op == 'time' && (!isset($date_timestamp) || !is_numeric($date_timestamp))) {
//    dpr(ddebug_backtrace()); die();
    form_set_error ('work', t('API error. Missing the date parameter used for creating a timestamp from hh:mm.'));
    return 0;
  }

  $chars = array(':', ',', '.', '-', '/', ' ');
  $time_string = str_replace($chars, ',', $time_string);
  $time_string = str_replace(',,', ',', $time_string);

  if ($op == 'duration' && strpos($time_string, ',') === false) {
    $time_string = ','. $time_string;
  }

  $t = explode(',', $time_string);

  switch ($op) {
    case 'date':
      // Accept only yyyymmdd for now
      // TODO: user setting for preferred format.
      if (count($t) != 3 || $t[0] < 2000 || $t[1] > 12 || $t[2] > 31) {
        form_set_error ('work', t('Please use yyyy/mm/dd format for dates.'));
        return 0;
      }
      else {
        // TODO: Make this local time, not GMT
        global $user;
        return gmmktime (0, 0, 0, $t[1], $t[2], $t[0]) - $user->timezone;
      }

    case 'duration':
      // One value is minutes, two values is hour, minutes
      if ($t[1] > 59 || count($t) > 2) {
        form_set_error ('work', t('Please enter duration only in hh:mm format, even for multiple days.'));
        return 0;
      }
      else {
        return ($t[0] * CT_WORK_HOUR) + ($t[1] * 60);
      }
    case 'time':
      // Only accept two values being hour, minutes.
      if ($t[0] > 23 || $t[1] > 59 || count($t) != 2) {
        form_set_error ('work', 'Time should be hh:mm in 24hr format only.');
        return 0;
      }
      else {
        return $date_timestamp + ($t[0] * CT_WORK_HOUR) + ($t[1] * 60);
      }
  }

  return $time;
}

// Simple utility for checking a project type. Should be supplied by ct
function casetracker_work_project_types($check_type = null) {
  $types = variable_get('casetracker_project_node_types', 'casetracker_basic_project');
  foreach ($types as $t => $type) {
    if (!$type) {
      unset($types[$t]);
    }
  }
  if ($check_type) {
    return isset($types[$check_type]);
  }      
  return $types;
}

function casetracker_work_allow_edit($ctwid = 0) {
 // if a manager, then allow
 return user_access('manage work and rates');
 // if a owner then allow if not locked
}

// ----------------------------------------------------------------------------
// Views hooks

/**
 * Implementation of hook_views_tables()
 */
function casetracker_work_views_tables() {
  $tables['casetracker_work'] = array(
    'name' => 'casetracker_work',
    'join' => array(
      'left' => array(
        'table'     => 'node',
        'field'     => 'nid'
      ),
      'right' => array(
        'field'     => 'nid'
      )
    ),
    'fields' => array(
      'ctwid' => array(
        'name'      => t('Work: Work ID'),
      ),
      'uid' => array(
        'name' => t('Work: User'),
        'handler'    => 'casetracker_work_handler_user_name',
        'sortable'  => true,
        'help'       => t('Display the user of this work entry.'),
      ),
      'start' => array(
        'name' => t('Work: Start'),
        'sortable' => true,
        'handler' => views_handler_field_dates(),
        'option' => 'string',
        'help' => t('Display the work start time.'),
      ),
      'duration' => array(
        'name' => t('Work: Duration'),
        'handler' => 'casetracker_work_handler_duration',
        'help' => t('Display the work duration.'),
      ),
      'rate' => array(
        'name' => t('Work: Rate'),
        'sortable'  => true,
      ),
      'activity' => array(
        'name' => t('Work: Activity'),
      ),
      'edit' => array(
         'name' => t('Work: Edit link'),
         'handler' => 'casetracker_work_handler_edit_link',
         'notafield' => TRUE,
         'addlfields' => array('ctwid'),
         'help' => t('Display a link to edit work entry.'),
       ),
    ),
    'sorts' => array(
      'sku' => array(
        'name' => t('Product: SKU'),
      ),
      'price' => array(
        'name' => t('Product: Price'),
      )
    ),
    'filters' => array(
      'has_work' => array(
        'name'      => 'Work: Has work',
        'operator' => array('=' => 'Equals'),
        'list' => 'views_handler_operator_yesno',
        'list-type' => 'select',
        'handler' => 'casetracker_work_handler_filter_has_work',
      ),
      'uid' => array(
        'help'       => t('Filter by user.'),
        'list'       => 'casetracker_work_handler_user_options',
        'name'       => t('Work: User'),
        'operator'   => views_handler_operator_andor(),
        'value-type' => 'array',
      ),
      'assign_to_currentuid' => array(
        'list'	     => 'views_handler_filter_usercurrent',
        'list-type'  => 'select',
        'name'	     => t('Work: Current user'),
        'field'	     => 'uid',
        'operator'   => 'views_handler_operator_eqneq',
        'help'       => t('Filter work by the current user.'),
      ),
    ),
  );
  return $tables;
}

/**
 * display a link to edit a work entry with a destination return
 */
function casetracker_work_handler_edit_link($fieldinfo, $fielddata, $value, $data) {
  // try to build a fake node object
  if (casetracker_work_allow_edit()) {
    $link_text = t('Edit');
    return l($link_text, "casetracker/work/edit/{$data->casetracker_work_ctwid}", NULL, drupal_get_destination());
  }
}

/**
 * Show the work entry user
 */
function casetracker_work_handler_user_name($fieldinfo, $fielddata, $value, $data) {
  return l(casetracker_get_name($data->casetracker_work_uid), "user/{$data->casetracker_work_uid}");
}

/**
 * Format duration.
 */
function casetracker_work_handler_duration($fieldinfo, $fielddata, $value, $data) {
  return _casetracker_work_seconds_display($data->casetracker_work_duration, 'hh:mm');
}

function casetracker_work_handler_user_options() {
  $results = db_query('SELECT u.uid, u.name FROM {users} AS u INNER JOIN {casetracker_work} AS ctw ON u.uid = ctw.uid WHERE u.uid > 0 ORDER BY u.name');
  while ($result = db_fetch_object($results)) {
    $options[$result->uid] = check_plain($result->name);
  }
  return $options;
}


/**
 * Filter Nodes based on being a product.
 */
function casetracker_work_handler_filter_has_work($op, $filter, $filterinfo, &$query) {
  switch ($op) {
    case 'handler':
      $query->ensure_table('casetracker_work');
      switch ($filter['value'][0]) {
        case '0':
          $query->add_where('casetracker_work.ctwid IS NULL');
          break;

        case '1':
          $query->add_where('casetracker_work.ctwid IS NOT NULL');
          break;
      }
      break;
  }
}


/*
 * Timesheet display, just a simple search results. This will suffice for a
 * short time.
 *
 * Maybe will be a good idea to separate function to return a range of data,
 * so that this can be called from anywhere (eg. case summary).
 *
 * I don't know whether views can be used to display this info.
 *
 * Not showing project data here, because casetracker_work lets you assign
 * work to multiple node types, so project data might not be appropriate.
 *
function casetracker_work_report_temp() {

  global $user;

  if (!user_access('manage work and rates')) {
    $uid = $user->uid;
  } elseif (!($uid = arg(2))) {
    $uid = $user->uid;
  }

  $header = array(t('ID'), t('Date'), t('Start'), t('Finish'), t('Time'), t('Rate'), t('Activity'), t('Node'));

  $result = db_query(
              'SELECT cw.*, n.type, u.name
              FROM casetracker_work AS cw
              INNER JOIN node AS n
              ON cw.nid = n.nid
              INNER JOIN users AS u
              ON cw.uid = u.uid
              WHERE cw.uid = %d
              ORDER BY cw.start',
              $uid);

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

    $time = _casetracker_work_seconds_display($work->duration, 'hh:mm');
    $type_name = node_get_name($work->type);
    $start = ($work->finish == 0) ? '' : format_date($work->start, 'custom', 'H:i');
    $finish = ($work->finish == 0) ? '' : format_date($work->finish, 'custom', 'H:i');
    $name = $work->name;

    $rows[] =
      array(
        l($work->ctwid, 'casetracker/work/edit/'. $work->ctwid),
        format_date($work->start, 'custom', 'Y M d'),
        $start,
        $finish,
        $time,
        $work->rate,
        $work->activity,
        l($work->nid, 'node/'. $work->nid),
      );

    $total_time += $work->duration;
  }

  drupal_set_title('Timesheet for '. $name);

  $output .= theme('table', $header, $rows, array('class' => 'casetracker_timesheet'));
  $time = _casetracker_work_seconds_display($total_time, 'hh:mm');

  $output .= '<p><b>Total time</b>: '. $time .'</p>';
//  $output .= '<p>'. l('More work', 'node/add/casetracker_work') .'</p>';

  return $output;

}
*/