210 lines
6.2 KiB
C
210 lines
6.2 KiB
C
/*
|
|
* This file is part of NetSurf, http://netsurf.sourceforge.net/
|
|
* Licensed under the GNU General Public License,
|
|
* http://www.opensource.org/licenses/gpl-license
|
|
* Copyright 2004 John M Bell <jmb202@ecs.soton.ac.uk>
|
|
*/
|
|
|
|
#include <stdbool.h>
|
|
#include <swis.h>
|
|
|
|
#include "oslib/colourtrans.h"
|
|
#include "oslib/osspriteop.h"
|
|
|
|
#include "netsurf/riscos/image.h"
|
|
#include "netsurf/riscos/gui.h"
|
|
#include "netsurf/riscos/options.h"
|
|
#include "netsurf/riscos/tinct.h"
|
|
#include "netsurf/utils/log.h"
|
|
#include "netsurf/utils/utils.h"
|
|
|
|
|
|
static bool image_redraw_tinct(osspriteop_area *area, int x, int y,
|
|
int req_width, int req_height, int width, int height,
|
|
unsigned long background_colour, bool repeatx, bool repeaty,
|
|
bool alpha);
|
|
static bool image_redraw_os(osspriteop_area *area, int x, int y,
|
|
int req_width, int req_height, int width, int height);
|
|
|
|
/**
|
|
* Plot an image at the given coordinates using the method specified
|
|
*
|
|
* \param area The sprite area containing the sprite
|
|
* \param x Left edge of sprite
|
|
* \param y Top edge of sprite
|
|
* \param req_width The requested width of the sprite
|
|
* \param req_height The requested height of the sprite
|
|
* \param width The actual width of the sprite
|
|
* \param height The actual height of the sprite
|
|
* \param background_colour The background colour to blend to
|
|
* \param repeatx Repeat the image in the x direction
|
|
* \param repeaty Repeat the image in the y direction
|
|
* \param type The plot method to use
|
|
* \return true on success, false otherwise
|
|
*/
|
|
bool image_redraw(osspriteop_area *area, int x, int y, int req_width,
|
|
int req_height, int width, int height,
|
|
unsigned long background_colour,
|
|
bool repeatx, bool repeaty,image_type type)
|
|
{
|
|
switch (type) {
|
|
case IMAGE_PLOT_TINCT_ALPHA:
|
|
return image_redraw_tinct(area, x, y,
|
|
req_width, req_height,
|
|
width, height,
|
|
background_colour,
|
|
repeatx, repeaty, true);
|
|
case IMAGE_PLOT_TINCT_OPAQUE:
|
|
return image_redraw_tinct(area, x, y,
|
|
req_width, req_height,
|
|
width, height,
|
|
background_colour,
|
|
repeatx, repeaty, false);
|
|
case IMAGE_PLOT_OS:
|
|
return image_redraw_os(area, x, y, req_width,
|
|
req_height, width, height);
|
|
default:
|
|
break;
|
|
}
|
|
|
|
return false;
|
|
}
|
|
|
|
/**
|
|
* Plot an image at the given coordinates using tinct
|
|
*
|
|
* \param area The sprite area containing the sprite
|
|
* \param x Left edge of sprite
|
|
* \param y Top edge of sprite
|
|
* \param req_width The requested width of the sprite
|
|
* \param req_height The requested height of the sprite
|
|
* \param width The actual width of the sprite
|
|
* \param height The actual height of the sprite
|
|
* \param background_colour The background colour to blend to
|
|
* \param repeatx Repeat the image in the x direction
|
|
* \param repeaty Repeat the image in the y direction
|
|
* \param alpha Use the alpha channel
|
|
* \return true on success, false otherwise
|
|
*/
|
|
bool image_redraw_tinct(osspriteop_area *area, int x, int y,
|
|
int req_width, int req_height, int width, int height,
|
|
unsigned long background_colour, bool repeatx, bool repeaty,
|
|
bool alpha)
|
|
{
|
|
unsigned int tinct_options;
|
|
_kernel_oserror *error;
|
|
|
|
if (ro_gui_current_redraw_gui) {
|
|
tinct_options =
|
|
(ro_gui_current_redraw_gui->option.filter_sprites ?
|
|
tinct_BILINEAR_FILTER : 0)
|
|
|
|
|
(ro_gui_current_redraw_gui->option.dither_sprites ?
|
|
tinct_DITHER : 0);
|
|
} else {
|
|
tinct_options =
|
|
(option_filter_sprites ? tinct_BILINEAR_FILTER : 0)
|
|
|
|
|
(option_dither_sprites ? tinct_DITHER : 0);
|
|
}
|
|
|
|
if (print_active) {
|
|
tinct_options |= tinct_USE_OS_SPRITE_OP |
|
|
background_colour << tinct_BACKGROUND_SHIFT;
|
|
}
|
|
|
|
if (repeatx)
|
|
tinct_options |= tinct_FILL_HORIZONTALLY;
|
|
|
|
if (repeaty)
|
|
tinct_options |= tinct_FILL_VERTICALLY;
|
|
|
|
if (alpha) {
|
|
error = _swix(Tinct_PlotScaledAlpha, _INR(2,7),
|
|
(char*)area + area->first, x, y - req_height,
|
|
req_width, req_height, tinct_options);
|
|
} else {
|
|
error = _swix(Tinct_PlotScaled, _INR(2,7),
|
|
(char*)area + area->first, x, y - req_height,
|
|
req_width, req_height, tinct_options);
|
|
}
|
|
|
|
if (error) {
|
|
LOG(("xtinct_plotscaled%s: 0x%x: %s", (alpha ? "alpha" : ""),
|
|
error->errnum, error->errmess));
|
|
return false;
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
|
|
/**
|
|
* Plot an image at the given coordinates using os_spriteop
|
|
*
|
|
* \param area The sprite area containing the sprite
|
|
* \param x Left edge of sprite
|
|
* \param y Top edge of sprite
|
|
* \param req_width The requested width of the sprite
|
|
* \param req_height The requested height of the sprite
|
|
* \param width The actual width of the sprite
|
|
* \param height The actual height of the sprite
|
|
* \return true on success, false otherwise
|
|
*/
|
|
bool image_redraw_os(osspriteop_area *area, int x, int y, int req_width,
|
|
int req_height, int width, int height)
|
|
{
|
|
unsigned int size;
|
|
os_factors f;
|
|
osspriteop_trans_tab *table;
|
|
os_error *error;
|
|
|
|
error = xcolourtrans_generate_table_for_sprite(
|
|
area, (osspriteop_id)((char*) area + area->first),
|
|
colourtrans_CURRENT_MODE,
|
|
colourtrans_CURRENT_PALETTE,
|
|
0, colourtrans_GIVEN_SPRITE, 0, 0, &size);
|
|
if (error) {
|
|
LOG(("xcolourtrans_generate_table_for_sprite: 0x%x: %s", error->errnum, error->errmess));
|
|
return false;
|
|
}
|
|
|
|
table = calloc(size, sizeof(char));
|
|
if (!table) {
|
|
LOG(("malloc failed"));
|
|
warn_user("NoMemory", 0);
|
|
return false;
|
|
}
|
|
|
|
error = xcolourtrans_generate_table_for_sprite(
|
|
area, (osspriteop_id)((char*) area + area->first),
|
|
colourtrans_CURRENT_MODE,
|
|
colourtrans_CURRENT_PALETTE,
|
|
table, colourtrans_GIVEN_SPRITE, 0, 0, 0);
|
|
if (error) {
|
|
LOG(("xcolourtrans_generate_table_for_sprite: 0x%x: %s", error->errnum, error->errmess));
|
|
free(table);
|
|
return false;
|
|
}
|
|
|
|
f.xmul = req_width;
|
|
f.ymul = req_height;
|
|
f.xdiv = width;
|
|
f.ydiv = height;
|
|
|
|
error = xosspriteop_put_sprite_scaled(osspriteop_PTR,
|
|
area, (osspriteop_id)((char*) area + area->first),
|
|
x, (int)(y - req_height),
|
|
8, &f, table);
|
|
if (error) {
|
|
LOG(("xosspriteop_put_sprite_scaled: 0x%x: %s", error->errnum, error->errmess));
|
|
free(table);
|
|
return false;
|
|
}
|
|
|
|
free(table);
|
|
|
|
return true;
|
|
}
|
|
|