2008-08-02 18:31:32 +04:00
|
|
|
/*
|
2013-01-28 03:09:26 +04:00
|
|
|
* Copyright 2008-09, 2012-13 Chris Young <chris@unsatisfactorysoftware.co.uk>
|
2008-08-02 18:31:32 +04:00
|
|
|
*
|
|
|
|
* 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/>.
|
|
|
|
*/
|
|
|
|
|
2015-01-19 00:11:00 +03:00
|
|
|
#include "amiga/os3support.h"
|
|
|
|
|
2012-08-04 21:05:26 +04:00
|
|
|
#include <proto/exec.h>
|
|
|
|
#include <proto/intuition.h>
|
|
|
|
|
2008-08-02 18:31:32 +04:00
|
|
|
#include <intuition/intuition.h>
|
2008-08-07 22:44:28 +04:00
|
|
|
#include <graphics/rpattr.h>
|
2008-08-17 20:22:40 +04:00
|
|
|
#include <graphics/gfxmacros.h>
|
2011-01-07 21:21:01 +03:00
|
|
|
#include <graphics/gfxbase.h>
|
2012-08-04 21:05:26 +04:00
|
|
|
|
2011-01-07 02:17:17 +03:00
|
|
|
#ifdef __amigaos4__
|
2008-12-26 21:36:53 +03:00
|
|
|
#include <graphics/blitattr.h>
|
2009-05-07 22:40:33 +04:00
|
|
|
#include <graphics/composite.h>
|
2011-01-07 02:17:17 +03:00
|
|
|
#endif
|
2012-08-04 21:05:26 +04:00
|
|
|
|
2008-12-28 03:41:35 +03:00
|
|
|
#include <math.h>
|
2009-02-25 03:26:46 +03:00
|
|
|
#include <assert.h>
|
2016-11-20 00:52:46 +03:00
|
|
|
#include <stdlib.h>
|
2008-12-28 03:41:35 +03:00
|
|
|
|
2014-10-16 12:55:01 +04:00
|
|
|
#include "utils/nsoption.h"
|
|
|
|
#include "utils/utils.h"
|
|
|
|
#include "utils/log.h"
|
2016-05-26 13:18:41 +03:00
|
|
|
#include "netsurf/css.h"
|
2016-05-30 14:07:16 +03:00
|
|
|
#include "netsurf/mouse.h"
|
2016-05-30 13:01:40 +03:00
|
|
|
#include "netsurf/window.h"
|
2014-10-16 12:55:01 +04:00
|
|
|
|
|
|
|
#include "amiga/plotters.h"
|
|
|
|
#include "amiga/bitmap.h"
|
|
|
|
#include "amiga/font.h"
|
|
|
|
#include "amiga/gui.h"
|
2016-11-19 18:50:22 +03:00
|
|
|
#include "amiga/memory.h"
|
2016-11-19 19:12:20 +03:00
|
|
|
#include "amiga/misc.h"
|
2015-01-20 23:51:52 +03:00
|
|
|
#include "amiga/rtg.h"
|
2014-10-16 12:55:01 +04:00
|
|
|
#include "amiga/utf8.h"
|
|
|
|
|
2017-02-10 18:26:59 +03:00
|
|
|
/* set AMI_PLOTTER_DEBUG to 0 for no debugging, 1 for debugging */
|
2016-04-28 21:18:06 +03:00
|
|
|
//#define AMI_PLOTTER_DEBUG 1
|
|
|
|
|
2017-02-10 18:26:59 +03:00
|
|
|
#ifdef AMI_PLOTTER_DEBUG
|
|
|
|
#define PLOT_LOG(x...) LOG(x)
|
|
|
|
#else
|
|
|
|
#define PLOT_LOG(x...) ((void) 0)
|
|
|
|
#endif
|
|
|
|
|
2016-01-14 03:11:48 +03:00
|
|
|
HOOKF(void, ami_bitmap_tile_hook, struct RastPort *, rp, struct BackFillMessage *);
|
2009-05-27 02:39:23 +04:00
|
|
|
|
|
|
|
struct bfbitmap {
|
|
|
|
struct BitMap *bm;
|
|
|
|
ULONG width;
|
|
|
|
ULONG height;
|
|
|
|
int offsetx;
|
|
|
|
int offsety;
|
2012-08-05 18:55:02 +04:00
|
|
|
APTR mask;
|
2009-05-27 02:39:23 +04:00
|
|
|
};
|
|
|
|
|
2012-08-06 00:29:57 +04:00
|
|
|
struct ami_plot_pen {
|
|
|
|
struct MinNode node;
|
|
|
|
ULONG pen;
|
|
|
|
};
|
|
|
|
|
2012-10-23 23:43:42 +04:00
|
|
|
struct bez_point {
|
|
|
|
float x;
|
|
|
|
float y;
|
|
|
|
};
|
|
|
|
|
2016-06-01 19:48:03 +03:00
|
|
|
struct gui_globals *glob;
|
|
|
|
|
2016-01-24 03:00:27 +03:00
|
|
|
static int init_layers_count = 0;
|
|
|
|
static APTR pool_pens = NULL;
|
2009-05-27 02:39:23 +04:00
|
|
|
|
2008-12-28 03:41:35 +03:00
|
|
|
#ifndef M_PI /* For some reason we don't always get this from math.h */
|
|
|
|
#define M_PI 3.14159265358979323846
|
|
|
|
#endif
|
|
|
|
|
2008-08-15 22:49:14 +04:00
|
|
|
#define PATT_DOT 0xAAAA
|
|
|
|
#define PATT_DASH 0xCCCC
|
|
|
|
#define PATT_LINE 0xFFFF
|
2008-08-02 18:31:32 +04:00
|
|
|
|
2012-10-24 00:01:49 +04:00
|
|
|
/* This defines the size of the list for Area* functions.
|
|
|
|
25000 = 5000 vectors
|
|
|
|
*/
|
|
|
|
#define AREA_SIZE 25000
|
|
|
|
|
2010-08-30 15:00:24 +04:00
|
|
|
/* Define the below to get additional debug */
|
|
|
|
#undef AMI_PLOTTER_DEBUG
|
|
|
|
|
2016-01-25 03:01:55 +03:00
|
|
|
void ami_init_layers(struct gui_globals *gg, ULONG width, ULONG height, bool force32bit)
|
2009-07-09 22:52:55 +04:00
|
|
|
{
|
|
|
|
/* 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 */
|
2012-08-04 20:46:56 +04:00
|
|
|
|
2016-01-18 02:40:50 +03:00
|
|
|
int depth = 32;
|
2013-04-28 15:21:39 +04:00
|
|
|
struct BitMap *friend = NULL;
|
2011-03-05 14:42:31 +03:00
|
|
|
|
2016-01-25 03:01:55 +03:00
|
|
|
if(force32bit == false) depth = GetBitMapAttr(scrn->RastPort.BitMap, BMA_DEPTH);
|
2015-05-28 18:08:46 +03:00
|
|
|
LOG("Screen depth = %d", depth);
|
2015-02-02 03:32:34 +03:00
|
|
|
|
2016-07-08 21:21:53 +03:00
|
|
|
#ifdef __amigaos4__
|
2014-05-03 19:38:58 +04:00
|
|
|
if(depth < 16) {
|
2016-01-25 03:01:55 +03:00
|
|
|
gg->palette_mapped = true;
|
2012-08-06 22:40:51 +04:00
|
|
|
} else {
|
2016-01-25 03:01:55 +03:00
|
|
|
gg->palette_mapped = false;
|
2012-08-04 20:46:56 +04:00
|
|
|
}
|
2016-07-08 21:21:53 +03:00
|
|
|
#else
|
|
|
|
/* 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.
|
|
|
|
*/
|
|
|
|
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 > 8) && (force32bit == false)) friend = scrn->RastPort.BitMap;
|
|
|
|
}
|
2016-08-11 20:55:43 +03:00
|
|
|
|
|
|
|
/* OS3 is locked to using palette-mapped display even on RTG.
|
|
|
|
* To change this, comment out the below and build with the similar OS4 lines above.
|
|
|
|
* Various bits of RTG code are OS4-only and OS3 versions will need to be written,
|
|
|
|
* however a brief test reveals a negative performance benefit, so this lock to a
|
|
|
|
* palette-mapped display is most likely permanent.
|
|
|
|
*/
|
2015-02-04 02:58:35 +03:00
|
|
|
#warning OS3 locked to palette-mapped modes
|
2016-01-25 03:01:55 +03:00
|
|
|
gg->palette_mapped = true;
|
2015-01-31 23:14:09 +03:00
|
|
|
if(depth > 8) depth = 8;
|
2015-01-19 23:50:06 +03:00
|
|
|
#endif
|
2015-01-31 23:14:09 +03:00
|
|
|
|
2016-01-25 03:01:55 +03:00
|
|
|
/* Probably need to fix this next line */
|
|
|
|
if(gg->palette_mapped == true) nsoption_set_bool(font_antialiasing, false);
|
2016-01-18 02:40:50 +03:00
|
|
|
|
2012-03-22 13:34:34 +04:00
|
|
|
if(!width) width = nsoption_int(redraw_tile_size_x);
|
|
|
|
if(!height) height = nsoption_int(redraw_tile_size_y);
|
2015-04-25 15:13:30 +03:00
|
|
|
gg->width = width;
|
|
|
|
gg->height = height;
|
2009-08-23 19:59:41 +04:00
|
|
|
|
2009-07-09 22:52:55 +04:00
|
|
|
gg->layerinfo = NewLayerInfo();
|
2016-11-20 00:40:32 +03:00
|
|
|
gg->areabuf = malloc(AREA_SIZE);
|
2015-08-16 14:48:06 +03:00
|
|
|
|
2015-08-17 01:03:54 +03:00
|
|
|
/* OS3/AGA requires this to be in chip mem. RTG would probably rather it wasn't. */
|
2016-11-20 00:40:32 +03:00
|
|
|
gg->tmprasbuf = ami_memory_chip_alloc(width * height);
|
2009-07-09 22:52:55 +04:00
|
|
|
|
2016-01-25 03:01:55 +03:00
|
|
|
if(gg->palette_mapped == true) {
|
2015-02-01 01:14:03 +03:00
|
|
|
gg->bm = AllocBitMap(width, height, depth, 0, friend);
|
2012-08-07 03:00:04 +04:00
|
|
|
} else {
|
2015-02-03 02:45:49 +03:00
|
|
|
#ifdef __amigaos4__
|
2015-03-30 01:37:23 +03:00
|
|
|
/* 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
|
2015-08-15 18:42:52 +03:00
|
|
|
* other depths, hence this check.
|
2016-04-28 21:18:06 +03:00
|
|
|
* \todo use friend BitMaps but avoid CompositeTags() at non-32-bit
|
|
|
|
* as that seems to be the cause of the problems.
|
2015-08-15 18:42:52 +03:00
|
|
|
*/
|
2016-01-25 21:41:50 +03:00
|
|
|
if((depth >= 24) && (force32bit == false)) friend = scrn->RastPort.BitMap;
|
2015-02-03 02:45:49 +03:00
|
|
|
#endif
|
2015-02-01 01:14:03 +03:00
|
|
|
gg->bm = ami_rtg_allocbitmap(width, height, 32, 0, friend, RGBFB_A8R8G8B8);
|
2012-08-04 20:46:56 +04:00
|
|
|
}
|
2015-01-20 23:36:14 +03:00
|
|
|
|
2016-05-01 16:00:47 +03:00
|
|
|
if(!gg->bm) amiga_warn_user("NoMemory","");
|
2009-07-09 22:52:55 +04:00
|
|
|
|
2016-11-20 00:40:32 +03:00
|
|
|
gg->rp = malloc(sizeof(struct RastPort));
|
2016-05-01 16:00:47 +03:00
|
|
|
if(!gg->rp) amiga_warn_user("NoMemory","");
|
2011-03-05 17:36:55 +03:00
|
|
|
|
|
|
|
InitRastPort(gg->rp);
|
|
|
|
gg->rp->BitMap = gg->bm;
|
2009-07-09 22:52:55 +04:00
|
|
|
|
2011-03-05 17:36:55 +03:00
|
|
|
SetDrMd(gg->rp,BGBACKFILL);
|
2009-07-09 22:52:55 +04:00
|
|
|
|
2011-03-05 17:36:55 +03:00
|
|
|
gg->rp->Layer = CreateUpfrontLayer(gg->layerinfo,gg->rp->BitMap,0,0,
|
2009-08-23 19:59:41 +04:00
|
|
|
width-1, height-1, LAYERSIMPLE, NULL);
|
2009-07-09 22:52:55 +04:00
|
|
|
|
2011-03-05 17:36:55 +03:00
|
|
|
InstallLayerHook(gg->rp->Layer,LAYERS_NOBACKFILL);
|
2009-07-09 22:52:55 +04:00
|
|
|
|
2016-11-20 00:40:32 +03:00
|
|
|
gg->rp->AreaInfo = malloc(sizeof(struct AreaInfo));
|
2016-05-01 16:00:47 +03:00
|
|
|
if((!gg->areabuf) || (!gg->rp->AreaInfo)) amiga_warn_user("NoMemory","");
|
2009-07-09 22:52:55 +04:00
|
|
|
|
2016-11-20 00:40:32 +03:00
|
|
|
InitArea(gg->rp->AreaInfo, gg->areabuf, AREA_SIZE/5);
|
2009-07-09 22:52:55 +04:00
|
|
|
|
2016-11-20 00:40:32 +03:00
|
|
|
gg->rp->TmpRas = malloc(sizeof(struct TmpRas));
|
2016-05-01 16:00:47 +03:00
|
|
|
if((!gg->tmprasbuf) || (!gg->rp->TmpRas)) amiga_warn_user("NoMemory","");
|
2009-07-09 22:52:55 +04:00
|
|
|
|
2011-03-05 17:36:55 +03:00
|
|
|
InitTmpRas(gg->rp->TmpRas, gg->tmprasbuf, width*height);
|
2016-01-24 03:00:27 +03:00
|
|
|
|
2016-01-25 03:01:55 +03:00
|
|
|
if((gg->palette_mapped == true) && (pool_pens == NULL)) {
|
2016-11-20 19:30:33 +03:00
|
|
|
pool_pens = ami_memory_itempool_create(sizeof(struct ami_plot_pen));
|
2016-01-24 03:00:27 +03:00
|
|
|
}
|
|
|
|
|
2016-03-22 21:45:20 +03:00
|
|
|
gg->apen = 0x00000000;
|
|
|
|
gg->open = 0x00000000;
|
2016-03-24 02:18:05 +03:00
|
|
|
gg->apen_num = -1;
|
|
|
|
gg->open_num = -1;
|
2016-03-22 21:45:20 +03:00
|
|
|
|
2016-01-24 03:00:27 +03:00
|
|
|
init_layers_count++;
|
2016-03-01 02:06:10 +03:00
|
|
|
LOG("Layer initialised (total: %d)", init_layers_count);
|
2009-07-09 22:52:55 +04:00
|
|
|
}
|
|
|
|
|
|
|
|
void ami_free_layers(struct gui_globals *gg)
|
|
|
|
{
|
2016-01-24 03:00:27 +03:00
|
|
|
init_layers_count--;
|
|
|
|
|
|
|
|
if((init_layers_count == 0) && (pool_pens != NULL)) {
|
2016-11-20 19:30:33 +03:00
|
|
|
ami_memory_itempool_delete(pool_pens);
|
2016-01-24 03:00:27 +03:00
|
|
|
pool_pens = NULL;
|
|
|
|
}
|
|
|
|
|
2015-01-20 23:36:14 +03:00
|
|
|
if(gg->rp) {
|
2011-03-10 03:05:37 +03:00
|
|
|
DeleteLayer(0,gg->rp->Layer);
|
2016-11-20 00:40:32 +03:00
|
|
|
free(gg->rp->TmpRas);
|
|
|
|
free(gg->rp->AreaInfo);
|
|
|
|
free(gg->rp);
|
2011-03-10 03:05:37 +03:00
|
|
|
}
|
|
|
|
|
2016-11-20 00:40:32 +03:00
|
|
|
ami_memory_chip_free(gg->tmprasbuf);
|
|
|
|
free(gg->areabuf);
|
2011-03-05 17:36:55 +03:00
|
|
|
DisposeLayerInfo(gg->layerinfo);
|
2016-01-25 03:01:55 +03:00
|
|
|
if(gg->palette_mapped == false) {
|
2015-04-25 15:13:30 +03:00
|
|
|
if(gg->bm) ami_rtg_freebitmap(gg->bm);
|
2012-08-05 13:21:39 +04:00
|
|
|
} else {
|
2015-04-25 15:13:30 +03:00
|
|
|
if(gg->bm) FreeBitMap(gg->bm);
|
2012-08-05 13:21:39 +04:00
|
|
|
}
|
2009-07-09 22:52:55 +04:00
|
|
|
}
|
|
|
|
|
2009-08-23 19:59:41 +04:00
|
|
|
void ami_clearclipreg(struct gui_globals *gg)
|
|
|
|
{
|
|
|
|
struct Region *reg = NULL;
|
|
|
|
|
2011-03-05 17:36:55 +03:00
|
|
|
reg = InstallClipRegion(gg->rp->Layer,NULL);
|
2009-08-23 19:59:41 +04:00
|
|
|
if(reg) DisposeRegion(reg);
|
|
|
|
|
|
|
|
gg->rect.MinX = 0;
|
|
|
|
gg->rect.MinY = 0;
|
|
|
|
gg->rect.MaxX = scrn->Width-1;
|
|
|
|
gg->rect.MaxY = scrn->Height-1;
|
|
|
|
}
|
|
|
|
|
2014-04-05 23:23:29 +04:00
|
|
|
static ULONG ami_plot_obtain_pen(struct MinList *shared_pens, ULONG colr)
|
2012-08-05 14:28:48 +04:00
|
|
|
{
|
2012-08-06 00:29:57 +04:00
|
|
|
struct ami_plot_pen *node;
|
2014-11-11 02:38:59 +03:00
|
|
|
LONG pen = ObtainBestPenA(scrn->ViewPort.ColorMap,
|
2014-04-05 23:23:29 +04:00
|
|
|
(colr & 0x000000ff) << 24,
|
|
|
|
(colr & 0x0000ff00) << 16,
|
|
|
|
(colr & 0x00ff0000) << 8,
|
2012-08-05 14:28:48 +04:00
|
|
|
NULL);
|
|
|
|
|
2015-05-28 18:08:46 +03:00
|
|
|
if(pen == -1) LOG("WARNING: Cannot allocate pen for ABGR:%lx", colr);
|
2012-08-06 00:29:57 +04:00
|
|
|
|
2016-01-24 03:00:27 +03:00
|
|
|
if((shared_pens != NULL) && (pool_pens != NULL)) {
|
2016-11-20 19:30:33 +03:00
|
|
|
if((node = (struct ami_plot_pen *)ami_memory_itempool_alloc(pool_pens, sizeof(struct ami_plot_pen)))) {
|
2015-02-01 00:27:04 +03:00
|
|
|
node->pen = pen;
|
2012-08-06 01:59:09 +04:00
|
|
|
AddTail((struct List *)shared_pens, (struct Node *)node);
|
|
|
|
}
|
2012-08-06 02:01:03 +04:00
|
|
|
} else {
|
|
|
|
/* Immediately release the pen if we can't keep track of it. */
|
|
|
|
ReleasePen(scrn->ViewPort.ColorMap, pen);
|
|
|
|
}
|
2012-08-05 14:28:48 +04:00
|
|
|
return pen;
|
|
|
|
}
|
|
|
|
|
|
|
|
void ami_plot_release_pens(struct MinList *shared_pens)
|
|
|
|
{
|
2012-08-06 00:29:57 +04:00
|
|
|
struct ami_plot_pen *node;
|
|
|
|
struct ami_plot_pen *nnode;
|
|
|
|
|
2015-02-02 21:28:21 +03:00
|
|
|
if(shared_pens == NULL) return;
|
2016-12-07 02:58:47 +03:00
|
|
|
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_memory_itempool_free(pool_pens, node, sizeof(struct ami_plot_pen));
|
|
|
|
} while((node = nnode));
|
|
|
|
|
2016-03-22 21:45:20 +03:00
|
|
|
glob->apen = 0x00000000;
|
|
|
|
glob->open = 0x00000000;
|
2016-03-24 02:18:05 +03:00
|
|
|
glob->apen_num = -1;
|
|
|
|
glob->open_num = -1;
|
2012-08-05 14:28:48 +04:00
|
|
|
}
|
|
|
|
|
2015-02-02 21:48:45 +03:00
|
|
|
static void ami_plot_setapen(struct RastPort *rp, ULONG colr)
|
2012-08-04 19:45:05 +04:00
|
|
|
{
|
2016-03-22 21:45:20 +03:00
|
|
|
if(glob->apen == colr) return;
|
|
|
|
|
2015-01-19 00:11:00 +03:00
|
|
|
#ifdef __amigaos4__
|
2016-01-25 03:01:55 +03:00
|
|
|
if(glob->palette_mapped == false) {
|
2015-02-02 21:48:45 +03:00
|
|
|
SetRPAttrs(rp, RPTAG_APenColor,
|
2014-04-05 23:23:29 +04:00
|
|
|
ns_color_to_nscss(colr),
|
2012-08-04 19:45:05 +04:00
|
|
|
TAG_DONE);
|
2015-02-02 21:10:43 +03:00
|
|
|
} else
|
2015-01-19 00:11:00 +03:00
|
|
|
#endif
|
2015-02-02 21:10:43 +03:00
|
|
|
{
|
2014-11-11 02:38:59 +03:00
|
|
|
LONG pen = ami_plot_obtain_pen(glob->shared_pens, colr);
|
2016-03-24 02:18:05 +03:00
|
|
|
if((pen != -1) && (pen != glob->apen_num)) SetAPen(rp, pen);
|
2012-08-04 19:45:05 +04:00
|
|
|
}
|
2016-03-22 21:45:20 +03:00
|
|
|
|
|
|
|
glob->apen = colr;
|
2012-08-04 19:45:05 +04:00
|
|
|
}
|
|
|
|
|
2015-02-02 21:48:45 +03:00
|
|
|
static void ami_plot_setopen(struct RastPort *rp, ULONG colr)
|
2012-10-23 23:43:42 +04:00
|
|
|
{
|
2016-03-22 21:45:20 +03:00
|
|
|
if(glob->open == colr) return;
|
|
|
|
|
2015-01-19 00:11:00 +03:00
|
|
|
#ifdef __amigaos4__
|
2016-01-25 03:01:55 +03:00
|
|
|
if(glob->palette_mapped == false) {
|
2015-02-02 21:48:45 +03:00
|
|
|
SetRPAttrs(rp, RPTAG_OPenColor,
|
2014-04-05 23:23:29 +04:00
|
|
|
ns_color_to_nscss(colr),
|
2012-10-23 23:43:42 +04:00
|
|
|
TAG_DONE);
|
2015-02-02 21:10:43 +03:00
|
|
|
} else
|
2015-01-19 00:11:00 +03:00
|
|
|
#endif
|
2015-02-02 21:10:43 +03:00
|
|
|
{
|
2014-11-11 02:38:59 +03:00
|
|
|
LONG pen = ami_plot_obtain_pen(glob->shared_pens, colr);
|
2016-03-24 02:18:05 +03:00
|
|
|
if((pen != -1) && (pen != glob->open_num)) SetOPen(rp, pen);
|
2012-10-23 23:43:42 +04:00
|
|
|
}
|
2016-03-22 21:45:20 +03:00
|
|
|
|
|
|
|
glob->open = colr;
|
2012-10-23 23:43:42 +04:00
|
|
|
}
|
|
|
|
|
2015-02-02 21:10:43 +03:00
|
|
|
void ami_plot_clear_bbox(struct RastPort *rp, struct IBox *bbox)
|
|
|
|
{
|
2015-02-13 02:18:41 +03:00
|
|
|
if((bbox == NULL) || (rp == NULL)) return;
|
2015-02-11 21:24:51 +03:00
|
|
|
|
2015-02-13 21:34:08 +03:00
|
|
|
EraseRect(rp, bbox->Left, bbox->Top,
|
2015-02-13 02:18:41 +03:00
|
|
|
bbox->Width + bbox->Left, bbox->Height + bbox->Top);
|
2015-02-02 21:10:43 +03:00
|
|
|
}
|
|
|
|
|
|
|
|
|
2014-11-11 02:38:59 +03:00
|
|
|
static void ami_arc_gfxlib(int x, int y, int radius, int angle1, int angle2)
|
2012-10-23 23:04:43 +04:00
|
|
|
{
|
|
|
|
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);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2017-02-10 18:26:59 +03:00
|
|
|
/**
|
|
|
|
*/
|
|
|
|
static nserror
|
|
|
|
ami_bitmap(int x, int y, int width, int height, struct bitmap *bitmap)
|
2008-08-02 18:31:32 +04:00
|
|
|
{
|
2017-02-10 18:26:59 +03:00
|
|
|
PLOT_LOG("[ami_plotter] Entered ami_bitmap()");
|
2010-08-30 15:00:24 +04:00
|
|
|
|
2008-12-26 21:36:53 +03:00
|
|
|
struct BitMap *tbm;
|
2008-08-02 18:31:32 +04:00
|
|
|
|
2017-02-10 18:26:59 +03:00
|
|
|
if (!width || !height) {
|
|
|
|
return NSERROR_OK;
|
|
|
|
}
|
2008-09-28 18:39:02 +04:00
|
|
|
|
2017-02-10 18:26:59 +03:00
|
|
|
if (((x + width) < glob->rect.MinX) ||
|
|
|
|
((y + height) < glob->rect.MinY) ||
|
|
|
|
(x > glob->rect.MaxX) ||
|
|
|
|
(y > glob->rect.MaxY)) {
|
|
|
|
return NSERROR_OK;
|
|
|
|
}
|
2009-05-05 23:51:25 +04:00
|
|
|
|
2012-08-08 00:22:51 +04:00
|
|
|
tbm = ami_bitmap_get_native(bitmap, width, height, glob->rp->BitMap);
|
2017-02-10 18:26:59 +03:00
|
|
|
if (!tbm) {
|
|
|
|
return NSERROR_OK;
|
|
|
|
}
|
2009-03-08 15:52:44 +03:00
|
|
|
|
2017-02-10 18:26:59 +03:00
|
|
|
PLOT_LOG("[ami_plotter] ami_bitmap() got native bitmap");
|
2010-08-30 15:00:24 +04:00
|
|
|
|
2013-01-30 22:23:48 +04:00
|
|
|
#ifdef __amigaos4__
|
2017-02-10 18:26:59 +03:00
|
|
|
if (__builtin_expect((GfxBase->LibNode.lib_Version >= 53) &&
|
|
|
|
(glob->palette_mapped == false) &&
|
|
|
|
(nsoption_bool(direct_render) == false), 1)) {
|
2013-10-05 14:18:27 +04:00
|
|
|
uint32 comptype = COMPOSITE_Src_Over_Dest;
|
|
|
|
uint32 compflags = COMPFLAG_IgnoreDestAlpha;
|
2015-04-17 00:36:29 +03:00
|
|
|
if(amiga_bitmap_get_opaque(bitmap)) {
|
2013-10-05 14:18:27 +04:00
|
|
|
compflags |= COMPFLAG_SrcAlphaOverride;
|
|
|
|
comptype = COMPOSITE_Src;
|
|
|
|
}
|
2009-05-07 22:40:33 +04:00
|
|
|
|
2011-03-05 17:36:55 +03:00
|
|
|
CompositeTags(comptype,tbm,glob->rp->BitMap,
|
2013-10-05 14:18:27 +04:00
|
|
|
COMPTAG_Flags, compflags,
|
2009-07-07 23:28:34 +04:00
|
|
|
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,
|
2010-08-30 16:25:38 +04:00
|
|
|
COMPTAG_SrcWidth,width,
|
|
|
|
COMPTAG_SrcHeight,height,
|
2009-05-07 22:40:33 +04:00
|
|
|
COMPTAG_OffsetX,x,
|
|
|
|
COMPTAG_OffsetY,y,
|
2014-01-06 22:29:05 +04:00
|
|
|
COMPTAG_FriendBitMap, scrn->RastPort.BitMap,
|
2009-05-07 22:40:33 +04:00
|
|
|
TAG_DONE);
|
2017-02-10 18:26:59 +03:00
|
|
|
} else
|
2015-03-01 14:48:21 +03:00
|
|
|
#endif
|
2009-05-07 22:40:33 +04:00
|
|
|
{
|
2012-08-10 21:35:01 +04:00
|
|
|
ULONG tag, tag_data, minterm = 0xc0;
|
2012-08-05 18:55:02 +04:00
|
|
|
|
2017-02-10 18:26:59 +03:00
|
|
|
if (glob->palette_mapped == false) {
|
2012-08-05 18:55:02 +04:00
|
|
|
tag = BLITA_UseSrcAlpha;
|
2016-03-22 22:26:36 +03:00
|
|
|
tag_data = !amiga_bitmap_get_opaque(bitmap);
|
2012-08-05 18:55:02 +04:00
|
|
|
minterm = 0xc0;
|
|
|
|
} else {
|
|
|
|
tag = BLITA_MaskPlane;
|
2017-02-10 18:26:59 +03:00
|
|
|
if ((tag_data = (ULONG)ami_bitmap_get_mask(bitmap, width, height, tbm)))
|
2015-09-01 20:02:32 +03:00
|
|
|
minterm = MINTERM_SRCMASK;
|
2012-08-05 18:55:02 +04:00
|
|
|
}
|
2015-01-19 00:11:00 +03:00
|
|
|
#ifdef __amigaos4__
|
2009-05-07 22:40:33 +04:00
|
|
|
BltBitMapTags(BLITA_Width,width,
|
2008-12-26 21:36:53 +03:00
|
|
|
BLITA_Height,height,
|
2008-12-28 18:55:52 +03:00
|
|
|
BLITA_Source,tbm,
|
2011-03-05 17:36:55 +03:00
|
|
|
BLITA_Dest,glob->rp,
|
2008-12-26 21:36:53 +03:00
|
|
|
BLITA_DestX,x,
|
|
|
|
BLITA_DestY,y,
|
2008-12-28 18:55:52 +03:00
|
|
|
BLITA_SrcType,BLITT_BITMAP,
|
2008-12-26 21:36:53 +03:00
|
|
|
BLITA_DestType,BLITT_RASTPORT,
|
2012-08-05 18:55:02 +04:00
|
|
|
BLITA_Minterm, minterm,
|
|
|
|
tag, tag_data,
|
2008-12-26 21:36:53 +03:00
|
|
|
TAG_DONE);
|
2015-01-19 00:11:00 +03:00
|
|
|
#else
|
2017-02-10 18:26:59 +03:00
|
|
|
if (tag_data) {
|
2015-02-01 14:08:05 +03:00
|
|
|
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);
|
|
|
|
}
|
2015-01-19 00:11:00 +03:00
|
|
|
#endif
|
2009-05-07 22:40:33 +04:00
|
|
|
}
|
2008-08-02 18:31:32 +04:00
|
|
|
|
2017-02-10 18:26:59 +03:00
|
|
|
if ((ami_bitmap_is_nativebm(bitmap, tbm) == false)) {
|
2015-01-20 23:36:14 +03:00
|
|
|
ami_rtg_freebitmap(tbm);
|
2009-02-25 23:09:33 +03:00
|
|
|
}
|
|
|
|
|
2017-02-10 18:26:59 +03:00
|
|
|
return NSERROR_OK;
|
2008-08-02 18:31:32 +04:00
|
|
|
}
|
|
|
|
|
|
|
|
|
2016-01-14 03:11:48 +03:00
|
|
|
HOOKF(void, ami_bitmap_tile_hook, struct RastPort *, rp, struct BackFillMessage *)
|
2009-05-27 02:39:23 +04:00
|
|
|
{
|
|
|
|
int xf,yf;
|
|
|
|
struct bfbitmap *bfbm = (struct bfbitmap *)hook->h_Data;
|
|
|
|
|
2016-01-14 03:11:48 +03:00
|
|
|
/* 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) {
|
2013-01-30 22:23:48 +04:00
|
|
|
#ifdef __amigaos4__
|
2015-03-01 14:48:21 +03:00
|
|
|
if(__builtin_expect((GfxBase->LibNode.lib_Version >= 53) &&
|
2016-01-25 03:01:55 +03:00
|
|
|
(glob->palette_mapped == false), 1)) {
|
2013-10-05 14:27:05 +04:00
|
|
|
CompositeTags(COMPOSITE_Src_Over_Dest, bfbm->bm, rp->BitMap,
|
|
|
|
COMPTAG_Flags, COMPFLAG_IgnoreDestAlpha,
|
2016-01-14 03:11:48 +03:00
|
|
|
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,
|
2014-01-06 22:29:05 +04:00
|
|
|
COMPTAG_FriendBitMap, scrn->RastPort.BitMap,
|
2009-05-27 02:39:23 +04:00
|
|
|
TAG_DONE);
|
2017-02-10 18:26:59 +03:00
|
|
|
} else
|
2015-03-01 14:48:21 +03:00
|
|
|
#endif
|
2009-05-27 02:39:23 +04:00
|
|
|
{
|
2012-08-10 21:35:01 +04:00
|
|
|
ULONG tag, tag_data, minterm = 0xc0;
|
2012-08-05 18:55:02 +04:00
|
|
|
|
2016-01-25 03:01:55 +03:00
|
|
|
if(glob->palette_mapped == false) {
|
2012-08-05 18:55:02 +04:00
|
|
|
tag = BLITA_UseSrcAlpha;
|
|
|
|
tag_data = TRUE;
|
|
|
|
minterm = 0xc0;
|
|
|
|
} else {
|
|
|
|
tag = BLITA_MaskPlane;
|
2014-11-11 02:38:59 +03:00
|
|
|
if((tag_data = (ULONG)bfbm->mask))
|
2015-09-01 20:02:32 +03:00
|
|
|
minterm = MINTERM_SRCMASK;
|
2012-08-05 18:55:02 +04:00
|
|
|
}
|
2016-01-14 03:11:48 +03:00
|
|
|
#ifdef __amigaos4__
|
2012-08-05 18:55:02 +04:00
|
|
|
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,
|
2009-05-27 02:39:23 +04:00
|
|
|
TAG_DONE);
|
2016-01-14 03:11:48 +03:00
|
|
|
#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
|
2012-08-05 18:55:02 +04:00
|
|
|
}
|
2009-05-27 02:39:23 +04:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2016-07-03 20:48:46 +03:00
|
|
|
static void ami_bezier(struct bez_point *restrict a, struct bez_point *restrict b,
|
|
|
|
struct bez_point *restrict c, struct bez_point *restrict d,
|
|
|
|
double t, struct bez_point *restrict p) {
|
2012-10-23 23:43:42 +04:00
|
|
|
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;
|
|
|
|
}
|
|
|
|
|
2017-02-10 18:26:59 +03:00
|
|
|
|
|
|
|
bool ami_plot_screen_is_palettemapped(void)
|
|
|
|
{
|
|
|
|
return glob->palette_mapped;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* \brief Sets a clip rectangle for subsequent plot operations.
|
|
|
|
*
|
|
|
|
* \param ctx The current redraw context.
|
|
|
|
* \param clip The rectangle to limit all subsequent plot
|
|
|
|
* operations within.
|
|
|
|
* \return NSERROR_OK on success else error code.
|
|
|
|
*/
|
|
|
|
static nserror
|
|
|
|
ami_clip(const struct redraw_context *ctx, const struct rect *clip)
|
|
|
|
{
|
|
|
|
struct Region *reg = NULL;
|
|
|
|
|
|
|
|
PLOT_LOG("[ami_plotter] Entered ami_clip()");
|
|
|
|
|
|
|
|
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 NSERROR_OK;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Plots an arc
|
|
|
|
*
|
|
|
|
* plot an arc segment around (x,y), anticlockwise from angle1
|
|
|
|
* to angle2. Angles are measured anticlockwise from
|
|
|
|
* horizontal, in degrees.
|
|
|
|
*
|
|
|
|
* \param ctx The current redraw context.
|
|
|
|
* \param pstyle Style controlling the arc plot.
|
|
|
|
* \param x The x coordinate of the arc.
|
|
|
|
* \param y The y coordinate of the arc.
|
|
|
|
* \param radius The radius of the arc.
|
|
|
|
* \param angle1 The start angle of the arc.
|
|
|
|
* \param angle2 The finish angle of the arc.
|
|
|
|
* \return NSERROR_OK on success else error code.
|
|
|
|
*/
|
|
|
|
static nserror
|
|
|
|
ami_arc(const struct redraw_context *ctx,
|
|
|
|
const plot_style_t *style,
|
|
|
|
int x, int y, int radius, int angle1, int angle2)
|
|
|
|
{
|
|
|
|
PLOT_LOG("[ami_plotter] Entered ami_arc()");
|
|
|
|
|
|
|
|
if (angle2 < angle1) {
|
|
|
|
angle2 += 360;
|
|
|
|
}
|
|
|
|
|
|
|
|
ami_plot_setapen(glob->rp, style->fill_colour);
|
|
|
|
ami_arc_gfxlib(x, y, radius, angle1, angle2);
|
|
|
|
|
|
|
|
return NSERROR_OK;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Plots a circle
|
|
|
|
*
|
|
|
|
* Plot a circle centered on (x,y), which is optionally filled.
|
|
|
|
*
|
|
|
|
* \param ctx The current redraw context.
|
|
|
|
* \param pstyle Style controlling the circle plot.
|
|
|
|
* \param x x coordinate of circle centre.
|
|
|
|
* \param y y coordinate of circle centre.
|
|
|
|
* \param radius circle radius.
|
|
|
|
* \return NSERROR_OK on success else error code.
|
|
|
|
*/
|
|
|
|
static nserror
|
|
|
|
ami_disc(const struct redraw_context *ctx,
|
|
|
|
const plot_style_t *style,
|
|
|
|
int x, int y, int radius)
|
|
|
|
{
|
|
|
|
PLOT_LOG("[ami_plotter] Entered ami_disc()");
|
|
|
|
|
|
|
|
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 NSERROR_OK;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Plots a line
|
|
|
|
*
|
|
|
|
* plot a line from (x0,y0) to (x1,y1). Coordinates are at
|
|
|
|
* centre of line width/thickness.
|
|
|
|
*
|
|
|
|
* \param ctx The current redraw context.
|
|
|
|
* \param pstyle Style controlling the line plot.
|
|
|
|
* \param line A rectangle defining the line to be drawn
|
|
|
|
* \return NSERROR_OK on success else error code.
|
|
|
|
*/
|
|
|
|
static nserror
|
|
|
|
ami_line(const struct redraw_context *ctx,
|
|
|
|
const plot_style_t *style,
|
|
|
|
const struct rect *line)
|
|
|
|
{
|
|
|
|
PLOT_LOG("[ami_plotter] Entered ami_line()");
|
|
|
|
|
|
|
|
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, line->x0, line->y0);
|
|
|
|
Draw(glob->rp, line->x1, line->y1);
|
|
|
|
|
|
|
|
glob->rp->PenWidth = 1;
|
|
|
|
glob->rp->PenHeight = 1;
|
|
|
|
glob->rp->LinePtrn = PATT_LINE;
|
|
|
|
|
|
|
|
return NSERROR_OK;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Plots a rectangle.
|
|
|
|
*
|
|
|
|
* The rectangle can be filled an outline or both controlled
|
|
|
|
* by the plot style The line can be solid, dotted or
|
|
|
|
* dashed. Top left corner at (x0,y0) and rectangle has given
|
|
|
|
* width and height.
|
|
|
|
*
|
|
|
|
* \param ctx The current redraw context.
|
|
|
|
* \param pstyle Style controlling the rectangle plot.
|
|
|
|
* \param rect A rectangle defining the line to be drawn
|
|
|
|
* \return NSERROR_OK on success else error code.
|
|
|
|
*/
|
|
|
|
static nserror
|
|
|
|
ami_rectangle(const struct redraw_context *ctx,
|
|
|
|
const plot_style_t *style,
|
|
|
|
const struct rect *rect)
|
|
|
|
{
|
|
|
|
PLOT_LOG("[ami_plotter] Entered ami_rectangle()");
|
|
|
|
|
|
|
|
if (style->fill_type != PLOT_OP_TYPE_NONE) {
|
|
|
|
ami_plot_setapen(glob->rp, style->fill_colour);
|
|
|
|
RectFill(glob->rp, rect->x0, rect->y0, rect->x1- 1 , rect->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, rect->x0, rect->y0);
|
|
|
|
Draw(glob->rp, rect->x1, rect->y0);
|
|
|
|
Draw(glob->rp, rect->x1, rect->y1);
|
|
|
|
Draw(glob->rp, rect->x0, rect->y1);
|
|
|
|
Draw(glob->rp, rect->x0, rect->y0);
|
|
|
|
|
|
|
|
glob->rp->PenWidth = 1;
|
|
|
|
glob->rp->PenHeight = 1;
|
|
|
|
glob->rp->LinePtrn = PATT_LINE;
|
|
|
|
}
|
|
|
|
|
|
|
|
return NSERROR_OK;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Plot a polygon
|
|
|
|
*
|
|
|
|
* Plots a filled polygon with straight lines between
|
|
|
|
* points. The lines around the edge of the ploygon are not
|
|
|
|
* plotted. The polygon is filled with the non-zero winding
|
|
|
|
* rule.
|
|
|
|
*
|
|
|
|
* \param ctx The current redraw context.
|
|
|
|
* \param pstyle Style controlling the polygon plot.
|
|
|
|
* \param p verticies of polygon
|
|
|
|
* \param n number of verticies.
|
|
|
|
* \return NSERROR_OK on success else error code.
|
|
|
|
*/
|
|
|
|
static nserror
|
|
|
|
ami_polygon(const struct redraw_context *ctx,
|
|
|
|
const plot_style_t *style,
|
|
|
|
const int *p,
|
|
|
|
unsigned int n)
|
|
|
|
{
|
|
|
|
PLOT_LOG("[ami_plotter] Entered ami_polygon()");
|
|
|
|
|
|
|
|
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 NSERROR_OK;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Plots a path.
|
|
|
|
*
|
|
|
|
* Path plot consisting of cubic Bezier curves. Line and fill colour is
|
|
|
|
* controlled by the plot style.
|
|
|
|
*
|
|
|
|
* \param ctx The current redraw context.
|
|
|
|
* \param pstyle Style controlling the path plot.
|
|
|
|
* \param p elements of path
|
|
|
|
* \param n nunber of elements on path
|
|
|
|
* \param width The width of the path
|
|
|
|
* \param transform A transform to apply to the path.
|
|
|
|
* \return NSERROR_OK on success else error code.
|
|
|
|
*/
|
|
|
|
static nserror
|
|
|
|
ami_path(const struct redraw_context *ctx,
|
|
|
|
const plot_style_t *pstyle,
|
|
|
|
const float *p,
|
|
|
|
unsigned int n,
|
|
|
|
float width,
|
|
|
|
const float transform[6])
|
2008-08-02 18:31:32 +04:00
|
|
|
{
|
2012-10-23 23:43:42 +04:00
|
|
|
unsigned int i;
|
2014-11-11 02:38:59 +03:00
|
|
|
struct bez_point start_p = {0, 0}, cur_p = {0, 0}, p_a, p_b, p_c, p_r;
|
2012-10-23 23:43:42 +04:00
|
|
|
|
2017-02-10 18:26:59 +03:00
|
|
|
PLOT_LOG("[ami_plotter] Entered ami_path()");
|
2014-11-11 02:38:59 +03:00
|
|
|
|
2017-02-10 18:26:59 +03:00
|
|
|
if (n == 0) {
|
|
|
|
return NSERROR_OK;
|
|
|
|
}
|
2012-10-23 23:43:42 +04:00
|
|
|
|
|
|
|
if (p[0] != PLOTTER_PATH_MOVE) {
|
2015-05-28 18:08:46 +03:00
|
|
|
LOG("Path does not start with move");
|
2017-02-10 18:26:59 +03:00
|
|
|
return NSERROR_INVALID;
|
2012-10-23 23:43:42 +04:00
|
|
|
}
|
2010-08-30 15:00:24 +04:00
|
|
|
|
2017-02-10 18:26:59 +03:00
|
|
|
if (pstyle->fill_colour != NS_TRANSPARENT) {
|
|
|
|
ami_plot_setapen(glob->rp, pstyle->fill_colour);
|
|
|
|
if (pstyle->stroke_colour != NS_TRANSPARENT) {
|
|
|
|
ami_plot_setopen(glob->rp, pstyle->stroke_colour);
|
|
|
|
}
|
2014-05-03 19:38:58 +04:00
|
|
|
} else {
|
2017-02-10 18:26:59 +03:00
|
|
|
if (pstyle->stroke_colour != NS_TRANSPARENT) {
|
|
|
|
ami_plot_setapen(glob->rp, pstyle->stroke_colour);
|
2014-05-03 19:38:58 +04:00
|
|
|
} else {
|
2017-02-10 18:26:59 +03:00
|
|
|
return NSERROR_OK; /* wholly transparent */
|
2011-03-05 14:42:31 +03:00
|
|
|
}
|
2014-05-03 19:38:58 +04:00
|
|
|
}
|
2011-03-05 14:42:31 +03:00
|
|
|
|
2014-05-03 19:38:58 +04:00
|
|
|
/* Construct path */
|
|
|
|
for (i = 0; i < n; ) {
|
|
|
|
if (p[i] == PLOTTER_PATH_MOVE) {
|
2017-02-10 18:26:59 +03:00
|
|
|
if (pstyle->fill_colour != NS_TRANSPARENT) {
|
|
|
|
if (AreaMove(glob->rp, p[i+1], p[i+2]) == -1) {
|
2015-05-28 18:08:46 +03:00
|
|
|
LOG("AreaMove: vector list full");
|
2017-02-10 18:26:59 +03:00
|
|
|
}
|
2011-03-05 14:42:31 +03:00
|
|
|
} else {
|
2014-05-03 19:38:58 +04:00
|
|
|
Move(glob->rp, p[i+1], p[i+2]);
|
2011-03-05 14:42:31 +03:00
|
|
|
}
|
2014-05-03 19:38:58 +04:00
|
|
|
/* 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) {
|
2017-02-10 18:26:59 +03:00
|
|
|
if (pstyle->fill_colour != NS_TRANSPARENT) {
|
|
|
|
if (AreaEnd(glob->rp) == -1) {
|
2015-05-28 18:08:46 +03:00
|
|
|
LOG("AreaEnd: error");
|
2017-02-10 18:26:59 +03:00
|
|
|
}
|
2012-10-23 23:43:42 +04:00
|
|
|
} else {
|
2014-05-03 19:38:58 +04:00
|
|
|
Draw(glob->rp, start_p.x, start_p.y);
|
2012-10-23 23:43:42 +04:00
|
|
|
}
|
2014-05-03 19:38:58 +04:00
|
|
|
i++;
|
|
|
|
} else if (p[i] == PLOTTER_PATH_LINE) {
|
2017-02-10 18:26:59 +03:00
|
|
|
if (pstyle->fill_colour != NS_TRANSPARENT) {
|
|
|
|
if (AreaDraw(glob->rp, p[i+1], p[i+2]) == -1) {
|
2015-05-28 18:08:46 +03:00
|
|
|
LOG("AreaDraw: vector list full");
|
2017-02-10 18:26:59 +03:00
|
|
|
}
|
2014-05-03 19:38:58 +04:00
|
|
|
} 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];
|
|
|
|
|
2017-02-10 18:26:59 +03:00
|
|
|
for (double t = 0.0; t <= 1.0; t += 0.1) {
|
2014-05-03 19:38:58 +04:00
|
|
|
ami_bezier(&cur_p, &p_a, &p_b, &p_c, t, &p_r);
|
2017-02-10 18:26:59 +03:00
|
|
|
if (pstyle->fill_colour != NS_TRANSPARENT) {
|
|
|
|
if (AreaDraw(glob->rp, p_r.x, p_r.y) == -1) {
|
2015-05-28 18:08:46 +03:00
|
|
|
LOG("AreaDraw: vector list full");
|
2017-02-10 18:26:59 +03:00
|
|
|
}
|
2012-10-23 23:43:42 +04:00
|
|
|
} else {
|
2014-05-03 19:38:58 +04:00
|
|
|
Draw(glob->rp, p_r.x, p_r.y);
|
2012-10-23 23:43:42 +04:00
|
|
|
}
|
|
|
|
}
|
2014-05-03 19:38:58 +04:00
|
|
|
cur_p.x = p_c.x;
|
|
|
|
cur_p.y = p_c.y;
|
|
|
|
i += 7;
|
|
|
|
} else {
|
2015-05-28 18:08:46 +03:00
|
|
|
LOG("bad path command %f", p[i]);
|
2014-05-03 19:38:58 +04:00
|
|
|
/* End path for safety if using Area commands */
|
2017-02-10 18:26:59 +03:00
|
|
|
if (pstyle->fill_colour != NS_TRANSPARENT) {
|
2014-05-03 19:38:58 +04:00
|
|
|
AreaEnd(glob->rp);
|
|
|
|
BNDRYOFF(glob->rp);
|
|
|
|
}
|
2017-02-10 18:26:59 +03:00
|
|
|
return NSERROR_INVALID;
|
2012-10-23 23:43:42 +04:00
|
|
|
}
|
|
|
|
}
|
2017-02-10 18:26:59 +03:00
|
|
|
if (pstyle->fill_colour != NS_TRANSPARENT) {
|
2014-05-03 19:38:58 +04:00
|
|
|
BNDRYOFF(glob->rp);
|
2017-02-10 18:26:59 +03:00
|
|
|
}
|
2012-10-23 23:43:42 +04:00
|
|
|
|
2017-02-10 18:26:59 +03:00
|
|
|
return NSERROR_OK;
|
2008-08-02 18:31:32 +04:00
|
|
|
}
|
2012-08-08 00:03:42 +04:00
|
|
|
|
2017-02-10 18:26:59 +03:00
|
|
|
|
|
|
|
/**
|
|
|
|
* Plot a bitmap
|
|
|
|
*
|
|
|
|
* Tiled plot of a bitmap image. (x,y) gives the top left
|
|
|
|
* coordinate of an explicitly placed tile. From this tile the
|
|
|
|
* image can repeat in all four directions -- up, down, left
|
|
|
|
* and right -- to the extents given by the current clip
|
|
|
|
* rectangle.
|
|
|
|
*
|
|
|
|
* The bitmap_flags say whether to tile in the x and y
|
|
|
|
* directions. If not tiling in x or y directions, the single
|
|
|
|
* image is plotted. The width and height give the dimensions
|
|
|
|
* the image is to be scaled to.
|
|
|
|
*
|
|
|
|
* \param ctx The current redraw context.
|
|
|
|
* \param bitmap The bitmap to plot
|
|
|
|
* \param x The x coordinate to plot the bitmap
|
|
|
|
* \param y The y coordiante to plot the bitmap
|
|
|
|
* \param width The width of area to plot the bitmap into
|
|
|
|
* \param height The height of area to plot the bitmap into
|
|
|
|
* \param bg the background colour to alpha blend into
|
|
|
|
* \param flags the flags controlling the type of plot operation
|
|
|
|
* \return NSERROR_OK on success else error code.
|
|
|
|
*/
|
|
|
|
static nserror
|
|
|
|
ami_bitmap_tile(const struct redraw_context *ctx,
|
|
|
|
struct bitmap *bitmap,
|
|
|
|
int x, int y,
|
|
|
|
int width,
|
|
|
|
int height,
|
|
|
|
colour bg,
|
|
|
|
bitmap_flags_t flags)
|
2012-08-08 00:03:42 +04:00
|
|
|
{
|
2017-02-10 18:26:59 +03:00
|
|
|
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);
|
|
|
|
|
|
|
|
PLOT_LOG("[ami_plotter] Entered ami_bitmap_tile()");
|
|
|
|
|
|
|
|
if ((width == 0) || (height == 0)) {
|
|
|
|
return NSERROR_OK;
|
|
|
|
}
|
|
|
|
|
|
|
|
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 NSERROR_OK;
|
|
|
|
}
|
|
|
|
|
|
|
|
tbm = ami_bitmap_get_native(bitmap,width,height,glob->rp->BitMap);
|
|
|
|
if (!tbm) {
|
|
|
|
return NSERROR_OK;
|
|
|
|
}
|
|
|
|
|
|
|
|
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 = calloc(1, sizeof(struct Hook));
|
|
|
|
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
|
|
|
|
free(bfh);
|
|
|
|
|
|
|
|
if ((ami_bitmap_is_nativebm(bitmap, tbm) == false)) {
|
|
|
|
/**\todo is this logic logical? */
|
|
|
|
ami_rtg_freebitmap(tbm);
|
|
|
|
}
|
|
|
|
|
|
|
|
return NSERROR_OK;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Text plotting.
|
|
|
|
*
|
|
|
|
* \param ctx The current redraw context.
|
|
|
|
* \param fstyle plot style for this text
|
|
|
|
* \param x x coordinate
|
|
|
|
* \param y y coordinate
|
|
|
|
* \param text UTF-8 string to plot
|
|
|
|
* \param length length of string, in bytes
|
|
|
|
* \return NSERROR_OK on success else error code.
|
|
|
|
*/
|
|
|
|
static nserror
|
|
|
|
ami_text(const struct redraw_context *ctx,
|
|
|
|
const struct plot_font_style *fstyle,
|
|
|
|
int x,
|
|
|
|
int y,
|
|
|
|
const char *text,
|
|
|
|
size_t length)
|
|
|
|
{
|
|
|
|
PLOT_LOG("[ami_plotter] Entered ami_text()");
|
|
|
|
|
|
|
|
if (__builtin_expect(ami_nsfont == NULL, 0)) {
|
|
|
|
return NSERROR_OK;
|
|
|
|
}
|
|
|
|
ami_plot_setapen(glob->rp, fstyle->foreground);
|
|
|
|
ami_nsfont->text(glob->rp, text, length, fstyle, x, y, nsoption_bool(font_antialiasing));
|
|
|
|
|
|
|
|
return NSERROR_OK;
|
2012-08-08 00:03:42 +04:00
|
|
|
}
|
2014-05-03 19:38:58 +04:00
|
|
|
|
2017-02-10 18:26:59 +03:00
|
|
|
|
2015-02-02 21:10:43 +03:00
|
|
|
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,
|
|
|
|
};
|
|
|
|
|