t/t9119-git-svn-info.sh

   1 #!/bin/sh
   2 #
   3 # Copyright (c) 2007 David D. Kilzer
   4
   5 test_description='git-svn info'
   6
   7 . ./lib-git-svn.sh
   8 say 'skipping svn-info test (has a race undiagnosed yet)'
   9 test_done
  10
  11 ptouch() {
  12         perl -w -e '
  13                 use strict;
  14                 die "ptouch requires exactly 2 arguments" if @ARGV != 2;
  15                 die "$ARGV[0] does not exist" if ! -e $ARGV[0];
  16                 my @s = stat $ARGV[0];
  17                 utime $s[8], $s[9], $ARGV[1];
  18         ' "$1" "$2"
  19 }
  20
  21 test_expect_success 'setup repository and import' "
  22         mkdir info &&
  23         cd info &&
  24                 echo FIRST > A &&
  25                 echo one > file &&
  26                 ln -s file symlink-file &&
  27                 mkdir directory &&
  28                 touch directory/.placeholder &&
  29                 ln -s directory symlink-directory &&
  30                 svn import -m 'initial' . $svnrepo &&
  31         cd .. &&
  32         mkdir gitwc &&
  33         cd gitwc &&
  34                 git-svn init $svnrepo &&
  35                 git-svn fetch &&
  36         cd .. &&
  37         svn co $svnrepo svnwc &&
  38         ptouch svnwc/file gitwc/file &&
  39         ptouch svnwc/directory gitwc/directory &&
  40         ptouch svnwc/symlink-file gitwc/symlink-file &&
  41         ptouch svnwc/symlink-directory gitwc/symlink-directory
  42         "
  43
  44 test_expect_success 'info' "
  45         (cd svnwc; svn info) > expected.info &&
  46         (cd gitwc; git-svn info) > actual.info &&
  47         git-diff expected.info actual.info
  48         "
  49
  50 test_expect_success 'info --url' '
  51         test $(cd gitwc; git-svn info --url) = $svnrepo
  52         '
  53
  54 test_expect_success 'info .' "
  55         (cd svnwc; svn info .) > expected.info-dot &&
  56         (cd gitwc; git-svn info .) > actual.info-dot &&
  57         git-diff expected.info-dot actual.info-dot
  58         "
  59
  60 test_expect_success 'info --url .' '
  61         test $(cd gitwc; git-svn info --url .) = $svnrepo
  62         '
  63
  64 test_expect_success 'info file' "
  65         (cd svnwc; svn info file) > expected.info-file &&
  66         (cd gitwc; git-svn info file) > actual.info-file &&
  67         git-diff expected.info-file actual.info-file
  68         "
  69
  70 test_expect_success 'info --url file' '
  71         test $(cd gitwc; git-svn info --url file) = "$svnrepo/file"
  72         '
  73
  74 test_expect_success 'info directory' "
  75         (cd svnwc; svn info directory) > expected.info-directory &&
  76         (cd gitwc; git-svn info directory) > actual.info-directory &&
  77         git-diff expected.info-directory actual.info-directory
  78         "
  79
  80 test_expect_success 'info --url directory' '
  81         test $(cd gitwc; git-svn info --url directory) = "$svnrepo/directory"
  82         '
  83
  84 test_expect_success 'info symlink-file' "
  85         (cd svnwc; svn info symlink-file) > expected.info-symlink-file &&
  86         (cd gitwc; git-svn info symlink-file) > actual.info-symlink-file &&
  87         git-diff expected.info-symlink-file actual.info-symlink-file
  88         "
  89
  90 test_expect_success 'info --url symlink-file' '
  91         test $(cd gitwc; git-svn info --url symlink-file) \
  92              = "$svnrepo/symlink-file"
  93         '
  94
  95 test_expect_success 'info symlink-directory' "
  96         (cd svnwc; svn info symlink-directory) \
  97                 > expected.info-symlink-directory &&
  98         (cd gitwc; git-svn info symlink-directory) \
  99                 > actual.info-symlink-directory &&
 100         git-diff expected.info-symlink-directory actual.info-symlink-directory
 101         "
 102
 103 test_expect_success 'info --url symlink-directory' '
 104         test $(cd gitwc; git-svn info --url symlink-directory) \
 105              = "$svnrepo/symlink-directory"
 106         '
 107
 108 test_expect_success 'info added-file' "
 109         echo two > gitwc/added-file &&
 110         cd gitwc &&
 111                 git add added-file &&
 112         cd .. &&
 113         cp gitwc/added-file svnwc/added-file &&
 114         ptouch gitwc/added-file svnwc/added-file &&
 115         cd svnwc &&
 116                 svn add added-file > /dev/null &&
 117         cd .. &&
 118         (cd svnwc; svn info added-file) > expected.info-added-file &&
 119         (cd gitwc; git-svn info added-file) > actual.info-added-file &&
 120         git-diff expected.info-added-file actual.info-added-file
 121         "
 122
 123 test_expect_success 'info --url added-file' '
 124         test $(cd gitwc; git-svn info --url added-file) \
 125              = "$svnrepo/added-file"
 126         '
 127
 128 test_expect_success 'info added-directory' "
 129         mkdir gitwc/added-directory svnwc/added-directory &&
 130         ptouch gitwc/added-directory svnwc/added-directory &&
 131         touch gitwc/added-directory/.placeholder &&
 132         cd svnwc &&
 133                 svn add added-directory > /dev/null &&
 134         cd .. &&
 135         cd gitwc &&
 136                 git add added-directory &&
 137         cd .. &&
 138         (cd svnwc; svn info added-directory) \
 139                 > expected.info-added-directory &&
 140         (cd gitwc; git-svn info added-directory) \
 141                 > actual.info-added-directory &&
 142         git-diff expected.info-added-directory actual.info-added-directory
 143         "
 144
 145 test_expect_success 'info --url added-directory' '
 146         test $(cd gitwc; git-svn info --url added-directory) \
 147              = "$svnrepo/added-directory"
 148         '
 149
 150 test_expect_success 'info added-symlink-file' "
 151         cd gitwc &&
 152                 ln -s added-file added-symlink-file &&
 153                 git add added-symlink-file &&
 154         cd .. &&
 155         cd svnwc &&
 156                 ln -s added-file added-symlink-file &&
 157                 svn add added-symlink-file > /dev/null &&
 158         cd .. &&
 159         ptouch gitwc/added-symlink-file svnwc/added-symlink-file &&
 160         (cd svnwc; svn info added-symlink-file) \
 161                 > expected.info-added-symlink-file &&
 162         (cd gitwc; git-svn info added-symlink-file) \
 163                 > actual.info-added-symlink-file &&
 164         git-diff expected.info-added-symlink-file \
 165                  actual.info-added-symlink-file
 166         "
 167
 168 test_expect_success 'info --url added-symlink-file' '
 169         test $(cd gitwc; git-svn info --url added-symlink-file) \
 170              = "$svnrepo/added-symlink-file"
 171         '
 172
 173 test_expect_success 'info added-symlink-directory' "
 174         cd gitwc &&
 175                 ln -s added-directory added-symlink-directory &&
 176                 git add added-symlink-directory &&
 177         cd .. &&
 178         cd svnwc &&
 179                 ln -s added-directory added-symlink-directory &&
 180                 svn add added-symlink-directory > /dev/null &&
 181         cd .. &&
 182         ptouch gitwc/added-symlink-directory svnwc/added-symlink-directory &&
 183         (cd svnwc; svn info added-symlink-directory) \
 184                 > expected.info-added-symlink-directory &&
 185         (cd gitwc; git-svn info added-symlink-directory) \
 186                 > actual.info-added-symlink-directory &&
 187         git-diff expected.info-added-symlink-directory \
 188                  actual.info-added-symlink-directory
 189         "
 190
 191 test_expect_success 'info --url added-symlink-directory' '
 192         test $(cd gitwc; git-svn info --url added-symlink-directory) \
 193              = "$svnrepo/added-symlink-directory"
 194         '
 195
 196 # The next few tests replace the "Text Last Updated" value with a
 197 # placeholder since git doesn't have a way to know the date that a
 198 # now-deleted file was last checked out locally.  Internally it
 199 # simply reuses the Last Changed Date.
 200
 201 test_expect_success 'info deleted-file' "
 202         cd gitwc &&
 203                 git rm -f file > /dev/null &&
 204         cd .. &&
 205         cd svnwc &&
 206                 svn rm --force file > /dev/null &&
 207         cd .. &&
 208         (cd svnwc; svn info file) |
 209         sed -e 's/^\(Text Last Updated:\).*/\1 TEXT-LAST-UPDATED-STRING/' \
 210                 > expected.info-deleted-file &&
 211         (cd gitwc; git-svn info file) |
 212         sed -e 's/^\(Text Last Updated:\).*/\1 TEXT-LAST-UPDATED-STRING/' \
 213                 > actual.info-deleted-file &&
 214         git-diff expected.info-deleted-file actual.info-deleted-file
 215         "
 216
 217 test_expect_success 'info --url file (deleted)' '
 218         test $(cd gitwc; git-svn info --url file) \
 219              = "$svnrepo/file"
 220         '
 221
 222 test_expect_success 'info deleted-directory' "
 223         cd gitwc &&
 224                 git rm -r -f directory > /dev/null &&
 225         cd .. &&
 226         cd svnwc &&
 227                 svn rm --force directory > /dev/null &&
 228         cd .. &&
 229         (cd svnwc; svn info directory) |
 230         sed -e 's/^\(Text Last Updated:\).*/\1 TEXT-LAST-UPDATED-STRING/' \
 231                 > expected.info-deleted-directory &&
 232         (cd gitwc; git-svn info directory) |
 233         sed -e 's/^\(Text Last Updated:\).*/\1 TEXT-LAST-UPDATED-STRING/' \
 234                 > actual.info-deleted-directory &&
 235         git-diff expected.info-deleted-directory actual.info-deleted-directory
 236         "
 237
 238 test_expect_success 'info --url directory (deleted)' '
 239         test $(cd gitwc; git-svn info --url directory) \
 240              = "$svnrepo/directory"
 241         '
 242
 243 test_expect_success 'info deleted-symlink-file' "
 244         cd gitwc &&
 245                 git rm -f symlink-file > /dev/null &&
 246         cd .. &&
 247         cd svnwc &&
 248                 svn rm --force symlink-file > /dev/null &&
 249         cd .. &&
 250         (cd svnwc; svn info symlink-file) |
 251         sed -e 's/^\(Text Last Updated:\).*/\1 TEXT-LAST-UPDATED-STRING/' \
 252                 > expected.info-deleted-symlink-file &&
 253         (cd gitwc; git-svn info symlink-file) |
 254         sed -e 's/^\(Text Last Updated:\).*/\1 TEXT-LAST-UPDATED-STRING/' \
 255                 > actual.info-deleted-symlink-file &&
 256         git-diff expected.info-deleted-symlink-file \
 257                  actual.info-deleted-symlink-file
 258         "
 259
 260 test_expect_success 'info --url symlink-file (deleted)' '
 261         test $(cd gitwc; git-svn info --url symlink-file) \
 262              = "$svnrepo/symlink-file"
 263         '
 264
 265 test_expect_success 'info deleted-symlink-directory' "
 266         cd gitwc &&
 267                 git rm -f symlink-directory > /dev/null &&
 268         cd .. &&
 269         cd svnwc &&
 270                 svn rm --force symlink-directory > /dev/null &&
 271         cd .. &&
 272         (cd svnwc; svn info symlink-directory) |
 273         sed -e 's/^\(Text Last Updated:\).*/\1 TEXT-LAST-UPDATED-STRING/' \
 274                  > expected.info-deleted-symlink-directory &&
 275         (cd gitwc; git-svn info symlink-directory) |
 276         sed -e 's/^\(Text Last Updated:\).*/\1 TEXT-LAST-UPDATED-STRING/' \
 277                  > actual.info-deleted-symlink-directory &&
 278         git-diff expected.info-deleted-symlink-directory \
 279                  actual.info-deleted-symlink-directory
 280         "
 281
 282 test_expect_success 'info --url symlink-directory (deleted)' '
 283         test $(cd gitwc; git-svn info --url symlink-directory) \
 284              = "$svnrepo/symlink-directory"
 285         '
 286
 287 # NOTE: git does not have the concept of replaced objects,
 288 # so we can't test for files in that state.
 289
 290 test_expect_success 'info unknown-file' "
 291         echo two > gitwc/unknown-file &&
 292         cp gitwc/unknown-file svnwc/unknown-file &&
 293         ptouch gitwc/unknown-file svnwc/unknown-file &&
 294         (cd svnwc; svn info unknown-file) 2> expected.info-unknown-file &&
 295         (cd gitwc; git-svn info unknown-file) 2> actual.info-unknown-file &&
 296         git-diff expected.info-unknown-file actual.info-unknown-file
 297         "
 298
 299 test_expect_success 'info --url unknown-file' '
 300         test -z $(cd gitwc; git-svn info --url unknown-file \
 301                         2> ../actual.info--url-unknown-file) &&
 302         git-diff expected.info-unknown-file actual.info--url-unknown-file
 303         '
 304
 305 test_expect_success 'info unknown-directory' "
 306         mkdir gitwc/unknown-directory svnwc/unknown-directory &&
 307         ptouch gitwc/unknown-directory svnwc/unknown-directory &&
 308         touch gitwc/unknown-directory/.placeholder &&
 309         (cd svnwc; svn info unknown-directory) \
 310                 2> expected.info-unknown-directory &&
 311         (cd gitwc; git-svn info unknown-directory) \
 312                 2> actual.info-unknown-directory &&
 313         git-diff expected.info-unknown-directory actual.info-unknown-directory
 314         "
 315
 316 test_expect_success 'info --url unknown-directory' '
 317         test -z $(cd gitwc; git-svn info --url unknown-directory \
 318                         2> ../actual.info--url-unknown-directory) &&
 319         git-diff expected.info-unknown-directory \
 320                  actual.info--url-unknown-directory
 321         '
 322
 323 test_expect_success 'info unknown-symlink-file' "
 324         cd gitwc &&
 325                 ln -s unknown-file unknown-symlink-file &&
 326         cd .. &&
 327         cd svnwc &&
 328                 ln -s unknown-file unknown-symlink-file &&
 329         cd .. &&
 330         ptouch gitwc/unknown-symlink-file svnwc/unknown-symlink-file &&
 331         (cd svnwc; svn info unknown-symlink-file) \
 332                 2> expected.info-unknown-symlink-file &&
 333         (cd gitwc; git-svn info unknown-symlink-file) \
 334                 2> actual.info-unknown-symlink-file &&
 335         git-diff expected.info-unknown-symlink-file \
 336                  actual.info-unknown-symlink-file
 337         "
 338
 339 test_expect_success 'info --url unknown-symlink-file' '
 340         test -z $(cd gitwc; git-svn info --url unknown-symlink-file \
 341                         2> ../actual.info--url-unknown-symlink-file) &&
 342         git-diff expected.info-unknown-symlink-file \
 343                  actual.info--url-unknown-symlink-file
 344         '
 345
 346 test_expect_success 'info unknown-symlink-directory' "
 347         cd gitwc &&
 348                 ln -s unknown-directory unknown-symlink-directory &&
 349         cd .. &&
 350         cd svnwc &&
 351                 ln -s unknown-directory unknown-symlink-directory &&
 352         cd .. &&
 353         ptouch gitwc/unknown-symlink-directory \
 354                svnwc/unknown-symlink-directory &&
 355         (cd svnwc; svn info unknown-symlink-directory) \
 356                 2> expected.info-unknown-symlink-directory &&
 357         (cd gitwc; git-svn info unknown-symlink-directory) \
 358                 2> actual.info-unknown-symlink-directory &&
 359         git-diff expected.info-unknown-symlink-directory \
 360                  actual.info-unknown-symlink-directory
 361         "
 362
 363 test_expect_success 'info --url unknown-symlink-directory' '
 364         test -z $(cd gitwc; git-svn info --url unknown-symlink-directory \
 365                         2> ../actual.info--url-unknown-symlink-directory) &&
 366         git-diff expected.info-unknown-symlink-directory \
 367                  actual.info--url-unknown-symlink-directory
 368         '
 369
 370 test_done