From 6d052057793681d073b33d07ce007c8fcfb3b542 Mon Sep 17 00:00:00 2001
From: tv <tv@iiso>
Date: Sat, 24 Sep 2011 22:13:06 +0200
Subject: //util magic: initial extract

---
 util/bin/magic | 41 +++++++++++++++++++++++++++++++++++++++++
 1 file changed, 41 insertions(+)
 create mode 100755 util/bin/magic

(limited to 'util/bin/magic')

diff --git a/util/bin/magic b/util/bin/magic
new file mode 100755
index 00000000..04a7017d
--- /dev/null
+++ b/util/bin/magic
@@ -0,0 +1,41 @@
+#! /bin/sh
+#
+# magic $name $command $file < $content
+#
+
+name="$1"; shift
+command="$1"; shift
+file="$1"; shift
+
+bs="# begin krebs magic${name+ <$name>}"
+es="# end krebs magic${name+ <$name>}"
+
+case $1 in
+  (print)
+    echo "$bs"
+    cat
+    echo "$es"
+    ;;
+  (create)
+    $0 has || $0 print >> $file < /dev/null
+    $0 replace
+    ;;
+  (destroy)
+    if $0 has; then
+      cache"`cat $file`"
+      echo "$cache" | sed "/^$bs$/,/^$es$/d" > $file
+    fi
+    ;;
+  (has)
+    grep -q "^$bs\$" $file && grep -q "^$es\$" $file
+    ;;
+  (replace)
+    $0 destroy && $0 create
+    ;;
+  (clear)
+    $0 replace < /dev/null
+    ;;
+  (*)
+    echo 'Error 1: You are made of stupid!' >&2
+    exit 23
+esac
-- 
cgit v1.2.3


From 88212635961bac86a8c9c1b0626f8a016bcc9b70 Mon Sep 17 00:00:00 2001
From: tv <tv@iiso>
Date: Sat, 24 Sep 2011 22:16:51 +0200
Subject: //util magic: maybe fix typos^_^

---
 util/bin/magic | 26 +++++++++++---------------
 1 file changed, 11 insertions(+), 15 deletions(-)

(limited to 'util/bin/magic')

diff --git a/util/bin/magic b/util/bin/magic
index 04a7017d..218c8d43 100755
--- a/util/bin/magic
+++ b/util/bin/magic
@@ -1,14 +1,10 @@
 #! /bin/sh
 #
-# magic $name $command $file < $content
+# magic name command file < content
 #
 
-name="$1"; shift
-command="$1"; shift
-file="$1"; shift
-
-bs="# begin krebs magic${name+ <$name>}"
-es="# end krebs magic${name+ <$name>}"
+bs="# begin krebs magic <$1>"
+es="# end krebs magic <$1>"
 
 case $1 in
   (print)
@@ -17,23 +13,23 @@ case $1 in
     echo "$es"
     ;;
   (create)
-    $0 has || $0 print >> $file < /dev/null
-    $0 replace
+    $0 $1 has $3 || $0 $1 print $3 >> $3 < /dev/null
+    $0 $1 replace $3
     ;;
   (destroy)
-    if $0 has; then
-      cache"`cat $file`"
-      echo "$cache" | sed "/^$bs$/,/^$es$/d" > $file
+    if $0 $1 has $3; then
+      cache"`cat $3`"
+      echo "$cache" | sed "/^$bs$/,/^$es$/d" > $3
     fi
     ;;
   (has)
-    grep -q "^$bs\$" $file && grep -q "^$es\$" $file
+    grep -q "^$bs\$" $3 && grep -q "^$es\$" $3
     ;;
   (replace)
-    $0 destroy && $0 create
+    $0 $1 destroy $3 && $0 $1 create $3
     ;;
   (clear)
-    $0 replace < /dev/null
+    $0 $1 replace $3 < /dev/null
     ;;
   (*)
     echo 'Error 1: You are made of stupid!' >&2
-- 
cgit v1.2.3