small code refactoring
[swftools.git] / lib / gfxpoly / test.c
index 4ab1004..c67f193 100644 (file)
@@ -28,21 +28,17 @@ gfxline_t*mkstar(int x1, int y1, int x2, int y2)
 gfxline_t* mkrandomshape(int range, int n)
 {
     int i;
-    gfxline_t* line = malloc(sizeof(gfxline_t)*n*2);
+    gfxline_t* line = malloc(sizeof(gfxline_t)*n);
     for(i=0;i<n;i++) {
         line[i].type = i?gfx_lineTo:gfx_moveTo;
         line[i].x = lrand48()%range - range/2;
         line[i].y = lrand48()%range - range/2;
         line[i].next = &line[i+1];
-        line[n*2-i-1].type = gfx_lineTo;
-        line[n*2-i-1].x = line[i].x;
-        line[n*2-i-1].y = line[i].y;
-        line[n*2-i-1].next = &line[n*2-i];
     }
-    line[n*2-1].next = 0;
     line[n-1].x = line[0].x;
     line[n-1].y = line[0].y;
     line[n-1].next = 0;
+    return line;
 }
 
 gfxline_t* mkchessboard()
@@ -102,45 +98,74 @@ gfxline_t* mkchessboard()
         l[4].y = y-sizey;
         gfxline_append(b, l);
     }
-    if(do_centerpiece)
-    for(t=0;t<5;t++) {
-        gfxline_t*l = gfxline_makerectangle(-9*spacing,-10,9*spacing,10);
-        gfxmatrix_t matrix;
-        memset(&matrix, 0, sizeof(gfxmatrix_t));
-        double ua=t*0.43;
-        matrix.m00=cos(ua);matrix.m10=sin(ua);
-        matrix.m01=-sin(ua);matrix.m11=cos(ua);
-        gfxline_transform(l, &matrix);
-        gfxline_append(b, l);
+    if(do_centerpiece) {
+       for(t=0;t<5;t++) {
+           gfxline_t*l = gfxline_makerectangle(-9*spacing,-10,9*spacing,10);
+           gfxmatrix_t matrix;
+           memset(&matrix, 0, sizeof(gfxmatrix_t));
+           double ua=t*0.43;
+           matrix.m00=cos(ua);matrix.m10=sin(ua);
+           matrix.m01=-sin(ua);matrix.m11=cos(ua);
+           gfxline_transform(l, &matrix);
+           gfxline_append(b, l);
+       }
+       gfxline_append(b, gfxline_makecircle(100,100,100,100));
+    }
+    return b;
+}
+
+gfxline_t* make_circles(int n)
+{
+    gfxline_t*b = 0;
+    unsigned int c = 0;
+    int t;
+    for(t=0;t<n;t++) {
+        c = crc32_add_byte(c, t);
+       int x = c%200;
+       c = crc32_add_byte(c, t);
+       int y = c%200;;
+       c = crc32_add_byte(c, t^0x55);
+       int r = c%100;
+       b = gfxline_append(b, gfxline_makecircle(x,y,r,r));
+       //b = gfxline_append(b, gfxline_makerectangle(10,10,100,100));
     }
     return b;
 }
 
-int test0()
+static windcontext_t onepolygon = {1};
+
+int test_speed()
 {
-    gfxline_t* b = mkchessboard();
+    //gfxline_t* b = mkchessboard();
+    //gfxline_t* b = mkrandomshape(100,7);
+    gfxline_t* b = make_circles(30);
 
     gfxmatrix_t m;
     memset(&m, 0, sizeof(gfxmatrix_t));
-    int t = 28;
-    m.m00 = cos(t*M_PI/180.0);
-    m.m01 = sin(t*M_PI/180.0);
-    m.m10 = -sin(t*M_PI/180.0);
-    m.m11 = cos(t*M_PI/180.0);
-    m.tx = 400*1.41/2;
-    m.ty = 400*1.41/2;
-    gfxline_transform(b, &m);
-
-    gfxpoly_t*poly = gfxpoly_from_gfxline(b, 0.05);
-    gfxpoly_t*poly2 = gfxpoly_process(poly, &windrule_evenodd);
-    gfxpoly_destroy(poly2);
-    gfxpoly_destroy(poly);
+    int t;
+    for(t=0;t<360;t++) {
+       printf("%d\n", t);
+       m.m00 = cos(t*M_PI/180.0);
+       m.m01 = sin(t*M_PI/180.0);
+       m.m10 = -sin(t*M_PI/180.0);
+       m.m11 = cos(t*M_PI/180.0);
+       m.tx = 400*1.41/2;
+       m.ty = 400*1.41/2;
+       gfxline_t*l = gfxline_clone(b);
+       gfxline_transform(l, &m);
+       gfxcompactpoly_t*poly = gfxcompactpoly_from_gfxline(b, 0.05);
+
+       gfxpoly_t*poly2 = gfxpoly_process(poly, &windrule_evenodd, &onepolygon);
+       gfxcompactpoly_destroy(poly);
+       gfxpoly_destroy(poly2);
+       gfxline_free(l);
+    }
+    gfxline_free(b);
 }
 
-int test1()
+int test1(int argn, char*argv[])
 {
     gfxline_t*box1 = gfxline_makerectangle(50,50,150,150);
-    // put box2 and box3 on top of each other *snicker*
     gfxline_t*box2 = gfxline_makerectangle(100,100,200,200);
     gfxline_t*box3 = gfxline_makerectangle(100,100,200,200);
     gfxline_t*star = mkstar(50,50, 150,150);
@@ -148,7 +173,6 @@ int test1()
     b = gfxline_append(b, box1);
     b = gfxline_append(b, box2);
     b = gfxline_append(b, box3);
-    //b = gfxline_append(b, star);
 
     gfxmatrix_t matrix;
     memset(&matrix, 0, sizeof(gfxmatrix_t));
@@ -158,16 +182,38 @@ int test1()
 
     //gfxline_transform(b, &matrix);
 
-    gfxpoly_t*poly = gfxpoly_from_gfxline(b, 0.05);
+    gfxline_dump(b, stderr, "");
+
+    gfxcompactpoly_t*poly = gfxcompactpoly_from_gfxline(b, 0.05);
     gfxline_free(box1);
     gfxline_free(box2);
     gfxline_free(box3);
     gfxline_free(star);
 
-    gfxpoly_dump(poly);
-    gfxpoly_t*poly2 = gfxpoly_process(poly, &windrule_evenodd);
+    gfxcompactpoly_dump(poly);
+    gfxpoly_t*poly2 = gfxpoly_process(poly, &windrule_evenodd, &onepolygon);
+    gfxcompactpoly_destroy(poly);
     gfxpoly_destroy(poly2);
-    gfxpoly_destroy(poly);
+}
+
+static void test_conversion(gfxline_t*line, double gridsize)
+{
+    double zoom=1.0;
+    gfxcompactpoly_t*poly = gfxcompactpoly_from_gfxline(line, gridsize);
+    gfxpoly_t*poly1 = gfxpoly_from_gfxline(line, gridsize);
+    gfxpoly_t*poly2 = gfxpoly_from_gfxcompactpoly(poly);
+    assert(gfxpoly_check(poly1));
+    assert(gfxpoly_check(poly2));
+    assert(gfxcompactpoly_check(poly));
+    intbbox_t bbox = intbbox_from_polygon(poly1, zoom);
+    unsigned char*bitmap1 = render_polygon(poly1, &bbox, zoom, &windrule_evenodd, &onepolygon);
+    assert(bitmap_ok(&bbox, bitmap1));
+    unsigned char*bitmap2 = render_polygon(poly2, &bbox, zoom, &windrule_evenodd, &onepolygon);
+    assert(bitmap_ok(&bbox, bitmap2));
+    if(!compare_bitmaps(&bbox, bitmap1, bitmap2)) {
+       save_two_bitmaps(&bbox, bitmap1, bitmap2, "error.png");
+       assert(!"bitmaps don't match");
+    }
 }
 
 int test_square(int width, int height, int num, double gridsize, char bitmaptest)
@@ -183,31 +229,38 @@ int test_square(int width, int height, int num, double gridsize, char bitmaptest
     line[num-1].x = line[0].x;
     line[num-1].y = line[0].y;
     line[num-1].next = 0;
+
+    test_conversion(line, gridsize);
     
-    gfxpoly_t*poly = gfxpoly_from_gfxline(line, gridsize);
+    gfxcompactpoly_t*poly = gfxcompactpoly_from_gfxline(line, gridsize);
     gfxline_free(line);
+    gfxpoly_t*poly1 = gfxpoly_from_gfxcompactpoly(poly);
 
     windrule_t*rule = &windrule_circular;
-    gfxpoly_t*poly2 = gfxpoly_process(poly, rule);
+    gfxpoly_t*poly2 = gfxpoly_process(poly, rule, &onepolygon);
     if(bitmaptest) {
         intbbox_t bbox = intbbox_new(0, 0, width, height);
-        unsigned char*bitmap1 = render_polygon(poly, &bbox, 1.0, rule);
-        unsigned char*bitmap2 = render_polygon(poly2, &bbox, 1.0, &windrule_evenodd);
+        unsigned char*bitmap1 = render_polygon(poly1, &bbox, 1.0, rule, &onepolygon);
+       assert(bitmap_ok(&bbox, bitmap1));
+        unsigned char*bitmap2 = render_polygon(poly2, &bbox, 1.0, &windrule_evenodd, &onepolygon);
+       assert(bitmap_ok(&bbox, bitmap2));
         if(!compare_bitmaps(&bbox, bitmap1, bitmap2)) {
             save_two_bitmaps(&bbox, bitmap1, bitmap2, "error.png");
             assert(!"bitmaps don't match");
         }
     }
+    gfxpoly_destroy(poly1);
     gfxpoly_destroy(poly2);
-    gfxpoly_destroy(poly);
+    gfxcompactpoly_destroy(poly);
 }
 
-int test2()
+int test2(int argn, char*argv[])
 {
     test_square(400,400, 3, 0.05, 1);
 
     int t;
     for(t=0;t<400;t++) {
+       fprintf(stderr, "%d\n", t);
         test_square(400,400, 50, 0.05, 1);
         test_square(200,3, 1000, 1.0, 0);
         test_square(3,200, 1000, 1.0, 0);
@@ -216,7 +269,7 @@ int test2()
 }
 
 #include "../rfxswf.h"
-void test3()
+void test3(int argn, char*argv[])
 {
 #undef N
 #undef RANGE
@@ -225,8 +278,10 @@ void test3()
 
     //gfxline_t*line = mkrandomshape(RANGE, N);
     //windrule_t*rule = &windrule_circular;
-    gfxline_t*line = mkchessboard();
+    //gfxline_t*line = mkchessboard();
+    gfxline_t*line = make_circles(30);
     windrule_t*rule = &windrule_evenodd;
+    //windrule_t*rule = &windrule_circular;
 
     gfxmatrix_t m;
     memset(&m, 0, sizeof(m));
@@ -244,6 +299,7 @@ void test3()
 
     int t;
     for(t=0;t<360;t++) {
+       fprintf(stderr, "%d\n", t);
         m.m00 = cos(t*M_PI/180.0);
         m.m01 = sin(t*M_PI/180.0);
         m.m10 = -sin(t*M_PI/180.0);
@@ -253,9 +309,11 @@ void test3()
 
         gfxline_t*l = gfxline_clone(line);
         gfxline_transform(l, &m);
+
+       test_conversion(l, 0.05);
         
-        gfxpoly_t*poly = gfxpoly_from_gfxline(l, 0.05);
-        gfxpoly_t*poly2 = gfxpoly_process(poly, rule);
+        gfxcompactpoly_t*poly = gfxcompactpoly_from_gfxline(l, 0.05);
+        gfxpoly_t*poly2 = gfxpoly_process(poly, rule, &onepolygon);
 
         tag = swf_InsertTag(tag, ST_DEFINESHAPE);
         SHAPE* s;
@@ -300,7 +358,7 @@ void test3()
         swf_ShapeSetEnd(tag);
         swf_ShapeFree(s);
 
-        gfxpoly_destroy(poly);
+        gfxcompactpoly_destroy(poly);
         gfxpoly_destroy(poly2);
 
         gfxline_free(l);
@@ -319,8 +377,22 @@ void test3()
     swf_SaveSWF(&swf, "test.swf");
 }
 
+void rotate90(gfxpoly_t*poly)
+{
+    edge_t*e = poly->edges;
+    while(e) {
+       point_t a = e->a;
+       point_t b = e->b;
+       e->a.x = a.y;
+       e->a.y = a.x;
+       e->b.x = b.y;
+       e->b.y = b.x;
+       e = e->next;
+    }
+}
+
 #include <dirent.h>
-void test4()
+void test4(int argn, char*argv[])
 {
     char*dir = "ps";
     DIR*_dir = opendir(dir);
@@ -333,32 +405,57 @@ void test4()
         if(!strstr(file->d_name, ".ps")) 
             continue;
 
-        char* filename = allocprintf("%s/%s", dir, file->d_name);
+        char* filename;
+
+        if(argn<2)
+            filename = allocprintf("%s/%s", dir, file->d_name);
+        else
+            filename = argv[1];
+
         windrule_t*rule = &windrule_evenodd;
-        gfxpoly_t*poly = gfxpoly_from_file(filename, 1.0);//0.01);
-        free(filename);
+        gfxcompactpoly_t*poly = gfxcompactpoly_from_file(filename, 1.0);//0.01);
+
+        if(argn!=2)
+            free(filename);
 
         double zoom = 1.0;
-        intbbox_t bbox = intbbox_from_polygon(poly, zoom);
 
-        if(!gfxpoly_check(poly)) {
+        if(!gfxcompactpoly_check(poly)) {
             printf("bad polygon\n");
             continue;
         }
 
-        gfxpoly_t*poly2 = gfxpoly_process(poly, rule);
-        unsigned char*bitmap1 = render_polygon(poly, &bbox, zoom, rule);
-        unsigned char*bitmap2 = render_polygon(poly2, &bbox, zoom, &windrule_evenodd);
-        if(!bitmap_ok(&bbox, bitmap1) || !bitmap_ok(&bbox, bitmap2)) {
-            save_two_bitmaps(&bbox, bitmap1, bitmap2, "error.png");
-            assert(!"error in bitmaps");
-        }
-        if(!compare_bitmaps(&bbox, bitmap1, bitmap2)) {
-            save_two_bitmaps(&bbox, bitmap1, bitmap2, "error.png");
-            assert(!"bitmaps don't match");
-        }
+       gfxpoly_t*poly1 = gfxpoly_from_gfxcompactpoly(poly);
+        gfxpoly_t*poly2 = gfxpoly_process(poly, rule, &onepolygon);
+
+       int pass;
+       for(pass=0;pass<2;pass++) {
+           intbbox_t bbox = intbbox_from_polygon(poly1, zoom);
+           unsigned char*bitmap1 = render_polygon(poly1, &bbox, zoom, rule, &onepolygon);
+           unsigned char*bitmap2 = render_polygon(poly2, &bbox, zoom, &windrule_evenodd, &onepolygon);
+           if(!bitmap_ok(&bbox, bitmap1) || !bitmap_ok(&bbox, bitmap2)) {
+               save_two_bitmaps(&bbox, bitmap1, bitmap2, "error.png");
+               assert(!"error in bitmaps");
+           }
+           if(!compare_bitmaps(&bbox, bitmap1, bitmap2)) {
+               save_two_bitmaps(&bbox, bitmap1, bitmap2, "error.png");
+               assert(!"bitmaps don't match");
+           }
+           free(bitmap1);
+           free(bitmap2);
+           
+           // second pass renders the 90° rotated version
+           rotate90(poly1);
+           rotate90(poly2);
+       }
+
+        gfxpoly_destroy(poly1);
         gfxpoly_destroy(poly2);
+        gfxcompactpoly_destroy(poly);
+        if(argn==2) 
+            break;
     }
+    closedir(_dir);
 }
 
 #include "../gfxdevice.h"
@@ -366,26 +463,40 @@ void test4()
 
 void extract_polygons_fill(gfxdevice_t*dev, gfxline_t*line, gfxcolor_t*color) 
 {
-    gfxpoly_t*poly = gfxpoly_from_gfxline(line, 0.05);
-    printf("%d segments\n", gfxpoly_size(poly));
+    //gfxcompactpoly_t*c = gfxcompactpoly_from_gfxline(line, 0.05);
+    //gfxcompactpoly_free(c);
 
-    if(!gfxpoly_check(poly)) {
-        gfxpoly_destroy(poly);
-        printf("bad polygon\n");
+    gfxcompactpoly_t*poly = gfxcompactpoly_from_gfxline(line, 0.05);
+
+    //gfxline_dump(line, stderr, "");
+    //gfxcompactpoly_dump(poly);
+
+    if(gfxcompactpoly_size(poly)>100000) {
+       fprintf(stderr, "%d segments (skipping)\n", gfxcompactpoly_size(poly));
+       return;
+    } else {
+       //fprintf(stderr, "%d segments\n", gfxpoly_size(poly));
+    }
+
+    if(!gfxcompactpoly_check(poly)) {
+        gfxcompactpoly_destroy(poly);
+        fprintf(stderr, "bad polygon\n");
         return;
     }
 
     windrule_t*rule = &windrule_evenodd;
-    gfxpoly_t*poly2 = gfxpoly_process(poly, rule);
+
+    gfxpoly_t*poly1 = gfxpoly_from_gfxcompactpoly(poly);
         
     double zoom = 1.0;
-    intbbox_t bbox = intbbox_from_polygon(poly, zoom);
-    unsigned char*bitmap1 = render_polygon(poly, &bbox, zoom, rule);
-    unsigned char*bitmap2 = render_polygon(poly2, &bbox, zoom, &windrule_evenodd);
+    intbbox_t bbox = intbbox_from_polygon(poly1, zoom);
+    unsigned char*bitmap1 = render_polygon(poly1, &bbox, zoom, rule, &onepolygon);
     if(!bitmap_ok(&bbox, bitmap1)) {
-        printf("bad polygon or error in renderer\n");
+        fprintf(stderr, "bad polygon or error in renderer\n");
         return;
     }
+    gfxpoly_t*poly2 = gfxpoly_process(poly, rule, &onepolygon);
+    unsigned char*bitmap2 = render_polygon(poly2, &bbox, zoom, &windrule_evenodd, &onepolygon);
     if(!bitmap_ok(&bbox, bitmap2)) {
         save_two_bitmaps(&bbox, bitmap1, bitmap2, "error.png");
         assert(!"error in bitmap");
@@ -394,9 +505,12 @@ void extract_polygons_fill(gfxdevice_t*dev, gfxline_t*line, gfxcolor_t*color)
         save_two_bitmaps(&bbox, bitmap1, bitmap2, "error.png");
         assert(!"bitmaps don't match");
     }
+    free(bitmap1);
+    free(bitmap2);
 
-    gfxpoly_destroy(poly);
+    gfxpoly_destroy(poly1);
     gfxpoly_destroy(poly2);
+    gfxcompactpoly_destroy(poly);
 }
 int extract_polygons_setparameter(gfxdevice_t*dev, const char*key, const char*value) {
     return 0;
@@ -454,8 +568,9 @@ finish: 0,
 internal: 0
 };
 
-void test5()
+void test5(int argn, char*argv[])
 {
+    gfxsource_t*driver = gfxsource_pdf_create();
     char*dir = "pdfs";
     DIR*_dir = opendir(dir);
     if(!_dir) return;
@@ -468,22 +583,29 @@ void test5()
             continue;
         char* filename = allocprintf("%s/%s", dir, file->d_name);
 
-        gfxsource_t*driver = gfxsource_pdf_create();
+       if(argn>1) 
+           filename = argv[1];
+
         gfxdocument_t*doc = driver->open(driver, filename);
         gfxdevice_t*out = &extract_polygons;
         int t;
         for(t=1;t<=doc->num_pages;t++) {
-            printf("%s (page %d)\n", filename, t);
+            fprintf(stderr, "%s (page %d)\n", filename, t);
             gfxpage_t* page = doc->getpage(doc, t);
             page->render(page, out);
             page->destroy(page);
-            break;
         }
+        doc->destroy(doc);
+       if(argn>1) 
+           break;
         free(filename);
     }
+    closedir(_dir);
+    driver->destroy(driver);
 }
 
-int main()
+int main(int argn, char*argv[])
 {
-    test3();
+    test_speed(argn, argv);
 }
+