Check that obsolete properly strip heads

  $ cat >> $HGRCPATH << EOF

  > [phases]

  > # public changeset are not obsolete

  > publish=false

  > [ui]

  > logtemplate='{node|short} ({phase}) {desc|firstline}\n'

  > [experimental]

  > evolution.createmarkers=True

  > EOF

  $ mkcommit() {

  >    echo "$1" > "$1"

  >    hg add "$1"

  >    hg ci -m "add $1"

  > }

  $ getid() {

  >    hg id --debug -ir "desc('$1')"

  > }

  $ hg init remote

  $ cd remote

  $ mkcommit base

  $ hg phase --public .

  $ cd ..

  $ cp -R remote base

  $ hg clone remote local

  updating to branch default

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

  $ cd local

New head replaces old head

==========================

setup

(we add the 1 flags to prevent bumped error during the test)

  $ mkcommit old

  $ hg push

  pushing to $TESTTMP/remote

  searching for changes

  adding changesets

  adding manifests

  adding file changes

  added 1 changesets with 1 changes to 1 files

  $ hg up -q '.^'

  $ mkcommit new

  created new head

  $ hg debugobsolete --flags 1 `getid old` `getid new`

  obsoleted 1 changesets

  $ hg log -G --hidden

  @  71e3228bffe1 (draft) add new

  |

  | x  c70b08862e08 (draft) add old

  |/

  o  b4952fcf48cf (public) add base

  $ cp -R ../remote ../backup1

old exists remotely as draft. It is obsoleted by new that we now push.

Push should not warn about creating new head

  $ hg push

  pushing to $TESTTMP/remote

  searching for changes

  adding changesets

  adding manifests

  adding file changes

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

old head is now public (public local version)

=============================================

setup

  $ rm -fr ../remote

  $ cp -R ../backup1 ../remote

  $ hg -R ../remote phase --public c70b08862e08

  $ hg pull -v

  pulling from $TESTTMP/remote

  searching for changes

  no changes found

  $ hg log -G --hidden

  @  71e3228bffe1 (draft) add new

  |

  | o  c70b08862e08 (public) add old

  |/

  o  b4952fcf48cf (public) add base

Abort: old will still be an head because it's public.

  $ hg push

  pushing to $TESTTMP/remote

  searching for changes

  abort: push creates new remote head 71e3228bffe1!

  (merge or see 'hg help push' for details about pushing new heads)

  [255]

old head is now public (public remote version)

==============================================

TODO: Not implemented yet.

# setup

#

#   $ rm -fr ../remote

#   $ cp -R ../backup1 ../remote

#   $ hg -R ../remote phase --public c70b08862e08

#   $ hg phase --draft --force c70b08862e08

#   $ hg log -G --hidden

#   @  71e3228bffe1 (draft) add new

#   |

#   | x  c70b08862e08 (draft) add old

#   |/

#   o  b4952fcf48cf (public) add base

#

#

#

# Abort: old will still be an head because it's public.

#

#   $ hg push

#   pushing to $TESTTMP/remote

#   searching for changes

#   abort: push creates new remote head 71e3228bffe1!

#   (merge or see 'hg help push' for details about pushing new heads)

#   [255]

old head is obsolete but replacement is not pushed

==================================================

setup

  $ rm -fr ../remote

  $ cp -R ../backup1 ../remote

  $ hg phase --draft --force '(0::) - 0'

  $ hg up -q '.^'

  $ mkcommit other

  created new head

  $ hg log -G --hidden

  @  d7d41ccbd4de (draft) add other

  |

  | o  71e3228bffe1 (draft) add new

  |/

  | x  c70b08862e08 (draft) add old

  |/

  o  b4952fcf48cf (public) add base

old exists remotely as draft. It is obsoleted by new but we don't push new.

Push should abort on new head

  $ hg push -r 'desc("other")'

  pushing to $TESTTMP/remote

  searching for changes

  abort: push creates new remote head d7d41ccbd4de!

  (merge or see 'hg help push' for details about pushing new heads)

  [255]

Both precursors and successors are already know remotely. Descendant adds heads

===============================================================================

setup. (The obsolete marker is known locally only

  $ cd ..

  $ rm -rf local

  $ hg clone remote local

  updating to branch default

  2 files updated, 0 files merged, 0 files removed, 0 files unresolved

  $ cd local

  $ mkcommit old

  old already tracked!

  nothing changed

  [1]

  $ hg up -q '.^'

  $ mkcommit new

  created new head

  $ hg push -f

  pushing to $TESTTMP/remote

  searching for changes

  adding changesets

  adding manifests

  adding file changes

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

  $ mkcommit desc1

  $ hg up -q '.^'

  $ mkcommit desc2

  created new head

  $ hg debugobsolete `getid old` `getid new`

  obsoleted 1 changesets

  $ hg log -G --hidden

  @  5fe37041cc2b (draft) add desc2

  |

  | o  a3ef1d111c5f (draft) add desc1

  |/

  o  71e3228bffe1 (draft) add new

  |

  | x  c70b08862e08 (draft) add old

  |/

  o  b4952fcf48cf (public) add base

  $ hg log -G --hidden -R ../remote

  o  71e3228bffe1 (draft) add new

  |

  | o  c70b08862e08 (draft) add old

  |/

  @  b4952fcf48cf (public) add base

  $ cp -R ../remote ../backup2

Push should not warn about adding new heads. We create one, but we'll delete

one anyway.

  $ hg push

  pushing to $TESTTMP/remote

  searching for changes

  adding changesets

  adding manifests

  adding file changes

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

Remote head is unknown but obsoleted by a local changeset

=========================================================

setup

  $ rm -fr ../remote

  $ cp -R ../backup1 ../remote

  $ cd ..

  $ rm -rf local

  $ hg clone remote local -r 0

  adding changesets

  adding manifests

  adding file changes

  added 1 changesets with 1 changes to 1 files

  new changesets b4952fcf48cf

  updating to branch default

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

  $ cd local

  $ mkcommit new

  $ hg -R ../remote id --debug -r tip

  c70b08862e0838ea6d7c59c85da2f1ed6c8d67da tip

  $ hg  id --debug -r tip

  71e3228bffe1886550777233d6c97bb5a6b2a650 tip

  $ hg debugobsolete c70b08862e0838ea6d7c59c85da2f1ed6c8d67da 71e3228bffe1886550777233d6c97bb5a6b2a650

  $ hg log -G --hidden

  @  71e3228bffe1 (draft) add new

  |

  o  b4952fcf48cf (public) add base

  $ hg log -G --hidden -R ../remote

  o  c70b08862e08 (draft) add old

  |

  @  b4952fcf48cf (public) add base

We do not have enought data to take the right decision, we should fail

  $ hg push

  pushing to $TESTTMP/remote

  searching for changes

  remote has heads on branch 'default' that are not known locally: c70b08862e08

  abort: push creates new remote head 71e3228bffe1!

  (pull and merge or see 'hg help push' for details about pushing new heads)

  [255]

Pulling the missing data makes it work

  $ hg pull

  pulling from $TESTTMP/remote

  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 push

  pushing to $TESTTMP/remote

  searching for changes

  adding changesets

  adding manifests

  adding file changes

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

Old head is pruned without parent data and new unrelated head added

===================================================================

setup

  $ cd ..

  $ rm -R remote local

  $ cp -R backup1 remote

  $ hg clone remote local -qr c70b08862e08

  $ cd local

  $ hg up -q '.^'

  $ mkcommit new-unrelated

  created new head

  $ hg debugobsolete `getid old`

  obsoleted 1 changesets

  $ hg log -G --hidden

  @  350a93b716be (draft) add new-unrelated

  |

  | x  c70b08862e08 (draft) add old

  |/

  o  b4952fcf48cf (public) add base

  $ hg push

  pushing to $TESTTMP/remote

  searching for changes

  abort: push creates new remote head 350a93b716be!

  (merge or see 'hg help push' for details about pushing new heads)

  [255]