additional prescription functions

[confetti] / actions / update_therapy.sh

diff --git a/actions/update_therapy.sh b/actions/update_therapy.sh
index 43a2e1fdff49cd1421765bf34f0c46e2c1a63e3a..cc95e3965c973da376392d9971fbc1e637dd7445 100755 (executable)
--- a/actions/update_therapy.sh
+++ b/actions/update_therapy.sh
@@ -42,13 +42,38 @@ if [ -n "$_POST[delete_session]" ]; then
 
 elif [ -n "$_POST[new_session]" ]; then
   sid="$_POST[new_session]"
-  printf '%s:exists\n' "$sid" >>"$tempfile"
 
   identify "$_EXEC/templates/therapy_background.png" \
   | sed -r 's;^.* ([0-9]+x[0-9]+) .*$;\1;' \
   | read dim
 
   convert -size "$dim" xc:transparent "${tpyfile%.tpy}_${sid}.png"
+
+  printf '%s:exists\n' "$sid" >>"$tempfile"
+  printf '%s_open:checked\n' "$sid" >>"$tempfile"
+
+elif [ -n "$_POST[dotmark.x]" -a -n "$_POST[dotmark.y]" ]; then
+  sed -rn 's;^(session[0-9]+)_open:checked$;\1;p' "$tempfile" \
+  | sort -n \
+  | tail -n1 \
+  | read sid
+
+  x="$_POST[dotmark.x]"
+  y="$_POST[dotmark.y]"
+
+  case "$_POST[color]" in
+    c000) c="#000000";;
+    c001) c="#000088";;
+    c010) c="#008800";;
+    c011) c="#008888";;
+    c100) c="#880000";;
+    c101) c="#880088";;
+    c110) c="#888800";;
+    c111) c="#888888";;
+  esac
+
+  convert "${tpyfile%.tpy}_${sid}.png" -fill "$c" -stroke "$c" -draw "circle $x,$y $(($x+5)),$y" "${tpyfile%.tpy}_${sid}.png"
+
 fi
 
 mv "$tempfile" "$tpyfile"