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 --------------------------------------------------