/* * Copyright 2008,2009 Chris Young * * This file is part of NetSurf, http://www.netsurf-browser.org/ * * NetSurf is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; version 2 of the License. * * NetSurf is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "amiga/plotters.h" #include "amiga/gui.h" #include "amiga/bitmap.h" #include "amiga/font.h" #include #include #include #include #include #include "amiga/utf8.h" #include #include "amiga/options.h" #include #include "utils/log.h" #include #include #ifndef M_PI /* For some reason we don't always get this from math.h */ #define M_PI 3.14159265358979323846 #endif #ifdef NS_AMIGA_CAIRO #include #include #endif #define PATT_DOT 0xAAAA #define PATT_DASH 0xCCCC #define PATT_LINE 0xFFFF struct plotter_table plot; const struct plotter_table amiplot = { ami_clg, ami_rectangle, ami_line, ami_polygon, ami_fill, ami_clip, ami_text, ami_disc, ami_arc, ami_bitmap, ami_bitmap_tile, NULL, //ami_group_start, NULL, //ami_group_end, NULL, //ami_flush, // optional ami_path, true // option_knockout }; #ifdef NS_AMIGA_CAIRO void ami_cairo_set_colour(cairo_t *cr,colour c) { int r, g, b; r = c & 0xff; g = (c & 0xff00) >> 8; b = (c & 0xff0000) >> 16; cairo_set_source_rgba(glob.cr, r / 255.0, g / 255.0, b / 255.0, 1.0); } void ami_cairo_set_solid(cairo_t *cr) { double dashes = 0; cairo_set_dash(glob.cr, &dashes, 0, 0); } void ami_cairo_set_dotted(cairo_t *cr) { double cdashes = 1; cairo_set_dash(glob.cr, &cdashes, 1, 0); } void ami_cairo_set_dashed(cairo_t *cr) { double cdashes = 3; cairo_set_dash(glob.cr, &cdashes, 1, 0); } #endif bool ami_clg(colour c) { p96RectFill(currp,0,0,scrn->Width-1,scrn->Height-1, p96EncodeColor(RGBFB_A8B8G8R8,c)); /* SetRPAttrs(currp,RPTAG_BPenColor,p96EncodeColor(RGBFB_A8B8G8R8,c), TAG_DONE); Move(currp,0,0); ClearScreen(currp); */ return true; } bool ami_rectangle(int x0, int y0, int width, int height, int line_width, colour c, bool dotted, bool dashed) { #ifndef NS_AMIGA_CAIRO_ALL currp->PenWidth = line_width; currp->PenHeight = line_width; currp->LinePtrn = PATT_LINE; if(dotted) currp->LinePtrn = PATT_DOT; if(dashed) currp->LinePtrn = PATT_DASH; SetRPAttrs(currp,RPTAG_APenColor,p96EncodeColor(RGBFB_A8B8G8R8,c), TAG_DONE); Move(currp,x0,y0); Draw(currp,x0+width,y0); Draw(currp,x0+width,y0+height); Draw(currp,x0,y0+height); Draw(currp,x0,y0); currp->PenWidth = 1; currp->PenHeight = 1; currp->LinePtrn = PATT_LINE; #else ami_cairo_set_colour(glob.cr,c); if (dotted) ami_cairo_set_dotted(glob.cr); else if (dashed) ami_cairo_set_dashed(glob.cr); else ami_cairo_set_solid(glob.cr); if (line_width == 0) line_width = 1; cairo_set_line_width(glob.cr, line_width); cairo_rectangle(glob.cr, x0, y0, width, height); cairo_stroke(glob.cr); #endif return true; } bool ami_line(int x0, int y0, int x1, int y1, int width, colour c, bool dotted, bool dashed) { #ifndef NS_AMIGA_CAIRO_ALL currp->PenWidth = width; currp->PenHeight = width; currp->LinePtrn = PATT_LINE; if(dotted) currp->LinePtrn = PATT_DOT; if(dashed) currp->LinePtrn = PATT_DASH; SetRPAttrs(currp,RPTAG_APenColor,p96EncodeColor(RGBFB_A8B8G8R8,c), TAG_DONE); Move(currp,x0,y0); Draw(currp,x1,y1); currp->PenWidth = 1; currp->PenHeight = 1; currp->LinePtrn = PATT_LINE; #else ami_cairo_set_colour(glob.cr,c); if (dotted) ami_cairo_set_dotted(glob.cr); else if (dashed) ami_cairo_set_dashed(glob.cr); else ami_cairo_set_solid(glob.cr); if (width == 0) width = 1; cairo_set_line_width(glob.cr, width); cairo_move_to(glob.cr, x0, y0 - 0.5); cairo_line_to(glob.cr, x1, y1 - 0.5); cairo_stroke(glob.cr); #endif return true; } bool ami_polygon(const int *p, unsigned int n, colour fill) { int k; #ifndef NS_AMIGA_CAIRO ULONG cx,cy; //DebugPrintF("poly\n"); SetRPAttrs(currp,RPTAG_APenColor,p96EncodeColor(RGBFB_A8B8G8R8,fill), RPTAG_OPenColor,p96EncodeColor(RGBFB_A8B8G8R8,fill), // RPTAG_OPenColor,0xffffffff, TAG_DONE); AreaMove(currp,p[0],p[1]); for(k=1;kLayer) { reg = InstallClipRegion(currp->Layer,NULL); if(!reg) { reg = NewRegion(); } else { ClearRectRegion(reg,&glob.rect); } glob.rect.MinX = x0; glob.rect.MinY = y0; glob.rect.MaxX = x1-1; glob.rect.MaxY = y1-1; OrRectRegion(reg,&glob.rect); reg = InstallClipRegion(currp->Layer,reg); if(reg) DisposeRegion(reg); } #ifdef NS_AMIGA_CAIRO_ALL cairo_reset_clip(glob.cr); cairo_rectangle(glob.cr, x0, y0, x1 - x0, y1 - y0); cairo_clip(glob.cr); #endif return true; } bool ami_text(int x, int y, const struct css_style *style, const char *text, size_t length, colour bg, colour c) { char *buffer = NULL; struct TextFont *tfont; if(option_quick_text) { tfont = ami_open_font(style); SetRPAttrs(currp,RPTAG_APenColor,p96EncodeColor(RGBFB_A8B8G8R8,c), RPTAG_BPenColor,p96EncodeColor(RGBFB_A8B8G8R8,bg), // RPTAG_Font,tfont, TAG_DONE); utf8_to_local_encoding(text,length,&buffer); if(!buffer) return true; /* Below function prints Unicode text direct to the RastPort. * This is commented out due to lack of SDK which allows me to perform blits * that respect the Alpha channel. The code below that (and above) convert to * system default charset and write the text using graphics.library functions. * * ami_unicode_text(currp,text,length,style,x,y,c); * * or, perhaps the ttengine.library version (far too slow): * ami_tte_text(currp,text,length); */ Move(currp,x,y); Text(currp,buffer,strlen(buffer)); ami_close_font(tfont); ami_utf8_free(buffer); } else { ami_unicode_text(currp,text,length,style,x,y,c); } return true; } bool ami_disc(int x, int y, int radius, colour c, bool filled) { #ifndef NS_AMIGA_CAIRO_ALL SetRPAttrs(currp,RPTAG_APenColor,p96EncodeColor(RGBFB_A8B8G8R8,c), TAG_DONE); if(filled) { AreaCircle(currp,x,y,radius); AreaEnd(currp); } else { DrawEllipse(currp,x,y,radius,radius); // NB: does not support fill, need to use AreaCircle for that } #else ami_cairo_set_colour(glob.cr,c); ami_cairo_set_solid(glob.cr); if (filled) cairo_set_line_width(glob.cr, 0); else cairo_set_line_width(glob.cr, 1); cairo_arc(glob.cr, x, y, radius, 0, M_PI * 2); if (filled) cairo_fill(glob.cr); cairo_stroke(glob.cr); #endif return true; } bool ami_arc(int x, int y, int radius, int angle1, int angle2, colour c) { #ifdef NS_AMIGA_CAIRO ami_cairo_set_colour(glob.cr,c); ami_cairo_set_solid(glob.cr); cairo_set_line_width(glob.cr, 1); cairo_arc(glob.cr, x, y, radius, (angle1 + 90) * (M_PI / 180), (angle2 + 90) * (M_PI / 180)); cairo_stroke(glob.cr); #else /* http://www.crbond.com/primitives.htm CommonFuncsPPC.lha */ //DebugPrintF("arc\n"); SetRPAttrs(currp,RPTAG_APenColor,p96EncodeColor(RGBFB_A8B8G8R8,c), TAG_DONE); // DrawArc(currp,x,y,(float)angle1,(float)angle2,radius); #endif return true; } bool ami_bitmap(int x, int y, int width, int height, struct bitmap *bitmap, colour bg, struct content *content) { struct BitMap *tbm; if(!width || !height) return true; tbm = ami_getcachenativebm(bitmap,width,height,currp->BitMap); if(!tbm) return true; BltBitMapTags(BLITA_Width,width, BLITA_Height,height, BLITA_Source,tbm, BLITA_Dest,currp, BLITA_DestX,x, BLITA_DestY,y, BLITA_SrcType,BLITT_BITMAP, BLITA_DestType,BLITT_RASTPORT, BLITA_UseSrcAlpha,!bitmap->opaque, TAG_DONE); if(tbm != bitmap->nativebm) { p96FreeBitMap(tbm); } return true; } bool ami_bitmap_tile(int x, int y, int width, int height, struct bitmap *bitmap, colour bg, bool repeat_x, bool repeat_y, struct content *content) { int xf,yf; struct BitMap *tbm = NULL; if(!(repeat_x || repeat_y)) return ami_bitmap(x, y, width, height, bitmap, bg, content); tbm = ami_getcachenativebm(bitmap,width,height,currp->BitMap); if(!tbm) return true; /* get left most tile position */ if (repeat_x) for (; x > glob.rect.MinX; x -= width) ; /* get top most tile position */ if (repeat_y) for (; y > glob.rect.MinY; y -= height) ; /* tile down and across to extents */ for (xf = x; xf < glob.rect.MaxX; xf += width) { for (yf = y; yf < glob.rect.MaxY; yf += height) { assert(tbm); BltBitMapTags(BLITA_Width,width, BLITA_Height,height, BLITA_Source,tbm, BLITA_Dest,currp, BLITA_DestX,xf, BLITA_DestY,yf, BLITA_SrcType,BLITT_BITMAP, BLITA_DestType,BLITT_RASTPORT, BLITA_UseSrcAlpha,!bitmap->opaque, TAG_DONE); if (!repeat_y) break; } if (!repeat_x) break; } if(tbm != bitmap->nativebm) { p96FreeBitMap(tbm); } return true; } bool ami_group_start(const char *name) { /** optional */ return false; } bool ami_group_end(void) { /** optional */ return false; } bool ami_flush(void) { //DebugPrintF("flush\n"); return true; } bool ami_path(const float *p, unsigned int n, colour fill, float width, colour c, const float transform[6]) { /* For SVG only, because it needs Bezier curves we are going to cheat and insist on Cairo */ #ifdef NS_AMIGA_CAIRO unsigned int i; cairo_matrix_t old_ctm, n_ctm; if (n == 0) return true; if (p[0] != PLOTTER_PATH_MOVE) { LOG(("Path does not start with move")); return false; } /* Save CTM */ cairo_get_matrix(glob.cr, &old_ctm); /* Set up line style and width */ cairo_set_line_width(glob.cr, 1); ami_cairo_set_solid(glob.cr); /* Load new CTM */ n_ctm.xx = transform[0]; n_ctm.yx = transform[1]; n_ctm.xy = transform[2]; n_ctm.yy = transform[3]; n_ctm.x0 = transform[4]; n_ctm.y0 = transform[5]; cairo_set_matrix(glob.cr, &n_ctm); /* Construct path */ for (i = 0; i < n; ) { if (p[i] == PLOTTER_PATH_MOVE) { cairo_move_to(glob.cr, p[i+1], p[i+2]); i += 3; } else if (p[i] == PLOTTER_PATH_CLOSE) { cairo_close_path(glob.cr); i++; } else if (p[i] == PLOTTER_PATH_LINE) { cairo_line_to(glob.cr, p[i+1], p[i+2]); i += 3; } else if (p[i] == PLOTTER_PATH_BEZIER) { cairo_curve_to(glob.cr, p[i+1], p[i+2], p[i+3], p[i+4], p[i+5], p[i+6]); i += 7; } else { LOG(("bad path command %f", p[i])); /* Reset matrix for safety */ cairo_set_matrix(glob.cr, &old_ctm); return false; } } /* Restore original CTM */ cairo_set_matrix(glob.cr, &old_ctm); /* Now draw path */ if (fill != TRANSPARENT) { ami_cairo_set_colour(glob.cr,fill); if (c != TRANSPARENT) { /* Fill & Stroke */ cairo_fill_preserve(glob.cr); ami_cairo_set_colour(glob.cr,c); cairo_stroke(glob.cr); } else { /* Fill only */ cairo_fill(glob.cr); } } else if (c != TRANSPARENT) { /* Stroke only */ ami_cairo_set_colour(glob.cr,c); cairo_stroke(glob.cr); } #endif return true; }