sapling/eden/scm/tests/test-hgsql-strip.t

#require py2
#chg-compatible

  $ . "$TESTDIR/hgsql/library.sh"
  $ disable treemanifest

Populate the db with an initial commit

  $ initclient client
  $ cd client
  $ echo x > x
  $ hg commit -qAm x
  $ echo y > y
  $ hg commit -qAm y
  $ hg up 0
  0 files updated, 0 files merged, 1 files removed, 0 files unresolved
  $ echo z > z
  $ hg commit -qAm z
  $ hg bookmark foo
  $ cd ..

Create two masters

  $ initserver master masterrepo
  $ initserver master2 masterrepo
  $ cd master
  $ hg log
  $ hg pull -q ../client

  $ cd ../master2
  $ hg log -G -T '{rev} {desc} {bookmarks}\n'
  o  2 z foo
  |
  | o  1 y
  |/
  o  0 x
  

Stripping normally should fail

  $ hg debugstrip -r 1
  transaction abort!
  rollback completed
  strip failed, backup bundle stored in '$TESTTMP/master2/.hg/strip-backup/d34c38483be9-3839604f-backup.hg'
  strip failed, unrecovered changes stored in '$TESTTMP/master2/.hg/strip-backup/d34c38483be9-48128f20-temp.hg'
  (fix the problem, then recover the changesets with "hg unbundle '$TESTTMP/master2/.hg/strip-backup/d34c38483be9-48128f20-temp.hg'")
  abort: invalid repo change - only hg push and pull are allowed
  [255]

  $ hg verify
  unknown reference in .hg/bookmarks: foo bc3a71defa4a8fb6e8e5c192c02a26d94853d281
  checking changesets
  checking manifests
  crosschecking files in changesets and manifests
  checking files
  3 files, 3 changesets, 3 total revisions

Strip using sqlstrip

- Test that specifying `--i-know-what-i-am-doing` is required.
  $ hg sqlstrip 1
  abort: You must pass --i-know-what-i-am-doing to run this command. If you have multiple servers using the database, this command will break your servers until you run it on each one. Only the Mercurial server admins should ever run this.
  [255]

- Test that specifying the `--cwd` option works.
  $ cd ..
  $ hg --cwd master2 sqlstrip --i-know-what-i-am-doing 1
  *** YOU ARE ABOUT TO DELETE HISTORY (MANDATORY 5 SECOND WAIT) ***
  stripping locally
  stripping from the database
  deleting old references
  deleting revision data

  $ cd master2

Repull, and then strip without a backup
  $ hg pull -q ../client
  $ hg verify
  checking changesets
  checking manifests
  crosschecking files in changesets and manifests
  checking files
  3 files, 3 changesets, 3 total revisions

  $ hg log -G -T '{rev} {desc} {bookmarks}\n'
  o  2 z foo
  |
  | o  1 y
  |/
  o  0 x
  
  $ hg sqlstrip --i-know-what-i-am-doing 1 --no-backup-permanent-data-loss
  *** YOU ARE ABOUT TO DELETE HISTORY (MANDATORY 5 SECOND WAIT) ***
  *** *** *** *** *** *** *** *** * *** *** *** *** *** *** *** ***
  *** THERE ARE NO BACKUPS!       *  (MANDATORY 10 SECOND WAIT) ***
  *** *** *** *** *** *** *** *** * *** *** *** *** *** *** *** ***
  stripping locally
  stripping from the database
  deleting old references
  deleting revision data

Verify master2 is stripped

  $ hg verify
  checking changesets
  checking manifests
  crosschecking files in changesets and manifests
  checking files
  1 files, 1 changesets, 1 total revisions
  $ hg log -G -T '{rev} {desc} {bookmarks}\n'
  o  0 x foo
  
Verify master is broken

  $ cd ../master
  $ hg log 2>&1 | egrep 'CorruptionException:'
  *CorruptionException: heads don't match after sync (glob)

Run sqlstrip on master as well

  $ hg sqlstrip --i-know-what-i-am-doing 1
  *** YOU ARE ABOUT TO DELETE HISTORY (MANDATORY 5 SECOND WAIT) ***
  stripping locally
  stripping from the database
  deleting old references
  deleting revision data

  $ hg verify
  checking changesets
  checking manifests
  crosschecking files in changesets and manifests
  checking files
  1 files, 1 changesets, 1 total revisions
  $ hg log -G -T '{rev} {desc} {bookmarks}\n'
  o  0 x foo
  
Commit after the strip

  $ hg up -q 0
  $ echo z > z
  $ hg commit -qAm z

  $ cd ../master2
  $ hg log -G -T '{rev} {desc} {bookmarks}\n'
  o  1 z
  |
  o  0 x foo
  
Attempt to strip a non-existant rev

  $ hg sqlstrip --i-know-what-i-am-doing 5
  *** YOU ARE ABOUT TO DELETE HISTORY (MANDATORY 5 SECOND WAIT) ***
  abort: revision 5 is not in the repo
  [255]

Attempt to strip a non-integer

  $ hg sqlstrip --i-know-what-i-am-doing master
  *** YOU ARE ABOUT TO DELETE HISTORY (MANDATORY 5 SECOND WAIT) ***
  abort: specified rev must be an integer: 'master'
  [255]

Strip everything. No revlog revisions should remain in the database:

  $ hg sqlstrip --i-know-what-i-am-doing 0
  *** YOU ARE ABOUT TO DELETE HISTORY (MANDATORY 5 SECOND WAIT) ***
  stripping locally
  stripping from the database
  deleting old references
  deleting revision data
  $ mysql -h "$DBHOST" -P "$DBPORT" -u "$DBUSER" "$DBPASSOPT" "$DBNAME" <<"EOS"
  > SELECT COUNT(1) FROM revisions WHERE repo='masterrepo'
  > EOS
  COUNT(1)
  0