@@ -18,21 +18,14 @@ case $v in
18
18
;;
19
19
esac
20
20
21
- ptouch () {
22
- perl -w -e '
23
- use strict;
24
- use POSIX qw(mktime);
25
- die "ptouch requires exactly 2 arguments" if @ARGV != 2;
26
- my $text_last_updated = shift @ARGV;
27
- my $git_file = shift @ARGV;
28
- die "\"$git_file\" does not exist" if ! -e $git_file;
29
- if ($text_last_updated
30
- =~ /(\d{4})-(\d{2})-(\d{2}) (\d{2}):(\d{2}):(\d{2})/) {
31
- my $mtime = mktime($6, $5, $4, $3, $2 - 1, $1 - 1900);
32
- my $atime = $mtime;
33
- utime $atime, $mtime, $git_file;
34
- }
35
- ' " ` svn_cmd info $2 | grep ' ^Text Last Updated:' ` " " $1 "
21
+ # On the "Text Last Updated" line, "git svn info" does not return the
22
+ # same value as "svn info" (i.e. the commit timestamp that touched the
23
+ # path most recently); do not expect that field to match.
24
+ test_cmp_info () {
25
+ sed -e ' /^Text Last Updated:/d' " $1 " > tmp.expect
26
+ sed -e ' /^Text Last Updated:/d' " $2 " > tmp.actual
27
+ test_cmp tmp.expect tmp.actual &&
28
+ rm -f tmp.expect tmp.actual
36
29
}
37
30
38
31
quoted_svnrepo=" $( echo $svnrepo | sed ' s/ /%20/' ) "
@@ -62,17 +55,13 @@ test_expect_success 'setup repository and import' '
62
55
cd gitwc &&
63
56
git svn init "$svnrepo" &&
64
57
git svn fetch
65
- ) &&
66
- ptouch gitwc/file svnwc/file &&
67
- ptouch gitwc/directory svnwc/directory &&
68
- ptouch gitwc/symlink-file svnwc/symlink-file &&
69
- ptouch gitwc/symlink-directory svnwc/symlink-directory
58
+ )
70
59
'
71
60
72
61
test_expect_success ' info' "
73
62
(cd svnwc; svn info) > expected.info &&
74
63
(cd gitwc; git svn info) > actual.info &&
75
- test_cmp expected.info actual.info
64
+ test_cmp_info expected.info actual.info
76
65
"
77
66
78
67
test_expect_success ' info --url' '
@@ -82,7 +71,7 @@ test_expect_success 'info --url' '
82
71
test_expect_success ' info .' "
83
72
(cd svnwc; svn info .) > expected.info-dot &&
84
73
(cd gitwc; git svn info .) > actual.info-dot &&
85
- test_cmp expected.info-dot actual.info-dot
74
+ test_cmp_info expected.info-dot actual.info-dot
86
75
"
87
76
88
77
test_expect_success ' info --url .' '
@@ -92,7 +81,7 @@ test_expect_success 'info --url .' '
92
81
test_expect_success ' info file' "
93
82
(cd svnwc; svn info file) > expected.info-file &&
94
83
(cd gitwc; git svn info file) > actual.info-file &&
95
- test_cmp expected.info-file actual.info-file
84
+ test_cmp_info expected.info-file actual.info-file
96
85
"
97
86
98
87
test_expect_success ' info --url file' '
@@ -102,13 +91,13 @@ test_expect_success 'info --url file' '
102
91
test_expect_success ' info directory' "
103
92
(cd svnwc; svn info directory) > expected.info-directory &&
104
93
(cd gitwc; git svn info directory) > actual.info-directory &&
105
- test_cmp expected.info-directory actual.info-directory
94
+ test_cmp_info expected.info-directory actual.info-directory
106
95
"
107
96
108
97
test_expect_success ' info inside directory' "
109
98
(cd svnwc/directory; svn info) > expected.info-inside-directory &&
110
99
(cd gitwc/directory; git svn info) > actual.info-inside-directory &&
111
- test_cmp expected.info-inside-directory actual.info-inside-directory
100
+ test_cmp_info expected.info-inside-directory actual.info-inside-directory
112
101
"
113
102
114
103
test_expect_success ' info --url directory' '
@@ -118,7 +107,7 @@ test_expect_success 'info --url directory' '
118
107
test_expect_success ' info symlink-file' "
119
108
(cd svnwc; svn info symlink-file) > expected.info-symlink-file &&
120
109
(cd gitwc; git svn info symlink-file) > actual.info-symlink-file &&
121
- test_cmp expected.info-symlink-file actual.info-symlink-file
110
+ test_cmp_info expected.info-symlink-file actual.info-symlink-file
122
111
"
123
112
124
113
test_expect_success ' info --url symlink-file' '
@@ -131,7 +120,7 @@ test_expect_success 'info symlink-directory' "
131
120
> expected.info-symlink-directory &&
132
121
(cd gitwc; git svn info symlink-directory) \
133
122
> actual.info-symlink-directory &&
134
- test_cmp expected.info-symlink-directory actual.info-symlink-directory
123
+ test_cmp_info expected.info-symlink-directory actual.info-symlink-directory
135
124
"
136
125
137
126
test_expect_success ' info --url symlink-directory' '
@@ -146,14 +135,13 @@ test_expect_success 'info added-file' "
146
135
git add added-file
147
136
) &&
148
137
cp gitwc/added-file svnwc/added-file &&
149
- ptouch gitwc/added-file svnwc/added-file &&
150
138
(
151
139
cd svnwc &&
152
140
svn_cmd add added-file > /dev/null
153
141
) &&
154
142
(cd svnwc; svn info added-file) > expected.info-added-file &&
155
143
(cd gitwc; git svn info added-file) > actual.info-added-file &&
156
- test_cmp expected.info-added-file actual.info-added-file
144
+ test_cmp_info expected.info-added-file actual.info-added-file
157
145
"
158
146
159
147
test_expect_success ' info --url added-file' '
@@ -163,7 +151,6 @@ test_expect_success 'info --url added-file' '
163
151
164
152
test_expect_success ' info added-directory' "
165
153
mkdir gitwc/added-directory svnwc/added-directory &&
166
- ptouch gitwc/added-directory svnwc/added-directory &&
167
154
touch gitwc/added-directory/.placeholder &&
168
155
(
169
156
cd svnwc &&
@@ -177,7 +164,7 @@ test_expect_success 'info added-directory' "
177
164
> expected.info-added-directory &&
178
165
(cd gitwc; git svn info added-directory) \
179
166
> actual.info-added-directory &&
180
- test_cmp expected.info-added-directory actual.info-added-directory
167
+ test_cmp_info expected.info-added-directory actual.info-added-directory
181
168
"
182
169
183
170
test_expect_success ' info --url added-directory' '
@@ -196,13 +183,12 @@ test_expect_success 'info added-symlink-file' "
196
183
ln -s added-file added-symlink-file &&
197
184
svn_cmd add added-symlink-file > /dev/null
198
185
) &&
199
- ptouch gitwc/added-symlink-file svnwc/added-symlink-file &&
200
186
(cd svnwc; svn info added-symlink-file) \
201
187
> expected.info-added-symlink-file &&
202
188
(cd gitwc; git svn info added-symlink-file) \
203
189
> actual.info-added-symlink-file &&
204
- test_cmp expected.info-added-symlink-file \
205
- actual.info-added-symlink-file
190
+ test_cmp_info expected.info-added-symlink-file \
191
+ actual.info-added-symlink-file
206
192
"
207
193
208
194
test_expect_success ' info --url added-symlink-file' '
@@ -221,25 +207,19 @@ test_expect_success 'info added-symlink-directory' "
221
207
ln -s added-directory added-symlink-directory &&
222
208
svn_cmd add added-symlink-directory > /dev/null
223
209
) &&
224
- ptouch gitwc/added-symlink-directory svnwc/added-symlink-directory &&
225
210
(cd svnwc; svn info added-symlink-directory) \
226
211
> expected.info-added-symlink-directory &&
227
212
(cd gitwc; git svn info added-symlink-directory) \
228
213
> actual.info-added-symlink-directory &&
229
- test_cmp expected.info-added-symlink-directory \
230
- actual.info-added-symlink-directory
214
+ test_cmp_info expected.info-added-symlink-directory \
215
+ actual.info-added-symlink-directory
231
216
"
232
217
233
218
test_expect_success ' info --url added-symlink-directory' '
234
219
test "$(cd gitwc; git svn info --url added-symlink-directory)" \
235
220
= "$quoted_svnrepo/added-symlink-directory"
236
221
'
237
222
238
- # The next few tests replace the "Text Last Updated" value with a
239
- # placeholder since git doesn't have a way to know the date that a
240
- # now-deleted file was last checked out locally. Internally it
241
- # simply reuses the Last Changed Date.
242
-
243
223
test_expect_success ' info deleted-file' "
244
224
(
245
225
cd gitwc &&
@@ -249,13 +229,9 @@ test_expect_success 'info deleted-file' "
249
229
cd svnwc &&
250
230
svn_cmd rm --force file > /dev/null
251
231
) &&
252
- (cd svnwc; svn info file) |
253
- sed -e 's/^\(Text Last Updated:\).*/\1 TEXT-LAST-UPDATED-STRING/' \
254
- > expected.info-deleted-file &&
255
- (cd gitwc; git svn info file) |
256
- sed -e 's/^\(Text Last Updated:\).*/\1 TEXT-LAST-UPDATED-STRING/' \
257
- > actual.info-deleted-file &&
258
- test_cmp expected.info-deleted-file actual.info-deleted-file
232
+ (cd svnwc; svn info file) >expected.info-deleted-file &&
233
+ (cd gitwc; git svn info file) >actual.info-deleted-file &&
234
+ test_cmp_info expected.info-deleted-file actual.info-deleted-file
259
235
"
260
236
261
237
test_expect_success ' info --url file (deleted)' '
@@ -272,13 +248,9 @@ test_expect_success 'info deleted-directory' "
272
248
cd svnwc &&
273
249
svn_cmd rm --force directory > /dev/null
274
250
) &&
275
- (cd svnwc; svn info directory) |
276
- sed -e 's/^\(Text Last Updated:\).*/\1 TEXT-LAST-UPDATED-STRING/' \
277
- > expected.info-deleted-directory &&
278
- (cd gitwc; git svn info directory) |
279
- sed -e 's/^\(Text Last Updated:\).*/\1 TEXT-LAST-UPDATED-STRING/' \
280
- > actual.info-deleted-directory &&
281
- test_cmp expected.info-deleted-directory actual.info-deleted-directory
251
+ (cd svnwc; svn info directory) >expected.info-deleted-directory &&
252
+ (cd gitwc; git svn info directory) >actual.info-deleted-directory &&
253
+ test_cmp_info expected.info-deleted-directory actual.info-deleted-directory
282
254
"
283
255
284
256
test_expect_success ' info --url directory (deleted)' '
@@ -295,14 +267,9 @@ test_expect_success 'info deleted-symlink-file' "
295
267
cd svnwc &&
296
268
svn_cmd rm --force symlink-file > /dev/null
297
269
) &&
298
- (cd svnwc; svn info symlink-file) |
299
- sed -e 's/^\(Text Last Updated:\).*/\1 TEXT-LAST-UPDATED-STRING/' \
300
- > expected.info-deleted-symlink-file &&
301
- (cd gitwc; git svn info symlink-file) |
302
- sed -e 's/^\(Text Last Updated:\).*/\1 TEXT-LAST-UPDATED-STRING/' \
303
- > actual.info-deleted-symlink-file &&
304
- test_cmp expected.info-deleted-symlink-file \
305
- actual.info-deleted-symlink-file
270
+ (cd svnwc; svn info symlink-file) >expected.info-deleted-symlink-file &&
271
+ (cd gitwc; git svn info symlink-file) >actual.info-deleted-symlink-file &&
272
+ test_cmp_info expected.info-deleted-symlink-file actual.info-deleted-symlink-file
306
273
"
307
274
308
275
test_expect_success ' info --url symlink-file (deleted)' '
@@ -319,14 +286,9 @@ test_expect_success 'info deleted-symlink-directory' "
319
286
cd svnwc &&
320
287
svn_cmd rm --force symlink-directory > /dev/null
321
288
) &&
322
- (cd svnwc; svn info symlink-directory) |
323
- sed -e 's/^\(Text Last Updated:\).*/\1 TEXT-LAST-UPDATED-STRING/' \
324
- > expected.info-deleted-symlink-directory &&
325
- (cd gitwc; git svn info symlink-directory) |
326
- sed -e 's/^\(Text Last Updated:\).*/\1 TEXT-LAST-UPDATED-STRING/' \
327
- > actual.info-deleted-symlink-directory &&
328
- test_cmp expected.info-deleted-symlink-directory \
329
- actual.info-deleted-symlink-directory
289
+ (cd svnwc; svn info symlink-directory) >expected.info-deleted-symlink-directory &&
290
+ (cd gitwc; git svn info symlink-directory) >actual.info-deleted-symlink-directory &&
291
+ test_cmp_info expected.info-deleted-symlink-directory actual.info-deleted-symlink-directory
330
292
"
331
293
332
294
test_expect_success ' info --url symlink-directory (deleted)' '
0 commit comments