better vector class
[imago.git] / gridf.py
index c8f4b90..23e4d04 100644 (file)
--- a/gridf.py
+++ b/gridf.py
@@ -1,8 +1,192 @@
-from manual import lines as g_grid, l2ad
+import Image, ImageDraw, ImageFilter
+
+from manual import lines as g_grid, l2ad, intersection, line as g_line
 from intrsc import intersections_from_angl_dist
+from linef import line_from_angl_dist
+import pcf
+
+class GridFittingFailedError(Exception):
+    pass
+
+class MyGaussianBlur(ImageFilter.Filter):
+    name = "GaussianBlur"
+
+    def __init__(self, radius=2):
+        self.radius = radius
+    def filter(self, image):
+        return image.gaussian_blur(self.radius)
+
+class V(object):
+    def __init__(self, x, y):
+        self.x = x
+        self.y = y
+    
+    def __add__(self, other):
+        return V(self.x + other.x, self.y + other.y)
+
+    def __sub__(self, other):
+        return V(self.x - other.x, self.y - other.y)
+
+    def __rmul__(self, other):
+        return V(other * self.x, other * self.y)
+
+    def __len__(self):
+        return 2;
+
+    def __getitem__(self, key):
+        if key == 0:
+            return self.x
+        elif key == 1:
+            return self.y
+        elif type(key) != int:
+            raise TypeError("V indices must be integers") 
+        else:
+            raise KeyError("V index ({}) out of range".format(key))
+
+    def __iter__(self):
+        yield self.x
+        yield self.y
+
+    @property
+    def normal(self):
+        return V(-self.y, self.x)
+
+def projection(point, line, vector):
+    return V(*intersection(g_line(point, point + vector.normal), g_line(*line)))
+    
+def error_surface(lines, a, b, c, d, hough, size, v1):
+    import matplotlib.pyplot as plt
+    from matplotlib import cm
+    import time
+    import pickle
+    X = []
+    Y = []
+    Z = []
+    s = 0.001
+    k = 200
+    for i in range(-k, k):
+        X.append(range(-k, k))
+        Y.append(2*k*[i])
+        
+    start = time.time()
+    for x in range(0, 2*k):
+        try:
+            Z.append([distance(lines, get_grid(a + X[x][y] * s * v1, b + Y[x][y] * s * v1, 
+                                           c, d, hough, size),
+                              size) for y in range(0, 2* k)])
+        except Exception:
+            Z.append(Z[-1])
+        o = ((time.time() - start) * (2 * k - (x + 1))) / (60 * (x + 1))
+        print x + 1, "{0} h {1:2.2f} m".format(int(o) / 60, o % 60)
+    s_file = open('surface' + str(k), 'w')
+    pickle.dump((X, Y, Z), s_file)
+    s_file.close()
+    plt.imshow(Z, cmap=cm.gnuplot2, interpolation='bicubic', 
+               origin='upper', extent=(-k, k, -k, k), aspect='equal')
+    plt.colorbar()
 
-def find(lines, size, l1, l2):
-    c = intersections_from_angl_dist(lines, size)
-    corners = [c[0][0], c[0][-1], c[-1][0], c[-1][-1]]
+    plt.show()
+
+def find(lines, size, l1, l2, bounds, hough, do_something):
+    a, b, c, d = [V(*a) for a in bounds]
+    l1 = line_from_angl_dist(l1, size)
+    l2 = line_from_angl_dist(l2, size)
+    v1 = V(*l1[0]) - V(*l1[1])
+    v2 = V(*l2[0]) - V(*l2[1])
+    a = projection(a, l1, v1) 
+    b = projection(b, l1, v1) 
+    c = projection(c, l2, v2) 
+    d = projection(d, l2, v2) 
+    grid = get_grid(a, b, c, d, hough, size)
+    dist = distance(lines, grid, size)
+    print dist
+
+    #error_surface(lines, a, b, c, d, hough, size, v1)
+    
+    s = 0.02
+    while True:
+        ts1 = [(s, 0), (-s, 0), (s, s), (-s, -s), (-s, s), (s, -s), (0, s),  (0, -s)]
+        grids = [(get_grid(a + t[0] * v1, b + t[1] * v1, 
+                           c, d, hough, size), t) for t in ts1]
+        distances = [(distance(lines, grid, size), 
+                      grid, t) for grid, t in grids]
+        distances.sort(reverse=True)
+        if distances[0][0] > dist:
+            dist = distances[0][0]
+            grid = distances[0][1]
+            t = distances[0][2]
+            a, b = a + t[0] * v1, b + t[1] * v1
+            print dist
+            s *= 0.75
+        else: 
+           break
+
+    print "---"
+
+    s = 0.02
+    while True:
+        ts1 = [(s, 0), (-s, 0), (s, s), (-s, -s), (-s, s), (s, -s), (0, s),  (0, -s)]
+        grids = [(get_grid(a, b, 
+                           c + t[0] * v2, d + t[1] * v2, hough, size), t) for t in ts1]
+        distances = [(distance(lines, grid, size), 
+                      grid, t) for grid, t in grids]
+        distances.sort(reverse=True)
+        if distances[0][0] > dist:
+            dist = distances[0][0]
+            grid = distances[0][1]
+            t = distances[0][2]
+            c, d = c + t[0] * v2, d + t[1] * v2
+            print dist
+            s *= 0.75
+        else:
+            break
+
+    grid_lines = [[l2ad(l, size) for l in grid[0]], [l2ad(l, size) for l in grid[1]]]
+    return grid, grid_lines
+
+def get_grid(a, b, c, d, hough, size):
+    l1 = hough.lines_from_list([a, b])
+    l2 = hough.lines_from_list([c, d])
+    c = intersections_from_angl_dist([l1, l2], size, get_all=True)
+    #TODO do something when a corner is outside the image
+    corners = (c[0] + c[1])
+    if len(corners) < 4:
+        print l1, l2, c
+        raise GridFittingFailedError
     grid = g_grid(corners)
     return grid
+
+def distance(lines, grid, size):
+    im_l = Image.new('L', size)
+    dr_l = ImageDraw.Draw(im_l)
+    for line in sum(lines, []):
+        dr_l.line(line_from_angl_dist(line, size), width=1, fill=255)
+    im_l = im_l.filter(MyGaussianBlur(radius=3))
+    #GaussianBlur is undocumented class, may not work in future versions of PIL
+    im_g = Image.new('L', size)
+    dr_g = ImageDraw.Draw(im_g)
+    for line in grid[0] + grid[1]:
+        dr_g.line(line, width=1, fill=255)
+    #im_g = im_g.filter(MyGaussianBlur(radius=3))
+    #im_d, distance = combine(im_l, im_g)
+    distance = pcf.combine(im_l.tostring(), im_g.tostring())
+    return distance
+
+def combine(bg, fg):
+    bg_l = bg.load()
+    fg_l = fg.load()
+    #res = Image.new('L', fg.size)
+    #res_l = res.load()
+
+    score = 0
+    area = 0
+
+    for x in xrange(fg.size[0]):
+        for y in xrange(fg.size[1]):
+            if fg_l[x, y]:
+                #res_l[x, y] = bg_l[x, y] * fg_l[x, y]
+                score +=  bg_l[x, y]
+                area += 1
+
+    #return res, float(score)/area
+    return None, float(score)/area