diff options
author | Vincent Sanders <vince@kyllikki.org> | 2016-05-05 22:28:51 +0100 |
---|---|---|
committer | Vincent Sanders <vince@kyllikki.org> | 2016-05-15 13:44:34 +0100 |
commit | d21447d096a320a08b3efb2b8768fad0dcdcfd64 (patch) | |
tree | 1a83814b7c9e94b2f13c473261f23dd3a17dee64 /frontends/amiga/plotters.c | |
parent | 2cbb337756d9af5bda4d594964d446439f602551 (diff) | |
download | netsurf-d21447d096a320a08b3efb2b8768fad0dcdcfd64.tar.gz netsurf-d21447d096a320a08b3efb2b8768fad0dcdcfd64.tar.bz2 |
move frontends into sub directory
Diffstat (limited to 'frontends/amiga/plotters.c')
-rw-r--r-- | frontends/amiga/plotters.c | 920 |
1 files changed, 920 insertions, 0 deletions
diff --git a/frontends/amiga/plotters.c b/frontends/amiga/plotters.c new file mode 100644 index 000000000..23a73f84a --- /dev/null +++ b/frontends/amiga/plotters.c @@ -0,0 +1,920 @@ +/* + * Copyright 2008-09, 2012-13 Chris Young <chris@unsatisfactorysoftware.co.uk> + * + * 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 <http://www.gnu.org/licenses/>. + */ + +#include "amiga/os3support.h" + +#include <proto/exec.h> +#include <proto/intuition.h> + +#include <intuition/intuition.h> +#include <graphics/rpattr.h> +#include <graphics/gfxmacros.h> +#include <graphics/gfxbase.h> + +#ifdef __amigaos4__ +#include <graphics/blitattr.h> +#include <graphics/composite.h> +#endif + +#include <math.h> +#include <assert.h> + +#include "utils/nsoption.h" +#include "utils/utils.h" +#include "utils/log.h" +#include "css/utils.h" +#include "desktop/mouse.h" +#include "desktop/gui_window.h" + +#include "amiga/plotters.h" +#include "amiga/bitmap.h" +#include "amiga/font.h" +#include "amiga/gui.h" +#include "amiga/misc.h" +#include "amiga/rtg.h" +#include "amiga/utf8.h" + +//#define AMI_PLOTTER_DEBUG 1 + +HOOKF(void, ami_bitmap_tile_hook, struct RastPort *, rp, struct BackFillMessage *); + +struct bfbitmap { + struct BitMap *bm; + ULONG width; + ULONG height; + int offsetx; + int offsety; + APTR mask; +}; + +struct ami_plot_pen { + struct MinNode node; + ULONG pen; +}; + +struct bez_point { + float x; + float y; +}; + +static int init_layers_count = 0; +static APTR pool_pens = NULL; + +#ifndef M_PI /* For some reason we don't always get this from math.h */ +#define M_PI 3.14159265358979323846 +#endif + +#define PATT_DOT 0xAAAA +#define PATT_DASH 0xCCCC +#define PATT_LINE 0xFFFF + +/* This defines the size of the list for Area* functions. + 25000 = 5000 vectors + */ +#define AREA_SIZE 25000 + +/* Define the below to get additional debug */ +#undef AMI_PLOTTER_DEBUG + +void ami_init_layers(struct gui_globals *gg, ULONG width, ULONG height, bool force32bit) +{ + /* init shared bitmaps * + * Height is set to screen width to give enough space for thumbnails * + * Also applies to the further gfx/layers functions and memory below */ + + int depth = 32; + struct BitMap *friend = NULL; + + if(force32bit == false) depth = GetBitMapAttr(scrn->RastPort.BitMap, BMA_DEPTH); + LOG("Screen depth = %d", depth); + + if(depth < 16) { + gg->palette_mapped = true; + } else { + gg->palette_mapped = false; + } + +#ifndef __amigaos4__ +#warning OS3 locked to palette-mapped modes + gg->palette_mapped = true; + if(depth > 8) depth = 8; +#endif + + /* Probably need to fix this next line */ + if(gg->palette_mapped == true) nsoption_set_bool(font_antialiasing, false); + + if(!width) width = nsoption_int(redraw_tile_size_x); + if(!height) height = nsoption_int(redraw_tile_size_y); + gg->width = width; + gg->height = height; + + gg->layerinfo = NewLayerInfo(); + gg->areabuf = AllocVecTagList(AREA_SIZE, NULL); + +#ifdef __amigaos4__ + gg->tmprasbuf = AllocVecTagList(width * height, NULL); +#else + /* OS3/AGA requires this to be in chip mem. RTG would probably rather it wasn't. */ + gg->tmprasbuf = AllocVec(width * height, MEMF_CHIP); +#endif + + /* Friend BitMaps are weird. + * For OS4, we shouldn't use a friend BitMap here (see below). + * For OS3 AGA, we get no display blitted if we use a friend BitMap, + * however on RTG it seems to be a benefit. + */ +#ifndef __amigaos4__ + if(nsoption_bool(friend_bitmap) == true) { + friend = scrn->RastPort.BitMap; + } else { + /* Force friend BitMaps on for obvious RTG screens under OS3. + * If we get a bit smarter about this we can lose the user option. */ + if((depth >= 16) && (force32bit == false)) friend = scrn->RastPort.BitMap; + } +#endif + + if(gg->palette_mapped == true) { + gg->bm = AllocBitMap(width, height, depth, 0, friend); + } else { +#ifdef __amigaos4__ + /* Screen depth is reported as 24 even when it's actually 32-bit. + * We get freezes and other problems on OS4 if we befriend at any + * other depths, hence this check. + * \todo use friend BitMaps but avoid CompositeTags() at non-32-bit + * as that seems to be the cause of the problems. + */ + if((depth >= 24) && (force32bit == false)) friend = scrn->RastPort.BitMap; +#endif + gg->bm = ami_rtg_allocbitmap(width, height, 32, 0, friend, RGBFB_A8R8G8B8); + } + + if(!gg->bm) amiga_warn_user("NoMemory",""); + + gg->rp = AllocVecTagList(sizeof(struct RastPort), NULL); + if(!gg->rp) amiga_warn_user("NoMemory",""); + + InitRastPort(gg->rp); + gg->rp->BitMap = gg->bm; + + SetDrMd(gg->rp,BGBACKFILL); + + gg->rp->Layer = CreateUpfrontLayer(gg->layerinfo,gg->rp->BitMap,0,0, + width-1, height-1, LAYERSIMPLE, NULL); + + InstallLayerHook(gg->rp->Layer,LAYERS_NOBACKFILL); + + gg->rp->AreaInfo = AllocVecTagList(sizeof(struct AreaInfo), NULL); + if((!gg->areabuf) || (!gg->rp->AreaInfo)) amiga_warn_user("NoMemory",""); + + InitArea(gg->rp->AreaInfo,gg->areabuf, AREA_SIZE/5); + + gg->rp->TmpRas = AllocVecTagList(sizeof(struct TmpRas), NULL); + if((!gg->tmprasbuf) || (!gg->rp->TmpRas)) amiga_warn_user("NoMemory",""); + + InitTmpRas(gg->rp->TmpRas, gg->tmprasbuf, width*height); + + if((gg->palette_mapped == true) && (pool_pens == NULL)) { + pool_pens = ami_misc_itempool_create(sizeof(struct ami_plot_pen)); + } + + gg->apen = 0x00000000; + gg->open = 0x00000000; + gg->apen_num = -1; + gg->open_num = -1; + + init_layers_count++; + LOG("Layer initialised (total: %d)", init_layers_count); +} + +void ami_free_layers(struct gui_globals *gg) +{ + init_layers_count--; + + if((init_layers_count == 0) && (pool_pens != NULL)) { + ami_misc_itempool_delete(pool_pens); + pool_pens = NULL; + } + + if(gg->rp) { + DeleteLayer(0,gg->rp->Layer); + FreeVec(gg->rp->TmpRas); + FreeVec(gg->rp->AreaInfo); + FreeVec(gg->rp); + } + + FreeVec(gg->tmprasbuf); + FreeVec(gg->areabuf); + DisposeLayerInfo(gg->layerinfo); + if(gg->palette_mapped == false) { + if(gg->bm) ami_rtg_freebitmap(gg->bm); + } else { + if(gg->bm) FreeBitMap(gg->bm); + } +} + +void ami_clearclipreg(struct gui_globals *gg) +{ + struct Region *reg = NULL; + + reg = InstallClipRegion(gg->rp->Layer,NULL); + if(reg) DisposeRegion(reg); + + gg->rect.MinX = 0; + gg->rect.MinY = 0; + gg->rect.MaxX = scrn->Width-1; + gg->rect.MaxY = scrn->Height-1; +} + +static ULONG ami_plot_obtain_pen(struct MinList *shared_pens, ULONG colr) +{ + struct ami_plot_pen *node; + LONG pen = ObtainBestPenA(scrn->ViewPort.ColorMap, + (colr & 0x000000ff) << 24, + (colr & 0x0000ff00) << 16, + (colr & 0x00ff0000) << 8, + NULL); + + if(pen == -1) LOG("WARNING: Cannot allocate pen for ABGR:%lx", colr); + + if((shared_pens != NULL) && (pool_pens != NULL)) { + if((node = (struct ami_plot_pen *)ami_misc_itempool_alloc(pool_pens, sizeof(struct ami_plot_pen)))) { + node->pen = pen; + AddTail((struct List *)shared_pens, (struct Node *)node); + } + } else { + /* Immediately release the pen if we can't keep track of it. */ + ReleasePen(scrn->ViewPort.ColorMap, pen); + } + return pen; +} + +void ami_plot_release_pens(struct MinList *shared_pens) +{ + struct ami_plot_pen *node; + struct ami_plot_pen *nnode; + + if(shared_pens == NULL) return; + if(IsMinListEmpty(shared_pens)) return; + node = (struct ami_plot_pen *)GetHead((struct List *)shared_pens); + + do { + nnode = (struct ami_plot_pen *)GetSucc((struct Node *)node); + ReleasePen(scrn->ViewPort.ColorMap, node->pen); + Remove((struct Node *)node); + ami_misc_itempool_free(pool_pens, node, sizeof(struct ami_plot_pen)); + } while((node = nnode)); + + glob->apen = 0x00000000; + glob->open = 0x00000000; + glob->apen_num = -1; + glob->open_num = -1; +} + +static void ami_plot_setapen(struct RastPort *rp, ULONG colr) +{ + if(glob->apen == colr) return; + +#ifdef __amigaos4__ + if(glob->palette_mapped == false) { + SetRPAttrs(rp, RPTAG_APenColor, + ns_color_to_nscss(colr), + TAG_DONE); + } else +#endif + { + LONG pen = ami_plot_obtain_pen(glob->shared_pens, colr); + if((pen != -1) && (pen != glob->apen_num)) SetAPen(rp, pen); + } + + glob->apen = colr; +} + +static void ami_plot_setopen(struct RastPort *rp, ULONG colr) +{ + if(glob->open == colr) return; + +#ifdef __amigaos4__ + if(glob->palette_mapped == false) { + SetRPAttrs(rp, RPTAG_OPenColor, + ns_color_to_nscss(colr), + TAG_DONE); + } else +#endif + { + LONG pen = ami_plot_obtain_pen(glob->shared_pens, colr); + if((pen != -1) && (pen != glob->open_num)) SetOPen(rp, pen); + } + + glob->open = colr; +} + +void ami_plot_clear_bbox(struct RastPort *rp, struct IBox *bbox) +{ + if((bbox == NULL) || (rp == NULL)) return; + + EraseRect(rp, bbox->Left, bbox->Top, + bbox->Width + bbox->Left, bbox->Height + bbox->Top); +} + + +static bool ami_rectangle(int x0, int y0, int x1, int y1, const plot_style_t *style) +{ + #ifdef AMI_PLOTTER_DEBUG + LOG("[ami_plotter] Entered ami_rectangle()"); + #endif + + if (style->fill_type != PLOT_OP_TYPE_NONE) { + ami_plot_setapen(glob->rp, style->fill_colour); + RectFill(glob->rp, x0, y0, x1-1, y1-1); + } + + if (style->stroke_type != PLOT_OP_TYPE_NONE) { + glob->rp->PenWidth = style->stroke_width; + glob->rp->PenHeight = style->stroke_width; + + switch (style->stroke_type) { + case PLOT_OP_TYPE_SOLID: /**< Solid colour */ + default: + glob->rp->LinePtrn = PATT_LINE; + break; + + case PLOT_OP_TYPE_DOT: /**< Dotted plot */ + glob->rp->LinePtrn = PATT_DOT; + break; + + case PLOT_OP_TYPE_DASH: /**< dashed plot */ + glob->rp->LinePtrn = PATT_DASH; + break; + } + + ami_plot_setapen(glob->rp, style->stroke_colour); + Move(glob->rp, x0,y0); + Draw(glob->rp, x1, y0); + Draw(glob->rp, x1, y1); + Draw(glob->rp, x0, y1); + Draw(glob->rp, x0, y0); + + glob->rp->PenWidth = 1; + glob->rp->PenHeight = 1; + glob->rp->LinePtrn = PATT_LINE; + } + + return true; +} + +static bool ami_line(int x0, int y0, int x1, int y1, const plot_style_t *style) +{ + #ifdef AMI_PLOTTER_DEBUG + LOG("[ami_plotter] Entered ami_line()"); + #endif + + glob->rp->PenWidth = style->stroke_width; + glob->rp->PenHeight = style->stroke_width; + + switch (style->stroke_type) { + case PLOT_OP_TYPE_SOLID: /**< Solid colour */ + default: + glob->rp->LinePtrn = PATT_LINE; + break; + + case PLOT_OP_TYPE_DOT: /**< Doted plot */ + glob->rp->LinePtrn = PATT_DOT; + break; + + case PLOT_OP_TYPE_DASH: /**< dashed plot */ + glob->rp->LinePtrn = PATT_DASH; + break; + } + + ami_plot_setapen(glob->rp, style->stroke_colour); + Move(glob->rp,x0,y0); + Draw(glob->rp,x1,y1); + + glob->rp->PenWidth = 1; + glob->rp->PenHeight = 1; + glob->rp->LinePtrn = PATT_LINE; + + return true; +} + +static bool ami_polygon(const int *p, unsigned int n, const plot_style_t *style) +{ + #ifdef AMI_PLOTTER_DEBUG + LOG("[ami_plotter] Entered ami_polygon()"); + #endif + + ami_plot_setapen(glob->rp, style->fill_colour); + + if(AreaMove(glob->rp,p[0],p[1]) == -1) + LOG("AreaMove: vector list full"); + + for(uint32 k = 1; k < n; k++) { + if(AreaDraw(glob->rp,p[k*2],p[(k*2)+1]) == -1) + LOG("AreaDraw: vector list full"); + } + + if(AreaEnd(glob->rp) == -1) + LOG("AreaEnd: error"); + + return true; +} + + +static bool ami_clip(const struct rect *clip) +{ + #ifdef AMI_PLOTTER_DEBUG + LOG("[ami_plotter] Entered ami_clip()"); + #endif + + struct Region *reg = NULL; + + if(glob->rp->Layer) + { + reg = NewRegion(); + + glob->rect.MinX = clip->x0; + glob->rect.MinY = clip->y0; + glob->rect.MaxX = clip->x1-1; + glob->rect.MaxY = clip->y1-1; + + OrRectRegion(reg,&glob->rect); + + reg = InstallClipRegion(glob->rp->Layer,reg); + + if(reg) DisposeRegion(reg); + } + + return true; +} + +static bool ami_text(int x, int y, const char *text, size_t length, + const plot_font_style_t *fstyle) +{ + #ifdef AMI_PLOTTER_DEBUG + LOG("[ami_plotter] Entered ami_text()"); + #endif + + if(__builtin_expect(ami_nsfont == NULL, 0)) return false; + + ami_plot_setapen(glob->rp, fstyle->foreground); + ami_nsfont->text(glob->rp, text, length, fstyle, x, y, nsoption_bool(font_antialiasing)); + + return true; +} + +static bool ami_disc(int x, int y, int radius, const plot_style_t *style) +{ + #ifdef AMI_PLOTTER_DEBUG + LOG("[ami_plotter] Entered ami_disc()"); + #endif + + if (style->fill_type != PLOT_OP_TYPE_NONE) { + ami_plot_setapen(glob->rp, style->fill_colour); + AreaCircle(glob->rp,x,y,radius); + AreaEnd(glob->rp); + } + + if (style->stroke_type != PLOT_OP_TYPE_NONE) { + ami_plot_setapen(glob->rp, style->stroke_colour); + DrawEllipse(glob->rp,x,y,radius,radius); + } + + return true; +} + +static void ami_arc_gfxlib(int x, int y, int radius, int angle1, int angle2) +{ + double angle1_r = (double)(angle1) * (M_PI / 180.0); + double angle2_r = (double)(angle2) * (M_PI / 180.0); + double angle, b, c; + double step = 0.1; //(angle2_r - angle1_r) / ((angle2_r - angle1_r) * (double)radius); + int x0, y0, x1, y1; + + x0 = x; + y0 = y; + + b = angle1_r; + c = angle2_r; + + x1 = (int)(cos(b) * (double)radius); + y1 = (int)(sin(b) * (double)radius); + Move(glob->rp, x0 + x1, y0 - y1); + + for(angle = (b + step); angle <= c; angle += step) { + x1 = (int)(cos(angle) * (double)radius); + y1 = (int)(sin(angle) * (double)radius); + Draw(glob->rp, x0 + x1, y0 - y1); + } +} + +static bool ami_arc(int x, int y, int radius, int angle1, int angle2, const plot_style_t *style) +{ + #ifdef AMI_PLOTTER_DEBUG + LOG("[ami_plotter] Entered ami_arc()"); + #endif + + if (angle2 < angle1) angle2 += 360; + + ami_plot_setapen(glob->rp, style->fill_colour); + ami_arc_gfxlib(x, y, radius, angle1, angle2); + + return true; +} + +static bool ami_bitmap(int x, int y, int width, int height, struct bitmap *bitmap) +{ + #ifdef AMI_PLOTTER_DEBUG + LOG("[ami_plotter] Entered ami_bitmap()"); + #endif + + struct BitMap *tbm; + + if(!width || !height) return true; + + if(((x + width) < glob->rect.MinX) || + ((y + height) < glob->rect.MinY) || + (x > glob->rect.MaxX) || + (y > glob->rect.MaxY)) + return true; + + tbm = ami_bitmap_get_native(bitmap, width, height, glob->rp->BitMap); + if(!tbm) return true; + + #ifdef AMI_PLOTTER_DEBUG + LOG("[ami_plotter] ami_bitmap() got native bitmap"); + #endif + +#ifdef __amigaos4__ + if(__builtin_expect((GfxBase->LibNode.lib_Version >= 53) && (glob->palette_mapped == false) && + (nsoption_bool(direct_render) == false), 1)) { + uint32 comptype = COMPOSITE_Src_Over_Dest; + uint32 compflags = COMPFLAG_IgnoreDestAlpha; + if(amiga_bitmap_get_opaque(bitmap)) { + compflags |= COMPFLAG_SrcAlphaOverride; + comptype = COMPOSITE_Src; + } + + CompositeTags(comptype,tbm,glob->rp->BitMap, + COMPTAG_Flags, compflags, + COMPTAG_DestX,glob->rect.MinX, + COMPTAG_DestY,glob->rect.MinY, + COMPTAG_DestWidth,glob->rect.MaxX - glob->rect.MinX + 1, + COMPTAG_DestHeight,glob->rect.MaxY - glob->rect.MinY + 1, + COMPTAG_SrcWidth,width, + COMPTAG_SrcHeight,height, + COMPTAG_OffsetX,x, + COMPTAG_OffsetY,y, + COMPTAG_FriendBitMap, scrn->RastPort.BitMap, + TAG_DONE); + } + else +#endif + { + ULONG tag, tag_data, minterm = 0xc0; + + if(glob->palette_mapped == false) { + tag = BLITA_UseSrcAlpha; + tag_data = !amiga_bitmap_get_opaque(bitmap); + minterm = 0xc0; + } else { + tag = BLITA_MaskPlane; + if((tag_data = (ULONG)ami_bitmap_get_mask(bitmap, width, height, tbm))) + minterm = MINTERM_SRCMASK; + } +#ifdef __amigaos4__ + BltBitMapTags(BLITA_Width,width, + BLITA_Height,height, + BLITA_Source,tbm, + BLITA_Dest,glob->rp, + BLITA_DestX,x, + BLITA_DestY,y, + BLITA_SrcType,BLITT_BITMAP, + BLITA_DestType,BLITT_RASTPORT, + BLITA_Minterm, minterm, + tag, tag_data, + TAG_DONE); +#else + if(tag_data) { + BltMaskBitMapRastPort(tbm, 0, 0, glob->rp, x, y, width, height, minterm, tag_data); + } else { + BltBitMapRastPort(tbm, 0, 0, glob->rp, x, y, width, height, 0xc0); + } +#endif + } + + if((ami_bitmap_is_nativebm(bitmap, tbm) == false)) { + ami_rtg_freebitmap(tbm); + } + + return true; +} + +static bool ami_bitmap_tile(int x, int y, int width, int height, + struct bitmap *bitmap, colour bg, + bitmap_flags_t flags) +{ + #ifdef AMI_PLOTTER_DEBUG + LOG("[ami_plotter] Entered ami_bitmap_tile()"); + #endif + + int xf,yf,xm,ym,oy,ox; + struct BitMap *tbm = NULL; + struct Hook *bfh = NULL; + struct bfbitmap bfbm; + bool repeat_x = (flags & BITMAPF_REPEAT_X); + bool repeat_y = (flags & BITMAPF_REPEAT_Y); + + if((width == 0) || (height == 0)) return true; + + if(!(repeat_x || repeat_y)) + return ami_bitmap(x, y, width, height, bitmap); + + /* If it is a one pixel transparent image, we are wasting our time */ + if((amiga_bitmap_get_opaque(bitmap) == false) && + (bitmap_get_width(bitmap) == 1) && (bitmap_get_height(bitmap) == 1)) + return true; + + tbm = ami_bitmap_get_native(bitmap,width,height,glob->rp->BitMap); + if(!tbm) return true; + + ox = x; + oy = y; + + /* get left most tile position */ + for (; ox > 0; ox -= width) + ; + + /* get top most tile position */ + for (; oy > 0; oy -= height) + ; + + if(ox<0) ox = -ox; + if(oy<0) oy = -oy; + + if(repeat_x) + { + xf = glob->rect.MaxX; + xm = glob->rect.MinX; + } + else + { + xf = x + width; + xm = x; + } + + if(repeat_y) + { + yf = glob->rect.MaxY; + ym = glob->rect.MinY; + } + else + { + yf = y + height; + ym = y; + } +#ifdef __amigaos4__ + if(amiga_bitmap_get_opaque(bitmap)) + { + bfh = CreateBackFillHook(BFHA_BitMap,tbm, + BFHA_Width,width, + BFHA_Height,height, + BFHA_OffsetX,ox, + BFHA_OffsetY,oy, + TAG_DONE); + } + else +#endif + { + bfbm.bm = tbm; + bfbm.width = width; + bfbm.height = height; + bfbm.offsetx = ox; + bfbm.offsety = oy; + bfbm.mask = ami_bitmap_get_mask(bitmap, width, height, tbm); + bfh = ami_misc_allocvec_clear(sizeof(struct Hook), 0); /* NB: Was not MEMF_PRIVATE */ + bfh->h_Entry = (HOOKFUNC)ami_bitmap_tile_hook; + bfh->h_SubEntry = 0; + bfh->h_Data = &bfbm; + } + + InstallLayerHook(glob->rp->Layer,bfh); + EraseRect(glob->rp,xm,ym,xf,yf); + InstallLayerHook(glob->rp->Layer,LAYERS_NOBACKFILL); + +#ifdef __amigaos4__ + if(amiga_bitmap_get_opaque(bitmap)) DeleteBackFillHook(bfh); + else +#endif + FreeVec(bfh); + + if((ami_bitmap_is_nativebm(bitmap, tbm) == false)) { + /**\todo is this logic logical? */ + ami_rtg_freebitmap(tbm); + } + + return true; +} + +HOOKF(void, ami_bitmap_tile_hook, struct RastPort *, rp, struct BackFillMessage *) +{ + int xf,yf; + struct bfbitmap *bfbm = (struct bfbitmap *)hook->h_Data; + + /* tile down and across to extents (msg->Bounds.MinX)*/ + for (xf = -bfbm->offsetx; xf < msg->Bounds.MaxX; xf += bfbm->width) { + for (yf = -bfbm->offsety; yf < msg->Bounds.MaxY; yf += bfbm->height) { +#ifdef __amigaos4__ + if(__builtin_expect((GfxBase->LibNode.lib_Version >= 53) && + (glob->palette_mapped == false), 1)) { + CompositeTags(COMPOSITE_Src_Over_Dest, bfbm->bm, rp->BitMap, + COMPTAG_Flags, COMPFLAG_IgnoreDestAlpha, + COMPTAG_DestX, msg->Bounds.MinX, + COMPTAG_DestY, msg->Bounds.MinY, + COMPTAG_DestWidth, msg->Bounds.MaxX - msg->Bounds.MinX + 1, + COMPTAG_DestHeight, msg->Bounds.MaxY - msg->Bounds.MinY + 1, + COMPTAG_SrcWidth, bfbm->width, + COMPTAG_SrcHeight, bfbm->height, + COMPTAG_OffsetX, xf, + COMPTAG_OffsetY, yf, + COMPTAG_FriendBitMap, scrn->RastPort.BitMap, + TAG_DONE); + } + else +#endif + { + ULONG tag, tag_data, minterm = 0xc0; + + if(glob->palette_mapped == false) { + tag = BLITA_UseSrcAlpha; + tag_data = TRUE; + minterm = 0xc0; + } else { + tag = BLITA_MaskPlane; + if((tag_data = (ULONG)bfbm->mask)) + minterm = MINTERM_SRCMASK; + } +#ifdef __amigaos4__ + BltBitMapTags(BLITA_Width, bfbm->width, + BLITA_Height, bfbm->height, + BLITA_Source, bfbm->bm, + BLITA_Dest, rp, + BLITA_DestX, xf, + BLITA_DestY, yf, + BLITA_SrcType, BLITT_BITMAP, + BLITA_DestType, BLITT_RASTPORT, + BLITA_Minterm, minterm, + tag, tag_data, + TAG_DONE); +#else + if(tag_data) { + BltMaskBitMapRastPort(bfbm->bm, 0, 0, rp, xf, yf, + bfbm->width, bfbm->height, minterm, tag_data); + } else { + BltBitMapRastPort(bfbm->bm, 0, 0, rp, xf, yf, + bfbm->width, bfbm->height, minterm); + } +#endif + } + } + } +} + +static void ami_bezier(struct bez_point *a, struct bez_point *b, struct bez_point *c, + struct bez_point *d, double t, struct bez_point *p) { + p->x = pow((1 - t), 3) * a->x + 3 * t * pow((1 -t), 2) * b->x + 3 * (1-t) * pow(t, 2)* c->x + pow (t, 3)* d->x; + p->y = pow((1 - t), 3) * a->y + 3 * t * pow((1 -t), 2) * b->y + 3 * (1-t) * pow(t, 2)* c->y + pow (t, 3)* d->y; +} + +static bool ami_path(const float *p, unsigned int n, colour fill, float width, + colour c, const float transform[6]) +{ + unsigned int i; + struct bez_point start_p = {0, 0}, cur_p = {0, 0}, p_a, p_b, p_c, p_r; + + #ifdef AMI_PLOTTER_DEBUG + LOG("[ami_plotter] Entered ami_path()"); + #endif + + if (n == 0) + return true; + + if (p[0] != PLOTTER_PATH_MOVE) { + LOG("Path does not start with move"); + return false; + } + + if (fill != NS_TRANSPARENT) { + ami_plot_setapen(glob->rp, fill); + if (c != NS_TRANSPARENT) + ami_plot_setopen(glob->rp, c); + } else { + if (c != NS_TRANSPARENT) { + ami_plot_setapen(glob->rp, c); + } else { + return true; /* wholly transparent */ + } + } + + /* Construct path */ + for (i = 0; i < n; ) { + if (p[i] == PLOTTER_PATH_MOVE) { + if (fill != NS_TRANSPARENT) { + if(AreaMove(glob->rp, p[i+1], p[i+2]) == -1) + LOG("AreaMove: vector list full"); + } else { + Move(glob->rp, p[i+1], p[i+2]); + } + /* Keep track for future Bezier curves/closes etc */ + start_p.x = p[i+1]; + start_p.y = p[i+2]; + cur_p.x = start_p.x; + cur_p.y = start_p.y; + i += 3; + } else if (p[i] == PLOTTER_PATH_CLOSE) { + if (fill != NS_TRANSPARENT) { + if(AreaEnd(glob->rp) == -1) + LOG("AreaEnd: error"); + } else { + Draw(glob->rp, start_p.x, start_p.y); + } + i++; + } else if (p[i] == PLOTTER_PATH_LINE) { + if (fill != NS_TRANSPARENT) { + if(AreaDraw(glob->rp, p[i+1], p[i+2]) == -1) + LOG("AreaDraw: vector list full"); + } else { + Draw(glob->rp, p[i+1], p[i+2]); + } + cur_p.x = p[i+1]; + cur_p.y = p[i+2]; + i += 3; + } else if (p[i] == PLOTTER_PATH_BEZIER) { + p_a.x = p[i+1]; + p_a.y = p[i+2]; + p_b.x = p[i+3]; + p_b.y = p[i+4]; + p_c.x = p[i+5]; + p_c.y = p[i+6]; + + for(double t = 0.0; t <= 1.0; t += 0.1) { + ami_bezier(&cur_p, &p_a, &p_b, &p_c, t, &p_r); + if (fill != NS_TRANSPARENT) { + if(AreaDraw(glob->rp, p_r.x, p_r.y) == -1) + LOG("AreaDraw: vector list full"); + } else { + Draw(glob->rp, p_r.x, p_r.y); + } + } + cur_p.x = p_c.x; + cur_p.y = p_c.y; + i += 7; + } else { + LOG("bad path command %f", p[i]); + /* End path for safety if using Area commands */ + if (fill != NS_TRANSPARENT) { + AreaEnd(glob->rp); + BNDRYOFF(glob->rp); + } + return false; + } + } + if (fill != NS_TRANSPARENT) + BNDRYOFF(glob->rp); + + return true; +} + +bool ami_plot_screen_is_palettemapped(void) +{ + return glob->palette_mapped; +} + +struct plotter_table plot; +const struct plotter_table amiplot = { + .rectangle = ami_rectangle, + .line = ami_line, + .polygon = ami_polygon, + .clip = ami_clip, + .text = ami_text, + .disc = ami_disc, + .arc = ami_arc, + .bitmap = ami_bitmap_tile, + .path = ami_path, + .option_knockout = true, +}; + |