blob: 91cbb4cf23f06c376622d849f158f6c58d311d2b (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
|
#! @BASH@
# This script is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License version 2 as
# published by the Free Software Foundation.
#
# See the COPYING and AUTHORS files for more details.
# Read in library functions
if [ "$(type -t patch_file_name)" != function ]
then
if ! [ -r @SCRIPTS@/patchfns ]
then
echo "Cannot read library @SCRIPTS@/patchfns" >&2
exit 1
fi
. @SCRIPTS@/patchfns
fi
usage()
{
echo $"Usage: quilt snapshot [-d]"
if [ x$1 = x-h ]
then
echo $"
Take a snapshot of the current working state.
-d Remove current snapshot."
exit 0
else
exit 1
fi
}
options=`getopt -o dh -- "$@"`
if [ $? -ne 0 ]
then
usage
fi
eval set -- "$options"
while true
do
case "$1" in
-d)
opt_remove=1
shift ;;
-h)
usage -h ;;
--)
shift
break ;;
esac
done
if [ $# -ne 0 ]
then
usage
fi
snap_subdir=.snap
# Clean up from previous snapshot
rm -rf $QUILT_PC/$snap_subdir
mkdir -p $QUILT_PC/$snap_subdir
if [ -n "$opt_remove" ]
then
exit 0
fi
# Save current working state
for patch in $(applied_patches | tac)
do
for file in $(files_in_patch $patch)
do
if ! [ -e "$QUILT_PC/$snap_subdir/$file" ]
then
mkdir -p "$QUILT_PC/$snap_subdir/$(dirname $file)"
if [ -e "$file" ]
then
ln "$file" "$QUILT_PC/$snap_subdir/$file"
else
touch "$QUILT_PC/$snap_subdir/$file"
fi
fi
done
done
# Now we may have some zero-size files that have no permissions
# (which represent files that the patch creates). Those may have
# been created in the meantime, but patch would refuse to touch
# them: We must remove them here.
find $QUILT_PC/$snap_subdir -type f -size 0 -exec rm -f '{}' ';'
### Local Variables:
### mode: shell-script
### End:
# vim:filetype=sh
|