summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xutil/bin/magic37
1 files changed, 37 insertions, 0 deletions
diff --git a/util/bin/magic b/util/bin/magic
new file mode 100755
index 00000000..218c8d43
--- /dev/null
+++ b/util/bin/magic
@@ -0,0 +1,37 @@
+#! /bin/sh
+#
+# magic name command file < content
+#
+
+bs="# begin krebs magic <$1>"
+es="# end krebs magic <$1>"
+
+case $1 in
+ (print)
+ echo "$bs"
+ cat
+ echo "$es"
+ ;;
+ (create)
+ $0 $1 has $3 || $0 $1 print $3 >> $3 < /dev/null
+ $0 $1 replace $3
+ ;;
+ (destroy)
+ if $0 $1 has $3; then
+ cache"`cat $3`"
+ echo "$cache" | sed "/^$bs$/,/^$es$/d" > $3
+ fi
+ ;;
+ (has)
+ grep -q "^$bs\$" $3 && grep -q "^$es\$" $3
+ ;;
+ (replace)
+ $0 $1 destroy $3 && $0 $1 create $3
+ ;;
+ (clear)
+ $0 $1 replace $3 < /dev/null
+ ;;
+ (*)
+ echo 'Error 1: You are made of stupid!' >&2
+ exit 23
+esac