mirror of
https://github.com/Interlisp/maiko.git
synced 2026-01-27 20:27:45 +00:00
Reformat all C source files with Clang-format in Google style w/ 100 col width.
This commit is contained in:
Nick Briggs
439
src/draw.c
Executable file → Normal file
439
src/draw.c
Executable file → Normal file
@@ -1,7 +1,6 @@
|
||||
/* $Id: draw.c,v 1.2 1999/01/03 02:06:56 sybalsky Exp $ (C) Copyright Venue, All Rights Reserved */
|
||||
static char *id = "$Id: draw.c,v 1.2 1999/01/03 02:06:56 sybalsky Exp $ Copyright (C) Venue";
|
||||
|
||||
|
||||
/************************************************************************/
|
||||
/* */
|
||||
/* D R A W . C */
|
||||
@@ -10,9 +9,6 @@ static char *id = "$Id: draw.c,v 1.2 1999/01/03 02:06:56 sybalsky Exp $ Copyrigh
|
||||
/* */
|
||||
/************************************************************************/
|
||||
|
||||
|
||||
|
||||
|
||||
/************************************************************************/
|
||||
/* */
|
||||
/* (C) Copyright 1989-95 Venue. All Rights Reserved. */
|
||||
@@ -25,11 +21,8 @@ static char *id = "$Id: draw.c,v 1.2 1999/01/03 02:06:56 sybalsky Exp $ Copyrigh
|
||||
/* */
|
||||
/************************************************************************/
|
||||
|
||||
|
||||
#include "version.h"
|
||||
|
||||
|
||||
|
||||
#include <stdio.h>
|
||||
|
||||
#ifndef NOPIXRECT
|
||||
@@ -64,16 +57,14 @@ extern int ScreenLocked;
|
||||
extern int MonoOrColor;
|
||||
#endif /* COLOR */
|
||||
|
||||
|
||||
#ifdef DISPLAYBUFFER
|
||||
LispPTR n_new_cursorin_CG6( dx, dy, w, h )
|
||||
register int dx, dy, w, h;
|
||||
{
|
||||
if((dx < MOUSEXR)&&(dx + w > MOUSEXL)&&(dy < MOUSEYH)&&(dy + h > MOUSEYL))
|
||||
return(T);
|
||||
else
|
||||
return(NIL);
|
||||
}
|
||||
#ifdef DISPLAYBUFFER
|
||||
LispPTR n_new_cursorin_CG6(dx, dy, w, h) register int dx, dy, w, h;
|
||||
{
|
||||
if ((dx < MOUSEXR) && (dx + w > MOUSEXL) && (dy < MOUSEYH) && (dy + h > MOUSEYL))
|
||||
return (T);
|
||||
else
|
||||
return (NIL);
|
||||
}
|
||||
#endif
|
||||
|
||||
/************************************************************
|
||||
@@ -86,9 +77,9 @@ takes 9 (!) args from top of stack, does line draw inner loop
|
||||
SP-0 --> Maximum number of X steps allowed {uXCount}
|
||||
SP-2 --> Initial Delta {Delta}
|
||||
SP-4 --> Function number: {L2}
|
||||
0: Set pixel
|
||||
1: Reset Pixel
|
||||
2: Invert Pixel
|
||||
0: Set pixel
|
||||
1: Reset Pixel
|
||||
2: Invert Pixel
|
||||
SP-6 --> Relative Y coordinate of end of line (for the bucket) {uYT}
|
||||
SP-8 --> Width of bitmap (in words), signed to indicate Y direction {uYIncHi , uYIncLo}
|
||||
SP-10 -> Relative X coordinate of end of line (for the bucket) {uXT}
|
||||
@@ -102,60 +93,59 @@ takes 9 (!) args from top of stack, does line draw inner loop
|
||||
/* op = draw operation: 0/paint, 1/erase, 2/invert */
|
||||
/*****
|
||||
plot:
|
||||
if x = xmax or y = ymax then exit
|
||||
data = data op curbit;
|
||||
if (ymax > xmax) then {movex(-), if delta neg, then movey(+), goto plot}
|
||||
else {movey(-), if delta neg, then movex(+), goto plot}
|
||||
if x = xmax or y = ymax then exit
|
||||
data = data op curbit;
|
||||
if (ymax > xmax) then {movex(-), if delta neg, then movey(+), goto plot}
|
||||
else {movey(-), if delta neg, then movex(+), goto plot}
|
||||
|
||||
movex = {
|
||||
xmax--
|
||||
delta = delta +/- ysize
|
||||
curbit >>= 1
|
||||
if curbit = 0 then {curbit = 0x8000, incx}
|
||||
}
|
||||
movey = {
|
||||
ymax--
|
||||
delta = delta +/- xsize
|
||||
incy
|
||||
}
|
||||
movex = {
|
||||
xmax--
|
||||
delta = delta +/- ysize
|
||||
curbit >>= 1
|
||||
if curbit = 0 then {curbit = 0x8000, incx}
|
||||
}
|
||||
movey = {
|
||||
ymax--
|
||||
delta = delta +/- xsize
|
||||
incy
|
||||
}
|
||||
*****/
|
||||
|
||||
/*
|
||||
ptr pointer to "first word of bitmap"
|
||||
curbit bit index to start with, and tracks therefrom.
|
||||
xsize Rel X coord
|
||||
width width of bitmap, in words
|
||||
ysize Rel Y coord of end of line
|
||||
op operation
|
||||
delta initial delta
|
||||
numx step count for X steps
|
||||
numy step count for Y steps
|
||||
ptr pointer to "first word of bitmap"
|
||||
curbit bit index to start with, and tracks therefrom.
|
||||
xsize Rel X coord
|
||||
width width of bitmap, in words
|
||||
ysize Rel Y coord of end of line
|
||||
op operation
|
||||
delta initial delta
|
||||
numx step count for X steps
|
||||
numy step count for Y steps
|
||||
*/
|
||||
|
||||
#ifdef XWINDOW
|
||||
#define DISPLAYBUFFER
|
||||
#endif /* XWINDOW */
|
||||
|
||||
|
||||
int N_OP_drawline(ptr, curbit, xsize, width, ysize, op, delta, numx, numy)
|
||||
register int curbit, xsize;
|
||||
int width;
|
||||
register int ysize;
|
||||
int op;
|
||||
register int delta, numx, numy;
|
||||
LispPTR ptr;
|
||||
{
|
||||
register DLword *dataptr;
|
||||
ScreenLocked=T;
|
||||
int N_OP_drawline(ptr, curbit, xsize, width, ysize, op, delta, numx, numy) register int curbit,
|
||||
xsize;
|
||||
int width;
|
||||
register int ysize;
|
||||
int op;
|
||||
register int delta, numx, numy;
|
||||
LispPTR ptr;
|
||||
{
|
||||
register DLword *dataptr;
|
||||
ScreenLocked = T;
|
||||
|
||||
#ifdef COLOR
|
||||
if( MonoOrColor == MONO_SCREEN )
|
||||
if (MonoOrColor == MONO_SCREEN)
|
||||
#endif /* COLOR */
|
||||
|
||||
#ifdef SUNDISPLAY
|
||||
#ifndef DISPLAYBUFFER
|
||||
HideCursor; /** Figure out how to be smart later **/
|
||||
#else /* DISPLAYBUFFER */
|
||||
HideCursor; /** Figure out how to be smart later **/
|
||||
#else /* DISPLAYBUFFER */
|
||||
#ifndef OLD_CURSOR
|
||||
HideCursor;
|
||||
#endif /* OLD_CURSOR */
|
||||
@@ -164,145 +154,142 @@ int N_OP_drawline(ptr, curbit, xsize, width, ysize, op, delta, numx, numy)
|
||||
|
||||
#endif /* SUNDISPLAY */
|
||||
|
||||
|
||||
delta &= 0xFFFF;
|
||||
op &= 3;
|
||||
delta &= 0xFFFF;
|
||||
op &= 3;
|
||||
|
||||
if ((SEGMASK & width) == S_POSITIVE) width &= 0xFFFF;
|
||||
else if ((SEGMASK & width) == S_NEGATIVE) width |= 0xFFFF0000;
|
||||
else ERROR_EXIT(numy);
|
||||
if ((SEGMASK & width) == S_POSITIVE)
|
||||
width &= 0xFFFF;
|
||||
else if ((SEGMASK & width) == S_NEGATIVE)
|
||||
width |= 0xFFFF0000;
|
||||
else
|
||||
ERROR_EXIT(numy);
|
||||
|
||||
curbit = 0x8000 >> (curbit & 0xFFFF);
|
||||
dataptr = Addr68k_from_LADDR(ptr);
|
||||
numy &= 0xFFFF;
|
||||
numx &= 0xFFFF;
|
||||
ysize &= 0xFFFF;
|
||||
xsize &= 0xFFFF;
|
||||
if (xsize > ysize)
|
||||
{
|
||||
delta = xsize - delta - 1;
|
||||
switch (op)
|
||||
{
|
||||
case 0:
|
||||
while (numx && numy)
|
||||
{
|
||||
if (!curbit)
|
||||
{
|
||||
curbit = 0x8000;
|
||||
dataptr++;
|
||||
} /* end if curbit */
|
||||
GETWORD(dataptr) |= curbit;
|
||||
numx--;
|
||||
delta -= ysize;
|
||||
curbit >>= 1;
|
||||
if (delta < 0)
|
||||
{
|
||||
numy--;
|
||||
delta += xsize;
|
||||
dataptr += width;
|
||||
} /* end if delta */
|
||||
}/* end while */
|
||||
break;
|
||||
case 1:
|
||||
while (numx && numy)
|
||||
{
|
||||
if (!curbit) {
|
||||
curbit = 0x8000;
|
||||
dataptr++;
|
||||
} /* end if curbit */
|
||||
GETWORD(dataptr) &= ~curbit;
|
||||
numx--;
|
||||
delta -= ysize;
|
||||
curbit >>= 1;
|
||||
if (delta < 0)
|
||||
{
|
||||
numy--;
|
||||
delta += xsize;
|
||||
dataptr += width;
|
||||
} /* end if delta */
|
||||
}/* end while */
|
||||
break;
|
||||
case 2:
|
||||
while (numx && numy)
|
||||
{
|
||||
if (!curbit) { curbit = 0x8000; dataptr++; }
|
||||
GETWORD(dataptr) ^= curbit;
|
||||
numx--;
|
||||
delta -= ysize;
|
||||
curbit >>= 1;
|
||||
if (delta < 0)
|
||||
{
|
||||
numy--;
|
||||
delta += xsize;
|
||||
dataptr += width;
|
||||
} /* end if delta */
|
||||
}/* end while */
|
||||
break;
|
||||
} /* end switch */
|
||||
}/* end if */
|
||||
else
|
||||
{ /* yfirst */
|
||||
delta = ysize - delta - 1;
|
||||
switch (op)
|
||||
{
|
||||
case 0:
|
||||
while (numx && numy)
|
||||
{
|
||||
GETWORD(dataptr) |= curbit;
|
||||
numy--;
|
||||
delta -= xsize;
|
||||
dataptr += width;
|
||||
if (delta < 0)
|
||||
{
|
||||
numx--;
|
||||
delta += ysize;
|
||||
curbit >>= 1;
|
||||
if (!curbit) { curbit = 0x8000; dataptr++; }
|
||||
} /* end if delta */
|
||||
}/* end while */
|
||||
break;
|
||||
case 1:
|
||||
while (numx && numy)
|
||||
{
|
||||
GETWORD(dataptr) &= ~curbit;
|
||||
numy--;
|
||||
delta -= xsize;
|
||||
dataptr += width;
|
||||
if (delta < 0)
|
||||
{
|
||||
numx--;
|
||||
delta += ysize;
|
||||
curbit >>= 1;
|
||||
if (!curbit) { curbit = 0x8000; dataptr++; }
|
||||
} /* end if delta */
|
||||
}/* end while */
|
||||
break;
|
||||
case 2:
|
||||
while (numx && numy)
|
||||
{
|
||||
GETWORD(dataptr) ^= curbit;
|
||||
numy--;
|
||||
delta -= xsize;
|
||||
dataptr += width;
|
||||
if (delta < 0)
|
||||
{
|
||||
numx--;
|
||||
delta += ysize;
|
||||
curbit >>= 1;
|
||||
if (!curbit) { curbit = 0x8000; dataptr++; }
|
||||
} /* end if delta */
|
||||
}/* end while */
|
||||
break;
|
||||
} /* end switch */
|
||||
} /* end else */
|
||||
curbit = 0x8000 >> (curbit & 0xFFFF);
|
||||
dataptr = Addr68k_from_LADDR(ptr);
|
||||
numy &= 0xFFFF;
|
||||
numx &= 0xFFFF;
|
||||
ysize &= 0xFFFF;
|
||||
xsize &= 0xFFFF;
|
||||
if (xsize > ysize) {
|
||||
delta = xsize - delta - 1;
|
||||
switch (op) {
|
||||
case 0:
|
||||
while (numx && numy) {
|
||||
if (!curbit) {
|
||||
curbit = 0x8000;
|
||||
dataptr++;
|
||||
} /* end if curbit */
|
||||
GETWORD(dataptr) |= curbit;
|
||||
numx--;
|
||||
delta -= ysize;
|
||||
curbit >>= 1;
|
||||
if (delta < 0) {
|
||||
numy--;
|
||||
delta += xsize;
|
||||
dataptr += width;
|
||||
} /* end if delta */
|
||||
} /* end while */
|
||||
break;
|
||||
case 1:
|
||||
while (numx && numy) {
|
||||
if (!curbit) {
|
||||
curbit = 0x8000;
|
||||
dataptr++;
|
||||
} /* end if curbit */
|
||||
GETWORD(dataptr) &= ~curbit;
|
||||
numx--;
|
||||
delta -= ysize;
|
||||
curbit >>= 1;
|
||||
if (delta < 0) {
|
||||
numy--;
|
||||
delta += xsize;
|
||||
dataptr += width;
|
||||
} /* end if delta */
|
||||
} /* end while */
|
||||
break;
|
||||
case 2:
|
||||
while (numx && numy) {
|
||||
if (!curbit) {
|
||||
curbit = 0x8000;
|
||||
dataptr++;
|
||||
}
|
||||
GETWORD(dataptr) ^= curbit;
|
||||
numx--;
|
||||
delta -= ysize;
|
||||
curbit >>= 1;
|
||||
if (delta < 0) {
|
||||
numy--;
|
||||
delta += xsize;
|
||||
dataptr += width;
|
||||
} /* end if delta */
|
||||
} /* end while */
|
||||
break;
|
||||
} /* end switch */
|
||||
} /* end if */
|
||||
else { /* yfirst */
|
||||
delta = ysize - delta - 1;
|
||||
switch (op) {
|
||||
case 0:
|
||||
while (numx && numy) {
|
||||
GETWORD(dataptr) |= curbit;
|
||||
numy--;
|
||||
delta -= xsize;
|
||||
dataptr += width;
|
||||
if (delta < 0) {
|
||||
numx--;
|
||||
delta += ysize;
|
||||
curbit >>= 1;
|
||||
if (!curbit) {
|
||||
curbit = 0x8000;
|
||||
dataptr++;
|
||||
}
|
||||
} /* end if delta */
|
||||
} /* end while */
|
||||
break;
|
||||
case 1:
|
||||
while (numx && numy) {
|
||||
GETWORD(dataptr) &= ~curbit;
|
||||
numy--;
|
||||
delta -= xsize;
|
||||
dataptr += width;
|
||||
if (delta < 0) {
|
||||
numx--;
|
||||
delta += ysize;
|
||||
curbit >>= 1;
|
||||
if (!curbit) {
|
||||
curbit = 0x8000;
|
||||
dataptr++;
|
||||
}
|
||||
} /* end if delta */
|
||||
} /* end while */
|
||||
break;
|
||||
case 2:
|
||||
while (numx && numy) {
|
||||
GETWORD(dataptr) ^= curbit;
|
||||
numy--;
|
||||
delta -= xsize;
|
||||
dataptr += width;
|
||||
if (delta < 0) {
|
||||
numx--;
|
||||
delta += ysize;
|
||||
curbit >>= 1;
|
||||
if (!curbit) {
|
||||
curbit = 0x8000;
|
||||
dataptr++;
|
||||
}
|
||||
} /* end if delta */
|
||||
} /* end while */
|
||||
break;
|
||||
} /* end switch */
|
||||
} /* end else */
|
||||
#ifdef COLOR
|
||||
if( MonoOrColor == MONO_SCREEN )
|
||||
if (MonoOrColor == MONO_SCREEN)
|
||||
#endif /* COLOR */
|
||||
|
||||
#ifdef SUNDISPLAY
|
||||
#ifndef DISPLAYBUFFER
|
||||
ShowCursor; /** figure how to be smart later **/
|
||||
#else
|
||||
ShowCursor; /** figure how to be smart later **/
|
||||
#else
|
||||
#ifndef OLD_CURSOR
|
||||
ShowCursor;
|
||||
#endif /* OLD_CURSOR */
|
||||
@@ -311,81 +298,63 @@ int N_OP_drawline(ptr, curbit, xsize, width, ysize, op, delta, numx, numy)
|
||||
|
||||
#endif /* SUNDISPLAY */
|
||||
|
||||
|
||||
#ifdef DISPLAYBUFFER
|
||||
#ifdef COLOR
|
||||
if( MonoOrColor == MONO_SCREEN )
|
||||
if (MonoOrColor == MONO_SCREEN)
|
||||
#endif /* COLOR */
|
||||
|
||||
{
|
||||
DLword *start_addr
|
||||
, *temp_s
|
||||
, *temp_e;
|
||||
{
|
||||
DLword *start_addr, *temp_s, *temp_e;
|
||||
|
||||
start_addr = (DLword*)Addr68k_from_LADDR(ptr);
|
||||
start_addr = (DLword *)Addr68k_from_LADDR(ptr);
|
||||
|
||||
if( ((int)(temp_s = (DLword*)(start_addr - DisplayRegion68k)) >= 0 )
|
||||
&& (start_addr < DisplayRegion68k_end_addr)
|
||||
&& ((int)(temp_e = (DLword*)(dataptr - DisplayRegion68k)) >= 0 )
|
||||
&& ((DLword*)dataptr < DisplayRegion68k_end_addr) )
|
||||
{
|
||||
if (((int)(temp_s = (DLword *)(start_addr - DisplayRegion68k)) >= 0) &&
|
||||
(start_addr < DisplayRegion68k_end_addr) &&
|
||||
((int)(temp_e = (DLword *)(dataptr - DisplayRegion68k)) >= 0) &&
|
||||
((DLword *)dataptr < DisplayRegion68k_end_addr)) {
|
||||
int start_x, start_y, end_x, end_y, w, h, displayflg;
|
||||
|
||||
int start_x
|
||||
, start_y
|
||||
, end_x
|
||||
, end_y
|
||||
, w
|
||||
, h
|
||||
, displayflg;
|
||||
start_y = (int)temp_s / DisplayRasterWidth;
|
||||
start_x = ((int)temp_s % DisplayRasterWidth) * BITSPER_DLWORD;
|
||||
|
||||
start_y = (int)temp_s / DisplayRasterWidth;
|
||||
start_x = ((int)temp_s % DisplayRasterWidth) * BITSPER_DLWORD;
|
||||
end_y = (int)temp_e / DisplayRasterWidth;
|
||||
end_x = ((int)temp_e % DisplayRasterWidth) * BITSPER_DLWORD + (BITSPER_DLWORD - 1);
|
||||
|
||||
end_y = (int)temp_e / DisplayRasterWidth ;
|
||||
end_x = ((int)temp_e % DisplayRasterWidth) * BITSPER_DLWORD
|
||||
+ (BITSPER_DLWORD - 1);
|
||||
w = abs(start_x - end_x) + 1;
|
||||
h = abs(start_y - end_y) + 1;
|
||||
|
||||
w = abs(start_x - end_x) + 1;
|
||||
h = abs(start_y - end_y) + 1;
|
||||
|
||||
if(start_x > end_x) start_x = end_x;
|
||||
if(start_y > end_y) start_y = end_y;
|
||||
if (start_x > end_x) start_x = end_x;
|
||||
if (start_y > end_y) start_y = end_y;
|
||||
|
||||
#if defined(SUNDISPLAY) && !defined(BYTESWAP)
|
||||
#ifdef OLD_CURSOR
|
||||
if( (displayflg = n_new_cursorin_CG6( start_x, start_y, w, h )) )
|
||||
HideCursor;
|
||||
if ((displayflg = n_new_cursorin_CG6(start_x, start_y, w, h))) HideCursor;
|
||||
#endif /* OLD_CURSOR */
|
||||
|
||||
pr_rop(ColorDisplayPixrect, start_x, start_y, w, h,
|
||||
PIX_SRC,DisplayRegionPixrect, start_x, start_y );
|
||||
pr_rop(ColorDisplayPixrect, start_x, start_y, w, h, PIX_SRC, DisplayRegionPixrect, start_x,
|
||||
start_y);
|
||||
#ifdef OLD_CURSOR
|
||||
if( displayflg ) ShowCursor;
|
||||
if (displayflg) ShowCursor;
|
||||
#endif /* OLD_CURSOR */
|
||||
|
||||
#endif /* SUNDISPLAY */
|
||||
|
||||
|
||||
#if defined(XWINDOW) || defined(BYTESWAP)
|
||||
flush_display_region( start_x, start_y, w, h);
|
||||
flush_display_region(start_x, start_y, w, h);
|
||||
|
||||
#endif /* XWINDOW */
|
||||
|
||||
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
#endif /* DISPLAYBUFFER */
|
||||
|
||||
ScreenLocked = NIL;
|
||||
|
||||
ScreenLocked=NIL;
|
||||
return (0); /* return a value for the error test to check. */
|
||||
|
||||
return(0); /* return a value for the error test to check. */
|
||||
|
||||
} /* end N_OP_drawline() */
|
||||
} /* end N_OP_drawline() */
|
||||
|
||||
#ifdef XWINDOW
|
||||
#undef DISPLAYBUFFER
|
||||
#endif /* XWINDOW */
|
||||
|
||||
|
||||
/* end module */
|
||||
|
||||
Reference in New Issue
Block a user