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