peer: introduce canpush and improve error message

mercurial/bundlerepo.py

@@ -167,6 +167,10 b' class bundlefilelog(bundlerevlog, filelo'
     def _file(self, f):
         self._repo.file(f)
 
+class bundlepeer(localrepo.localpeer):
+    def canpush(self):
+        return False
+
 class bundlerepository(localrepo.localrepository):
     def __init__(self, ui, path, bundlename):
         self._tempparent = None
@@ -272,6 +276,9 b' class bundlerepository(localrepo.localre'
     def cancopy(self):
         return False
 
+    def peer(self):
+        return bundlepeer(self)
+
     def getcwd(self):
         return os.getcwd() # always outside the repo
 

mercurial/localrepo.py

@@ -49,6 +49,9 b' class localpeer(peer.peerrepository):'
     def cancopy(self):
         return self._repo.cancopy() # so bundlerepo can override
 
+    def canpush(self):
+        return True
+
     def url(self):
         return self._repo.url()
 
@@ -1804,6 +1807,8 b' class localrepository(object):'
         # unbundle assumes local user cannot lock remote repo (new ssh
         # servers, http servers).
 
+        if not remote.canpush():
+            raise util.Abort(_("destination does not support push"))
         # get local lock as we might write phase data
         locallock = self.lock()
         try:

mercurial/peer.py

@@ -45,5 +45,8 b' class peerrepository(object):'
     def cancopy(self):
         return False
 
+    def canpush(self):
+        return True
+
     def close(self):
         pass

mercurial/statichttprepo.py

@@ -79,6 +79,8 b' def build_opener(ui, authinfo):'
 class statichttppeer(localrepo.localpeer):
     def local(self):
         return None
+    def canpush(self):
+        return False
 
 class statichttprepository(localrepo.localrepository):
     def __init__(self, ui, path):

tests/test-static-http.t

@@ -91,7 +91,7 b' trying to push'
   $ hg commit -m"test"
   $ hg push
   pushing to static-http://localhost:$HGPORT/remote
-  abort: cannot lock static-http repository
+  abort: destination does not support push
   [255]
 
 trying clone -r