+gfxline_t* gfxline_append(gfxline_t*line1, gfxline_t*line2)
+{
+ gfxline_t*l = line1;;
+ if(!l)
+ return line2;
+ while(l->next) {
+ l = l->next;
+ }
+ l->next = line2;
+ return line1;
+}
+
+void gfxline_transform(gfxline_t*line, gfxmatrix_t*matrix)
+{
+ while(line) {
+ double x = matrix->m00*line->x + matrix->m10*line->y + matrix->tx;
+ double y = matrix->m01*line->x + matrix->m11*line->y + matrix->ty;
+ line->x = x;
+ line->y = y;
+ if(line->type == gfx_splineTo) {
+ double sx = matrix->m00*line->sx + matrix->m10*line->sy + matrix->tx;
+ double sy = matrix->m01*line->sx + matrix->m11*line->sy + matrix->ty;
+ line->sx = sx;
+ line->sy = sy;
+ }
+ line = line->next;
+ }
+}
+
+void gfxmatrix_dump(gfxmatrix_t*m, FILE*fi, char*prefix)
+{
+ fprintf(fi, "%f %f | %f\n", m->m00, m->m10, m->tx);
+ fprintf(fi, "%f %f | %f\n", m->m01, m->m11, m->ty);
+}
+
+void gfxmatrix_transform(gfxmatrix_t*m, double* v, double*dest)
+{
+ dest[0] = m->m00*v[0] + m->m10*v[1] + m->tx;
+ dest[1] = m->m01*v[0] + m->m11*v[1] + m->ty;
+}
+void gfxmatrix_invert(gfxmatrix_t*m, gfxmatrix_t*dest)
+{
+ double det = m->m00 * m->m11 - m->m10 * m->m01;
+ if(!det) {
+ memset(dest, 0, sizeof(gfxmatrix_t));
+ return;
+ }
+ det = 1/det;
+ dest->m00 = m->m11 * det;
+ dest->m01 = -m->m01 * det;
+ dest->m10 = -m->m10 * det;
+ dest->m11 = m->m00 * det;
+ dest->tx = -(dest->m00 * m->tx + dest->m10 * m->ty);
+ dest->ty = -(dest->m01 * m->tx + dest->m11 * m->ty);
+}
+void gfxmatrix_unit(gfxmatrix_t*m)
+{
+ memset(m, 0, sizeof(gfxmatrix_t));
+ m->m00 = 1.0;
+ m->m11 = 1.0;
+}
+void gfxmatrix_multiply(gfxmatrix_t*m1, gfxmatrix_t*m2, gfxmatrix_t*dest)
+{
+ dest->m00 = m1->m00*m2->m00 + m1->m10*m2->m01;
+ dest->m01 = m1->m01*m2->m00 + m1->m11*m2->m01;
+ dest->m10 = m1->m00*m2->m10 + m1->m10*m2->m11;
+ dest->m11 = m1->m01*m2->m10 + m1->m11*m2->m11;
+ dest->tx = m1->m00*m2->tx + m1->m10*m2->ty + m1->tx;
+ dest->ty = m1->m01*m2->tx + m1->m11*m2->ty + m1->ty;
+}
+
+gfxfontlist_t* gfxfontlist_create()
+{
+ /* Initial list ist empty */
+ return 0;
+}
+
+gfxfont_t*gfxfontlist_findfont(gfxfontlist_t*list, char*id)
+{
+ gfxfontlist_t*l = list;
+ while(l) {
+ if(!strcmp((char*)l->font->id, id)) {
+ return l->font;
+ }
+ l = l->next;
+ }
+ return 0;
+}
+char gfxfontlist_hasfont(gfxfontlist_t*list, gfxfont_t*font)
+{
+ gfxfontlist_t*l = list;
+ while(l) {
+ if(!strcmp((char*)l->font->id, font->id)) {
+ return 1;
+ }
+ l = l->next;
+ }
+ return 0;
+}
+gfxfontlist_t*gfxfontlist_addfont(gfxfontlist_t*list, gfxfont_t*font)
+{
+ gfxfontlist_t*last=0,*l = list;
+ while(l) {
+ last = l;
+ if(l->font == font) {
+ return list; // we already know this font
+ }
+ l = l->next;
+ }
+ if(!font) {
+ fprintf(stderr, "Tried to add zero font\n");
+ }
+ l = (gfxfontlist_t*)rfx_calloc(sizeof(gfxfontlist_t));
+ l->font = font;
+ l->next = 0;
+ if(last) {
+ last->next = l;
+ return list;
+ } else {
+ return l;
+ }
+}
+void gfxfontlist_free(gfxfontlist_t*list, char deletefonts)
+{
+ gfxfontlist_t*l = list;
+ while(l) {
+ gfxfontlist_t*next = l->next;
+ if(deletefonts && l->font) {
+ gfxfont_free(l->font);l->font=0;
+ }
+ l->next = 0;
+ free(l);
+ l = next;
+ }
+}
+
+gfxline_t*gfxline_makerectangle(int x1,int y1,int x2, int y2)
+{
+ gfxline_t* line = (gfxline_t*)rfx_calloc(sizeof(gfxline_t)*5);
+ line[0].x = x1;line[0].y = y1;line[0].type = gfx_moveTo;line[0].next = &line[1];
+ line[1].x = x2;line[1].y = y1;line[1].type = gfx_lineTo;line[1].next = &line[2];
+ line[2].x = x2;line[2].y = y2;line[2].type = gfx_lineTo;line[2].next = &line[3];
+ line[3].x = x1;line[3].y = y2;line[3].type = gfx_lineTo;line[3].next = &line[4];
+ line[4].x = x1;line[4].y = y1;line[4].type = gfx_lineTo;
+ return line;
+}
+
+gfxbbox_t* gfxline_isrectangle(gfxline_t*_l)
+{
+ if(!_l)
+ return 0;
+
+ gfxline_t*l = gfxline_clone(_l);
+ gfxline_optimize(l);
+
+ double x1,x2,y1,y2;
+ int xc=0,yc=0;
+ char corners=0;
+
+ char prev=0;
+ char fail=0;
+ for(;l; l=l->next) {
+ double x = l->x;
+ double y = l->y;
+
+ char top=0,left=0;
+
+ if(xc==2 && x!=x1 && x!=x2) {fail=1;break;}
+ else if(xc>=1 && x==x1) {left=0;}
+ else if(xc==2 && x==x2) {left=1;}
+ else if(xc==1 && x!=x1) {x2 = x; xc=2; left=1;}
+ else if(xc==0) {x1 = x; xc=1;left=0;}
+ else {fprintf(stderr, "Internal error in rectangle detection\n");}
+
+ if(yc==2 && y!=y1 && y!=y2) {fail=1;break;}
+ else if(yc>=1 && y==y1) {top=0;}
+ else if(yc==2 && y==y2) {top=1;}
+ else if(yc==1 && y!=y1) {y2 = y; yc=2; top=1;}
+ else if(yc==0) {y1 = y; yc=1;top=0;}
+ else {fprintf(stderr, "Internal error in rectangle detection\n");}
+
+ char pos=top<<1|left;
+
+ if((pos^prev)==3) {
+ /* diagonal lines not allowed */
+ fail=1;break;
+ }
+ prev = pos;
+
+ /* no corner except the first one may be touched twice */
+ if(pos && (corners & 1<<pos)) {
+ fail=1;break;
+ }
+ /* mark which corners have been touched so far */
+ corners |= 1<<pos;
+ }
+ if(fail) {
+ gfxline_free(l);
+ return 0;
+ }
+
+ if(corners!=0x0f) return 0; // not all 4 corners reached
+
+ if(x2<x1) {double x = x2;x2=x1;x1=x;}
+ if(y2<y1) {double y = y2;y2=y1;y1=y;}
+
+ gfxbbox_t*r = malloc(sizeof(gfxbbox_t));
+ r->xmin = x1; r->ymin = y1;
+ r->xmax = x2; r->ymax = y2;
+ return r;
+}
+
+void gfximage_transform(gfximage_t*img, gfxcxform_t*cxform)
+{
+ int t;
+ int size = img->width*img->height;
+
+ int rr,rg,rb,ra, tr;
+ int gr,gg,gb,ga, tg;
+ int br,bg,bb,ba, tb;
+ int ar,ag,ab,aa, ta;
+ rr = (int)(cxform->rr*256);gr = (int)(cxform->gr*256);
+ rg = (int)(cxform->rg*256);gg = (int)(cxform->gg*256);
+ rb = (int)(cxform->rb*256);gb = (int)(cxform->gb*256);
+ ra = (int)(cxform->ra*256);ga = (int)(cxform->ga*256);
+ br = (int)(cxform->br*256);ar = (int)(cxform->ar*256);tr = (int)(cxform->tr*256);
+ bg = (int)(cxform->bg*256);ag = (int)(cxform->ag*256);tg = (int)(cxform->tg*256);
+ bb = (int)(cxform->bb*256);ab = (int)(cxform->ab*256);tb = (int)(cxform->tb*256);
+ ba = (int)(cxform->ba*256);aa = (int)(cxform->aa*256);ta = (int)(cxform->ta*256);
+
+ for(t=0;t<size;t++) {
+ gfxcolor_t*pixel = &img->data[t];
+ unsigned char r = (pixel->r * rr + pixel->g * rg + pixel->b * rb + pixel->a * ra + tr) / 256;
+ unsigned char g = (pixel->r * gr + pixel->g * gg + pixel->b * gb + pixel->a * ga + tg) / 256;
+ unsigned char b = (pixel->r * br + pixel->g * bg + pixel->b * bb + pixel->a * ba + tb) / 256;
+ unsigned char a = (pixel->r * ar + pixel->g * ag + pixel->b * ab + pixel->a * aa + ta) / 256;
+ pixel->r = r;
+ pixel->g = g;
+ pixel->b = b;
+ pixel->a = a;
+ }
+}