mirror of
https://github.com/Interlisp/maiko.git
synced 2026-02-03 15:13:03 +00:00
Reformat all C source files with Clang-format in Google style w/ 100 col width.
This commit is contained in:
Nick Briggs
402
src/llcolor.c
Executable file → Normal file
402
src/llcolor.c
Executable file → Normal file
@@ -1,10 +1,7 @@
|
||||
/* $Id: llcolor.c,v 1.2 1999/01/03 02:07:15 sybalsky Exp $ (C) Copyright Venue, All Rights Reserved */
|
||||
/* $Id: llcolor.c,v 1.2 1999/01/03 02:07:15 sybalsky Exp $ (C) Copyright Venue, All Rights Reserved
|
||||
*/
|
||||
static char *id = "$Id: llcolor.c,v 1.2 1999/01/03 02:07:15 sybalsky Exp $ Copyright (C) Venue";
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
/************************************************************************/
|
||||
/* */
|
||||
/* (C) Copyright 1989-95 Venue. All Rights Reserved. */
|
||||
@@ -19,7 +16,6 @@ static char *id = "$Id: llcolor.c,v 1.2 1999/01/03 02:07:15 sybalsky Exp $ Copyr
|
||||
|
||||
#include "version.h"
|
||||
|
||||
|
||||
#include <stdio.h>
|
||||
|
||||
#ifndef NOPIXRECT
|
||||
@@ -50,201 +46,182 @@ static char *id = "$Id: llcolor.c,v 1.2 1999/01/03 02:07:15 sybalsky Exp $ Copyr
|
||||
|
||||
#include "bb.h"
|
||||
#include "bitblt.h"
|
||||
#include "pilotbbt.h"
|
||||
#include "pilotbbt.h"
|
||||
#include "dbprint.h"
|
||||
|
||||
int MonoOrColor=MONO_SCREEN;
|
||||
int MonoOrColor = MONO_SCREEN;
|
||||
DLword *ColorDisplayRegion68k;
|
||||
int Dispcolorsize;
|
||||
int Inited_Color = NIL;
|
||||
extern struct pixrect *ColorDisplayPixrect;
|
||||
extern int displaywidth
|
||||
, displayheight
|
||||
, FrameBufferFd;
|
||||
extern int displaywidth, displayheight, FrameBufferFd;
|
||||
|
||||
/*******************************************************************/
|
||||
/* Func name : cgfour_init_color_display(args)
|
||||
Arg(s) : COLOR BITMAP ADDRESS(LISPPTR)
|
||||
Desc : Assign to SUBR 0210
|
||||
mmap LispPTR to Color Display FB.
|
||||
By Takeshi
|
||||
Arg(s) : COLOR BITMAP ADDRESS(LISPPTR)
|
||||
Desc : Assign to SUBR 0210
|
||||
mmap LispPTR to Color Display FB.
|
||||
By Takeshi
|
||||
*/
|
||||
/*******************************************************************/
|
||||
#ifdef COLOR
|
||||
cgfour_init_color_display(color_bitmapbase) /* SUBR 0210 */
|
||||
LispPTR color_bitmapbase; /* COLOR BITMAP ADDRESS */
|
||||
{
|
||||
struct pixrect *ColorFb;
|
||||
struct pixrect *color_source;
|
||||
int mmapstat;
|
||||
LispPTR color_bitmapbase; /* COLOR BITMAP ADDRESS */
|
||||
{
|
||||
struct pixrect *ColorFb;
|
||||
struct pixrect *color_source;
|
||||
int mmapstat;
|
||||
|
||||
if(MonoOrColor == COLOR_SCREEN) {
|
||||
printf("You can not initialize the color screen from inside color screen. \n");
|
||||
if (MonoOrColor == COLOR_SCREEN) {
|
||||
printf("You can not initialize the color screen from inside color screen. \n");
|
||||
}
|
||||
|
||||
ColorDisplayRegion68k = Addr68k_from_LADDR(color_bitmapbase );
|
||||
|
||||
Dispcolorsize = ((displaywidth * displayheight + (getpagesize()-1) )
|
||||
& -getpagesize()); /* 8 bit depth */
|
||||
ColorDisplayRegion68k = Addr68k_from_LADDR(color_bitmapbase);
|
||||
|
||||
Dispcolorsize =
|
||||
((displaywidth * displayheight + (getpagesize() - 1)) & -getpagesize()); /* 8 bit depth */
|
||||
#ifndef DISPLAYBUFFER
|
||||
ColorFb = pr_open("/dev/fb");
|
||||
#else
|
||||
ColorFb = ColorDisplayPixrect;
|
||||
ColorFb = pr_open("/dev/fb");
|
||||
#else
|
||||
ColorFb = ColorDisplayPixrect;
|
||||
#endif /* DISPLAYBUFFER */
|
||||
|
||||
|
||||
#ifndef DISPLAYBUFFER
|
||||
color_source = mem_point(displaywidth,displayheight,8,
|
||||
ColorDisplayRegion68k);
|
||||
|
||||
pr_set_plane_group(ColorFb, PIXPG_8BIT_COLOR);
|
||||
pr_rop(ColorFb,0,0,displaywidth,displayheight,PIX_SRC,
|
||||
color_source,0,0);
|
||||
color_source = mem_point(displaywidth, displayheight, 8, ColorDisplayRegion68k);
|
||||
|
||||
mmapstat = (int)mmap(ColorDisplayRegion68k ,
|
||||
Dispcolorsize,
|
||||
PROT_READ | PROT_WRITE,
|
||||
pr_set_plane_group(ColorFb, PIXPG_8BIT_COLOR);
|
||||
pr_rop(ColorFb, 0, 0, displaywidth, displayheight, PIX_SRC, color_source, 0, 0);
|
||||
|
||||
mmapstat = (int)mmap(ColorDisplayRegion68k, Dispcolorsize, PROT_READ | PROT_WRITE,
|
||||
#ifdef OS4
|
||||
MAP_FIXED |
|
||||
MAP_FIXED |
|
||||
#endif
|
||||
MAP_SHARED,
|
||||
FrameBufferFd, 0x40000 );
|
||||
if(mmapstat == -1){
|
||||
perror("cgfour_init_color_display: ERROR at mmap system call\n");
|
||||
error ("cgfour_init_color_display: ERROR at mmap system call\n You may be able to continue by typing 'q'");
|
||||
}
|
||||
MAP_SHARED,
|
||||
FrameBufferFd, 0x40000);
|
||||
if (mmapstat == -1) {
|
||||
perror("cgfour_init_color_display: ERROR at mmap system call\n");
|
||||
error(
|
||||
"cgfour_init_color_display: ERROR at mmap system call\n You may be able to continue by "
|
||||
"typing 'q'");
|
||||
}
|
||||
#endif /* DISPLAYBUFFER */
|
||||
|
||||
printf("COLOR-INIT OK BMBASE=0x%x\nNATIVE:= 0x%x)\n", color_bitmapbase, ColorDisplayRegion68k);
|
||||
|
||||
printf("COLOR-INIT OK BMBASE=0x%x\nNATIVE:= 0x%x)\n",
|
||||
color_bitmapbase,ColorDisplayRegion68k);
|
||||
Inited_Color = T; /* Color display is active. */
|
||||
|
||||
Inited_Color = T; /* Color display is active. */
|
||||
return (color_bitmapbase);
|
||||
} /* end cgfour_init_color_display */
|
||||
|
||||
return(color_bitmapbase);
|
||||
} /* end cgfour_init_color_display */
|
||||
|
||||
#else /* COLOR */
|
||||
#else /* COLOR */
|
||||
|
||||
LispPTR cgfour_init_color_display(color_bitmapbase) /* SUBR 0210 */
|
||||
LispPTR color_bitmapbase; /* COLOR BITMAP ADDRESS */
|
||||
LispPTR color_bitmapbase; /* COLOR BITMAP ADDRESS */
|
||||
{
|
||||
printf( "Color is not supported.\n" );
|
||||
return (NIL);
|
||||
printf("Color is not supported.\n");
|
||||
return (NIL);
|
||||
}
|
||||
#endif /* COLOR */
|
||||
|
||||
/*******************************************************************/
|
||||
/* Func name : cgfour_change_screen_mode(which_screen)
|
||||
Arg(s) : MONO_SCREEN OR COLOR_SCREEN
|
||||
Desc : Assign to SUBR 0211
|
||||
Change screen Mono to Color,vice versa.
|
||||
By Takeshi
|
||||
Arg(s) : MONO_SCREEN OR COLOR_SCREEN
|
||||
Desc : Assign to SUBR 0211
|
||||
Change screen Mono to Color,vice versa.
|
||||
By Takeshi
|
||||
*/
|
||||
/*******************************************************************/
|
||||
#ifdef COLOR
|
||||
LispPTR cgfour_change_screen_mode(which_screen)
|
||||
LispPTR which_screen;
|
||||
{ /* subr 0211 */
|
||||
struct pixrect *ColorFb;
|
||||
extern ScreenLocked;
|
||||
extern DLword *EmCursorX68K,*EmCursorY68K;
|
||||
LispPTR cgfour_change_screen_mode(which_screen) LispPTR which_screen;
|
||||
{ /* subr 0211 */
|
||||
struct pixrect *ColorFb;
|
||||
extern ScreenLocked;
|
||||
extern DLword *EmCursorX68K, *EmCursorY68K;
|
||||
|
||||
int mmapstat;
|
||||
int mmapstat;
|
||||
|
||||
#ifndef DISPLAYBUFFER
|
||||
ColorFb = pr_open("/dev/fb");
|
||||
#else
|
||||
ColorFb = ColorDisplayPixrect;
|
||||
ColorFb = pr_open("/dev/fb");
|
||||
#else
|
||||
ColorFb = ColorDisplayPixrect;
|
||||
#endif /* DISPLAYBUFFER */
|
||||
|
||||
ScreenLocked=T;
|
||||
taking_mouse_down();
|
||||
ScreenLocked = T;
|
||||
taking_mouse_down();
|
||||
|
||||
switch (which_screen & 0xf) {
|
||||
case MONO_SCREEN : { /* resume mono screen */
|
||||
switch (which_screen & 0xf) {
|
||||
case MONO_SCREEN: { /* resume mono screen */
|
||||
#ifdef DISPLAYBUFFER
|
||||
mmapstat = (int)munmap( ColorDisplayRegion68k, Dispcolorsize );
|
||||
if( mmapstat == -1){
|
||||
perror("cg_four_change_screen: ERROR at munmap system call\n");
|
||||
exit( 0 );
|
||||
} /* end if(mmapstat) */
|
||||
save_color_screen();
|
||||
mmapstat = (int)munmap(ColorDisplayRegion68k, Dispcolorsize);
|
||||
if (mmapstat == -1) {
|
||||
perror("cg_four_change_screen: ERROR at munmap system call\n");
|
||||
exit(0);
|
||||
} /* end if(mmapstat) */
|
||||
save_color_screen();
|
||||
#endif /* DISPLAYBUFFER */
|
||||
|
||||
pr_set_plane_group(ColorFb, PIXPG_OVERLAY_ENABLE);
|
||||
pr_rop(ColorFb,0,0,
|
||||
ColorFb->pr_width,
|
||||
ColorFb->pr_height, PIX_SET, 0, 0, 0);
|
||||
pr_set_plane_group(ColorFb, PIXPG_OVERLAY);
|
||||
pr_set_plane_group(ColorFb, PIXPG_OVERLAY_ENABLE);
|
||||
pr_rop(ColorFb, 0, 0, ColorFb->pr_width, ColorFb->pr_height, PIX_SET, 0, 0, 0);
|
||||
pr_set_plane_group(ColorFb, PIXPG_OVERLAY);
|
||||
#ifdef DISPLAYBUFFER
|
||||
flush_display_buffer();
|
||||
flush_display_buffer();
|
||||
#endif /* DISPLAYBUFFER */
|
||||
|
||||
MonoOrColor = MONO_SCREEN;
|
||||
break;
|
||||
}
|
||||
case COLOR_SCREEN : {
|
||||
#ifndef DISPLAYBUFFER
|
||||
pr_set_plane_group(ColorFb, PIXPG_OVERLAY_ENABLE);
|
||||
pr_rop(ColorFb,0,0,
|
||||
ColorFb->pr_width,
|
||||
ColorFb->pr_height, PIX_CLR, 0, 0, 0);
|
||||
#endif /* DISPLAYBUFFER */
|
||||
|
||||
pr_set_plane_group(ColorFb, PIXPG_8BIT_COLOR);
|
||||
#ifdef DISPLAYBUFFER
|
||||
restore_color_screen();
|
||||
mmapstat = (int)mmap(ColorDisplayRegion68k ,
|
||||
Dispcolorsize,
|
||||
PROT_READ | PROT_WRITE,
|
||||
#ifdef OS4
|
||||
MAP_FIXED |
|
||||
#endif
|
||||
MAP_SHARED,
|
||||
FrameBufferFd, 0x40000 );
|
||||
if(mmapstat == -1){
|
||||
perror("cg_four_change_screen: ERROR at mmap system call\n");
|
||||
exit(0);
|
||||
}
|
||||
#endif /* DISPLAYBUFFER */
|
||||
|
||||
MonoOrColor = COLOR_SCREEN;
|
||||
break;
|
||||
}
|
||||
default : {
|
||||
error("cgfour_change_screen_mode:Unknown mode:");
|
||||
}
|
||||
};
|
||||
|
||||
#ifndef DISPLAYBUFFER
|
||||
pr_close(ColorFb);
|
||||
#endif /* DISPLAYBUFFER */
|
||||
|
||||
|
||||
taking_mouse_up(*EmCursorX68K,*EmCursorY68K);
|
||||
ScreenLocked=NIL;
|
||||
return(which_screen);
|
||||
MonoOrColor = MONO_SCREEN;
|
||||
break;
|
||||
}
|
||||
#else /* COLOR */
|
||||
case COLOR_SCREEN: {
|
||||
#ifndef DISPLAYBUFFER
|
||||
pr_set_plane_group(ColorFb, PIXPG_OVERLAY_ENABLE);
|
||||
pr_rop(ColorFb, 0, 0, ColorFb->pr_width, ColorFb->pr_height, PIX_CLR, 0, 0, 0);
|
||||
#endif /* DISPLAYBUFFER */
|
||||
|
||||
LispPTR cgfour_change_screen_mode(which_screen)
|
||||
LispPTR which_screen;
|
||||
pr_set_plane_group(ColorFb, PIXPG_8BIT_COLOR);
|
||||
#ifdef DISPLAYBUFFER
|
||||
restore_color_screen();
|
||||
mmapstat = (int)mmap(ColorDisplayRegion68k, Dispcolorsize, PROT_READ | PROT_WRITE,
|
||||
#ifdef OS4
|
||||
MAP_FIXED |
|
||||
#endif
|
||||
MAP_SHARED,
|
||||
FrameBufferFd, 0x40000);
|
||||
if (mmapstat == -1) {
|
||||
perror("cg_four_change_screen: ERROR at mmap system call\n");
|
||||
exit(0);
|
||||
}
|
||||
#endif /* DISPLAYBUFFER */
|
||||
|
||||
MonoOrColor = COLOR_SCREEN;
|
||||
break;
|
||||
}
|
||||
default: { error("cgfour_change_screen_mode:Unknown mode:"); }
|
||||
};
|
||||
|
||||
#ifndef DISPLAYBUFFER
|
||||
pr_close(ColorFb);
|
||||
#endif /* DISPLAYBUFFER */
|
||||
|
||||
taking_mouse_up(*EmCursorX68K, *EmCursorY68K);
|
||||
ScreenLocked = NIL;
|
||||
return (which_screen);
|
||||
}
|
||||
#else /* COLOR */
|
||||
|
||||
LispPTR cgfour_change_screen_mode(which_screen) LispPTR which_screen;
|
||||
{
|
||||
printf( "Color is not supported.\n" );
|
||||
return (NIL);
|
||||
printf("Color is not supported.\n");
|
||||
return (NIL);
|
||||
}
|
||||
#endif /* COLOR */
|
||||
|
||||
|
||||
/*******************************************************************/
|
||||
/* Func name : cgfour_set_colormap(args)
|
||||
Arg(s) : Passed by args
|
||||
index: colormap index(0~255)
|
||||
red,green,blue:(0~255)
|
||||
Desc : Assign to SUBR 0212
|
||||
Set Colormap entry
|
||||
By Takeshi
|
||||
Arg(s) : Passed by args
|
||||
index: colormap index(0~255)
|
||||
red,green,blue:(0~255)
|
||||
Desc : Assign to SUBR 0212
|
||||
Set Colormap entry
|
||||
By Takeshi
|
||||
*/
|
||||
/*******************************************************************/
|
||||
unsigned char RED_colormap;
|
||||
@@ -252,111 +229,80 @@ unsigned char GRN_colormap;
|
||||
unsigned char BLU_colormap;
|
||||
|
||||
#ifdef COLOR
|
||||
LispPTR cgfour_set_colormap(args)
|
||||
LispPTR args[];
|
||||
{
|
||||
int index;
|
||||
struct pixrect *ColorFb;
|
||||
|
||||
index=args[0] & 0xff;
|
||||
|
||||
RED_colormap = (unsigned char) (args[1] & 0xff);
|
||||
GRN_colormap = (unsigned char) (args[2] & 0xff);
|
||||
BLU_colormap = (unsigned char) (args[3] & 0xff);
|
||||
|
||||
ColorFb = pr_open("/dev/fb");
|
||||
|
||||
if (pr_putcolormap(ColorFb,index,1,
|
||||
&RED_colormap,
|
||||
&GRN_colormap,
|
||||
&BLU_colormap)==-1)
|
||||
perror("putcolormap:");
|
||||
pr_close(ColorFb);
|
||||
return(T);
|
||||
}
|
||||
#else /* COLOR */
|
||||
|
||||
LispPTR cgfour_set_colormap(args)
|
||||
LispPTR args[];
|
||||
LispPTR cgfour_set_colormap(args) LispPTR args[];
|
||||
{
|
||||
printf( "Color is not supported.\n" );
|
||||
return (NIL);
|
||||
int index;
|
||||
struct pixrect *ColorFb;
|
||||
|
||||
index = args[0] & 0xff;
|
||||
|
||||
RED_colormap = (unsigned char)(args[1] & 0xff);
|
||||
GRN_colormap = (unsigned char)(args[2] & 0xff);
|
||||
BLU_colormap = (unsigned char)(args[3] & 0xff);
|
||||
|
||||
ColorFb = pr_open("/dev/fb");
|
||||
|
||||
if (pr_putcolormap(ColorFb, index, 1, &RED_colormap, &GRN_colormap, &BLU_colormap) == -1)
|
||||
perror("putcolormap:");
|
||||
pr_close(ColorFb);
|
||||
return (T);
|
||||
}
|
||||
#else /* COLOR */
|
||||
|
||||
LispPTR cgfour_set_colormap(args) LispPTR args[];
|
||||
{
|
||||
printf("Color is not supported.\n");
|
||||
return (NIL);
|
||||
}
|
||||
#endif /* COLOR */
|
||||
|
||||
|
||||
#ifdef COLOR
|
||||
#ifdef DISPLAYBUFFER
|
||||
static struct pixrect *saved_screen;
|
||||
static int Screen_Saved = T;
|
||||
|
||||
void save_color_screen()
|
||||
{
|
||||
if( !Screen_Saved ) {
|
||||
saved_screen = mem_point( displaywidth
|
||||
, displayheight
|
||||
, 8
|
||||
, ColorDisplayRegion68k );
|
||||
pr_rop( saved_screen
|
||||
, 0, 0, displaywidth, displayheight
|
||||
, PIX_SRC, ColorDisplayPixrect, 0, 0 );
|
||||
Screen_Saved = T;
|
||||
} /* end if(!Screen_Saved) */
|
||||
void save_color_screen() {
|
||||
if (!Screen_Saved) {
|
||||
saved_screen = mem_point(displaywidth, displayheight, 8, ColorDisplayRegion68k);
|
||||
pr_rop(saved_screen, 0, 0, displaywidth, displayheight, PIX_SRC, ColorDisplayPixrect, 0, 0);
|
||||
Screen_Saved = T;
|
||||
} /* end if(!Screen_Saved) */
|
||||
} /* end save_color_screen() */
|
||||
|
||||
void restore_color_screen()
|
||||
{
|
||||
if( Screen_Saved ) {
|
||||
saved_screen = mem_point( displaywidth
|
||||
, displayheight
|
||||
, 8
|
||||
, ColorDisplayRegion68k );
|
||||
pr_rop( ColorDisplayPixrect
|
||||
, 0, 0, displaywidth, displayheight
|
||||
, PIX_SRC, saved_screen, 0, 0 );
|
||||
Screen_Saved = NIL;
|
||||
} /* end if(Screen_Saved) */
|
||||
void restore_color_screen() {
|
||||
if (Screen_Saved) {
|
||||
saved_screen = mem_point(displaywidth, displayheight, 8, ColorDisplayRegion68k);
|
||||
pr_rop(ColorDisplayPixrect, 0, 0, displaywidth, displayheight, PIX_SRC, saved_screen, 0, 0);
|
||||
Screen_Saved = NIL;
|
||||
} /* end if(Screen_Saved) */
|
||||
} /* end restore_color_screen() */
|
||||
#endif /* DISPLAYBUFFER */
|
||||
|
||||
|
||||
static unsigned char red_colormap[256]
|
||||
, green_colormap[256]
|
||||
, blue_colormap[256];
|
||||
static unsigned char red_colormap[256], green_colormap[256], blue_colormap[256];
|
||||
static int Saved_Colormap = NIL;
|
||||
void save_colormap()
|
||||
{
|
||||
struct pixrect *Color_Fb;
|
||||
void save_colormap() {
|
||||
struct pixrect *Color_Fb;
|
||||
|
||||
if( !Saved_Colormap ) {
|
||||
Color_Fb = pr_open( "/dev/fb" );
|
||||
if( (pr_getcolormap( Color_Fb, 0 , 256
|
||||
, red_colormap
|
||||
, green_colormap
|
||||
, blue_colormap )) == -1 )
|
||||
perror("save_color_map:");
|
||||
else
|
||||
Saved_Colormap = T;
|
||||
if (!Saved_Colormap) {
|
||||
Color_Fb = pr_open("/dev/fb");
|
||||
if ((pr_getcolormap(Color_Fb, 0, 256, red_colormap, green_colormap, blue_colormap)) == -1)
|
||||
perror("save_color_map:");
|
||||
else
|
||||
Saved_Colormap = T;
|
||||
|
||||
pr_close( Color_Fb );
|
||||
} /* end if( !Saved_Colormap ) */
|
||||
pr_close(Color_Fb);
|
||||
} /* end if( !Saved_Colormap ) */
|
||||
} /* end save_colormap() */
|
||||
|
||||
void restore_colormap()
|
||||
{
|
||||
struct pixrect *Color_Fb;
|
||||
void restore_colormap() {
|
||||
struct pixrect *Color_Fb;
|
||||
|
||||
if( Saved_Colormap ) {
|
||||
Color_Fb = pr_open( "/dev/fb" );
|
||||
if( (pr_putcolormap( Color_Fb, 0 , 256
|
||||
, red_colormap
|
||||
, green_colormap
|
||||
, blue_colormap )) == -1 )
|
||||
perror("restore_color_map:");
|
||||
pr_close( Color_Fb );
|
||||
Saved_Colormap = NIL;
|
||||
} /* end if( Saved_Colormap ) */
|
||||
if (Saved_Colormap) {
|
||||
Color_Fb = pr_open("/dev/fb");
|
||||
if ((pr_putcolormap(Color_Fb, 0, 256, red_colormap, green_colormap, blue_colormap)) == -1)
|
||||
perror("restore_color_map:");
|
||||
pr_close(Color_Fb);
|
||||
Saved_Colormap = NIL;
|
||||
} /* end if( Saved_Colormap ) */
|
||||
} /* end restore_colormap() */
|
||||
#endif /* COLOR */
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user