Andrew's git - gitweb.git/blob - t/t9119-git-svn-info.sh

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