[PATCH 4 of 4] mpatch: implement cffi version of mpatch

[Maciej Fijalkowski]

# HG changeset patch
# User Maciej Fijalkowski <fijall at gmail.com>
# Date 1465372757 -7200
#      Wed Jun 08 09:59:17 2016 +0200
# Node ID 037fce72309155ba3806753d4f1dc3a7db71ee39
# Parent  26a4063b4f1f36607dd673849449292ebc34a91d
mpatch: implement cffi version of mpatch

This is a first go at working, but not 100% efficient version of mpatch
for PyPy that uses cffi. Additional improvements might follow, but it
already makes mercurial far more usable under pypy.

diff -r 26a4063b4f1f -r 037fce723091 mercurial/build_mpatch_cffi.py
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/mercurial/build_mpatch_cffi.py	Wed Jun 08 09:59:17 2016 +0200
@@ -0,0 +1,31 @@
+import os
+from cffi import FFI
+
+ffi = FFI()
+mpatch_c = os.path.join(os.path.dirname(__file__), 'mpatch.c')
+ffi.set_source("_mpatch_cffi", open(mpatch_c).read(),
+               include_dirs=["mercurial"])
+ffi.cdef("""
+
+struct frag {
+       int start, end, len;
+       const char *data;
+};
+
+struct flist {
+       struct frag *base, *head, *tail;
+};
+
+extern "Python" struct flist* cffi_get_next_item(void*, ssize_t);
+
+int decode(const char *bin, size_t len, struct flist** res);
+struct flist *combine(struct flist *a, struct flist *b);
+ssize_t calcsize(size_t len, struct flist *l);
+void lfree(struct flist *a);
+static int apply(char *buf, const char *orig, size_t len, struct flist *l);
+struct flist *fold(void *bins, struct flist* (*get_next_item)(void*, ssize_t),
+                   ssize_t start, ssize_t end);
+""")
+
+if __name__ == '__main__':
+    ffi.compile()
diff -r 26a4063b4f1f -r 037fce723091 mercurial/mpatch.h
--- a/mercurial/mpatch.h	Tue Jun 07 15:35:58 2016 +0200
+++ b/mercurial/mpatch.h	Wed Jun 08 09:59:17 2016 +0200
@@ -8,21 +8,21 @@
 #define MPATCH_ERR_INVALID_PATCH -3
 
 struct frag {
-       int start, end, len;
-       const char *data;
+	int start, end, len;
+	const char *data;
 };
 
 struct flist {
-       struct frag *base, *head, *tail;
+	struct frag *base, *head, *tail;
 };
 
-int decode(const char *bin, ssize_t len, struct flist** res);
+int decode(const char *bin, ssize_t len, struct flist **res);
 struct flist *combine(struct flist *a, struct flist *b);
 ssize_t calcsize(ssize_t len, struct flist *l);
 void lfree(struct flist *a);
 int apply(char *buf, const char *orig, ssize_t len, struct flist *l);
-ssize_t _patchedsize(long orig, char* bin, ssize_t patchlen);
+ssize_t _patchedsize(long orig, char *bin, ssize_t patchlen);
 struct flist *fold(void *bins, struct flist* (*get_next_item)(void*, ssize_t),
-	               ssize_t start, ssize_t end);
+					ssize_t start, ssize_t end);
 
-#endif // _HG_MPATCH_H_
\ No newline at end of file
+#endif
diff -r 26a4063b4f1f -r 037fce723091 mercurial/mpatch_module.c
--- a/mercurial/mpatch_module.c	Tue Jun 07 15:35:58 2016 +0200
+++ b/mercurial/mpatch_module.c	Wed Jun 08 09:59:17 2016 +0200
@@ -10,7 +10,7 @@
 
 static PyObject *mpatch_Error;
 
-struct flist* cpy_get_next_item(void* bins, ssize_t pos)
+struct flist *cpy_get_item(void *bins, ssize_t pos)
 {
 	const char *buffer;
 	struct flist *res;
@@ -52,7 +52,7 @@
 	if (PyObject_AsCharBuffer(text, &in, &inlen))
 		return NULL;
 
-	patch = fold(bins, cpy_get_next_item, 0, len);
+	patch = fold(bins, cpy_get_item, 0, len);
 	if (!patch) {
 		return NULL;
 	}
diff -r 26a4063b4f1f -r 037fce723091 mercurial/pure/mpatch.py
--- a/mercurial/pure/mpatch.py	Tue Jun 07 15:35:58 2016 +0200
+++ b/mercurial/pure/mpatch.py	Wed Jun 08 09:59:17 2016 +0200
@@ -9,6 +9,8 @@
 
 import struct
 
+from .. import modulepolicy, policynocffi
+
 from . import pycompat
 stringio = pycompat.stringio
 
@@ -125,3 +127,43 @@
 
     outlen += orig - last
     return outlen
+
+if modulepolicy not in policynocffi:
+    try:
+        from _mpatch_cffi import ffi, lib
+    except ImportError:
+        if modulepolicy == 'cffi': # strict cffi import
+            raise
+    else:
+        @ffi.def_extern()
+        def cffi_get_next_item(arg, pos):
+            all, bins = ffi.from_handle(arg)
+            container = ffi.new("struct flist*[1]")
+            to_pass = ffi.new("char[]", str(bins[pos]))
+            all.append(to_pass)
+            r = lib.decode(to_pass, len(to_pass) - 1, container)
+            if r < 0:
+                return ffi.NULL
+            return container[0]
+
+        def patches(text, bins):
+            lgt = len(bins)
+            all = []
+            if not lgt:
+                return text
+            arg = (all, bins)
+            patch = lib.fold(ffi.new_handle(arg), lib.cffi_get_next_item, 0,
+                             lgt)
+            if not patch:
+                raise mpatchError("cannot decode chunk")
+            outlen = lib.calcsize(len(text), patch)
+            if outlen < 0:
+                lib.lfree(patch)
+                raise mpatchError("inconsistency detected")
+            buf = ffi.new("char[]", outlen)
+            if lib.apply(buf, text, len(text), patch) < 0:
+                lib.lfree(patch)
+                raise mpatchError("error applying patches")
+            res = ffi.buffer(buf, outlen)[:]
+            lib.lfree(patch)
+            return res
diff -r 26a4063b4f1f -r 037fce723091 setup.py
--- a/setup.py	Tue Jun 07 15:35:58 2016 +0200
+++ b/setup.py	Wed Jun 08 09:59:17 2016 +0200
@@ -262,7 +262,8 @@
 
 
 class hgdist(Distribution):
-    pure = ispypy
+    pure = False
+    cffi = ispypy
 
     global_options = Distribution.global_options + \
                      [('pure', None, "use pure (slow) Python "
@@ -316,6 +317,10 @@
 
         if self.distribution.pure:
             self.distribution.ext_modules = []
+        elif self.distribution.cffi:
+            from mercurial import build_mpatch_cffi
+            exts = [build_mpatch_cffi.ffi.distutils_extension()]
+            self.distribution.ext_modules = exts
         else:
             h = os.path.join(get_python_inc(), 'Python.h')
             if not os.path.exists(h):