aboutsummaryrefslogtreecommitdiff
path: root/backends/platform/morphos/morphos_scaler.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'backends/platform/morphos/morphos_scaler.cpp')
-rw-r--r--backends/platform/morphos/morphos_scaler.cpp848
1 files changed, 848 insertions, 0 deletions
diff --git a/backends/platform/morphos/morphos_scaler.cpp b/backends/platform/morphos/morphos_scaler.cpp
new file mode 100644
index 0000000000..46d4452c0b
--- /dev/null
+++ b/backends/platform/morphos/morphos_scaler.cpp
@@ -0,0 +1,848 @@
+/* ScummVM - Scumm Interpreter
+ * Copyright (C) 2002-2006 The ScummVM Team
+ *
+ * This program 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; either version 2
+ * of the License, or (at your option) any later version.
+ *
+ * This program 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, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+ *
+ * $URL$
+ * $Id$
+ */
+
+#include "common/stdafx.h"
+#include "base/engine.h"
+
+#include <exec/types.h>
+#include <cybergraphics/cybergraphics.h>
+
+#include <proto/cybergraphics.h>
+
+#include "morphos.h"
+#include "morphos_scaler.h"
+
+#define GET_RESULT(A, B, C, D) ((A != C || A != D) - (B != C || B != D))
+#define INTERPOLATE(A, B) (((A & colorMask) >> 1) + ((B & colorMask) >> 1) + (A & B & lowPixelMask))
+#define Q_INTERPOLATE(A, B, C, D) ((A & qcolorMask) >> 2) + ((B & qcolorMask) >> 2) + ((C & qcolorMask) >> 2) + ((D & qcolorMask) >> 2) + ((((A & qlowpixelMask) + (B & qlowpixelMask) + (C & qlowpixelMask) + (D & qlowpixelMask)) >> 2) & qlowpixelMask)
+#define SWAP_WORD(word) word = ((word & 0xff) << 8) | (word >> 8)
+#define SWAP_LONG(lng) lng = ((lng & 0xff) << 24) | ((lng & 0xff00) << 8) | ((lng & 0xff0000) >> 8) | (lng >> 24)
+
+MorphOSScaler::GfxScaler MorphOSScaler::ScummScalers[11]
+ = { { "none", "normal", ST_NONE },
+ { "Point", "2x", ST_POINT },
+ { "AdvMame2x", "advmame2x", ST_ADVMAME2X },
+ { "SuperEagle", "supereagle", ST_SUPEREAGLE },
+ { "Super2xSaI", "super2xsai", ST_SUPER2XSAI },
+ { NULL, NULL, ST_INVALID },
+ { NULL, NULL, ST_INVALID },
+ { NULL, NULL, ST_INVALID },
+ { NULL, NULL, ST_INVALID },
+ { NULL, NULL, ST_INVALID },
+ // This is the end marker ... do not assign a scaler to it!
+ { NULL, NULL, ST_INVALID }
+ };
+
+MorphOSScaler::MorphOSScaler(APTR buffer, int width, int height, ULONG *col_table, UWORD *col_table16, BitMap *bmap)
+{
+ dest = NULL;
+ handle = NULL;
+
+ Buffer = buffer;
+ BufferWidth = width;
+ BufferHeight = height;
+
+ ScummColors = col_table;
+ ScummColors16 = col_table16;
+
+ /* Initialize scaling stuff */
+ int minr, ming, minb;
+ ULONG depth = GetCyberMapAttr(bmap, CYBRMATTR_DEPTH);
+
+ if (depth > 16)
+ {
+ minr = 1 << 16;
+ ming = 1 << 8;
+ minb = 1;
+ }
+ else
+ {
+ minr = 1 << ((depth == 15) ? 10 : 11);
+ ming = 1 << 5;
+ minb = 1;
+ }
+
+ int pixfmt = GetCyberMapAttr(bmap, CYBRMATTR_PIXFMT);
+
+ ScummPCMode = false;
+ if (pixfmt == PIXFMT_RGB15PC || pixfmt == PIXFMT_BGR15PC ||
+ pixfmt == PIXFMT_RGB16PC || pixfmt == PIXFMT_BGR16PC ||
+ pixfmt == PIXFMT_BGRA32)
+ ScummPCMode = true;
+
+ colorMask = (MakeColor(pixfmt, 255, 0, 0) - minr) | (MakeColor(pixfmt, 0, 255, 0) - ming) | (MakeColor(pixfmt, 0, 0, 255) - minb);
+ lowPixelMask = minr | ming | minb;
+ qcolorMask = (MakeColor(pixfmt, 255, 0, 0) - 3*minr) | (MakeColor(pixfmt, 0, 255, 0) - 3*ming) | (MakeColor(pixfmt, 0, 0, 255) - 3*minb);
+ qlowpixelMask = (minr * 3) | (ming * 3) | (minb * 3);
+ redblueMask = MakeColor(pixfmt, 255, 0, 255);
+ greenMask = MakeColor(pixfmt, 0, 255, 0);
+
+ PixelsPerMask = (depth <= 16) ? 2 : 1;
+
+ if (PixelsPerMask == 2)
+ {
+ colorMask |= (colorMask << 16);
+ qcolorMask |= (qcolorMask << 16);
+ lowPixelMask |= (lowPixelMask << 16);
+ qlowpixelMask |= (qlowpixelMask << 16);
+ }
+}
+
+MorphOSScaler::~MorphOSScaler()
+{
+ Finish();
+}
+
+MorphOSScaler *MorphOSScaler::Create(SCALERTYPE scaler_type, APTR buffer, int width, int height, ULONG *col_table, UWORD *col_table16, BitMap *bmap)
+{
+ MorphOSScaler *new_scaler = NULL;
+
+ switch (scaler_type)
+ {
+ case ST_POINT:
+ new_scaler = new PointScaler(buffer, width, height, col_table, col_table16, bmap);
+ break;
+
+ case ST_ADVMAME2X:
+ new_scaler = new AdvMame2xScaler(buffer, width, height, col_table, col_table16, bmap);
+ break;
+
+ case ST_SUPEREAGLE:
+ new_scaler = new SuperEagleScaler(buffer, width, height, col_table, col_table16, bmap);
+ break;
+
+ case ST_SUPER2XSAI:
+ new_scaler = new Super2xSaIScaler(buffer, width, height, col_table, col_table16, bmap);
+ break;
+
+ default:
+ warning("Invalid scaler requested - falling back to Super2xSaI");
+ new_scaler = new Super2xSaIScaler(buffer, width, height, col_table, col_table16, bmap);
+ break;
+ }
+
+ return new_scaler;
+}
+
+bool MorphOSScaler::Prepare(BitMap *render_bmap)
+{
+ handle = LockBitMapTags(render_bmap, LBMI_BYTESPERPIX, &dest_bpp,
+ LBMI_BYTESPERROW, &dest_pitch,
+ LBMI_BASEADDRESS, &dest,
+ LBMI_PIXFMT, &dest_pixfmt,
+ TAG_DONE);
+
+ return handle != NULL;
+}
+
+void MorphOSScaler::Finish()
+{
+ if (handle)
+ {
+ UnLockBitMap(handle);
+ handle = NULL;
+ }
+}
+
+uint32 MorphOSScaler::MakeColor(int pixfmt, int r, int g, int b)
+{
+ uint32 col = 0;
+
+ switch (pixfmt)
+ {
+ case PIXFMT_RGB15:
+ case PIXFMT_RGB15PC:
+ col = (((r*31)/255) << 10) | (((g*31)/255) << 5) | ((b*31)/255);
+ break;
+
+ case PIXFMT_BGR15:
+ case PIXFMT_BGR15PC:
+ col = (((b*31)/255) << 10) | (((g*31)/255) << 5) | ((r*31)/255);
+ break;
+
+ case PIXFMT_RGB16:
+ case PIXFMT_RGB16PC:
+ col = (((r*31)/255) << 11) | (((g*63)/255) << 5) | ((b*31)/255);
+ break;
+
+ case PIXFMT_BGR16:
+ case PIXFMT_BGR16PC:
+ col = (((b*31)/255) << 11) | (((g*63)/255) << 5) | ((r*31)/255);
+ break;
+
+ case PIXFMT_ARGB32:
+ case PIXFMT_BGRA32:
+ col = (r << 16) | (g << 8) | b;
+ break;
+
+ case PIXFMT_RGBA32:
+ col = (r << 24) | (g << 16) | (b << 8);
+ break;
+
+ case PIXFMT_RGB24:
+ case PIXFMT_BGR24:
+ error("The scaling engines do not support 24 bit modes at the moment");
+ break;
+
+ default:
+ error("Unsupported pixel format: %d. Please contact author at tomjoad@muenster.de", pixfmt);
+ }
+
+ return col;
+}
+
+void Super2xSaIScaler::Scale(uint32 src_x, uint32 src_y, uint32 dest_x, uint32 dest_y, uint32 width, uint32 height)
+{
+ unsigned int x, y;
+ unsigned long color[16];
+ byte *src;
+
+ if (!handle)
+ return;
+
+ src = ((byte *)Buffer)+src_y*BufferWidth+src_x;
+
+ /* Point to the first 3 lines. */
+ src_line[0] = src;
+ src_line[1] = src;
+ src_line[2] = src + BufferWidth;
+ src_line[3] = src + BufferWidth * 2;
+
+ dst_line[0] = dest+dest_y*2*dest_pitch+dest_x*2*dest_bpp;
+ dst_line[1] = dst_line[0]+dest_pitch;
+
+ if (PixelsPerMask == 2)
+ {
+ byte *sbp;
+ sbp = src_line[0];
+ color[0] = ScummColors16[*sbp]; color[1] = color[0]; color[2] = color[0]; color[3] = color[0];
+ color[4] = color[0]; color[5] = color[0]; color[6] = ScummColors16[*(sbp+1)]; color[7] = ScummColors16[*(sbp+2)];
+ sbp = src_line[2];
+ color[8] = ScummColors16[*sbp]; color[9] = color[8]; color[10] = ScummColors16[*(sbp+1)]; color[11] = ScummColors16[*(sbp+2)];
+ sbp = src_line[3];
+ color[12] = ScummColors16[*sbp]; color[13] = color[12]; color[14] = ScummColors16[*(sbp+1)]; color[15] = ScummColors16[*(sbp+2)];
+ }
+ else
+ {
+ byte *lbp;
+ lbp = src_line[0];
+ color[0] = ScummColors[*lbp]; color[1] = color[0]; color[2] = color[0]; color[3] = color[0];
+ color[4] = color[0]; color[5] = color[0]; color[6] = ScummColors[*(lbp+1)]; color[7] = ScummColors[*(lbp+2)];
+ lbp = src_line[2];
+ color[8] = ScummColors[*lbp]; color[9] = color[8]; color[10] = ScummColors[*(lbp+1)]; color[11] = ScummColors[*(lbp+2)];
+ lbp = src_line[3];
+ color[12] = ScummColors[*lbp]; color[13] = color[12]; color[14] = ScummColors[*(lbp+1)]; color[15] = ScummColors[*(lbp+2)];
+ }
+
+ for (y = 0; y < height; y++)
+ {
+ for (x = 0; x < width; x++)
+ {
+ unsigned long product1a, product1b, product2a, product2b;
+
+//--------------------------------------- B0 B1 B2 B3 0 1 2 3
+// 4 5* 6 S2 -> 4 5* 6 7
+// 1 2 3 S1 8 9 10 11
+// A0 A1 A2 A3 12 13 14 15
+//--------------------------------------
+ if (color[9] == color[6] && color[5] != color[10])
+ {
+ product2b = color[9];
+ product1b = product2b;
+ }
+ else if (color[5] == color[10] && color[9] != color[6])
+ {
+ product2b = color[5];
+ product1b = product2b;
+ }
+ else if (color[5] == color[10] && color[9] == color[6])
+ {
+ int r = 0;
+
+ r += GET_RESULT(color[6], color[5], color[8], color[13]);
+ r += GET_RESULT(color[6], color[5], color[4], color[1]);
+ r += GET_RESULT(color[6], color[5], color[14], color[11]);
+ r += GET_RESULT(color[6], color[5], color[2], color[7]);
+
+ if (r > 0)
+ product1b = color[6];
+ else if (r < 0)
+ product1b = color[5];
+ else
+ product1b = INTERPOLATE(color[5], color[6]);
+
+ product2b = product1b;
+
+ }
+ else
+ {
+ if (color[6] == color[10] && color[10] == color[13] && color[9] != color[14] && color[10] != color[12])
+ product2b = Q_INTERPOLATE(color[10], color[10], color[10], color[9]);
+ else if (color[5] == color[9] && color[9] == color[14] && color[13] != color[10] && color[9] != color[15])
+ product2b = Q_INTERPOLATE(color[9], color[9], color[9], color[10]);
+ else
+ product2b = INTERPOLATE(color[9], color[10]);
+
+ if (color[6] == color[10] && color[6] == color[1] && color[5] != color[2] && color[6] != color[0])
+ product1b = Q_INTERPOLATE(color[6], color[6], color[6], color[5]);
+ else if (color[5] == color[9] && color[5] == color[2] && color[1] != color[6] && color[5] != color[3])
+ product1b = Q_INTERPOLATE(color[6], color[5], color[5], color[5]);
+ else
+ product1b = INTERPOLATE(color[5], color[6]);
+ }
+
+ if (color[5] == color[10] && color[9] != color[6] && color[4] == color[5] && color[5] != color[14])
+ product2a = INTERPOLATE(color[9], color[5]);
+ else if (color[5] == color[8] && color[6] == color[5] && color[4] != color[9] && color[5] != color[12])
+ product2a = INTERPOLATE(color[9], color[5]);
+ else
+ product2a = color[9];
+
+ if (color[9] == color[6] && color[5] != color[10] && color[8] == color[9] && color[9] != color[2])
+ product1a = INTERPOLATE(color[9], color[5]);
+ else if (color[4] == color[9] && color[10] == color[9] && color[8] != color[5] && color[9] != color[0])
+ product1a = INTERPOLATE(color[9], color[5]);
+ else
+ product1a = color[5];
+
+ if (PixelsPerMask == 2)
+ {
+ if (ScummPCMode)
+ {
+ SWAP_WORD(product1a);
+ SWAP_WORD(product1b);
+ SWAP_WORD(product2a);
+ SWAP_WORD(product2b);
+ }
+ *((unsigned long *) (&dst_line[0][x * 4])) = (product1a << 16) | product1b;
+ *((unsigned long *) (&dst_line[1][x * 4])) = (product2a << 16) | product2b;
+ }
+ else
+ {
+ if (ScummPCMode)
+ {
+ SWAP_LONG(product1a);
+ SWAP_LONG(product1b);
+ SWAP_LONG(product2a);
+ SWAP_LONG(product2b);
+ }
+ *((unsigned long *) (&dst_line[0][x * 8])) = product1a;
+ *((unsigned long *) (&dst_line[0][x * 8 + 4])) = product1b;
+ *((unsigned long *) (&dst_line[1][x * 8])) = product2a;
+ *((unsigned long *) (&dst_line[1][x * 8 + 4])) = product2b;
+ }
+
+ /* Move color matrix forward */
+ color[0] = color[1]; color[4] = color[5]; color[8] = color[9]; color[12] = color[13];
+ color[1] = color[2]; color[5] = color[6]; color[9] = color[10]; color[13] = color[14];
+ color[2] = color[3]; color[6] = color[7]; color[10] = color[11]; color[14] = color[15];
+
+ if (src_x+x < BufferWidth-3)
+ {
+ x += 3;
+ if (PixelsPerMask == 2)
+ {
+ color[3] = ScummColors16[*(src_line[0] + x) ];
+ color[7] = ScummColors16[*(src_line[1] + x) ];
+ color[11] = ScummColors16[*(src_line[2] + x) ];
+ color[15] = ScummColors16[*(src_line[3] + x) ];
+ }
+ else
+ {
+ color[3] = ScummColors[*(src_line[0] + x)];
+ color[7] = ScummColors[*(src_line[1] + x)];
+ color[11] = ScummColors[*(src_line[2] + x)];
+ color[15] = ScummColors[*(src_line[3] + x)];
+ }
+ x -= 3;
+ }
+ }
+
+ /* We're done with one line, so we shift the source lines up */
+ src_line[0] = src_line[1];
+ src_line[1] = src_line[2];
+ src_line[2] = src_line[3];
+
+ /* Read next line */
+ if (src_y + y + 3 >= BufferHeight)
+ src_line[3] = src_line[2];
+ else
+ src_line[3] = src_line[2] + BufferWidth;
+
+ /* Then shift the color matrix up */
+ if (PixelsPerMask == 2)
+ {
+ byte *sbp;
+ sbp = src_line[0];
+ color[0] = ScummColors16[*sbp]; color[1] = color[0]; color[2] = ScummColors16[ *(sbp + 1) ]; color[3] = ScummColors16[*(sbp + 2)];
+ sbp = src_line[1];
+ color[4] = ScummColors16[*sbp]; color[5] = color[4]; color[6] = ScummColors16[ *(sbp + 1) ]; color[7] = ScummColors16[*(sbp + 2)];
+ sbp = src_line[2];
+ color[8] = ScummColors16[*sbp]; color[9] = color[8]; color[10] = ScummColors16[ *(sbp + 1) ]; color[11] = ScummColors16[*(sbp + 2)];
+ sbp = src_line[3];
+ color[12] = ScummColors16[*sbp]; color[13] = color[12]; color[14] = ScummColors16[ *(sbp + 1) ]; color[15] = ScummColors16[*(sbp + 2)];
+
+ if (src_x + x > 0)
+ {
+ color[0] = ScummColors16[src_line[0][-1]];
+ color[4] = ScummColors16[src_line[1][-1]];
+ color[8] = ScummColors16[src_line[2][-1]];
+ color[12] = ScummColors16[src_line[3][-1]];
+ }
+ }
+ else
+ {
+ byte *lbp;
+ lbp = src_line[0];
+ color[0] = ScummColors[*lbp]; color[1] = color[0]; color[2] = ScummColors[ *(lbp + 1) ]; color[3] = ScummColors[*(lbp+2)];
+ lbp = src_line[1];
+ color[4] = ScummColors[*lbp]; color[5] = color[4]; color[6] = ScummColors[ *(lbp + 1) ]; color[7] = ScummColors[*(lbp+2)];
+ lbp = src_line[2];
+ color[8] = ScummColors[*lbp]; color[9] = color[8]; color[10] = ScummColors[ *(lbp + 1) ]; color[11] = ScummColors[*(lbp+2)];
+ lbp = src_line[3];
+ color[12] = ScummColors[*lbp]; color[13] = color[12]; color[14] = ScummColors[ *(lbp + 1) ]; color[15] = ScummColors[*(lbp+2)];
+ }
+
+ if (src_y + y < BufferHeight - 1)
+ {
+ dst_line[0] = dst_line[1]+dest_pitch;
+ dst_line[1] = dst_line[0]+dest_pitch;
+ }
+ }
+}
+
+void SuperEagleScaler::Scale(uint32 src_x, uint32 src_y, uint32 dest_x, uint32 dest_y, uint32 width, uint32 height)
+{
+ unsigned int x, y;
+ unsigned long color[12];
+ byte *src;
+
+ if (!handle)
+ return;
+
+ src = (byte *)Buffer+src_y*BufferWidth+src_x;
+
+ /* Point to the first 3 lines. */
+ src_line[0] = src;
+ src_line[1] = src;
+ src_line[2] = src + BufferWidth;
+ src_line[3] = src + BufferWidth * 2;
+
+ dst_line[0] = dest+dest_y*2*dest_pitch+dest_x*2*dest_bpp;
+ dst_line[1] = dst_line[0]+dest_pitch;
+
+ x = 0, y = 0;
+
+ if (PixelsPerMask == 2)
+ {
+ byte *sbp;
+ sbp = src_line[0];
+ color[0] = ScummColors16[*sbp]; color[1] = color[0]; color[2] = color[0]; color[3] = color[0];
+ color[4] = ScummColors16[*(sbp+1)]; color[5] = ScummColors16[*(sbp+2)];
+ sbp = src_line[2];
+ color[6] = ScummColors16[*sbp]; color[7] = color[6]; color[8] = ScummColors16[*(sbp+1)]; color[9] = ScummColors16[*(sbp+2)];
+ sbp = src_line[3];
+ color[10] = ScummColors16[*sbp]; color[11] = ScummColors16[*(sbp+1)];
+ }
+ else
+ {
+ byte *lbp;
+ lbp = src_line[0];
+ color[0] = ScummColors[*lbp]; color[1] = color[0]; color[2] = color[0]; color[3] = color[0];
+ color[4] = ScummColors[*(lbp+1)]; color[5] = ScummColors[*(lbp+2)];
+ lbp = src_line[2];
+ color[6] = ScummColors[*lbp]; color[7] = color[6]; color[8] = ScummColors[*(lbp+1)]; color[9] = ScummColors[*(lbp+2)];
+ lbp = src_line[3];
+ color[10] = ScummColors[*lbp]; color[11] = ScummColors[*(lbp+1)];
+ }
+
+ for (y = 0; y < height; y++)
+ {
+ /* Todo: x = width - 2, x = width - 1 */
+
+ for (x = 0; x < width; x++)
+ {
+ unsigned long product1a, product1b, product2a, product2b;
+
+//--------------------------------------- B1 B2 0 1
+// 4 5 6 S2 -> 2 3 4 5
+// 1 2 3 S1 6 7 8 9
+// A1 A2 10 11
+
+ if (color[7] == color[4] && color[3] != color[8])
+ {
+ product1b = product2a = color[7];
+
+ if ((color[6] == color[7]) || (color[4] == color[1]))
+ product1a = INTERPOLATE(color[7], INTERPOLATE(color[7], color[3]));
+ else
+ product1a = INTERPOLATE(color[3], color[4]);
+
+ if ((color[4] == color[5]) || (color[7] == color[10]))
+ product2b = INTERPOLATE(color[7], INTERPOLATE(color[7], color[8]));
+ else
+ product2b = INTERPOLATE(color[7], color[8]);
+ }
+ else if (color[3] == color[8] && color[7] != color[4])
+ {
+ product2b = product1a = color[3];
+
+ if ((color[0] == color[3]) || (color[5] == color[9]))
+ product1b = INTERPOLATE(color[3], INTERPOLATE(color[3], color[4]));
+ else
+ product1b = INTERPOLATE(color[3], color[1]);
+
+ if ((color[8] == color[11]) || (color[2] == color[3]))
+ product2a = INTERPOLATE(color[3], INTERPOLATE(color[3], color[2]));
+ else
+ product2a = INTERPOLATE(color[7], color[8]);
+
+ }
+ else if (color[3] == color[8] && color[7] == color[4])
+ {
+ register int r = 0;
+
+ r += GET_RESULT(color[4], color[3], color[6], color[10]);
+ r += GET_RESULT(color[4], color[3], color[2], color[0]);
+ r += GET_RESULT(color[4], color[3], color[11], color[9]);
+ r += GET_RESULT(color[4], color[3], color[1], color[5]);
+
+ if (r > 0)
+ {
+ product1b = product2a = color[7];
+ product1a = product2b = INTERPOLATE(color[3], color[4]);
+ }
+ else if (r < 0)
+ {
+ product2b = product1a = color[3];
+ product1b = product2a = INTERPOLATE(color[3], color[4]);
+ }
+ else
+ {
+ product2b = product1a = color[3];
+ product1b = product2a = color[7];
+ }
+ }
+ else
+ {
+ product2b = product1a = INTERPOLATE(color[7], color[4]);
+ product2b = Q_INTERPOLATE(color[8], color[8], color[8], product2b);
+ product1a = Q_INTERPOLATE(color[3], color[3], color[3], product1a);
+
+ product2a = product1b = INTERPOLATE(color[3], color[8]);
+ product2a = Q_INTERPOLATE(color[7], color[7], color[7], product2a);
+ product1b = Q_INTERPOLATE(color[4], color[4], color[4], product1b);
+ }
+
+ if (PixelsPerMask == 2)
+ {
+ if (ScummPCMode)
+ {
+ SWAP_WORD(product1a);
+ SWAP_WORD(product1b);
+ SWAP_WORD(product2a);
+ SWAP_WORD(product2b);
+ }
+ *((unsigned long *) (&dst_line[0][x * 4])) = (product1a << 16) | product1b;
+ *((unsigned long *) (&dst_line[1][x * 4])) = (product2a << 16) | product2b;
+ }
+ else
+ {
+ if (ScummPCMode)
+ {
+ SWAP_LONG(product1a);
+ SWAP_LONG(product1b);
+ SWAP_LONG(product2a);
+ SWAP_LONG(product2b);
+ }
+ *((unsigned long *) (&dst_line[0][x * 8])) = product1a;
+ *((unsigned long *) (&dst_line[0][x * 8 + 4])) = product1b;
+ *((unsigned long *) (&dst_line[1][x * 8])) = product2a;
+ *((unsigned long *) (&dst_line[1][x * 8 + 4])) = product2b;
+ }
+
+ /* Move color matrix forward */
+ color[0] = color[1];
+ color[2] = color[3]; color[3] = color[4]; color[4] = color[5];
+ color[6] = color[7]; color[7] = color[8]; color[8] = color[9];
+ color[10] = color[11];
+
+ if (src_x+x < BufferWidth - 2)
+ {
+ x += 2;
+ if (PixelsPerMask == 2)
+ {
+ color[1] = ScummColors16[ *(src_line[0] + x) ];
+ if (src_x+x < BufferWidth-1)
+ {
+ color[5] = ScummColors16[*(src_line[1]+x+1)];
+ color[9] = ScummColors16[*(src_line[2]+x+1)];
+ }
+ color[11] = ScummColors16[*(src_line[3]+x)];
+ }
+ else
+ {
+ color[1] = ScummColors[*(src_line[0]+x)];
+ if (src_x+x < BufferWidth-1)
+ {
+ color[5] = ScummColors[*(src_line[1]+x+1)];
+ color[9] = ScummColors[ *(src_line[2]+x+1)];
+ }
+ color[11] = ScummColors[*(src_line[3]+x)];
+ }
+ x -= 2;
+ }
+ }
+
+ /* We're done with one line, so we shift the source lines up */
+ src_line[0] = src_line[1];
+ src_line[1] = src_line[2];
+ src_line[2] = src_line[3];
+
+ /* Read next line */
+ if (src_y+y+3 >= BufferHeight)
+ src_line[3] = src_line[2];
+ else
+ src_line[3] = src_line[2] + BufferWidth;
+
+ /* Then shift the color matrix up */
+ if (PixelsPerMask == 2)
+ {
+ byte *sbp;
+ sbp = src_line[0];
+ color[0] = ScummColors16[*sbp]; color[1] = ScummColors16[*(sbp+1)];
+ sbp = src_line[1];
+ color[2] = ScummColors16[*sbp]; color[3] = color[2]; color[4] = ScummColors16[*(sbp+1)]; color[5] = ScummColors16[*(sbp+2)];
+ sbp = src_line[2];
+ color[6] = ScummColors16[*sbp]; color[7] = color[6]; color[8] = ScummColors16[*(sbp+1)]; color[9] = ScummColors16[*(sbp+2)];
+ sbp = src_line[3];
+ color[10] = ScummColors16[*sbp]; color[11] = ScummColors16[*(sbp+1)];
+ }
+ else
+ {
+ byte *lbp;
+ lbp = src_line[0];
+ color[0] = ScummColors[*lbp]; color[1] = ScummColors[*(lbp+1)];
+ lbp = src_line[1];
+ color[2] = ScummColors[*lbp]; color[3] = color[2]; color[4] = ScummColors[*(lbp+1)]; color[5] = ScummColors[*(lbp+2)];
+ lbp = src_line[2];
+ color[6] = ScummColors[*lbp]; color[7] = color[6]; color[8] = ScummColors[*(lbp+1)]; color[9] = ScummColors[*(lbp+2)];
+ lbp = src_line[3];
+ color[10] = ScummColors[*lbp]; color[11] = ScummColors[*(lbp+1)];
+ }
+
+
+ if (src_y + y < BufferHeight - 1)
+ {
+ dst_line[0] = dst_line[1]+dest_pitch;
+ dst_line[1] = dst_line[0]+dest_pitch;
+ }
+ }
+}
+
+void AdvMame2xScaler::Scale(uint32 src_x, uint32 src_y, uint32 dest_x, uint32 dest_y, uint32 width, uint32 height)
+{
+ if (!handle)
+ return;
+
+ byte *src = (byte *)Buffer+src_y*BufferWidth+src_x;
+
+ src_line[0] = src;
+ src_line[1] = src;
+ src_line[2] = src + BufferWidth;
+
+ dst_line[0] = dest+dest_y*2*dest_pitch+dest_x*2*dest_bpp;
+ dst_line[1] = dst_line[0]+dest_pitch;
+
+ for (uint32 y = 0; y < height; y++)
+ {
+ for (uint32 x = 0; x < width; x++)
+ {
+ uint32 B, D, E, F, H;
+
+ if (PixelsPerMask == 2)
+ {
+ // short A = *(src + i - nextlineSrc - 1);
+ B = ScummColors16[src_line[0][x]];
+ // short C = *(src + i - nextlineSrc + 1);
+ D = ScummColors16[src_line[1][x-1]];
+ E = ScummColors16[src_line[1][x]];
+ F = ScummColors16[src_line[1][x+1]];
+ // short G = *(src + i + nextlineSrc - 1);
+ H = ScummColors16[src_line[2][x]];
+ // short I = *(src + i + nextlineSrc + 1);
+ }
+ else
+ {
+ // short A = *(src + i - nextlineSrc - 1);
+ B = ScummColors[src_line[0][x]];
+ // short C = *(src + i - nextlineSrc + 1);
+ D = ScummColors[src_line[1][x-1]];
+ E = ScummColors[src_line[1][x]];
+ F = ScummColors[src_line[1][x+1]];
+ // short G = *(src + i + nextlineSrc - 1);
+ H = ScummColors[src_line[2][x]];
+ // short I = *(src + i + nextlineSrc + 1);
+ }
+
+
+ if (PixelsPerMask == 2)
+ {
+ if (ScummPCMode)
+ {
+ SWAP_WORD(B);
+ SWAP_WORD(D);
+ SWAP_WORD(E);
+ SWAP_WORD(F);
+ SWAP_WORD(H);
+ }
+ *((unsigned long *) (&dst_line[0][x * 4])) = ((D == B && B != F && D != H ? D : E) << 16) | (B == F && B != D && F != H ? F : E);
+ *((unsigned long *) (&dst_line[1][x * 4])) = ((D == H && D != B && H != F ? D : E) << 16) | (H == F && D != H && B != F ? F : E);
+ }
+ else
+ {
+ if (ScummPCMode)
+ {
+ SWAP_LONG(B);
+ SWAP_LONG(D);
+ SWAP_LONG(E);
+ SWAP_LONG(F);
+ SWAP_LONG(H);
+ }
+ *((unsigned long *) (&dst_line[0][x * 8])) = D == B && B != F && D != H ? D : E;
+ *((unsigned long *) (&dst_line[0][x * 8 + 4])) = B == F && B != D && F != H ? F : E;
+ *((unsigned long *) (&dst_line[1][x * 8])) = D == H && D != B && H != F ? D : E;
+ *((unsigned long *) (&dst_line[1][x * 8 + 4])) = H == F && D != H && B != F ? F : E;
+ }
+ }
+
+ src_line[0] = src_line[1];
+ src_line[1] = src_line[2];
+ if (src_y+y+2 >= BufferHeight)
+ src_line[2] = src_line[1];
+ else
+ src_line[2] = src_line[1] + BufferWidth;
+
+ if (src_y+y < BufferHeight-1)
+ {
+ dst_line[0] = dst_line[1]+dest_pitch;
+ dst_line[1] = dst_line[0]+dest_pitch;
+ }
+ }
+}
+
+void PointScaler::Scale(uint32 src_x, uint32 src_y, uint32 dest_x, uint32 dest_y, uint32 width, uint32 height)
+{
+ byte *src;
+ uint32 color;
+ uint32 r, g, b;
+ uint32 x, y;
+
+ if (!handle)
+ return;
+
+ src = (byte *)Buffer+src_y*BufferWidth+src_x;
+
+ dst_line[0] = dest+dest_y*2*dest_pitch+dest_x*2*dest_bpp;
+ dst_line[1] = dst_line[0]+dest_pitch;
+
+ for (y = 0; y < height; y++)
+ {
+ for (x = 0; x < width; x++)
+ {
+ r = (ScummColors[*(src+x)] >> 16) & 0xff;
+ g = (ScummColors[*(src+x)] >> 8) & 0xff;
+ b = ScummColors[*(src+x)] & 0xff;
+
+ color = MakeColor(dest_pixfmt, r, g, b);
+ if (PixelsPerMask == 2)
+ {
+ if (ScummPCMode)
+ SWAP_WORD(color);
+
+ *((unsigned long *) (&dst_line[0][x * 4])) = (color << 16) | color;
+ *((unsigned long *) (&dst_line[1][x * 4])) = (color << 16) | color;
+ }
+ else
+ {
+ if (ScummPCMode)
+ SWAP_LONG(color);
+
+ *((unsigned long *) (&dst_line[0][x * 8])) = color;
+ *((unsigned long *) (&dst_line[0][x * 8 + 4])) = color;
+ *((unsigned long *) (&dst_line[1][x * 8])) = color;
+ *((unsigned long *) (&dst_line[1][x * 8 + 4])) = color;
+ }
+ }
+
+ src += BufferWidth;
+
+ if (src_y+y < BufferHeight-1)
+ {
+ dst_line[0] = dst_line[1]+dest_pitch;
+ dst_line[1] = dst_line[0]+dest_pitch;
+ }
+ }
+}
+
+SCALERTYPE MorphOSScaler::FindByName(const char *ScalerName)
+{
+ int scaler = 0;
+
+ while (ScummScalers[scaler].gs_Name)
+ {
+ if (!stricmp(ScalerName, ScummScalers[scaler].gs_Name))
+ return ScummScalers[scaler].gs_Type;
+ scaler++;
+ }
+
+ if (ScummScalers[scaler].gs_Name == NULL)
+ {
+ puts("Invalid scaler name. Please use one of the following:");
+ for (scaler = 0; ScummScalers[scaler].gs_Name != NULL; scaler++)
+ printf(" %s\n", ScummScalers[scaler].gs_Name);
+ }
+
+ return ST_INVALID;
+}
+
+SCALERTYPE MorphOSScaler::FindByIndex(int index)
+{
+ if (index >= 0 && index < 10 && ScummScalers[index].gs_Name)
+ return ScummScalers[index].gs_Type;
+
+ return ST_INVALID;
+}
+
+const char *MorphOSScaler::GetParamName(SCALERTYPE type)
+{
+ int scaler = 0;
+
+ while (ScummScalers[scaler].gs_Name)
+ {
+ if (ScummScalers[scaler].gs_Type == type)
+ return ScummScalers[scaler].gs_ParamName;
+ scaler++;
+ }
+
+ return NULL;
+}
+
generated by cgit v1.2.3 (git 2.25.1) at 2024-07-11 21:37:14 +0000