skeleton-gallery: Script to create a skeleton gallery.xml for a directory of

photos.

diff --git a/skeleton-gallery b/skeleton-gallery
new file mode 100755 (executable)
index 0000000..0d4a319
--- /dev/null
+++ b/skeleton-gallery
@@ -0,0 +1,32 @@
+#! /bin/sh
+set -e
+
+exec >gallery.xml
+
+cat <<EOF
+<gallery title="" perpage=""
+         authorname="Colin Watson" authoremail="cjwatson@flatline.org.uk">
+EOF
+
+index=0
+
+for x in *.jpg; do
+    index=$(($index + 1))
+    if [ "$index" -ne 1 ]; then
+       echo
+    fi
+    printf '  <photo id="%d"' "$index"
+    identify "$x" | \
+       perl -ne '/(\d+)x(\d+)/ and print qq{ width="$1" height="$2"}'
+    cat <<EOF
+>
+    <p></p>
+  </photo>
+EOF
+done
+
+cat <<EOF
+</gallery>
+
+<!-- vim: set tw=76 sts=2 sw=2 et: -->
+EOF