<?php

  /* Find orders scheduled for delivery today. */
  function get_orders_for_today() {
    $order_ids = array();

    $q = new OrderQuery();
    $orders = $q->filterByDate(time('Y-m-d'))->find();
    if (count($orders)) {
      foreach ($orders as $order) $order_ids[] = $order->getId();
    }
    else echo "<p>No deliveries today.</p>\n";

    return $order_ids;
  }

  /* Find drivers with deliveries today. */
  function get_drivers_by_order_id($order_ids) {
    $driver_ids = array();

    if (count($order_ids)) {
      $dbh = Propel::getConnection();
      $sth = $dbh->prepare("select * from OrderState o where updated=(select max(updated) from OrderState where order_id=o.order_id) and order_id in (" . implode(",", $order_ids) . ") and driver_id is not null");
      $sth->execute();
      $order_states = OrderStatePeer::populateObjects($sth);
      if (count($order_states)) {
        foreach ($order_states as $order_state) $driver_ids[] = $order_state->getDriverId();
      }
      else echo "<p>No drivers assigned for deliveries.</p>\n";
    }

    return $driver_ids;
  }

  /* Find schedule for a driver today. */
  function get_driver_schedule_by_order_id($driver_id, $all_order_ids) {
    $order_ids = array();

    if (! count($all_order_ids)) {
      echo "<p>No orders for today.</p>\n";
      return null;
    }

    $dbh = Propel::getConnection();
    $sth = $dbh->prepare("select * from OrderState o where updated=(select max(updated) from OrderState where order_id=o.order_id) and order_id in (" . implode(",", $all_order_ids) . ") and driver_id=$driver_id");
    $sth->execute();
    $order_states = OrderStatePeer::populateObjects($sth);
    if (count($order_states)) {
      foreach ($order_states as $order_state) $order_ids[] = $order_state->getOrderId();
    }
    else echo "<p>No deliveries for this driver.</p>\n";

    return $order_ids;
  }

  function show_driver_forms($driver_ids) {
    global $module;

    if (! count($driver_ids)) return;

    $q = new ContactQuery();
    $contacts = $q->filterById($driver_ids)->find();
    if (! count($contacts)) {
      echo "<p>Can't find drivers!</p>\n";
      return;
    }

    echo "<p>Drivers with deliveries scheduled:";
    foreach ($contacts as $contact) {
      printf("<br>\n<a href=\"/$module/driver/%s/%d\">%s</a>", urlencode($contact->getDisplayname()), $contact->getId(), htmlspecialchars($contact->getDisplayname()));
    }
  }

  function show_driver_schedule($driver_name = null, $driver_id = null) {
    if (isset($driver_id)) $contact = get_contact_by_id($driver_id);
    else if (isset($driver_name)) $contact = get_contact_by_name($driver_name);
    if (! $contact) {
      echo "<p>No such driver!</p>\n";
      return;
    }

    echo "<h3>Delivery schedule for <strong>" . htmlspecialchars($contact->getDisplayname()) . "</strong></h3>\n";
    $order_ids = get_driver_schedule_by_order_id($contact->getId(), get_orders_for_today());
    $q = new OrderQuery;
    $orders = $q->filterById($order_ids)->find();
    foreach ($orders as $order) {
      $contact = get_contact_by_id($order->getBeneficiaryId());
      if (! $contact) continue;

      $area = get_contact_area($contact);
      echo "<p>Order of <em>" . get_order_parcel_string($order) . "</em> for <strong>" . htmlspecialchars($contact->getDisplayname()) . "</strong> in " . htmlspecialchars(get_area_displayname($area)) . ".</p>\n";
      $hub = get_hub_by_id($order->getHubId(), false);
      if ($hub) {
        echo "<p>Deliver to hub <strong> " . htmlspecialchars($hub->getName()) . "</strong>";
        $address = get_hub_address($hub);
      }
      else {
        echo "<p>Deliver direct to beneficiary";
        $address = get_contact_address($contact);
      }
      $area = get_address_area($address);

      echo " in " . htmlspecialchars($area->getName()) . " at:<br>";
      $city = get_area_city($area);
      echo "\n<br>" . htmlspecialchars($address->getLine());
      echo "\n<br>" . htmlspecialchars($city->getName());
      echo "\n<br>" . htmlspecialchars($address->getPostcode());
      echo "</p>\n";

      echo "<hr>\n\n";
    }
  }

  list($ignored, $id, $args) = parse_parameters($parameters);
  if (count($args)) show_driver_schedule($args[0], $args[1]);
  else {
    $order_ids = get_orders_for_today();
    if ($order_ids) $driver_ids = get_drivers_by_order_id($order_ids);
    if ($driver_ids) show_driver_forms($driver_ids);
  }

?>