Allow placing recurring orders.
[readifood.git] / lib / order.php
1 <?php
2
3   if (isset($_POST['show_add_order'])) {
4     $area_id = $_POST['area_id'];
5     show_new_order_form($area_id);
6   }
7   else if (isset($_POST['add_order'])) {
8     $id = add_order();
9     if ($id !== false) {
10       echo "<p>Order placed.</p>\n";
11       $parameters = array("id", $id);
12     }
13   }
14   else if (isset($_POST['update_order'])) {
15     list($ignored, $id, $args) = parse_parameters($parameters);
16     $q = new OrderQuery;
17     $order = $q->findOneById($id);
18     if ($order) {
19       if (update_order($order) !== false) {
20         echo "<p>Updated order.</p>\n";
21         $parameters = array("id", $order->getId());
22       }
23     }
24     else {
25       echo "<p>No such contact!</p>\n";
26     }
27   }
28   else if ($_POST['show_in_area']) {
29     $q = new AreaQuery;
30     $area = $q->findOneById($_POST['area_id']);
31     header(sprintf("Location: http%s://%s/%s/in/area/%s/%d%s", ($_SERVER['HTTPS']) ? "s" : "", $_SERVER['HTTP_HOST'], $module, urlencode($area->getName()), $_POST['area_id'], get_order_state_uri(get_order_state_mask())));
32     exit;
33   }
34   else if ($_POST['show_in_city']) {
35     $q = new CityQuery;
36     $city = $q->findOneById($_POST['city_id']);
37     header(sprintf("Location: http%s://%s/%s/in/city/%s/%d%s", ($_SERVER['HTTPS']) ? "s" : "", $_SERVER['HTTP_HOST'], $module, urlencode($city->getName()), $_POST['city_id'], get_order_state_uri(get_order_state_mask())));
38     exit;
39   }
40
41   function show_orders($offset, $per_page, $requester_ids = null, $beneficiary_ids = null, $state_mask = null) {
42     /* XXX: Use Propel methods. */
43     if (isset($state_mask)) {
44       $order_ids = array();
45       $dbh = Propel::getConnection();
46       $sth = $dbh->prepare("select * from OrderState o where updated=(select max(updated) from OrderState where order_id=o.order_id) and state & $state_mask");
47       $sth->execute();
48       $order_states = OrderStatePeer::populateObjects($sth);
49       foreach ($order_states as $order_state) $order_ids[] = $order_state->getOrderId();
50     }
51     $q = new OrderQuery;
52     if (isset($requester_ids)) $q->filterByRequesterId($requester_ids);
53     if (isset($beneficiary_ids)) $q->filterByBeneficiaryId($beneficiary_ids);
54     # XXX: Doesn't work.
55     #if (isset($state_mask)) $q->useOrderStateQuery()->addSelectQuery($latest_state, 'latestState')->where("order_id=latestState.order_id")->where("state & $state_mask")->endUse();
56     if (isset($state_mask)) $q->filterById($order_ids);
57     $orders = $q->orderByDate()->find();
58     if (count($orders)) {
59       foreach ($orders as $order) {
60         echo "<br>\nOrder " . $order->getStrongLink($order->getId()) . ": " . get_order_displayname($order);
61         if (check_admin(1)) {
62           echo " " . $order->getDeleteLink();
63         }
64
65         /* XXX: Should pull from query. */
66         $q = new ContactQuery;
67         $contact = $q->findOneById($order->getBeneficiaryId());
68         if ($contact) {
69           echo " for " . $contact->getLink();
70           $area = get_contact_area($contact);
71           if ($area) echo " in " . $area->getLink();
72         }
73
74         if ($order->getHubId()) {
75           $q = new HubQuery;
76           $hub = $q->findOneById($order->getHubId());
77           if ($hub) echo " to hub " . $hub->getLink();
78           $area = get_hub_area($hub);
79           if ($area) echo " in " . $area->getLink();
80         }
81       }
82     }
83     else echo " none";
84   }
85
86   function show_city_orders($offset, $per_page, $city_name, $city_id = null, $state_mask = null) {
87     if (isset($city_id)) $city = get_city_by_id($city_id);
88     else if ($city_name) $city = get_city_by_name($city_name);
89     if ($city) {
90       $contacts = get_city_contacts($city->getId(), $GLOBALS['ROLE_BENEFICIARY']);
91       $beneficiary_ids = array();
92       foreach ($contacts as $contact) $beneficiary_ids[] = $contact->getId();
93
94       echo "<p>Orders in city " . $city->getLink(get_city_displayname($city)) . ":";
95       return show_orders($offset, $per_page, null, $beneficiary_ids, $state_mask);
96     }
97     else echo "<p>No such city!</p>\n";
98   }
99
100   function show_requester_orders($offset, $per_page, $contact_name, $contact_id = null, $state_mask = null) {
101     if (isset($contact_id)) $contact = get_contact_by_id($contact_id);
102     else if ($contact_name) $contact = get_contact_by_name($contact_name);
103     if ($contact) {
104       echo "<p>Orders from referrer " . $contact->getLink() . ":";
105       return show_orders($offset, $per_page, $contact->getId(), null, $state_mask);
106     }
107     else echo "<p>No such contact!</p>\n";
108   }
109
110   function show_beneficiary_orders($offset, $per_page, $contact_name, $contact_id = null, $state_mask = null) {
111     if (isset($contact_id)) $contact = get_contact_by_id($contact_id);
112     else if ($contact_name) $contact = get_contact_by_name($contact_name);
113     if ($contact) {
114       echo "<p>Orders to beneficiary " . $contact->getLink() . ":";
115       return show_orders($offset, $per_page, null, $contact->getId(), $state_mask);
116     }
117     else echo "<p>No such contact!</p>\n";
118   }
119
120   function show_area_orders($offset, $per_page, $area_name, $area_id = null, $state_mask = null) {
121     if (isset($area_id)) $area = get_area_by_id($area_id);
122     else if ($area_name) $area = get_area_by_name($area_name);
123     if ($area) {
124       $contacts = get_area_contacts($area->getId(), $GLOBALS['ROLE_BENEFICIARY']);
125       $contact_ids = array();
126       foreach ($contacts as $contact) $contact_ids[] = $contact->getId();
127
128       echo "<p>Orders in area " . $area->getLink() . ":";
129       return show_orders($offset, $per_page, null, $contact_ids, $state_mask);
130     }
131     else echo "<p>No such area!</p>\n";
132   }
133
134   function show_order_state_form($state_mask = null) {
135     global $states, $all_states;
136
137     if (is_null($state_mask)) $state_mask = $all_states;
138
139     echo "<p>Restrict to order states:\n";
140     for ($i = 0; $i < count($states); $i++) {
141       echo " <input type=\"checkbox\" name=\"state_$i\"";
142       if ($state_mask & (1 << $i)) echo " checked";
143       echo ">$states[$i]\n";
144     }
145     echo "</p>\n";
146   }
147
148   function get_order_state_mask($string = null) {
149     global $states, $all_states;
150
151     $mask = 0;
152
153     if (isset($string)) {
154       $selected = explode("+", $string);
155       for ($i = 0; $i < count($states); $i++) {
156         if (in_array($states[$i], $selected)) $mask |= (1 << $i);
157       }
158     }
159     else {
160       for ($i = 0; $i < count($states); $i++) {
161         if ($_POST['state_' . $i] == "on") $mask |= (1 << $i);
162       }
163     }
164
165     if (! $mask) $mask = $all_states;
166     return $mask;
167   }
168
169   function get_order_state_string($mask) {
170     global $states;
171
172     $selected = array();
173
174     for ($i = 0; $i < count($states); $i++) {
175       if ($mask & (1 << $i)) $selected[] = $states[$i];
176     }
177
178     return implode("+", $selected);
179   }
180
181   function get_order_state_uri($mask) {
182     global $all_states;
183
184     if (is_null($mask)) return "";
185     if ($mask == $all_states) return "";
186
187     return "/state/" . get_order_state_string($mask);
188   }
189
190   function show_order_areas_form($city_id = null) {
191     $areas = get_city_areas($city_id);
192     if (! count($areas)) {
193       echo "<p>No <a href=\"/area\">areas</a>!</p>\n";
194       return;
195     }
196
197     echo "<p>Show orders in area\n";
198     echo "<select name=\"area_id\">\n";
199     foreach ($areas as $area) {
200       option("area_id", $area->getId(), get_area_displayname($area));
201     }
202     echo "</select>\n";
203     echo "<input type=\"submit\" name=\"show_in_area\" value=\"Show\">\n";
204   }
205
206   function show_order_cities_form($city_id = null) {
207     $q = new CityQuery;
208     $cities = $q->orderByName()->find();
209
210     if (! count($cities)) {
211       echo "<p>No <a href=\"/city\">cities</a>!</p>\n";
212       return;
213     }
214
215     echo "<p>Show orders in city\n";
216     echo "<select name=\"city_id\">\n";
217     foreach ($cities as $city) {
218       option("city_id", $city->getId(), get_city_displayname($city), $city_id);
219     }
220     echo "</select>\n";
221     echo "<input type=\"submit\" name=\"show_in_city\" value=\"Show\">\n";
222   }
223
224   function show_order_forms($city_id, $state_mask) {
225     echo "<form method=\"POST\" action=\"" . $_SERVER['REQUEST_URI'] . "\">\n";
226     show_order_state_form($state_mask);
227     show_order_areas_form($city_id);
228     show_order_cities_form($city_id);
229     echo "</form>\n";
230   }
231
232   function show_order_form($order = null, $area_id = null) {
233     global $states;
234
235     if ($order) {
236       $q = new OrderStateQuery;
237       $order_state = $q->filterByOrderId($order->getId())->orderByUpdated('desc')->limit(1)->findOne();
238       if ($order_state) $state = $order_state->getState();
239     }
240     else $order = new Order;
241
242
243     /* Date. */
244     echo "<tr>\n";
245     echo "  <td>Delivery</td>\n";
246     /* XXX: Find suitable dates from area. */
247     echo "  <td>";
248     show_date_form("date", $order->getDate());
249     if (! $order->getDate()) {
250       echo " and recur for <select name=\"recurrence\">\n";
251       for ($i = 0; $i < 4; $i++) option("recurrence", $i, $i);
252       echo "</select> weeks";
253     }
254     echo "</td>\n";
255     echo "</tr>\n";
256
257     /* Referrer. */
258     echo "<tr>\n";
259     echo "  <td>Referrer</td>\n";
260     echo "  <td><select name=\"requester_id\">\n";
261     option("requester_id", null, "");
262     $contacts = get_area_requesters();
263     foreach ($contacts as $contact) {
264       option("requester_id", $contact->getId(), $contact->getDisplayname(), $order->getRequesterId());
265     }
266     echo "</select></td>\n";
267     echo "</tr>\n";
268
269     /* Beneficiary. */
270     echo "<tr>\n";
271     echo "  <td>Beneficiary</td>\n";
272     echo "  <td><select name=\"beneficiary_id\">\n";
273     option("beneficiary_id", null, "");
274     $contacts = get_area_beneficiaries($area_id);
275     foreach ($contacts as $contact) {
276       option("beneficiary_id", $contact->getId(), $contact->getDisplayname(), $order->getBeneficiaryId());
277     }
278     echo "</select></td>\n";
279     echo "</tr>\n";
280
281     /* Hub. */
282     echo "<tr>\n";
283     echo "  <td>Hub</td>\n";
284     echo "  <td><select name=\"hub_id\">\n";
285     option("hub_id", null, "");
286     $hubs = get_area_hubs();
287     foreach ($hubs as $hub) {
288       option("hub_id", $hub->getId(), $hub->getDisplayname(), $order->getHubId());
289     }
290     echo "</select></td>\n";
291     echo "</tr>\n";
292
293     /* Quantity. */
294     echo "<tr>\n";
295     echo "  <td>Quantity (kg)</td>\n";
296     echo "  <td>"; input("quantity", $order->getQuantity()); echo "</td>\n";
297     echo "</tr>\n";
298
299     /* Driver. */
300     echo "<tr>\n";
301     echo "  <td>Driver</td>\n";
302     $contacts = get_city_drivers();
303     if (count($contacts)) {
304       echo "  <td><select name=\"driver_id\">\n";
305       option("driver_id", null, "");
306       foreach ($contacts as $contact) {
307         option("driver_id", $contact->getId(), $contact->getDisplayname(), $driver_id);
308       }
309       echo "</select></td>\n";
310     }
311     else echo "  <td>No drivers!</td>\n";
312     echo "</tr>\n";
313
314     /* State. */
315     if ($order->getId()) {
316       echo "<tr>\n";
317       echo "  <td>State</td>\n";
318       echo "  <td><select name=\"state\">\n";
319       for ($i = 0; $i < count($states); $i++) {
320         option("state", $i << 1, ucfirst($states[$i]), $state);
321       }
322       echo "</select></td>\n";
323       echo "</tr>\n";
324     }
325   }
326
327   function show_new_order_form($area_id = null) {
328     if (! check_admin(1)) return;
329
330     $area = get_area_by_id($area_id);
331     if (! count($area)) {
332       echo "<p>No such <a href=\"/area\">area</a>!</p>\n";
333       return;
334     }
335
336     echo "<form method=\"POST\" action=\"" . $_SERVER['REQUEST_URI'] . "\">\n";
337     echo "<p>Place an order:</p>\n";
338
339     echo "<table>\n";
340     show_order_form(null, $area_id);
341
342     echo "<tr>\n";
343     echo "  <td colspan=2>"; submit("add_order", "Order"); echo "</td></tr>\n";
344     echo "</tr>\n";
345     echo "</table>\n";
346     echo "</form>\n";
347   }
348
349   function show_add_new_order_form() {
350     if (! check_admin(1)) return;
351
352     /* We intentionally hide areas with no contacts. */
353     $areas = get_city_areas_with_contacts(null, $GLOBALS['ROLE_BENEFICIARY']);
354     if (! count($areas)) {
355       echo "<p>Can't place any orders until at least one <a href=\"/area\">area</a> has a <a href=\"/contact\">contact</a>!</p>\n";
356       return;
357     }
358
359     echo "<form method=\"POST\" action=\"" . $_SERVER['REQUEST_URI'] . "\">\n";
360     echo "<p>Place an order in <select name=\"area_id\">\n";
361     foreach ($areas as $area) {
362       option("area_id", $area->getId(), get_area_displayname($area));
363     }
364     echo "</select>";
365     submit("show_add_order", "Proceed");
366     echo "</p>\n";
367     echo "</form>\n";
368   }
369
370   function update_order(&$order, $new = false) {
371     global $user_id;
372
373     #$date = ymd_to_iso8601("date");
374     $date = $_POST['date'];
375     $requester_id = $_POST['requester_id'];
376     $beneficiary_id = $_POST['beneficiary_id'];
377     $hub_id = $_POST['hub_id'];
378     $quantity = $_POST['quantity'];
379     $driver_id = $_POST['driver_id'];
380     $state = $_POST['state'];
381     if (! $state) $state = $GLOBALS['STATE_PLACED'];
382
383     if ($date) {
384       list($y, $m, $d) = explode('-', $date);
385       $then = mktime(0, 0, 0, $m, $d, $y);
386     }
387     else $then = time();
388     /* XXX: check date */
389
390     $requester = get_contact_by_id($requester_id);
391     if (! $requester) {
392       echo "<p>Invalid referrer!</p>\n";
393       return false;
394     }
395
396     $beneficiary = get_contact_by_id($beneficiary_id);
397     if (! $beneficiary) {
398       echo "<p>Invalid beneficiary!</p>\n";
399       return false;
400     }
401
402     if ($hub_id) {
403       $hub = get_hub_by_id($hub_id);
404       if (! $hub) {
405         echo "<p>Invalid hub!</p>\n";
406         return false;
407       }
408     }
409
410     if (! is_numeric($quantity)) {
411       echo "<p>Invalid quantity!</p>\n";
412       return false;
413     }
414
415     if ($new && isset($_POST['recurrence'])) $recurrence = $_POST['recurrence'];
416     if (! $recurrence) $recurrence = 0;
417
418     $now = time();
419     for ($i = 0; $i <= $recurrence; $i++) {
420       if ($i) {
421         echo "<p>Creating recurrence $i.</p>\n";
422         $order = new Order;
423       }
424
425       $order->setDate($then + 7 * 86400 * $i);
426       $order->setRequesterId($requester_id);
427       $order->setBeneficiaryId($beneficiary_id);
428       $order->setHubId($hub_id);
429       $order->setQuantity($quantity);
430
431       /* XXX: begin/commit */
432       try {
433         $order->save();
434
435         $order_state = new OrderState;
436         $order_state->setUpdated($now);
437         $order_state->setOrderId($order->getId());
438         $order_state->setUserId($user_id);
439         $order_state->setDriverId($driver_id);
440         $order_state->setState($state);
441
442         $order_state->save();
443       }
444       catch (Exception $e) {
445         if ($new) echo "<p>Error placing order.</p>\n";
446         else echo "<p>Error updating order.</p>\n";
447         echo "<p>" . $e->getMessage() . "</p>\n";
448         return false;
449       }
450     }
451
452     return true;
453   }
454
455   function add_order() {
456     if (! check_admin(1, "place an order")) return;
457
458     $order = new Order;
459     if (! update_order($order, true)) return false;
460     return $order->getId();
461   }
462
463   function delete_order($id = null) {
464     if (! check_admin(1, "delete an order")) return;
465
466     if (isset($id)) $order = get_order_by_id($id);
467     if (! $order) return false;
468
469     try {
470       $q = new OrderStateQuery;
471       $order_states = $q->filterByOrderId($id)->find();
472       foreach ($order_states as $order_state) $order_state->delete();
473       $order->delete();
474       echo "<p>Deleted order.</p>\n";
475     }
476     catch (Exception $e) {
477       echo "<p>Error deleting order $id!</p>\n";
478       return false;
479     }
480
481     return true;
482   }
483
484   function show_order_history($id) {
485     global $states;
486
487     $q = new OrderStateQuery();
488     $order_states = $q->filterByOrderId($id)->orderById()->find();
489
490     if (! count($order_states)) return;
491
492     echo "<h3>Order history</h3>\n";
493     foreach ($order_states as $order_state) {
494       $date = $order_state->getUpdated();
495
496       $user = get_contact_by_id($order_state->getUserId());
497       if ($user) $username = $user->getDisplayname();
498       else $username = "unknown user";
499
500       $driver_id = $order_state->getDriverId();
501       if ($driver_id) $driver = get_contact_by_id($driver_id);
502
503       /* XXX */
504       $state = $order_state->getState();
505       for ($i = 0; $i < count($states); $i++) {
506         if ((1 << $i) == $state) {
507           $state = $states[$i];
508           break;
509         }
510       }
511       #$state = $states[$order_state->getState()];
512       echo "<p><strong>$username</strong> changed order to state <strong>$state</strong>";
513       if ($driver) echo " for driver " . $driver->getDisplayname();
514       echo " on $date.</p>\n";
515     }
516   }
517
518   function show_order(&$id = null) {
519     if (isset($id)) $order = get_order_by_id($id);
520     if (! $order) return;
521
522     echo "<form method=\"POST\" action=\"" . $_SERVER['REQUEST_URI'] . "\">\n";
523     echo "<p>Order: <span class=\"strong\">" . $order->getId() . "</span>";
524     if (check_admin(1)) {
525       echo " " . $order->getDeleteLink();
526     }
527     echo ": ";
528     echo "\n</p>";
529
530     echo "<table>\n";
531     show_order_form($order);
532
533     if (check_admin(1)) {
534       echo "<tr>\n";
535       echo "  <td colspan=2>";
536       submit("update_order", "Update");
537       echo "</td>\n";
538       echo "</tr>\n";
539     }
540
541     echo "</table>\n";
542     echo "</form>\n";
543
544     show_order_history($order->getId());
545   }
546
547   $state_mask = null;
548   if (count($parameters)) {
549     for ($i = 1; $i < count($parameters); $i++) {
550       if ($parameters[$i] == "state") {
551         /* /order/state/placed+picked */
552         $state_mask = get_order_state_mask($parameters[$i + 1]);
553       }
554     }
555
556     if ($parameters[0] == "in") {
557       /* /order/in/area/Romsey+Town/1 */
558       switch ($parameters[1]) {
559       case "area":
560         case "area":
561           $area_id = $parameters[3];
562           $_POST['area_id'] = $area_id;
563           $q = new AreaQuery;
564           $area = $q->findOneById($area_id);
565           $city = get_area_city($area);
566           if ($city) $city_id = $city->getId();
567           show_area_orders(0, 10, $parameters[2], $area_id, $state_mask);
568         break;
569
570         case "city":
571           $city_id = $parameters[3];
572           $_POST['city_id'] = $city_id;
573           $q = new CityQuery;
574           $city = $q->findOneById($city_id);
575           show_city_orders(0, 10, $parameters[2], $city_id, $state_mask);
576         break;
577       }
578     }
579     else if ($parameters[0] == "from") {
580       /* /order/from/referrer/Iain+Patterson/4 */
581       switch ($parameters[1]) {
582         case "referrer":
583           $contact_id = $parameters[3];
584           $q = new ContactQuery;
585           $contact = $q->findOneById($contact_id);
586           show_requester_orders(0, 10, $parameters[2], $contact_id, $state_mask);
587         break;
588       }
589     }
590     else if ($parameters[0] == "to") {
591       /* /order/to/beneficiary/Cambridge+Community+Church/1 */
592       switch ($parameters[1]) {
593         case "beneficiary":
594           $contact_id = $parameters[3];
595           $q = new ContactQuery;
596           $hub = $q->findOneById($contact_id);
597           show_beneficiary_orders(0, 10, $parameters[2], $contact_id, $state_mask);
598         break;
599       }
600     }
601   }
602   list($ignored, $id, $args) = parse_parameters($parameters);
603   //echo "<p>$name($id) " . print_r($args, true) . "</p>\n";
604   if (count($args)) {
605     switch ($args[0]) {
606       case "delete":
607         delete_order($id);
608       break;
609     }
610   }
611   else if (isset($id)) show_order($id);
612   else if ($state_mask) show_orders(0, 10, null, null, $state_mask);
613   else {
614     /* XXX: Shown after adding. */
615     show_order_forms($city_id, $state_mask);
616     show_add_new_order_form($city_id);
617   }
618
619   if (count($parameters)) {
620     show_order_forms($city_id, $state_mask);
621   }
622
623
624 ?>