Show links from order display.
[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>";
243     $contact = get_contact_by_id($order->getRequesterId(), false);
244     if ($contact) echo " " . get_small_link($contact->getDisplayname(), $contact->getURL());
245     echo "</td>\n";
246     echo "</tr>\n";
247
248     /* Beneficiary. */
249     echo "<tr>\n";
250     echo "  <td>Beneficiary</td>\n";
251     echo "  <td><select name=\"beneficiary_id\">\n";
252     option("beneficiary_id", null, "");
253     if (! $order->getId() && $order->getBeneficiaryId()) {
254       $contact = get_contact_by_id($order->getBeneficiaryId());
255       if ($contact) option("beneficiary_id", $order->getBeneficiaryId(), $contact->getDisplayname(), $order->getBeneficiaryId());
256     }
257     else {
258       $contacts = get_area_beneficiaries($area_id);
259       foreach ($contacts as $contact) {
260         option("beneficiary_id", $contact->getId(), $contact->getDisplayname(), $order->getBeneficiaryId());
261       }
262     }
263     echo "</select>";
264     $contact = get_contact_by_id($order->getBeneficiaryId(), false);
265     if ($contact) echo " " . get_small_link($contact->getDisplayname(), $contact->getURL());
266     echo "</td>\n";
267     echo "</tr>\n";
268
269     /* Hub. */
270     echo "<tr>\n";
271     echo "  <td>Hub</td>\n";
272     echo "  <td><select name=\"hub_id\">\n";
273     option("hub_id", null, "");
274     $hubs = get_area_hubs();
275     foreach ($hubs as $hub) {
276       option("hub_id", $hub->getId(), $hub->getDisplayname(), $order->getHubId());
277     }
278     echo "</select>";
279     $hub = get_hub_by_id($order->getHubId(), false);
280     if ($hub) echo " " . get_small_link($hub->getDisplayname(), $hub->getURL());
281     echo "</td>\n";
282     echo "</tr>\n";
283
284     /* Parcel type. */
285     echo "<tr>\n";
286     echo "  <td>Parcel size</td>\n";
287     echo "  <td><select name=\"parcel_size\">\n";
288     $mask = 1 << count($parcel_sizes);
289     for ($i = 0; $i < count($parcel_sizes); $i++) {
290       option("parcel_size", 1 << $i, $parcel_sizes[$i], $order->getParcel() % $mask);
291     }
292     echo "</select></td>\n";
293     echo "</tr>\n";
294
295     /* Parcel contents. */
296     echo "<tr>\n";
297     echo "  <td>Parcel contents</td>\n";
298     echo "  <td>";
299     for ($i = count($parcel_sizes); $i < count($parcel_contents); $i++) {
300       echo "  <input type=\"checkbox\" name=\"parcel_$i\"";
301       if ($order->getParcel() & (1 << $i)) echo " checked";
302       echo ">$parcel_contents[$i]\n";
303     }
304     echo "</td>\n";
305     echo "</tr>\n";
306
307     /* Driver. */
308     echo "<tr>\n";
309     echo "  <td>Driver</td>\n";
310     $contacts = get_city_drivers();
311     if (count($contacts)) {
312       echo "  <td><select name=\"driver_id\">\n";
313       option("driver_id", null, "");
314       foreach ($contacts as $contact) {
315         option("driver_id", $contact->getId(), $contact->getDisplayname(), $driver_id);
316       }
317       echo "</select>";
318       $contact = get_contact_by_id($driver_id, false);
319       if ($contact) echo " " . get_small_link($contact->getDisplayname(), $contact->getURL());
320       echo "</td>\n";
321     }
322     else echo "  <td>No drivers!</td>\n";
323     echo "</tr>\n";
324
325     /* State. */
326     if ($order->getId()) {
327       echo "<tr>\n";
328       echo "  <td>State</td>\n";
329       echo "  <td><select name=\"state\">\n";
330       for ($i = 0; $i < count($states); $i++) {
331         option("state", $i << 1, ucfirst($states[$i]), $state);
332       }
333       echo "</select></td>\n";
334       echo "</tr>\n";
335     }
336   }
337
338   function show_new_order_form($area_id = null) {
339     if (! check_admin(1)) return;
340
341     $area = get_area_by_id($area_id);
342     if (! count($area)) {
343       echo "<p>No such <a href=\"/area\">area</a>!</p>\n";
344       return;
345     }
346
347     form("noprint");
348     echo "<p>Place an order:</p>\n";
349
350     echo "<table>\n";
351     show_order_form(null, $area_id);
352
353     echo "<tr>\n";
354     echo "  <td colspan=2>"; submit("add_order", "Order"); echo "</td></tr>\n";
355     echo "</tr>\n";
356     echo "</table>\n";
357     end_form();
358   }
359
360   function show_contact_order_form($contact) {
361     if (! check_admin(1)) return;
362
363     $area = get_contact_area($contact);
364     if (! $area) {
365       echo "<p>No valid <a href=\"/area\">area</a> for contact!</p>\n";
366       return;
367     }
368
369     $order = new Order;
370     $order->setBeneficiaryId($contact->getId());
371
372     form("standout");
373     echo "<p>Placing order for " . $contact->getStrongLink() . ".";
374     $parcel = $contact->getParcel();
375     if ($parcel) {
376       echo "  Suggested parcel type is <span class=\"strong\">" .  get_contact_parcel_string($contact) . "</span>";
377       $order->setParcel($parcel);
378     }
379     echo "</p>\n";
380
381     echo "<table>\n";
382     show_order_form($order, $area_id);
383
384     echo "<tr>\n";
385     echo "  <td colspan=2>"; submit("add_order", "Order"); echo "</td></tr>\n";
386     echo "</tr>\n";
387     echo "</table>\n";
388     end_form();
389   }
390
391   function show_add_new_order_form() {
392     if (! check_admin(1)) return;
393
394     /* We intentionally hide areas with no contacts. */
395     $areas = get_city_areas_with_contacts(null, $GLOBALS['ROLE_BENEFICIARY']);
396     if (! count($areas)) {
397       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";
398       return;
399     }
400
401     form("noprint standout");
402     echo "<p>Place an order in <select name=\"area_id\">\n";
403     foreach ($areas as $area) {
404       option("area_id", $area->getId(), get_area_displayname($area));
405     }
406     echo "</select>";
407     submit("show_add_order", "Proceed");
408     echo "</p>\n";
409     end_form();
410   }
411
412   function update_order(&$order, $new = false) {
413     global $user_id, $parcel_sizes, $parcel_contents;
414
415     #$date = ymd_to_iso8601("date");
416     $date = $_POST['date'];
417     $requester_id = $_POST['requester_id'];
418     $beneficiary_id = $_POST['beneficiary_id'];
419     $hub_id = $_POST['hub_id'];
420     $driver_id = $_POST['driver_id'];
421     if (! $driver_id) $driver_id = null;
422     $state = $_POST['state'];
423     if (! $state) $state = $GLOBALS['STATE_PLACED'];
424     $parcel = $_POST['parcel_size'];
425     for ($i = count($parcel_sizes); $i < count($parcel_contents); $i++) {
426       if ($_POST['parcel_' . $i] == "on") $parcel |= (1 << $i);
427     }
428
429     if ($date) {
430       list($y, $m, $d) = explode('-', $date);
431       $then = mktime(0, 0, 0, $m, $d, $y);
432     }
433     else $then = time();
434     /* XXX: check date */
435
436     $requester = get_contact_by_id($requester_id);
437     if (! $requester) {
438       echo "<p>Invalid referrer!</p>\n";
439       return false;
440     }
441
442     $beneficiary = get_contact_by_id($beneficiary_id);
443     if (! $beneficiary) {
444       echo "<p>Invalid beneficiary!</p>\n";
445       return false;
446     }
447
448     if ($hub_id) {
449       $hub = get_hub_by_id($hub_id);
450       if (! $hub) {
451         echo "<p>Invalid hub!</p>\n";
452         return false;
453       }
454     }
455     else $hub_id = null;
456
457     if ($new && isset($_POST['recurrence'])) $recurrence = $_POST['recurrence'];
458     if (! $recurrence) $recurrence = 0;
459
460     $now = time();
461     for ($i = 0; $i <= $recurrence; $i++) {
462       if ($i) {
463         echo "<p>Creating recurrence $i.</p>\n";
464         $order = new Order;
465       }
466
467       $order->setDate($then + 7 * 86400 * $i);
468       $order->setRequesterId($requester_id);
469       $order->setBeneficiaryId($beneficiary_id);
470       $order->setHubId($hub_id);
471       $order->setParcel($parcel);
472
473       /* XXX: begin/commit */
474       try {
475         $order->save();
476
477         $order_state = new OrderState;
478         $order_state->setUpdated($now);
479         $order_state->setOrderId($order->getId());
480         $order_state->setUserId($user_id);
481         $order_state->setDriverId($driver_id);
482         $order_state->setState($state);
483
484         $order_state->save();
485       }
486       catch (Exception $e) {
487         if ($new) echo "<p>Error placing order.</p>\n";
488         else echo "<p>Error updating order.</p>\n";
489         echo "<p>" . $e->getMessage() . "</p>\n";
490         return false;
491       }
492     }
493
494     return true;
495   }
496
497   function add_order() {
498     if (! check_admin(1, "place an order")) return;
499
500     $order = new Order;
501     if (! update_order($order, true)) return false;
502     return $order->getId();
503   }
504
505   function delete_order($id = null) {
506     if (! check_admin(1, "delete an order")) return;
507
508     if (isset($id)) $order = get_order_by_id($id);
509     if (! $order) return false;
510
511     try {
512       $q = new OrderStateQuery;
513       $order_states = $q->filterByOrderId($id)->find();
514       foreach ($order_states as $order_state) $order_state->delete();
515       $order->delete();
516       echo "<p>Deleted order.</p>\n";
517     }
518     catch (Exception $e) {
519       echo "<p>Error deleting order $id!</p>\n";
520       return false;
521     }
522
523     return true;
524   }
525
526   function show_order_history($id) {
527     global $states;
528
529     $q = new OrderStateQuery();
530     $order_states = $q->filterByOrderId($id)->orderById()->find();
531
532     if (! count($order_states)) return;
533
534     echo "<h3>Order history</h3>\n";
535     foreach ($order_states as $order_state) {
536       $date = $order_state->getUpdated();
537
538       $user = get_contact_by_id($order_state->getUserId());
539       if ($user) $username = $user->getDisplayname();
540       else $username = "unknown user";
541
542       $driver_id = $order_state->getDriverId();
543       if ($driver_id) $driver = get_contact_by_id($driver_id);
544       else $driver = null;
545
546       /* XXX */
547       $state = $order_state->getState();
548       for ($i = 0; $i < count($states); $i++) {
549         if ((1 << $i) == $state) {
550           $state = $states[$i];
551           break;
552         }
553       }
554       #$state = $states[$order_state->getState()];
555       echo "<p><strong>$username</strong> changed order to state <strong>$state</strong>";
556       if ($driver) echo " for driver " . $driver->getDisplayname();
557       echo " on $date.</p>\n";
558     }
559   }
560
561   function show_order(&$id = null) {
562     if (isset($id)) $order = get_order_by_id($id);
563     if (! $order) return;
564
565     form();
566     echo "<p>Order: <span class=\"strong\">" . $order->getId() . "</span>";
567     if (check_admin(1)) {
568       echo " " . $order->getDeleteLink();
569     }
570     echo ": ";
571     echo "\n</p>";
572
573     echo "<table>\n";
574     show_order_form($order);
575
576     if (check_admin(1)) {
577       echo "<tr>\n";
578       echo "  <td colspan=2>";
579       submit("update_order", "Update");
580       echo "</td>\n";
581       echo "</tr>\n";
582     }
583
584     echo "</table>\n";
585     end_form();
586
587     show_order_history($order->getId());
588   }
589
590   $state_mask = null;
591   if (count($parameters)) {
592     for ($i = 1; $i < count($parameters); $i++) {
593       if ($parameters[$i] == "state") {
594         /* /order/state/placed+picked */
595         $state_mask = get_order_state_mask($parameters[$i + 1]);
596       }
597     }
598
599     if ($parameters[0] == "in") {
600       /* /order/in/area/Romsey+Town/1 */
601       switch ($parameters[1]) {
602       case "area":
603         case "area":
604           $area_id = $parameters[3];
605           $_POST['area_id'] = $area_id;
606           $q = new AreaQuery;
607           $area = $q->findOneById($area_id);
608           $city = get_area_city($area);
609           if ($city) $city_id = $city->getId();
610           show_area_orders(0, 10, $parameters[2], $area_id, $state_mask);
611         break;
612
613         case "city":
614           $city_id = $parameters[3];
615           $_POST['city_id'] = $city_id;
616           $q = new CityQuery;
617           $city = $q->findOneById($city_id);
618           show_city_orders(0, 10, $parameters[2], $city_id, $state_mask);
619         break;
620       }
621     }
622     else if ($parameters[0] == "from") {
623       /* /order/from/referrer/Iain+Patterson/4 */
624       switch ($parameters[1]) {
625         case "referrer":
626           $contact_id = $parameters[3];
627           $q = new ContactQuery;
628           $contact = $q->findOneById($contact_id);
629           show_requester_orders(0, 10, $parameters[2], $contact_id, $state_mask);
630         break;
631       }
632     }
633     else if ($parameters[0] == "to") {
634       /* /order/to/beneficiary/Cambridge+Community+Church/1 */
635       switch ($parameters[1]) {
636         case "beneficiary":
637           $contact_id = $parameters[3];
638           $q = new ContactQuery;
639           $hub = $q->findOneById($contact_id);
640           show_beneficiary_orders(0, 10, $parameters[2], $contact_id, $state_mask);
641         break;
642       }
643     }
644     else if ($parameters[0] == "place") {
645       if ($parameters[1] == "for") {
646         if ($parameters[2] == "beneficiary") {
647           if ($parameters[4]) $contact = get_contact_by_id($parameters[4]);
648           if (! $contact) $contact = get_contact_by_name(urldecode($parameters[3]));
649           if ($contact) show_contact_order_form($contact);
650         }
651       }
652     }
653   }
654   list($ignored, $id, $args) = parse_parameters($parameters);
655   //echo "<p>$name($id) " . print_r($args, true) . "</p>\n";
656   if (count($args)) {
657     switch ($args[0]) {
658       case "delete":
659         delete_order($id);
660       break;
661     }
662   }
663   else if (isset($id)) show_order($id);
664   else if ($state_mask) show_orders(0, 10, null, null, $state_mask);
665
666   show_order_forms($city_id, $state_mask);
667   show_add_new_order_form($city_id);
668
669
670 ?>