Added algo_polygon() algorithm.

This commit is contained in:
David Capello 2010-02-28 23:02:50 -02:00
parent 031c8d187b
commit 700ab045d2
3 changed files with 268 additions and 14 deletions

View File

@ -173,6 +173,7 @@ COMMON_SOURCES = \
src/modules/tools.cpp \
src/raster/algo.cpp \
src/raster/algofill.cpp \
src/raster/algo_polygon.cpp \
src/raster/blend.cpp \
src/raster/brush.cpp \
src/raster/cel.cpp \

View File

@ -28,22 +28,22 @@ typedef void (*AlgoLine)(int x1, int y1, int x2, int y2, void *data);
void algo_dirty(Dirty* dirty, void *data, AlgoHLine proc);
void algo_line (int x1, int y1, int x2, int y2, void *data, AlgoPixel proc);
void algo_ellipse (int x1, int y1, int x2, int y2, void *data, AlgoPixel proc);
void algo_ellipsefill (int x1, int y1, int x2, int y2, void *data, AlgoHLine proc);
void algo_line(int x1, int y1, int x2, int y2, void *data, AlgoPixel proc);
void algo_ellipse(int x1, int y1, int x2, int y2, void *data, AlgoPixel proc);
void algo_ellipsefill(int x1, int y1, int x2, int y2, void *data, AlgoHLine proc);
void algo_spline (double x0, double y0, double x1, double y1,
double x2, double y2, double x3, double y3,
void *data, AlgoLine proc);
double algo_spline_get_y (double x0, double y0, double x1, double y1,
double x2, double y2, double x3, double y3,
double x);
double algo_spline_get_tan (double x0, double y0, double x1, double y1,
double x2, double y2, double x3, double y3,
double in_x);
void algo_spline(double x0, double y0, double x1, double y1,
double x2, double y2, double x3, double y3,
void *data, AlgoLine proc);
double algo_spline_get_y(double x0, double y0, double x1, double y1,
double x2, double y2, double x3, double y3,
double x);
double algo_spline_get_tan(double x0, double y0, double x1, double y1,
double x2, double y2, double x3, double y3,
double in_x);
void algo_floodfill(Image* image, int x, int y, void* data, AlgoHLine proc);
void algo_polygon(Image* image, int vertices, const int* points, void* data, AlgoHLine proc);
#endif

253
src/raster/algo_polygon.cpp Normal file
View File

@ -0,0 +1,253 @@
/* ______ ___ ___
* /\ _ \ /\_ \ /\_ \
* \ \ \L\ \\//\ \ \//\ \ __ __ _ __ ___
* \ \ __ \ \ \ \ \ \ \ /'__`\ /'_ `\/\`'__\/ __`\
* \ \ \/\ \ \_\ \_ \_\ \_/\ __//\ \L\ \ \ \//\ \L\ \
* \ \_\ \_\/\____\/\____\ \____\ \____ \ \_\\ \____/
* \/_/\/_/\/____/\/____/\/____/\/___L\ \/_/ \/___/
* /\____/
* \_/__/
*
* The 2d polygon rasteriser.
*
* By Shawn Hargreaves.
*
* See readme.txt for copyright information.
*/
/* Adapted to ASE by David Capello */
#include "config.h"
#include <limits.h>
#include "allegro.h"
#include "allegro/internal/aintern.h"
#include "raster/algo.h"
#include "raster/image.h"
/* fill_edge_structure:
* Polygon helper function: initialises an edge structure for the 2d
* rasteriser.
*/
static void fill_edge_structure(POLYGON_EDGE *edge, AL_CONST int *i1, AL_CONST int *i2)
{
if (i2[1] < i1[1]) {
AL_CONST int *it;
it = i1;
i1 = i2;
i2 = it;
}
edge->top = i1[1];
edge->bottom = i2[1];
edge->x = (i1[0] << POLYGON_FIX_SHIFT) + (1 << (POLYGON_FIX_SHIFT-1));
if (i2[1] != i1[1]) {
edge->dx = ((i2[0] - i1[0]) << POLYGON_FIX_SHIFT) / (i2[1] - i1[1]);
}
else {
edge->dx = ((i2[0] - i1[0]) << POLYGON_FIX_SHIFT) << 1;
}
edge->w = MAX(ABS(edge->dx)-1, 0);
edge->prev = NULL;
edge->next = NULL;
if (edge->dx < 0)
edge->x += edge->dx/2 ;
}
/* _add_edge2:
* Adds an edge structure to a linked list, returning the new head pointer.
*/
static POLYGON_EDGE *_add_edge2(POLYGON_EDGE *list, POLYGON_EDGE *edge, int sort_by_x)
{
POLYGON_EDGE *pos = list;
POLYGON_EDGE *prev = NULL;
if (sort_by_x) {
while ((pos) && (pos->x < edge->x)) {
prev = pos;
pos = pos->next;
}
}
else {
while ((pos) && (pos->top < edge->top)) {
prev = pos;
pos = pos->next;
}
}
edge->next = pos;
edge->prev = prev;
if (pos)
pos->prev = edge;
if (prev) {
prev->next = edge;
return list;
}
else
return edge;
}
/* _remove_edge2:
* Removes an edge structure from a list, returning the new head pointer.
*/
static POLYGON_EDGE *_remove_edge2(POLYGON_EDGE *list, POLYGON_EDGE *edge)
{
if (edge->next)
edge->next->prev = edge->prev;
if (edge->prev) {
edge->prev->next = edge->next;
return list;
}
else
return edge->next;
}
/* polygon:
* Draws a filled polygon with an arbitrary number of corners. Pass the
* number of vertices, then an array containing a series of x, y points
* (a total of vertices*2 values).
*/
void algo_polygon(Image* image, int vertices, const int* points, void* data, AlgoHLine proc)
{
int c;
int top = INT_MAX;
int bottom = INT_MIN;
AL_CONST int *i1, *i2;
POLYGON_EDGE *edge, *next_edge;
POLYGON_EDGE *active_edges = NULL;
POLYGON_EDGE *inactive_edges = NULL;
/* allocate some space and fill the edge table */
_grow_scratch_mem(sizeof(POLYGON_EDGE) * vertices);
edge = (POLYGON_EDGE *)_scratch_mem;
i1 = points;
i2 = points + (vertices-1) * 2;
for (c=0; c<vertices; c++) {
fill_edge_structure(edge, i1, i2);
if (edge->bottom >= edge->top) {
if (edge->top < top)
top = edge->top;
if (edge->bottom > bottom)
bottom = edge->bottom;
inactive_edges = _add_edge2(inactive_edges, edge, FALSE);
edge++;
}
i2 = i1;
i1 += 2;
}
if (bottom >= image->h)
bottom = image->h-1;
/* for each scanline in the polygon... */
for (c=top; c<=bottom; c++) {
int hid = 0;
int b1 = 0;
int e1 = 0;
int up = 0;
int draw = 0;
int e;
/* check for newly active edges */
edge = inactive_edges;
while ((edge) && (edge->top == c)) {
next_edge = edge->next;
inactive_edges = _remove_edge2(inactive_edges, edge);
active_edges = _add_edge2(active_edges, edge, TRUE);
edge = next_edge;
}
/* draw horizontal line segments */
edge = active_edges;
while (edge) {
e = edge->w;
if (edge->bottom != c) {
up = 1 - up;
}
else {
e = edge->w >> 1;
}
if (edge->top == c) {
e = edge->w >> 1;
}
if ((draw < 1) && (up >= 1)) {
b1 = (edge->x + e) >> POLYGON_FIX_SHIFT;
}
else if (draw >= 1) {
/* filling the polygon */
e1 = edge->x >> POLYGON_FIX_SHIFT;
hid = MAX(hid, b1 + 1);
if (hid <= e1-1) {
proc(hid, c, e1-1, data);
}
b1 = (edge->x + e) >> POLYGON_FIX_SHIFT;
}
/* drawing the edge */
hid = MAX(hid, edge->x >> POLYGON_FIX_SHIFT);
if (hid <= ((edge->x + e) >> POLYGON_FIX_SHIFT)) {
proc(hid, c, (edge->x + e) >> POLYGON_FIX_SHIFT, data);
hid = 1 + ((edge->x + e) >> POLYGON_FIX_SHIFT);
}
edge = edge->next;
draw = up;
}
/* update edges, sorting and removing dead ones */
edge = active_edges;
while (edge) {
next_edge = edge->next;
if (c >= edge->bottom) {
active_edges = _remove_edge2(active_edges, edge);
}
else {
edge->x += edge->dx;
if ((edge->top == c) && (edge->dx > 0)) {
edge->x -= edge->dx/2;
}
if ((edge->bottom == c+1) && (edge->dx < 0)) {
edge->x -= edge->dx/2;
}
while ((edge->prev) && (edge->x < edge->prev->x)) {
if (edge->next)
edge->next->prev = edge->prev;
edge->prev->next = edge->next;
edge->next = edge->prev;
edge->prev = edge->prev->prev;
edge->next->prev = edge;
if (edge->prev)
edge->prev->next = edge;
else
active_edges = edge;
}
}
edge = next_edge;
}
}
}