3 ### Make fake snapshots by doing nothing at all
5 ### (c) 2011 Mark Wooding
8 ###----- Licensing notice ---------------------------------------------------
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.
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.
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.
27 ###--------------------------------------------------------------------------
28 ### Parse the command line.
30 ## Provide help or version information.
31 usage="usage: $quis DEVICE [KEY=VALUE ...]"
32 version="$quis, version 1.0.0"
34 0,*) echo >&2 "$usage"; exit 1 ;;
35 *,-v | *,--version) echo "$version"; exit ;;
42 op=OPERATION \`snap' to create snapshot, or \`unsnap' to remove.
43 tag=TAG Disambiguation tag to store in filesystem.
49 ## Scan the option keys.
56 *) echo >&2 "$quis: malformed option \`$i'"; exit 1 ;;
59 case "$k" in *.trivial) k=${k%.trivial} ;; ?*.?*) continue ;; esac
61 op | tag) eval "O$k=\$v" ;;
62 *) echo >&2 "$quis: unknown option \`$k'"; win=nil ;;
65 case $win in nil) exit 1 ;; esac
67 ###--------------------------------------------------------------------------
68 ### Take or remove the snapshot.
77 echo >&2 "$quis: unknown operation \`$Oop'"
82 ###----- That's all, folks --------------------------------------------------