test-obsolete-checkheads.t
265 lines
| 6.3 KiB
| text/troff
|
Tads3Lexer
/ tests / test-obsolete-checkheads.t
Pierre-Yves David
|
r17546 | 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' | ||||
Durham Goode
|
r22955 | > [experimental] | ||
> evolution=createmarkers | ||||
Pierre-Yves David
|
r17546 | > 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 | ||||
Pierre-Yves David
|
r17834 | (we add the 1 flags to prevent bumped error during the test) | ||
Pierre-Yves David
|
r17546 | |||
$ mkcommit old | ||||
$ hg push | ||||
Patrick Mezard
|
r17564 | pushing to $TESTTMP/remote (glob) | ||
Pierre-Yves David
|
r17546 | 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 | ||||
Pierre-Yves David
|
r17834 | $ hg debugobsolete --flags 1 `getid old` `getid new` | ||
Martin Geisler
|
r20117 | $ hg log -G --hidden | ||
Pierre-Yves David
|
r17546 | @ 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 | ||||
Patrick Mezard
|
r17564 | pushing to $TESTTMP/remote (glob) | ||
Pierre-Yves David
|
r17546 | searching for changes | ||
adding changesets | ||||
adding manifests | ||||
adding file changes | ||||
added 1 changesets with 1 changes to 1 files (+1 heads) | ||||
Pierre-Yves David
|
r17547 | 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 | ||||
Patrick Mezard
|
r17564 | pulling from $TESTTMP/remote (glob) | ||
Pierre-Yves David
|
r17547 | searching for changes | ||
no changes found | ||||
Martin Geisler
|
r20117 | $ hg log -G --hidden | ||
Pierre-Yves David
|
r17547 | @ 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 | ||||
Patrick Mezard
|
r17564 | pushing to $TESTTMP/remote (glob) | ||
Pierre-Yves David
|
r17547 | searching for changes | ||
abort: push creates new remote head 71e3228bffe1! | ||||
timeless
|
r29973 | (merge or see 'hg help push' for details about pushing new heads) | ||
Pierre-Yves David
|
r17547 | [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 | ||||
Martin Geisler
|
r20117 | # $ hg log -G --hidden | ||
Pierre-Yves David
|
r17547 | # @ 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! | ||||
timeless
|
r29979 | # (merge or see 'hg help push' for details about pushing new heads) | ||
Pierre-Yves David
|
r17547 | # [255] | ||
old head is obsolete but replacement is not pushed | ||||
Pierre-Yves David
|
r17546 | ================================================== | ||
setup | ||||
$ rm -fr ../remote | ||||
$ cp -r ../backup1 ../remote | ||||
Pierre-Yves David
|
r17547 | $ hg phase --draft --force '(0::) - 0' | ||
Pierre-Yves David
|
r17546 | $ hg up -q '.^' | ||
$ mkcommit other | ||||
created new head | ||||
Martin Geisler
|
r20117 | $ hg log -G --hidden | ||
Pierre-Yves David
|
r17546 | @ 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")' | ||||
Patrick Mezard
|
r17564 | pushing to $TESTTMP/remote (glob) | ||
Pierre-Yves David
|
r17546 | searching for changes | ||
abort: push creates new remote head d7d41ccbd4de! | ||||
timeless
|
r29973 | (merge or see 'hg help push' for details about pushing new heads) | ||
Pierre-Yves David
|
r17546 | [255] | ||
Pierre-Yves David
|
r17548 | |||
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 | ||||
Patrick Mezard
|
r17564 | pushing to $TESTTMP/remote (glob) | ||
Pierre-Yves David
|
r17548 | 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` | ||||
Martin Geisler
|
r20117 | $ hg log -G --hidden | ||
Pierre-Yves David
|
r17548 | @ 5fe37041cc2b (draft) add desc2 | ||
| | ||||
| o a3ef1d111c5f (draft) add desc1 | ||||
|/ | ||||
o 71e3228bffe1 (draft) add new | ||||
| | ||||
| x c70b08862e08 (draft) add old | ||||
|/ | ||||
o b4952fcf48cf (public) add base | ||||
Martin Geisler
|
r20117 | $ hg log -G --hidden -R ../remote | ||
Pierre-Yves David
|
r17548 | 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 | ||||
Patrick Mezard
|
r17564 | pushing to $TESTTMP/remote (glob) | ||
Pierre-Yves David
|
r17548 | 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 | ||||
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 | ||||
Martin Geisler
|
r20117 | $ hg log -G --hidden | ||
Pierre-Yves David
|
r17548 | @ 71e3228bffe1 (draft) add new | ||
| | ||||
o b4952fcf48cf (public) add base | ||||
Martin Geisler
|
r20117 | $ hg log -G --hidden -R ../remote | ||
Pierre-Yves David
|
r17548 | o c70b08862e08 (draft) add old | ||
| | ||||
@ b4952fcf48cf (public) add base | ||||
Push should not complain about new heads. | ||||
$ hg push --traceback | ||||
Patrick Mezard
|
r17564 | pushing to $TESTTMP/remote (glob) | ||
Pierre-Yves David
|
r17548 | searching for changes | ||
adding changesets | ||||
adding manifests | ||||
adding file changes | ||||
added 1 changesets with 1 changes to 1 files (+1 heads) | ||||