$ cat >> $HGRCPATH <<EOF

  > [web]

  > push_ssl = false

  > allow_push = *

  > [phases]

  > publish=False

  > [alias]

  > odiff=diff --rev 'limit(precursors(.),1)' --rev .

  > [extensions]

  > hgext.graphlog=

  > EOF

  $ echo "obsolete=$(echo $(dirname $TESTDIR))/hgext/obsolete.py" >> $HGRCPATH

  $ mkcommit() {

  >    echo "$1" > "$1"

  >    hg add "$1"

  >    hg ci -m "add $1"

  > }

  $ getid() {

  >    hg id --debug -ir "$1"

  > }

  $ alias qlog="hg log --template='{rev}\n- {node|short}\n'"

  $ hg init local

  $ cd local

  $ mkcommit a # 0

  $ hg phase -p .

  $ mkcommit b # 1

  $ mkcommit c # 2

  $ hg up 1

  0 files updated, 0 files merged, 1 files removed, 0 files unresolved

  $ mkcommit obsol_c # 3

  created new head

  $ getid 2

  4538525df7e2b9f09423636c61ef63a4cb872a2d

  $ getid 3

  0d3f46688ccc6e756c7e96cf64c391c411309597

  $ hg debugobsolete 4538525df7e2b9f09423636c61ef63a4cb872a2d 0d3f46688ccc6e756c7e96cf64c391c411309597

  $ hg debugobsolete

  4538525df7e2b9f09423636c61ef63a4cb872a2d 0d3f46688ccc6e756c7e96cf64c391c411309597 0 {'date': '', 'user': 'test'}

Test that obsolete changeset are hidden

  $ qlog

  3

  - 0d3f46688ccc

  1

  - 7c3bad9141dc

  0

  - 1f0dee641bb7

  $ qlog --hidden

  3

  - 0d3f46688ccc

  2

  - 4538525df7e2

  1

  - 7c3bad9141dc

  0

  - 1f0dee641bb7

  $ qlog -r 'obsolete()' --hidden

  2

  - 4538525df7e2

Test that obsolete parent a properly computed

  $ qlog -r 'precursors(.)' --hidden

  2

  - 4538525df7e2

  $ qlog -r .

  3

  - 0d3f46688ccc

  $ hg odiff

  diff -r 4538525df7e2 -r 0d3f46688ccc c

  --- a/c	Thu Jan 01 00:00:00 1970 +0000

  +++ /dev/null	Thu Jan 01 00:00:00 1970 +0000

  @@ -1,1 +0,0 @@

  -c

  diff -r 4538525df7e2 -r 0d3f46688ccc obsol_c

  --- /dev/null	Thu Jan 01 00:00:00 1970 +0000

  +++ b/obsol_c	Thu Jan 01 00:00:00 1970 +0000

  @@ -0,0 +1,1 @@

  +obsol_c

Test that obsolete successors a properly computed

  $ qlog -r 'successors(2)' --hidden

  3

  - 0d3f46688ccc

test obsolete changeset with no-obsolete descendant

  $ hg up 1 -q

  $ mkcommit "obsol_c'" # 4 (on 1)

  created new head

  $ hg debugobsolete `getid 3` `getid 4`

  $ qlog

  4

  - 725c380fe99b

  1

  - 7c3bad9141dc

  0

  - 1f0dee641bb7

  $ qlog -r 'obsolete()' --hidden

  2

  - 4538525df7e2

  3

  - 0d3f46688ccc

  $ qlog -r 'allprecursors(4)' --hidden

  2

  - 4538525df7e2

  3

  - 0d3f46688ccc

  $ qlog -r 'allsuccessors(2)' --hidden

  3

  - 0d3f46688ccc

  4

  - 725c380fe99b

  $ hg up 3 -q

  Working directory parent is obsolete

  $ mkcommit d # 5 (on 3)

  1 new unstables changesets

  $ qlog -r 'obsolete()'

  3

  - 0d3f46688ccc

  $ qlog -r 'extinct()' --hidden

  2

  - 4538525df7e2

  $ qlog -r 'suspended()'

  3

  - 0d3f46688ccc

  $ qlog -r 'unstable()'

  5

  - a7a6f2b5d8a5

Test obsolete keyword

  $ hg glog --template '{rev}:{node|short}@{branch}({obsolete}/{phase}) {desc|firstline}\n' \

  >   --hidden

  @  5:a7a6f2b5d8a5@default(unstable/secret) add d

  |

  | o  4:725c380fe99b@default(stable/draft) add obsol_c'

  | |

  x |  3:0d3f46688ccc@default(suspended/secret) add obsol_c

  |/

  | x  2:4538525df7e2@default(extinct/secret) add c

  |/

  o  1:7c3bad9141dc@default(stable/draft) add b

  |

  o  0:1f0dee641bb7@default(stable/public) add a

Test communication of obsolete relation with a compatible client

  $ hg init ../other-new

  $ hg phase --draft 'secret() - extinct()' # until we fix exclusion

  $ hg push ../other-new

  pushing to ../other-new

  searching for changes

  abort: Trying to push unstable changeset: a7a6f2b5d8a5!

  (use 'hg stabilize' to get a stable history (or --force to proceed))

  [255]

  $ hg push -f ../other-new

  pushing to ../other-new

  searching for changes

  adding changesets

  adding manifests

  adding file changes

  added 5 changesets with 5 changes to 5 files (+1 heads)

  $ hg -R ../other-new verify

  checking changesets

  checking manifests

  crosschecking files in changesets and manifests

  checking files

  5 files, 5 changesets, 5 total revisions

  $ qlog -R ../other-new -r 'obsolete()'

  2

  - 0d3f46688ccc

  $ qlog -R ../other-new

  4

  - a7a6f2b5d8a5

  3

  - 725c380fe99b

  2

  - 0d3f46688ccc

  1

  - 7c3bad9141dc

  0

  - 1f0dee641bb7

  $ hg up 3 -q

  Working directory parent is obsolete

  $ mkcommit obsol_d # 6

  created new head

  1 new unstables changesets

  $ hg debugobsolete `getid 5` `getid 6`

  $ qlog

  6

  - 95de7fc6918d

  4

  - 725c380fe99b

  3

  - 0d3f46688ccc

  1

  - 7c3bad9141dc

  0

  - 1f0dee641bb7

  $ qlog -r 'obsolete()'

  3

  - 0d3f46688ccc

  $ hg push ../other-new

  pushing to ../other-new

  searching for changes

  abort: Trying to push unstable changeset: 95de7fc6918d!

  (use 'hg stabilize' to get a stable history (or --force to proceed))

  [255]

  $ hg push ../other-new -f # use f because there is unstability

  pushing to ../other-new

  searching for changes

  adding changesets

  adding manifests

  adding file changes

  added 1 changesets with 1 changes to 1 files (+1 heads)

  $ qlog -R ../other-new

  5

  - 95de7fc6918d

  3

  - 725c380fe99b

  2

  - 0d3f46688ccc

  1

  - 7c3bad9141dc

  0

  - 1f0dee641bb7

  $ qlog -R ../other-new -r 'obsolete()'

  2

  - 0d3f46688ccc

Pushing again does not advertise extinct changeset

  $ hg push ../other-new

  pushing to ../other-new

  searching for changes

  no changes found (ignored 0 secret changesets)

  [1]

  $ hg up -q .^ # 3

  Working directory parent is obsolete

  $ mkcommit "obsol_d'" # 7

  created new head

  1 new unstables changesets

  $ hg debugobsolete `getid 6` `getid 7`

  $ hg pull -R ../other-new .

  pulling from .

  searching for changes

  adding changesets

  adding manifests

  adding file changes

  added 1 changesets with 1 changes to 1 files (+1 heads)

  (run 'hg heads .' to see heads, 'hg merge' to merge)

  $ qlog -R ../other-new

  6

  - 909a0fb57e5d

  3

  - 725c380fe99b

  2

  - 0d3f46688ccc

  1

  - 7c3bad9141dc

  0

  - 1f0dee641bb7

pushing to stuff that doesn't support obsolete

  $ hg init ../other-old

  > # XXX I don't like this but changeset get published otherwise

  > # remove it when we will get a --keep-state flag for push

  $ echo '[extensions]'  > ../other-old/.hg/hgrc

  $ echo "obsolete=!$(echo $(dirname $TESTDIR))/obsolete.py" >> ../other-old/.hg/hgrc

  $ hg push ../other-old

  pushing to ../other-old

  searching for changes

  abort: Trying to push unstable changeset: 909a0fb57e5d!

  (use 'hg stabilize' to get a stable history (or --force to proceed))

  [255]

  $ hg push -f ../other-old

  pushing to ../other-old

  searching for changes

  adding changesets

  adding manifests

  adding file changes

  added 5 changesets with 5 changes to 5 files (+1 heads)

  $ qlog -R ../other-old

  4

  - 909a0fb57e5d

  3

  - 725c380fe99b

  2

  - 0d3f46688ccc

  1

  - 7c3bad9141dc

  0

  - 1f0dee641bb7

clone support

  $ hg clone . ../cloned

  > # The warning should go away once we have default value to set ready before we pull

  requesting all changes

  adding changesets

  adding manifests

  adding file changes

  added 5 changesets with 5 changes to 5 files (+1 heads)

  updating to branch default

  4 files updated, 0 files merged, 0 files removed, 0 files unresolved

  $ qlog -R ../cloned

  4

  - 909a0fb57e5d

  3

  - 725c380fe99b

  2

  - 0d3f46688ccc

  1

  - 7c3bad9141dc

  0

  - 1f0dee641bb7

Test rollback support

  $ hg up .^ -q # 3

  Working directory parent is obsolete

  $ mkcommit "obsol_d''"

  created new head

  1 new unstables changesets

  $ hg debugobsolete `getid 7` `getid 8`

  $ cd ../other-new

  $ hg up -q 3

  $ hg pull ../local/

  pulling from ../local/

  searching for changes

  adding changesets

  adding manifests

  adding file changes

  added 1 changesets with 1 changes to 1 files (+1 heads)

  (run 'hg heads .' to see heads, 'hg merge' to merge)

  $ hg up -q 7 # to check rollback update behavior

  $ qlog

  7

  - 159dfc9fa5d3

  3

  - 725c380fe99b

  2

  - 0d3f46688ccc

  1

  - 7c3bad9141dc

  0

  - 1f0dee641bb7

  $ hg rollback

  repository tip rolled back to revision 6 (undo pull)

  working directory now based on revision 3

  $ hg summary

  parent: 3:725c380fe99b 

   add obsol_c'

  branch: default

  commit: 1 deleted, 2 unknown (clean)

  update: 4 new changesets, 4 branch heads (merge)

  $ qlog

  6

  - 909a0fb57e5d

  3

  - 725c380fe99b

  2

  - 0d3f46688ccc

  1

  - 7c3bad9141dc

  0

  - 1f0dee641bb7

  $ cd ../local

obsolete public changeset

# move draft boundary from 0 to 1

  $ sed -e 's/1f0dee641bb7258c56bd60e93edfa2405381c41e/7c3bad9141dcb46ff89abf5f61856facd56e476c/' -i'.back' .hg/store/phaseroots

  $ hg up null

  0 files updated, 0 files merged, 4 files removed, 0 files unresolved

  $ mkcommit toto # 9

  created new head

  $ hg id -n

  9

  $ hg debugobsolete `getid 0` `getid 9`

83b5778897ad try to obsolete immutable changeset 1f0dee641bb7

# at core level the warning is not issued

# this is now a big issue now that we have latecomer warning

  $ qlog -r 'obsolete()'

  3

  - 0d3f46688ccc

allow to just kill changeset

  $ qlog

  9

  - 83b5778897ad

  8

  - 159dfc9fa5d3

  4

  - 725c380fe99b

  3

  - 0d3f46688ccc

  1

  - 7c3bad9141dc

  0

  - 1f0dee641bb7

  $ hg debugobsolete `getid 9` #kill

  $ hg up null -q # to be not based on 9 anymore

  $ qlog

  8

  - 159dfc9fa5d3

  4

  - 725c380fe99b

  3

  - 0d3f46688ccc

  1

  - 7c3bad9141dc

  0

  - 1f0dee641bb7

check rebase compat

  $ hg glog -r 'not extinct()'  --template='{rev} - {node|short}\n'