/*{{{ open*/
void vd_open(void)
{
ckmgrterm("fontview");
m_setup(M_MODEOK);
m_push(P_FLAGS);
m_setmode(M_ABS);
}
int main(int argc, char *argv[])
{
int slp = 0;
ckmgrterm( *argv );
if (argc>1 && strcmp(argv[1],"-s")==0)
slp++;
m_setup(0);
m_push(P_EVENT|P_FLAGS);
get_size(&x, &y, &hsize, &vsize);
rad = (vsize+hsize)>>6;/* size is the avg. of dims. / 32 */
vx = 5; /* constant horizontal velocity */
vy = 0; /* initial vertical velocity of zero */
x = rad + 1;
y = rad + 1;
bcolor = random()%24;
m_bcolor(bcolor);
while((lcolor = random()%24) == bcolor);
m_linecolor(BIT_SRC,lcolor);
m_fcolor(lcolor);
m_clear();
m_circle(x,y,rad);
for(;;)
{
x1 = x +vx; /* add velocity to x */
if (x1 > MAXX-rad || x1 < rad) {
/* fix coords if over border */
vx *= -1;
x1 += vx;
}
vy += ACC; /* accelerate vertical velocity */
y1 = y + vy; /* add velocity to y */
if (y1 > MAXY-rad || y1 < rad) {
m_circle(x1,MAXY-rad,rad);
vy = -vy * 95 /100;
if (abs(vy) < ACC) {
usleep(900000);
}
y1 += vy;
}
m_circle(x1,y1,rad); /* draw new position */
x = x1; /* reset x and y */
y = y1;
m_flush();
if (slp)
usleep(90000);
}
return 0;
}
/*{{{ main*/
int main(int argc, char *argv[])
{
/*{{{ variables*/
int lx,ly,rx,ry,x,y,b, my_x, my_y, my_width, my_height, screen_width, screen_height, screen_depth, puiple, keypress;
char evstr[10];
int ox=-1, oy=-1;
/*}}} */
/*{{{ setup*/
ckmgrterm(argv[0]);
m_setup(M_MODEOK);
signal(SIGINT,clean);
signal(SIGTERM,clean);
m_ttyset();
m_push(P_ALL);
m_setmode(M_ABS);
m_setcursor(CS_INVIS);
m_setevent(REDRAW, "|R\n");
m_setevent(RESHAPE, "|r\n");
m_setevent(MOVE, "|m\n");
m_flush();
/*}}} */
m_getwindowsize(&my_width,&my_height);
m_getwindowposition(&my_x,&my_y);
m_getscreensize(&screen_width,&screen_height,&screen_depth);
mkeye(my_width/2,my_height,&puiple);
redraw(my_width,my_height);
do
{
m_flush();
switch (m_getevent(100,&keypress,evstr,sizeof(evstr)))
{
case EV_TIMEOUT:
{
int olx,oly,orx,ory;
assert(m_getmousepos(&x,&y,&b));
if (x!=ox || y!=oy)
{
/*{{{ left eye*/
olx=lx; oly=ly;
lx=30*(x-(my_x+my_width/4))/screen_width;
ly=30*(y-(my_y+my_height/2))/screen_height;
while (lx*lx+ly*ly>=25*25) { lx=(10*lx)/11; ly=(10*ly)/11; }
lx=(puiple*lx)/10;
ly=(puiple*ly)/10;
/*}}} */
/*{{{ right eye*/
orx=rx; ory=ry;
rx=30*(x-(my_x+(3*my_width)/4))/screen_width;
ry=ly;
while (rx*rx+ry*ry>=25*25) { rx=(10*rx)/11; ry=(10*ry)/11; }
rx=(puiple*rx)/10;
ry=(puiple*ry)/10;
/*}}} */
if (ox!=-1) clr_puiple(my_width,my_height,puiple,olx,oly,orx,ory);
set_puiple(my_width,my_height,puiple,lx,ly,rx,ry);
}
ox=x; oy=y;
break;
}
case EV_KEYPRESS: break;
case EV_EVENTSTR:
{
ox=-1; oy=-1;
switch (*evstr)
{
case 'R': redraw(my_width,my_height); break;
case 'r':
{
m_getwindowsize(&my_width,&my_height);
m_getwindowposition(&my_x,&my_y);
m_bitdestroy(EYE_BITMAP);
m_bitdestroy(PUIPLE_BITMAP);
mkeye(my_width/2,my_height,&puiple);
redraw(my_width,my_height);
break;
}
case 'm': m_getwindowposition(&my_x,&my_y); break;
default: assert(0);
}
break;
}
default: assert(0);
}
} while (keypress!='q');
clean(0);
return 255;
}
/*{{{ main*/
int main(int argc, char *argv[])
{
/*{{{ variables*/
enum { NOTHING, LOCAL, REMOTE } in=NOTHING;
int c;
int x,y;
int mouse_x,mouse_y;
int image_width,image_height;
int image_xoffset=0,image_yoffset=0;
int my_width,my_height;
int err=0,usage=0;
BITMAP *bp;
FILE *input;
static struct menu_entry menu[] = { { "quit","q" } };
char file[_POSIX_PATH_MAX];
/*}}} */
/*{{{ parse arguments*/
while ((c=getopt(argc,argv,"l:r:"))!=EOF)
{
switch (c)
{
/*{{{ l file*/
case 'l':
{
if ((input=fopen(optarg,"r"))==(FILE*)0)
{
fprintf(stderr,"%s: Can't open %s\r\n",argv[0],optarg);
err=1;
}
else in=LOCAL;
break;
}
/*}}} */
/*{{{ r file*/
case 'r':
{
char *cwd;
in=REMOTE;
if (*optarg!='/' && *optarg!='.')
{
if ((cwd=getcwd((char*)0,(size_t)0))!=(char*)0) { strcpy(file,cwd); strcat(file,"/"); strcat(file,optarg); }
else { fprintf(stderr,"%s: Can't get current directory\r\n",argv[0]); err=1; }
}
else strcpy(file,optarg);
break;
}
/*}}} */
/*{{{ default*/
default:
{
usage=1;
break;
}
/*}}} */
}
}
if (err) exit(err);
if (usage || optind!=argc)
{
fprintf(stderr,"Usage: mgrview [-l file | -r file]\n");
exit(1);
}
if (in==NOTHING) { in=LOCAL; input=stdin; }
/*}}} */
/*{{{ setup*/
ckmgrterm(argv[0]);
m_setup(M_MODEOK);
signal(SIGINT,clean);
signal(SIGTERM,clean);
signal(SIGPIPE,clean);
m_ttyset();
m_push(P_MENU|P_EVENT|P_FLAGS);
m_setmode(M_ABS);
m_setcursor(CS_INVIS);
menu_load(1,1,menu);
m_setevent(REDRAW, "R");
m_setevent(RESHAPE, "R");
m_setevent(BUTTON_1,"[%p]");
m_setevent(BUTTON_2,"m");
m_flush();
/*}}} */
if (in==LOCAL)
{
/*{{{ load bitmap to client space*/
if ((bp=bitmapread(input))==(BITMAP*)0)
{
fprintf(stderr,"%s: No MGR bitmap.\r\n",argv[0]);
clean(1);
}
image_width=BIT_WIDE(bp);
image_height=BIT_HIGH(bp);
/*}}} */
/*{{{ transfer bitmap to server space*/
m_func(BIT_SRC);
m_bitcreate(IMAGE_BITMAP,image_width,image_height);
m_bitldto(image_width,image_height,0,0,IMAGE_BITMAP,bit_size(image_width,image_height,BIT_DEPTH(bp)));
fwrite(BIT_DATA(bp),bit_size(image_width,image_height,BIT_DEPTH(bp)),1,m_termout);
m_flush();
bit_destroy(bp);
/*}}} */
}
else if (in==REMOTE)
{
/*{{{ transfer bitmap from server fs to server space*/
m_bitfromfile(IMAGE_BITMAP,file);
m_get();
if (sscanf(m_linebuf,"%d %d",&image_width,&image_height)<2)
{
fprintf(stderr,"%s: No MGR bitmap.\r\n",argv[0]);
clean(1);
}
/*}}} */
}
/*{{{ user interaction*/
get_size((int*)0,(int*)0,&my_width,&my_height);
display(image_xoffset,image_yoffset,my_width,my_height,image_width,image_height);
m_flush();
while ((c=getc(m_termin))!='q') switch (c)
{
/*{{{ m -- left button displays menu*/
case 'm':
{
m_selectmenu(1);
m_flush();
break;
}
/*}}} */
/*{{{ [%d %d] -- right button*/
case '[':
{
fscanf(m_termin,"%d %d]",&mouse_x,&mouse_y);
/*{{{ compute new x start*/
if (my_width>image_width) image_xoffset=0;
else if (mouse_x<=0) image_xoffset=0;
else if (mouse_x>=my_width) image_xoffset=my_width-image_width;
else
{
/*{{{ move x start by difference from mouse and middle*/
image_xoffset=image_xoffset-(mouse_x-my_width/2);
/*}}} */
/*{{{ check and corrent range of x start*/
if (image_xoffset<my_width-image_width) image_xoffset=my_width-image_width;
else if (image_xoffset>0) image_xoffset=0;
/*}}} */
}
/*}}} */
/*{{{ compute new y start*/
if (my_height>image_height) image_yoffset=0;
else if (mouse_y<=0) image_yoffset=0;
else if (mouse_y>=my_height) image_yoffset=my_height-image_height;
else
{
/*{{{ move y start by difference from mouse and middle*/
image_yoffset=image_yoffset-(mouse_y-my_height/2);
/*}}} */
/*{{{ check and corrent range of y start*/
if (image_yoffset<my_height-image_height) image_yoffset=my_height-image_height;
else if (image_yoffset>0) image_yoffset=0;
/*}}} */
}
/*}}} */
display(image_xoffset,image_yoffset,my_width,my_height,image_width,image_height);
m_flush();
break;
}
/*}}} */
/*{{{ R -- redraw*/
case 'R':
{
get_size((int*)0,(int*)0,&my_width,&my_height);
/*{{{ compute new x offset*/
if (my_width<image_width)
{
if (image_xoffset<my_width-image_width) image_xoffset=my_width-image_width;
}
else image_xoffset=0;
/*}}} */
/*{{{ compute new y offset*/
if (my_height<image_height)
{
if (image_yoffset<my_height-image_height) image_yoffset=my_height-image_height;
}
else image_yoffset=0;
/*}}} */
m_func(BIT_CLR);
m_bitwrite(0,0,my_width,my_height);
m_func(BIT_SRC);
m_bitcopyto(image_xoffset,image_yoffset,image_width,image_height,0,0,WINDOW_BITMAP,IMAGE_BITMAP);
m_flush();
break;
}
/*}}} */
}
/*}}} */
/*{{{ exit*/
m_bitdestroy(IMAGE_BITMAP);
get_colrow(&x,&y);
m_move(0,y-1);
clean(0);
/* NOTREACHED */
return 255;
/*}}} */
}
/*{{{ main*/
int main(int argc, char *argv[])
{
/*{{{ variables*/
enum { NOTHING, OTHER_FS, SAME_FS } in=NOTHING;
int c;
int mouse_x,mouse_y;
int image_width,image_height;
int image_xoffset=0,image_yoffset=0;
int my_width,my_height;
int image_depth,image_size;
int err=0,usage=0;
FILE *input=(FILE*)0;
static struct menu_entry menu[] =
{
{ "Normal","|n\n" },
{ "Reverse","|r\n" },
{ "-------", "" },
{ "Quit","|q\n" }
};
char file[_POSIX_PATH_MAX];
char event[20];
/*}}} */
/*{{{ parse arguments*/
while ((c=getopt(argc,argv,"ro:s:"))!=EOF)
{
switch (c)
{
/*{{{ r*/
case 'r': display_op=BIT_NOT(BIT_SRC); break;
/*}}} */
/*{{{ o file*/
case 'o':
{
if ((input=fopen(optarg,"r"))==(FILE*)0)
{
fprintf(stderr,"%s: Can't open %s\r\n",argv[0],optarg);
err=1;
}
else in=OTHER_FS;
break;
}
/*}}} */
/*{{{ s file*/
case 's':
{
char *cwd;
in=SAME_FS;
if (*optarg!='/' && *optarg!='.')
{
if ((cwd=getcwd((char*)0,(size_t)0))!=(char*)0) { strcpy(file,cwd); strcat(file,"/"); strcat(file,optarg); }
else { fprintf(stderr,"%s: Can't get current directory\r\n",argv[0]); err=1; }
}
else strcpy(file,optarg);
break;
}
/*}}} */
/*{{{ default*/
default:
{
usage=1;
break;
}
/*}}} */
}
}
if (err) exit(err);
if (usage || optind!=argc)
{
fprintf(stderr,"Usage: mgrview [-o file | -s file]\n");
exit(1);
}
if (in==NOTHING) { in=OTHER_FS; input=stdin; }
/*}}} */
/*{{{ setup*/
ckmgrterm(argv[0]);
m_setup(M_MODEOK);
signal(SIGINT,clean);
signal(SIGTERM,clean);
signal(SIGPIPE,clean);
m_ttyset();
m_push(P_ALL);
m_setmode(M_ABS);
m_setcursor(CS_INVIS);
menu_load(1,4,menu);
m_setevent(REDRAW, "|R\n");
m_setevent(RESHAPE, "|R\n");
m_setevent(BUTTON_1,"|!%p!\n");
m_setevent(BUTTON_2,"|m\n");
m_flush();
/*}}} */
if (in==OTHER_FS)
{
/*{{{ variables*/
struct b_header bh;
void *bp;
/*}}} */
/*{{{ load bitmap to client space*/
if (fread(&bh,sizeof(struct b_header),1,input)!=1)
{
fprintf(stderr,"%s: Can't read header of bitmap.\r\n",argv[0]);
clean(1);
}
if (!B_ISHDR8(&bh))
{
fprintf(stderr,"%s: No MGR bitmap or old format.\r\n",argv[0]);
clean(1);
}
B_GETHDR8(&bh,image_width,image_height,image_depth);
image_size=B_SIZE8(image_width,image_height,image_depth);
/*}}} */
/*{{{ transfer bitmap to server space*/
m_func(BIT_SRC);
m_bitcreate(IMAGE_BITMAP,image_width,image_height);
m_bitldto(image_width,image_height,0,0,IMAGE_BITMAP,image_size);
bp=malloc(image_size);
fread(bp,image_size,1,input);
fwrite(bp,image_size,1,m_termout);
free(bp);
/*}}} */
}
else if (in==SAME_FS)
/*{{{ transfer bitmap from server fs to server space*/
{
m_bitfromfile(IMAGE_BITMAP,file);
m_get();
if (sscanf(m_linebuf,"%d %d",&image_width,&image_height)<2)
{
fprintf(stderr,"%s: MGR server can't load MGR bitmap.\r\n",argv[0]);
clean(1);
}
}
/*}}} */
/*{{{ user interaction*/
m_getwindowsize(&my_width,&my_height);
display(image_xoffset,image_yoffset,my_width,my_height,image_width,image_height);
m_flush();
do
{
if (m_getevent(10000,&c,event,sizeof(event))==EV_EVENTSTR) switch (event[0])
{
/*{{{ n,r*/
case 'n':
case 'r':
{
display_op=(c=='n' ? BIT_SRC : BIT_NOT(BIT_SRC));
m_func(display_op);
m_bitcopyto(image_xoffset,image_yoffset,image_width,image_height,0,0,WINDOW_BITMAP,IMAGE_BITMAP);
m_flush();
break;
}
/*}}} */
/*{{{ m -- left button displays menu*/
case 'm':
{
m_selectmenu(1);
m_flush();
break;
}
/*}}} */
/*{{{ !%d %d! -- right button*/
case '!':
{
sscanf(event,"!%d %d!",&mouse_x,&mouse_y);
/*{{{ compute new x start*/
if (my_width>image_width) image_xoffset=0;
else if (mouse_x<=0) image_xoffset=0;
else if (mouse_x>=my_width) image_xoffset=my_width-image_width;
else
{
/*{{{ move x start by difference from mouse and middle*/
image_xoffset=image_xoffset-(mouse_x-my_width/2);
/*}}} */
/*{{{ check and corrent range of x start*/
if (image_xoffset<my_width-image_width) image_xoffset=my_width-image_width;
else if (image_xoffset>0) image_xoffset=0;
/*}}} */
}
/*}}} */
/*{{{ compute new y start*/
if (my_height>image_height) image_yoffset=0;
else if (mouse_y<=0) image_yoffset=0;
else if (mouse_y>=my_height) image_yoffset=my_height-image_height;
else
{
/*{{{ move y start by difference from mouse and middle*/
image_yoffset=image_yoffset-(mouse_y-my_height/2);
/*}}} */
/*{{{ check and corrent range of y start*/
if (image_yoffset<my_height-image_height) image_yoffset=my_height-image_height;
else if (image_yoffset>0) image_yoffset=0;
/*}}} */
}
/*}}} */
display(image_xoffset,image_yoffset,my_width,my_height,image_width,image_height);
m_flush();
break;
}
/*}}} */
/*{{{ R -- redraw*/
case 'R':
{
m_getwindowsize(&my_width,&my_height);
/*{{{ compute new x offset*/
if (my_width<image_width)
{
if (image_xoffset<my_width-image_width) image_xoffset=my_width-image_width;
}
else image_xoffset=0;
/*}}} */
/*{{{ compute new y offset*/
if (my_height<image_height)
{
if (image_yoffset<my_height-image_height) image_yoffset=my_height-image_height;
}
else image_yoffset=0;
/*}}} */
m_func(BIT_CLR);
m_bitwrite(0,0,my_width,my_height);
m_func(display_op);
m_bitcopyto(image_xoffset,image_yoffset,image_width,image_height,0,0,WINDOW_BITMAP,IMAGE_BITMAP);
m_flush();
break;
}
/*}}} */
}
} while (event[0]!='q');
/*}}} */
/*{{{ exit*/
m_bitdestroy(IMAGE_BITMAP);
clean(0);
/*}}} */
return 255;
}
int main(int argc, char *argv[])
{
register int i;
int xpos = XPOS;
int ypos = YPOS;
int font = -1;
int shape = 1;
char *getenv();
char *home = getenv("HOME");
int clean(), update();
/* make sure we have a valid environment to run in */
ckmgrterm( *argv );
if (home==NULL || *home=='\0') {
fprintf(stderr,"%s: Can't find your home directory\n",argv[0]);
exit(1);
}
if ((bounds = fopen(BOUNDS,"r")) == NULL) {
fprintf(stderr,"%s: Can't find a bounds file\n",argv[0]);
exit(2);
}
sprintf(line,"%s/%s",home,RC);
if ((rc = fopen(line,"r")) == NULL) {
fprintf(stderr,"%s: Can't find %s\n",argv[0],line);
exit(3);
}
/* process arguments */
for(i=1;i<argc;i++) {
if (Isflag(argv[i],"-s"))
shape = 0;
else if (Isflag(argv[i],"-x"))
xpos = atoi(argv[i]+2);
else if (Isflag(argv[i],"-y"))
ypos = atoi(argv[i]+2);
else if (Isflag(argv[i],"-f"))
font = atoi(argv[i]+2);
else if (Isflag(argv[i],"-p"))
poll = Max(atoi(argv[i]+2),10);
else
usage(argv[0],argv[i]);
}
/* setup mgr stuff */
m_setup(M_FLUSH);
m_push(P_MENU|P_EVENT|P_FLAGS);
m_setmode(M_NOWRAP);
m_ttyset();
signal(SIGTERM,clean);
signal(SIGINT,clean);
signal(SIGALRM,update);
menu_load(1,MENU_COUNT,menu);
m_selectmenu(1);
old_msg_cnt = MSGS();
get_msg(line,old_msg_cnt);
if (shape) {
m_setmode(M_ACTIVATE);
m_size(strlen(line)+2,1);
}
m_printstr(line);
m_setevent(REDRAW,"R\n");
m_setevent(ACTIVATED,"A\n");
m_clearmode(M_ACTIVATE);
alarm(poll);
while(1) {
char buff[80];
m_gets(buff);
alarm(0);
/* read msgs */
old_msg_cnt = msg_cnt;
msg_cnt = MSGS();
if (msg_cnt > 0 && *buff == 'A') {
m_push(P_POSITION|P_EVENT|P_FLAGS|P_FONT);
if (font != -1)
m_font(font);
m_sizeall(xpos,ypos,80,24);
m_printstr("\freading msgs...\r");
m_ttyreset();
system(MSGSCMD);
m_gets(buff);
m_ttyset();
m_pop();
}
/* wait for window to deactivate */
else if (*buff == 'A') {
m_setevent(DEACTIVATED,RESUME);
do {
m_printstr("\f Your msgs system here ");
m_gets(buff);
} while(!SCMP(buff,RESUME));
m_clearevent(DEACTIVATED);
}
old_msg_cnt = msg_cnt;
msg_cnt = MSGS();
get_msg(line,msg_cnt);
m_printstr(line);
m_clearmode(M_ACTIVATE);
alarm(poll);
}
return 0;
}