chiark - git - mdw - distorted-backup/blob - snap.trivial

   1 #! /bin/sh
   2 ###
   3 ### Make fake snapshots by doing nothing at all
   4 ###
   5 ### (c) 2011 Mark Wooding
   6 ###
   7
   8 ###----- Licensing notice ---------------------------------------------------
   9 ###
  10 ### This program is free software; you can redistribute it and/or modify
  11 ### it under the terms of the GNU General Public License as published by
  12 ### the Free Software Foundation; either version 2 of the License, or
  13 ### (at your option) any later version.
  14 ###
  15 ### This program is distributed in the hope that it will be useful,
  16 ### but WITHOUT ANY WARRANTY; without even the implied warranty of
  17 ### MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18 ### GNU General Public License for more details.
  19 ###
  20 ### You should have received a copy of the GNU General Public License
  21 ### along with this program; if not, write to the Free Software Foundation,
  22 ### Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  23
  24 set -e
  25 quis=${0##*/}
  26
  27 ###--------------------------------------------------------------------------
  28 ### Parse the command line.
  29
  30 ## Provide help or version information.
  31 usage="usage: $quis DEVICE [KEY=VALUE ...]"
  32 version="$quis, version 1.0.0"
  33 case "$#,$1" in
  34   0,*) echo >&2 "$usage"; exit 1 ;;
  35   *,-v | *,--version) echo "$version"; exit ;;
  36   *,-h | *,--help)
  37     cat <<EOF
  38 $version
  39 $usage
  40
  41 Option keys:
  42   op=OPERATION          \`snap' to create snapshot, or \`unsnap' to remove.
  43   tag=TAG               Disambiguation tag to store in filesystem.
  44 EOF
  45     exit
  46     ;;
  47 esac
  48
  49 ## Scan the option keys.
  50 dev=$1; shift
  51 Oop=snap Otag=snap
  52 win=t
  53 for i in "$@"; do
  54   case "$i" in
  55     ?*=*) ;;
  56     *) echo >&2 "$quis: malformed option \`$i'"; exit 1 ;;
  57   esac
  58   k=${i%%=*} v=${i#*=}
  59   case "$k" in *.trivial) k=${k%.trivial} ;; ?*.?*) continue ;; esac
  60   case "$k" in
  61     op | tag) eval "O$k=\$v" ;;
  62     *) echo >&2 "$quis: unknown option \`$k'"; win=nil ;;
  63   esac
  64 done
  65 case $win in nil) exit 1 ;; esac
  66
  67 ###--------------------------------------------------------------------------
  68 ### Take or remove the snapshot.
  69
  70 case "$Oop" in
  71   snap)
  72     echo "$dev"
  73     ;;
  74   unsnap)
  75     ;;
  76   *)
  77     echo >&2 "$quis: unknown operation \`$Oop'"
  78     exit 1
  79     ;;
  80 esac
  81
  82 ###----- That's all, folks --------------------------------------------------