xenocara/app/fvwm/extras/FvwmGoodStuff/FvwmGoodStuff.c

1645 lines
44 KiB
C
Raw Normal View History

/* This module, and the entire GoodStuff program, and the concept for
* interfacing this module to the Window Manager, are all original work
* by Robert Nation
*
* Copyright 1993, Robert Nation. No guarantees or warantees or anything
* are provided or implied in any way whatsoever. Use this program at your
* own risk. Permission to use this program for any purpose is given,
* as long as the copyright is kept intact. */
#define TRUE 1
#define FALSE
#include "config.h"
#ifdef HAVE_SYS_BSDTYPES_H
#include <sys/bsdtypes.h> /* Saul */
#endif
#include <stdio.h>
#include <signal.h>
#include <fcntl.h>
#include <string.h>
#include <sys/wait.h>
#include <sys/time.h>
#if HAVE_SYS_SELECT_H
#include <sys/select.h>
#endif
#include <unistd.h>
#include <ctype.h>
#include <stdlib.h>
#include "../../fvwm/module.h"
#include <X11/keysym.h>
#include <X11/Xlib.h>
#include <X11/Xutil.h>
#include <X11/Xproto.h>
#include <X11/Xatom.h>
#include <X11/Intrinsic.h>
#include "FvwmGoodStuff.h"
char *MyName;
XFontStruct *font;
Display *dpy; /* which display are we talking to */
int x_fd,fd_width;
Window Root;
int screen;
int d_depth;
char *GoodStuffBack = "#908090";
char *GoodStuffFore = "black";
char *font_string = "fixed";
Pixel hilite_pix, back_pix, shadow_pix, fore_pix;
GC NormalGC,ShadowGC,ReliefGC;
Window main_win;
int Width, Height,win_x,win_y;
#define MW_EVENTS (ExposureMask | StructureNotifyMask| ButtonReleaseMask |\
ButtonPressMask|KeyReleaseMask|KeyPressMask)
int num_buttons = 0;
int num_rows = 0;
int num_columns = 0;
int max_internal_width = 30,max_internal_height = 0;
int ButtonWidth,ButtonHeight;
int x= -100000,y= -100000,w= -1,h= -1,gravity = NorthWestGravity;
int new_desk = 0;
int ready = 0;
int xneg = 0, yneg = 0;
int xpad = 2, ypad = 4, framew = 2;
int CurrentButton = -1;
int fd[2];
struct button_info Buttons[MAX_BUTTONS];
char *iconPath = NULL;
char *pixmapPath = NULL;
static Atom wm_del_win;
Atom _XA_WM_PROTOCOLS;
Atom _XA_WM_NORMAL_HINTS;
Atom _XA_WM_NAME;
/***********************************************************************
*
* Procedure:
* main - start of fvwm
*
***********************************************************************
*/
int main(int argc, char **argv)
{
char *display_name = NULL;
int i,j;
Window root;
int x,y,border_width,depth,button;
char *temp, *s;
if((argc != 6)&&(argc != 7))
{
fprintf(stderr,"%s Version %s should only be executed by fvwm!\n",argv[0],
VERSION);
exit(1);
}
temp = argv[0];
s=strrchr(argv[0], '/');
if (s != NULL)
temp = s + 1;
/*
** if name passed in, use that instead
*/
if (argc > 6)
temp = argv[6];
MyName = safemalloc(strlen(temp)+1);
strcpy(MyName, temp);
for(i=0;i<MAX_BUTTONS;i++)
{
Buttons[i].title = NULL;
Buttons[i].action = NULL;
Buttons[i].icon_file = NULL;
Buttons[i].icon_w = 0;
Buttons[i].icon_h = 0;
Buttons[i].BWidth = 1;
Buttons[i].BHeight = 1;
Buttons[i].IconWin = None;
Buttons[i].icon_maskPixmap = None; /* pixmap for the icon mask */
Buttons[i].iconPixmap = None;
Buttons[i].icon_depth = 0;
Buttons[i].up = 1; /* Buttons start up */
Buttons[i].hangon = NULL; /* don't wait on anything yet*/
}
signal (SIGPIPE, DeadPipe);
signal (SIGINT, DeadPipe); /* cleanup on other ways of closing too */
signal (SIGHUP, DeadPipe);
signal (SIGQUIT, DeadPipe);
signal (SIGTERM, DeadPipe);
fd[0] = atoi(argv[1]);
fd[1] = atoi(argv[2]);
if (!(dpy = XOpenDisplay(display_name)))
{
fprintf(stderr,"%s: can't open display %s", MyName,
XDisplayName(display_name));
exit (1);
}
x_fd = XConnectionNumber(dpy);
fd_width = GetFdWidth();
screen= DefaultScreen(dpy);
Root = RootWindow(dpy, screen);
if(Root == None)
{
fprintf(stderr,"%s: Screen %d is not valid ", MyName, screen);
exit(1);
}
d_depth = DefaultDepth(dpy, screen);
SetMessageMask(fd, M_NEW_DESK | M_END_WINDOWLIST|
M_MAP| M_RES_NAME| M_RES_CLASS| M_CONFIG_INFO|
M_END_CONFIG_INFO| M_WINDOW_NAME);
ParseOptions();
if(num_buttons == 0)
{
fprintf(stderr,"%s: No Buttons defined. Quitting\n", MyName);
exit(0);
}
/* load the font, or none */
if (strncasecmp(font_string,"none",4)==0)
{
font=NULL;
}
else
{
if ((font = XLoadQueryFont(dpy, font_string)) == NULL)
{
if ((font = XLoadQueryFont(dpy, "fixed")) == NULL)
{
fprintf(stderr,"%s: No fonts available\n",MyName);
exit(1);
}
}
};
for(i=0;i<num_buttons;i++)
{
LoadIconFile(i);
if(Buttons[i].icon_w/Buttons[i].BWidth > max_internal_width)
max_internal_width = Buttons[i].icon_w/Buttons[i].BWidth;
if( (Buttons[i].title && strcmp(Buttons[i].title,"-")==0) ||
font==NULL )
{
if(Buttons[i].icon_h/Buttons[i].BHeight > max_internal_height)
max_internal_height = Buttons[i].icon_h/Buttons[i].BHeight;
}
else
{
if(Buttons[i].icon_h/Buttons[i].BHeight + font->ascent + font->descent > max_internal_height)
max_internal_height=Buttons[i].icon_h/Buttons[i].BHeight + font->ascent + font->descent;
};
}
CreateWindow();
for(i=0;i<num_buttons;i++)
{
CreateIconWindow(i);
}
XGetGeometry(dpy,main_win,&root,&x,&y,
(unsigned int *)&Width,(unsigned int *)&Height,
(unsigned int *)&border_width,(unsigned int *)&depth);
ButtonWidth = (Width+1) / num_columns;
ButtonHeight = (Height+1) / num_rows;
for(i=0;i<num_rows;i++)
for(j=0;j<num_columns; j++)
{
button = i*num_columns + j;
ConfigureIconWindow(button,i,j);
}
XMapSubwindows(dpy,main_win);
XMapWindow(dpy,main_win);
/* request a window list, since this triggers a response which
* will tell us the current desktop and paging status, needed to
* indent buttons correctly */
SendText(fd,"Send_WindowList",0);
Loop();
return 0;
}
/***********************************************************************
*
* Procedure:
* Loop - wait for data to process
*
***********************************************************************/
void Loop(void)
{
Window root;
int x,y,border_width,depth,CurrentRow,CurrentColumn;
XEvent Event;
int NewButton,i,j,button,tw,th,i2,ih,iw,i3;
char *temp,*tmp;
char buffer[10];
KeySym keysym;
int blah;
while(1)
{
if(My_XNextEvent(dpy,&Event))
{
switch(Event.type)
{
case Expose:
if((Event.xexpose.count == 0)&&
(Event.xany.window == main_win))
{
if(ready < 1)
ready ++;
RedrawWindow(-1);
}
break;
case ConfigureNotify:
XGetGeometry(dpy,main_win,&root,&x,&y,
(unsigned int *)&tw,(unsigned int *)&th,
(unsigned int *)&border_width,
(unsigned int *)&depth);
if((tw != Width)||(th!= Height))
{
Width = tw;
Height = th;
ButtonWidth = (Width+1) / num_columns;
ButtonHeight = (Height+1) / num_rows;
XClearWindow(dpy,main_win);
for(i=0;i<num_rows;i++)
for(j=0;j<num_columns; j++)
{
button = i*num_columns + j;
if(Buttons[button].swallow == 0)
ConfigureIconWindow(button,i,j);
else if(Buttons[button].swallow == 3)
{
ih = Buttons[button].BHeight*ButtonHeight;
iw = Buttons[button].BWidth*ButtonWidth;
Buttons[button].icon_w =
iw - 2*framew;
if(strcmp(Buttons[button].title,"-")==0||font==NULL)
{
Buttons[button].icon_h =
ih - 2*framew;
}
else
{
Buttons[button].icon_h =
ih - 2*framew - font->ascent - font->descent;
ih -= font->ascent + font->descent;
}
ConstrainSize(&Buttons[button].hints,
&Buttons[button].icon_w,
&Buttons[button].icon_h);
XResizeWindow(dpy,Buttons[button].IconWin,
Buttons[button].icon_w,
Buttons[button].icon_h);
XMoveWindow(dpy,Buttons[button].IconWin,
j*ButtonWidth +
((iw - Buttons[button].icon_w)>>1),
i*ButtonHeight +
((ih - Buttons[button].icon_h)>>1));
}
}
RedrawWindow(-1);
}
break;
case KeyPress:
blah = XLookupString(&Event.xkey, buffer, 10,
&keysym, 0);
if ((keysym != XK_Return) && (keysym != XK_KP_Enter)
&& (keysym != XK_Linefeed))
break;
/* fall through */
case ButtonPress:
CurrentRow = (Event.xbutton.y/ButtonHeight);
CurrentColumn = (Event.xbutton.x/ButtonWidth);
CurrentButton = CurrentColumn + CurrentRow*num_columns;
for(i=0;i<=CurrentRow;i++)
for(j=0;j<= CurrentColumn; j++)
if(Buttons[i*num_columns+j].title!= NULL)
{
if(((CurrentRow - i)< Buttons[i*num_columns+j].BHeight)&&
(CurrentColumn-j)< Buttons[i*num_columns+j].BWidth)
{
CurrentButton = i*num_columns+j;
}
}
RedrawWindow(CurrentButton);
break;
case KeyRelease:
case ButtonRelease:
CurrentRow = (Event.xbutton.y/ButtonHeight);
CurrentColumn = (Event.xbutton.x/ButtonWidth);
NewButton = CurrentColumn + CurrentRow*num_columns;
for(i=0;i<=CurrentRow;i++)
for(j=0;j<= CurrentColumn; j++)
if(Buttons[i*num_columns+j].title!= NULL)
{
if(((CurrentRow - i)< Buttons[i*num_columns+j].BHeight)&&
(CurrentColumn-j)< Buttons[i*num_columns+j].BWidth)
{
NewButton = i*num_columns+j;
}
}
if(NewButton == CurrentButton)
{
if((Buttons[CurrentButton].action)&&
(strncasecmp(Buttons[CurrentButton].action,"exec",4)== 0))
{
/* Look for Exec "identifier", in which
* case the button stays down until window
* "identifier" materializes */
i=4;
while((Buttons[CurrentButton].action[i] != 0)&&
(Buttons[CurrentButton].action[i] != '"')&&
isspace(Buttons[CurrentButton].action[i]))
i++;
if(Buttons[CurrentButton].action[i] == '"')
{
i2=i+1;
while((Buttons[CurrentButton].action[i2] != 0)&&
(Buttons[CurrentButton].action[i2] != '"'))
i2++;
}
else
i2 = i;
if(i2 - i >1)
{
Buttons[CurrentButton].hangon = safemalloc(i2-i);
strncpy(Buttons[CurrentButton].hangon,
&Buttons[CurrentButton].action[i+1],i2-i-1);
Buttons[CurrentButton].hangon[i2-i-1] = 0;
Buttons[CurrentButton].up = 0;
Buttons[CurrentButton].swallow = 0;
}
else
{
#if 0
i2 = 4; /* ckh - should this be i2++ instead? */
#else
i2++;
#endif
}
tmp=safemalloc(strlen(Buttons[CurrentButton].action));
strcpy(tmp,"Exec ");
i3= i2+1;
while((Buttons[CurrentButton].action[i3] != 0)&&
(isspace(Buttons[CurrentButton].action[i3])))
i3++;
strcat(tmp,&Buttons[CurrentButton].action[i3]);
SendInfo(fd,tmp,0);
free(tmp);
/* }
else
SendInfo(fd,Buttons[CurrentButton].action,0);
*/
}
else
{
/* fprintf(stderr,"sending action to fvwm\n"); */
SendInfo(fd,Buttons[CurrentButton].action,0);
}
}
CurrentButton = -1;
RedrawWindow(CurrentButton);
break;
case ClientMessage:
if ((Event.xclient.format==32) &&
(Event.xclient.data.l[0]==wm_del_win))
{
DeadPipe(1);
}
break;
case PropertyNotify:
for(i=0;i<num_rows;i++)
for(j=0;j<num_columns; j++)
{
button = i*num_columns + j;
if((Buttons[button].swallow == 3)&&
(Event.xany.window == Buttons[button].IconWin)&&
(Event.xproperty.atom == XA_WM_NAME))
{
XFetchName(dpy, Buttons[button].IconWin, &temp);
if(strcmp(Buttons[button].title,"-")!=0)
CopyString(&Buttons[button].title, temp);
XFree(temp);
XClearArea(dpy,main_win,j*ButtonWidth,
i*ButtonHeight, ButtonWidth,ButtonHeight,0);
RedrawWindow(button);
}
if((Buttons[button].swallow == 3)&&
(Event.xany.window == Buttons[button].IconWin)&&
(Event.xproperty.atom == XA_WM_NORMAL_HINTS))
{
int iw,ih;
long supplied;
if (!XGetWMNormalHints (dpy, Buttons[button].IconWin,
&Buttons[button].hints,
&supplied))
Buttons[button].hints.flags = 0;
ih = Buttons[button].icon_h + 2*framew;
iw = Buttons[button].icon_w + 2*framew;
ConstrainSize(&Buttons[button].hints,
&Buttons[button].icon_w,
&Buttons[button].icon_h);
XResizeWindow(dpy,Buttons[button].IconWin,
Buttons[button].icon_w,
Buttons[button].icon_h);
XMoveWindow(dpy,Buttons[button].IconWin,
j*ButtonWidth +
((iw - Buttons[button].icon_w)>>1),
i*ButtonHeight +
((ih - Buttons[button].icon_h)>>1));
}
}
break;
default:
break;
}
}
}
return;
}
/************************************************************************
*
* Draw the window
*
***********************************************************************/
void RedrawWindow(int newbutton)
{
int i,j,w,button,len,yoff2,BW,BH;
XEvent dummy;
int val1,val2;
if(ready < 1)
return;
while (XCheckTypedWindowEvent (dpy, main_win, Expose, &dummy));
for(i=0;i<num_rows;i++)
for(j=0;j<num_columns; j++)
{
button = i*num_columns + j;
BW = ButtonWidth*Buttons[button].BWidth;
BH = ButtonHeight*Buttons[button].BHeight;
if((newbutton == -1)||(newbutton == button))
{
if((Buttons[button].swallow == 3)&&
(Buttons[button].IconWin != None))
XSetWindowBorderWidth(dpy,Buttons[button].IconWin,0);
if(Buttons[button].title != NULL)
{
if(strcmp(Buttons[button].title,"-")!=0 && font)
{
len = strlen(Buttons[button].title);
w=XTextWidth(font,Buttons[button].title,len);
while((w > (BW-2*framew))&&(len>0))
{
len--;
w=XTextWidth(font,Buttons[button].title,len);
}
if(len>0)
{
if((Buttons[button].icon_w>0)&&
(Buttons[button].icon_h>0))
{
yoff2 = BH - font->descent - 2*framew;
XDrawString(dpy,main_win,NormalGC,
j*ButtonWidth+((BW - w)>>1),
i*ButtonHeight+yoff2,
Buttons[button].title, len);
}
else
{
XDrawString(dpy,main_win,NormalGC,
j*ButtonWidth+((BW - w)>>1),
i*ButtonHeight+((ButtonHeight +
font->ascent - font->descent)>>1),
Buttons[button].title, len);
}
}
}
if((Buttons[button].action)&&
(strncasecmp(Buttons[button].action,"Desk",4)==0))
{
sscanf(&Buttons[button].action[4],"%d %d",&val1,&val2);
if((val1 == 0)&&(val2 == new_desk))
{
RelieveWindow(main_win,j*ButtonWidth, i*ButtonHeight,
BW, BH, ShadowGC,ReliefGC);
}
else
RelieveWindow(main_win,j*ButtonWidth, i*ButtonHeight,
BW, BH,
(CurrentButton==button)?ShadowGC:ReliefGC,
(CurrentButton==button)?ReliefGC:ShadowGC);
}
else if(Buttons[button].up == 1)
{
RelieveWindow(main_win,j*ButtonWidth, i*ButtonHeight,
BW, BH,
(CurrentButton == button)?ShadowGC:ReliefGC,
(CurrentButton == button)?ReliefGC:ShadowGC);
}
else
{
RelieveWindow(main_win,j*ButtonWidth, i*ButtonHeight,
BW, BH, ShadowGC,ReliefGC);
}
}
}
}
}
/****************************************************************************
*
* Draws the relief pattern around a window
*
****************************************************************************/
void RelieveWindow(Window win,int x,int y,int w,int h, GC rgc,GC sgc)
{
XSegment seg[4];
int i;
i=0;
seg[i].x1 = x; seg[i].y1 = y;
seg[i].x2 = w+x-1; seg[i++].y2 = y;
seg[i].x1 = x; seg[i].y1 = y;
seg[i].x2 = x; seg[i++].y2 = h+y-1;
seg[i].x1 = x+1; seg[i].y1 = y+1;
seg[i].x2 = x+w-2; seg[i++].y2 = y+1;
seg[i].x1 = x+1; seg[i].y1 = y+1;
seg[i].x2 = x+1; seg[i++].y2 = y+h-2;
XDrawSegments(dpy, win, rgc, seg, i);
i=0;
seg[i].x1 = x; seg[i].y1 = y+h-1;
seg[i].x2 = w+x-1; seg[i++].y2 = y+h-1;
seg[i].x1 = x+w-1; seg[i].y1 = y;
seg[i].x2 = x+w-1; seg[i++].y2 = y+h-1;
if(d_depth<2)
XDrawSegments(dpy, win, ShadowGC, seg, i);
else
XDrawSegments(dpy, win, sgc, seg, i);
i=0;
seg[i].x1 = x+1; seg[i].y1 = y+h-2;
seg[i].x2 = x+w-2; seg[i++].y2 = y+h-2;
seg[i].x1 = x+w-2; seg[i].y1 = y+1;
seg[i].x2 = x+w-2; seg[i++].y2 = y+h-2;
XDrawSegments(dpy, win, sgc, seg, i);
}
/************************************************************************
*
* Sizes and creates the window
*
***********************************************************************/
XSizeHints mysizehints;
void CreateWindow(void)
{
XGCValues gcv;
unsigned long gcm;
int actual_buttons_used,first_avail_button,i,j,k,sb,tb;
wm_del_win = XInternAtom(dpy,"WM_DELETE_WINDOW",False);
_XA_WM_PROTOCOLS = XInternAtom (dpy, "WM_PROTOCOLS", False);
/* Allow for multi-width/height buttons */
actual_buttons_used = 0;
first_avail_button = num_buttons;
for(i=0;i<num_buttons;i++)
actual_buttons_used += Buttons[i].BWidth*Buttons[i].BHeight;
if(actual_buttons_used > MAX_BUTTONS)
{
fprintf(stderr,"%s: Out of Buttons!\n",MyName);
exit(0);
}
num_buttons = actual_buttons_used;
/* size and create the window */
if((num_rows == 0)&&(num_columns == 0))
num_rows = 2;
if(num_columns == 0)
{
num_columns = num_buttons/num_rows;
while(num_rows * num_columns < num_buttons)
num_columns++;
}
if(num_rows == 0)
{
num_rows = num_buttons/num_columns;
while(num_rows * num_columns < num_buttons)
num_rows++;
}
while(num_rows * num_columns < num_buttons)
num_columns++;
/* Now have allocated enough space for the buttons, need to shuffle to
* make room for the big ones. */
for(i=0;i<num_buttons;i++)
{
if((Buttons[i].BHeight > 1)||(Buttons[i].BWidth > 1))
{
/* if not enough room underneath, give up */
if(num_rows - (i/num_columns) < Buttons[i].BHeight)
{
fprintf(stderr,"%s: Button too tall. Giving up\n",MyName);
fprintf(stderr,"Button = %d num_rows = %d bheight = %d h = %d\n",
i,num_rows,Buttons[i].BHeight,
num_rows - (i/num_columns));
Buttons[i].BHeight = 1;
}
if(num_columns - (i %num_columns) < Buttons[i].BWidth)
{
fprintf(stderr,"%s: Button too wide. Giving up.\n",MyName);
fprintf(stderr,"Button = %d num_columns = %d bwidth = %d w = %d\n",
i,num_columns,Buttons[i].BWidth,
num_columns - (i%num_rows));
Buttons[i].BWidth = 1;
}
for(k=0;k<Buttons[i].BHeight;k++)
for(j=0;j<Buttons[i].BWidth;j++)
{
if((j>0)||(k>0))
{
if((Buttons[i+j+k*num_columns].title== NULL)&&
(Buttons[i+j+k*num_columns].action== NULL)&&
(Buttons[i+j+k*num_columns].icon_file== NULL))
{
Buttons[i+j+k*num_columns].BWidth = 0;
Buttons[i+j+k*num_columns].BHeight = 0;
}
else
{
first_avail_button = i+1;
while((first_avail_button<num_buttons)&&
((Buttons[first_avail_button].BWidth == 0)||
(Buttons[first_avail_button].title!= NULL)||
(Buttons[first_avail_button].action!= NULL)||
(Buttons[first_avail_button].icon_file!= NULL)||
(first_avail_button == i+j+k*num_columns)))
first_avail_button++;
if(first_avail_button >= num_buttons)
{
fprintf(stderr,"%s: Button Confusion!\n",MyName);
exit(1);
}
/* NO! I think you should shift the List to get the free space */
/* Shifting First_Avail-1 --> First_Avail :: downwards */
/* Attention: exclude the buttons allready freed for the Bigs */
/* I don't know how to determine such a freed button. */
/* That's why I used this full WHILE-Codelines */
/* tb := TARGET_BOTTON sb := SOURCE_BOTTON for shifting */
/* palme@elphy.irz.hu-berlin.de */
tb=first_avail_button;
sb=tb-1;
while(sb>=(i+j+k*num_columns))
{
while(
(Buttons[sb].action == NULL) &&
(Buttons[sb].title == NULL) &&
(Buttons[sb].icon_file == NULL) &&
(Buttons[sb].IconWin == None) &&
(Buttons[sb].iconPixmap == None) &&
(Buttons[sb].icon_maskPixmap == None) &&
(Buttons[sb].icon_w == 0) &&
(Buttons[sb].icon_h == 0) &&
(Buttons[sb].icon_depth == 0) &&
(Buttons[sb].swallow == 0) &&
(Buttons[sb].module == 0) &&
(Buttons[sb].hangon == NULL) &&
(Buttons[sb].up == 1) &&
(Buttons[sb].BWidth == 0) &&
(Buttons[sb].BHeight == 0)
) sb--; /* ignore already freed SourceBotton */
Buttons[tb].action = Buttons[sb].action;
Buttons[tb].title = Buttons[sb].title;
Buttons[tb].icon_file = Buttons[sb].icon_file;
Buttons[tb].BWidth = Buttons[sb].BWidth;
Buttons[tb].BHeight = Buttons[sb].BHeight;
Buttons[tb].icon_w = Buttons[sb].icon_w;
Buttons[tb].icon_h = Buttons[sb].icon_h;
Buttons[tb].iconPixmap = Buttons[sb].iconPixmap;
Buttons[tb].icon_maskPixmap = Buttons[sb].icon_maskPixmap;
Buttons[tb].IconWin = Buttons[sb].IconWin;
Buttons[tb].hints = Buttons[sb].hints;
Buttons[tb].icon_depth = Buttons[sb].icon_depth;
Buttons[tb].hangon = Buttons[sb].hangon;
Buttons[tb].swallow = Buttons[sb].swallow;
tb--;
while(
(Buttons[tb].action == NULL) &&
(Buttons[tb].title == NULL) &&
(Buttons[tb].icon_file == NULL) &&
(Buttons[tb].IconWin == None) &&
(Buttons[tb].iconPixmap == None) &&
(Buttons[tb].icon_maskPixmap == None) &&
(Buttons[tb].icon_w == 0) &&
(Buttons[tb].icon_h == 0) &&
(Buttons[tb].icon_depth == 0) &&
(Buttons[tb].swallow == 0) &&
(Buttons[tb].module == 0) &&
(Buttons[tb].hangon == NULL) &&
(Buttons[tb].up == 1) &&
(Buttons[tb].BWidth == 0) &&
(Buttons[tb].BHeight == 0)
) tb--; /* ignore Targed_Botton if this is a freed one */
sb--;
}
/* No follows the Original Code which frees the current Botton */
/* Buttons[first_avail_button].action =
Buttons[i+j+k*num_columns].action;
Buttons[first_avail_button].title =
Buttons[i+j+k*num_columns].title;
Buttons[first_avail_button].icon_file =
Buttons[i+j+k*num_columns].icon_file;
Buttons[first_avail_button].BWidth =
Buttons[i+j+k*num_columns].BWidth;
Buttons[first_avail_button].BHeight =
Buttons[i+j+k*num_columns].BHeight;
Buttons[first_avail_button].icon_w =
Buttons[i+j+k*num_columns].icon_w;
Buttons[first_avail_button].icon_h =
Buttons[i+j+k*num_columns].icon_h;
Buttons[first_avail_button].iconPixmap =
Buttons[i+j+k*num_columns].iconPixmap;
Buttons[first_avail_button].icon_maskPixmap =
Buttons[i+j+k*num_columns].icon_maskPixmap;
Buttons[first_avail_button].IconWin =
Buttons[i+j+k*num_columns].IconWin;
Buttons[first_avail_button].hints =
Buttons[i+j+k*num_columns].hints;
Buttons[first_avail_button].icon_depth =
Buttons[i+j+k*num_columns].icon_depth;
Buttons[first_avail_button].hangon =
Buttons[i+j+k*num_columns].hangon;
Buttons[first_avail_button].swallow =
Buttons[i+j+k*num_columns].swallow;
*/
Buttons[i+j+k*num_columns].action = NULL;
Buttons[i+j+k*num_columns].title = NULL;
Buttons[i+j+k*num_columns].icon_file = NULL;
Buttons[i+j+k*num_columns].IconWin = None;
Buttons[i+j+k*num_columns].iconPixmap = None;
Buttons[i+j+k*num_columns].icon_maskPixmap = None;
Buttons[i+j+k*num_columns].icon_w = 0;
Buttons[i+j+k*num_columns].icon_h = 0;
Buttons[i+j+k*num_columns].icon_depth = 0;
Buttons[i+j+k*num_columns].swallow = 0;
Buttons[i+j+k*num_columns].module = 0;
Buttons[i+j+k*num_columns].hangon = NULL;
Buttons[i+j+k*num_columns].up = 1;
Buttons[i+j+k*num_columns].BWidth = 0;
Buttons[i+j+k*num_columns].BHeight = 0;
}
}
}
}
}
mysizehints.flags = PWinGravity| PResizeInc | PBaseSize;
/* subtract one for the right/bottom border */ /* But that ruins it! Jarl */
mysizehints.width = (max_internal_width+2*(xpad+framew))*num_columns;
mysizehints.height= (max_internal_height+2*(ypad+framew))*num_rows;
mysizehints.width_inc = num_columns;
mysizehints.height_inc = num_rows;
/* Stupid thing to do? Makes the window too small on my Xservers. Jarl
mysizehints.base_height = num_rows - 1;
mysizehints.base_width = num_columns - 1;
*/
mysizehints.base_height = num_rows;
mysizehints.base_width = num_columns;
if(w > -1)
{
w = w - w%num_columns;
mysizehints.width = w;
h = h - h%num_rows;
mysizehints.height = h;
mysizehints.flags |= USSize;
}
if(x > -100000)
{
if (xneg)
{
mysizehints.x = DisplayWidth(dpy,screen) + x - mysizehints.width;
gravity = NorthEastGravity;
}
else
mysizehints.x = x;
if (yneg)
{
mysizehints.y = DisplayHeight(dpy,screen) + y - mysizehints.height;
gravity = SouthWestGravity;
}
else
mysizehints.y = y;
if(xneg && yneg)
gravity = SouthEastGravity;
mysizehints.flags |= USPosition;
}
mysizehints.win_gravity = gravity;
if(d_depth < 2)
{
back_pix = GetColor("white");
fore_pix = GetColor("black");
hilite_pix = back_pix;
shadow_pix = fore_pix;
}
else
{
back_pix = GetColor(GoodStuffBack);
fore_pix = GetColor(GoodStuffFore);
hilite_pix = GetHilite(back_pix);
shadow_pix = GetShadow(back_pix);
}
main_win = XCreateSimpleWindow(dpy,Root,mysizehints.x,mysizehints.y,
mysizehints.width,mysizehints.height,
0,fore_pix,back_pix);
XSetWMProtocols(dpy,main_win,&wm_del_win,1);
XSetWMNormalHints(dpy,main_win,&mysizehints);
XSelectInput(dpy,main_win,MW_EVENTS);
change_window_name(MyName);
gcm = GCForeground|GCBackground;
gcv.foreground = hilite_pix;
gcv.background = back_pix;
ReliefGC = XCreateGC(dpy, Root, gcm, &gcv);
gcm = GCForeground|GCBackground;
gcv.foreground = shadow_pix;
gcv.background = back_pix;
ShadowGC = XCreateGC(dpy, Root, gcm, &gcv);
gcm = GCForeground|GCBackground;
if(font)
{
gcv.font = font->fid;
gcm |= GCFont;
}
gcv.foreground = fore_pix;
gcv.background = back_pix;
NormalGC = XCreateGC(dpy, Root, gcm, &gcv);
}
/****************************************************************************
*
* This routine computes the shadow color from the background color
*
****************************************************************************/
Pixel GetShadow(Pixel background)
{
XColor bg_color;
XWindowAttributes attributes;
XGetWindowAttributes(dpy,Root,&attributes);
bg_color.pixel = background;
XQueryColor(dpy,attributes.colormap,&bg_color);
bg_color.red = (unsigned short)((bg_color.red*50)/100);
bg_color.green = (unsigned short)((bg_color.green*50)/100);
bg_color.blue = (unsigned short)((bg_color.blue*50)/100);
if(!XAllocColor(dpy,attributes.colormap,&bg_color))
nocolor("alloc shadow","");
return bg_color.pixel;
}
/****************************************************************************
*
* This routine computes the hilight color from the background color
*
****************************************************************************/
Pixel GetHilite(Pixel background)
{
XColor bg_color, white_p;
XWindowAttributes attributes;
XGetWindowAttributes(dpy,Root,&attributes);
bg_color.pixel = background;
XQueryColor(dpy,attributes.colormap,&bg_color);
white_p.pixel = GetColor("white");
XQueryColor(dpy,attributes.colormap,&white_p);
bg_color.red = max((white_p.red/5), bg_color.red);
bg_color.green = max((white_p.green/5), bg_color.green);
bg_color.blue = max((white_p.blue/5), bg_color.blue);
bg_color.red = min(white_p.red, (bg_color.red*140)/100);
bg_color.green = min(white_p.green, (bg_color.green*140)/100);
bg_color.blue = min(white_p.blue, (bg_color.blue*140)/100);
if(!XAllocColor(dpy,attributes.colormap,&bg_color))
nocolor("alloc hilight","");
return bg_color.pixel;
}
void nocolor(char *a, char *b)
{
fprintf(stderr,"%s: can't %s %s\n", MyName, a,b);
}
/****************************************************************************
*
* Loads a single color
*
****************************************************************************/
Pixel GetColor(char *name)
{
XColor color;
XWindowAttributes attributes;
XGetWindowAttributes(dpy,Root,&attributes);
color.pixel = 0;
if (!XParseColor (dpy, attributes.colormap, name, &color))
{
nocolor("parse",name);
}
else if(!XAllocColor (dpy, attributes.colormap, &color))
{
nocolor("alloc",name);
}
return color.pixel;
}
/************************************************************************
*
* Dead pipe handler
*
***********************************************************************/
void DeadPipe(int nonsense)
{
int i,j,button;
signal(SIGPIPE, SIG_IGN);/* Xsync may cause SIGPIPE */
for(i=0;i<num_rows;i++)
for(j=0;j<num_columns; j++)
{
button = i*num_columns + j;
/* delete swallowed windows, but not modules (fvwm handles those) */
/* if((Buttons[button].swallow == 3)&&(Buttons[button].module == 0)) */
/* the above doesn't seem to hold true any more - CKH */
if(Buttons[button].swallow == 3)
{
send_clientmessage(dpy,Buttons[button].IconWin,wm_del_win,CurrentTime);
XSync(dpy,0);
}
}
XSync(dpy,0);
exit(0);
}
/*****************************************************************************
*
* This routine is responsible for reading and parsing the config file
*
****************************************************************************/
void ParseOptions(void)
{
char *tline,*tmp;
int Clength, len;
Clength = strlen(MyName);
GetConfigLine(fd,&tline);
while(tline != (char *)0)
{
int g_x, g_y, flags;
unsigned width,height;
if((strlen(&tline[0])>1)&&
(strncasecmp(tline,CatString3("*", MyName, "Geometry"),Clength+9)==0))
{
tmp = &tline[Clength+9];
while(((isspace(*tmp))&&(*tmp != '\n'))&&(*tmp != 0))
{
tmp++;
}
tmp[strlen(tmp)-1] = 0;
flags = XParseGeometry(tmp,&g_x,&g_y,&width,&height);
if (flags & WidthValue)
w = width;
if (flags & HeightValue)
h = height;
if (flags & XValue)
x = g_x;
if (flags & YValue)
y = g_y;
if (flags & XNegative)
xneg = 1;
if (flags & YNegative)
yneg = 1;
}
else if((strlen(&tline[0])>1)&&
(strncasecmp(tline,CatString3("*",MyName,"Font"),Clength+5)==0))
{
CopyString(&font_string,&tline[Clength+5]);
}
else if((strlen(&tline[0])>1)&&
(strncasecmp(tline,CatString3("*",MyName,"Rows"),Clength+5)==0))
{
len=sscanf(&tline[Clength+5],"%d",&num_rows);
if(len < 1)
num_rows = 0;
}
else if((strlen(&tline[0])>1)&&
(strncasecmp(tline,CatString3("*",MyName,"Columns"),Clength+8)==0))
{
len=sscanf(&tline[Clength+8],"%d",&num_columns);
if(len < 1)
num_columns = 0;
}
else if((strlen(&tline[0])>1)&&
(strncasecmp(tline,CatString3("*",MyName,"Padding"),Clength+8)==0))
{
len=sscanf(&tline[Clength+8],"%d %d",&xpad,&ypad);
if(len < 2)
ypad=xpad;
if(len < 1)
{
xpad = 2;
ypad = 4;
}
}
/* else if((strlen(&tline[0])>1)&&
(strncasecmp(tline,CatString3("*",MyName,"PadY"),Clength+5)==0))
{
len=sscanf(&tline[Clength+5],"%d",&ypad);
if(len < 1)
ypad = 3;
}
*/
else if((strlen(&tline[0])>1)&&
(strncasecmp(tline,CatString3("*",MyName,"Fore"),Clength+5)==0))
{
CopyString(&GoodStuffFore,&tline[Clength+5]);
}
else if((strlen(&tline[0])>1)&&
(strncasecmp(tline,CatString3("*",MyName, "Back"),Clength+5)==0))
{
CopyString(&GoodStuffBack,&tline[Clength+5]);
}
else if((strlen(&tline[0])>1)&&
(strncasecmp(tline,CatString3("*", MyName, ""),Clength+1)==0)&&
(num_buttons < MAX_BUTTONS))
{
match_string(&tline[Clength+1]);
}
else if((strlen(&tline[0])>1)&&(strncasecmp(tline,"IconPath",8)==0))
{
CopyString(&iconPath,&tline[8]);
}
else if((strlen(&tline[0])>1)&&(strncasecmp(tline,"PixmapPath",10)==0))
{
CopyString(&pixmapPath,&tline[10]);
}
GetConfigLine(fd,&tline);
}
return;
}
/**************************************************************************
*
* Parses a button command line from the config file
*
*************************************************************************/
void match_string(char *tline)
{
int len,i,i2;
char *ptr,*start,*end,*tmp;
/* Get a size argument, if any */
while(isspace(*tline)&&(*tline != '\n')&&(*tline != 0))
tline++;
if( *tline == '(')
{
int thisw= 0,thish = 0;
tline++;
sscanf((tline),"%dx%d",&thisw,&thish);
while((*tline != ')')&&(*tline != '\n')&&(*tline != 0))
tline++;
tline++;
if(thisw > 0)
Buttons[num_buttons].BWidth = thisw;
if(thish > 0)
Buttons[num_buttons].BHeight = thish;
}
/* skip spaces */
while(isspace(*tline)&&(*tline != '\n')&&(*tline != 0))
tline++;
/* read next word. Its the button label. Users can specify ""
* NoIcon, or whatever to skip the label */
/* read to next space */
start = tline;
end = tline;
while((!isspace(*end))&&(*end!='\n')&&(*end!=0))
end++;
len = end - start;
ptr = safemalloc(len+1);
strncpy(ptr,start,len);
ptr[len] = 0;
Buttons[num_buttons].title = ptr;
/* read next word. Its the icon bitmap/pixmap label. Users can specify ""
* NoIcon, or whatever to skip the label */
/* read to next space */
start = end;
/* skip spaces */
while(isspace(*start)&&(*start != '\n')&&(*start != 0))
start++;
end = start;
while((!isspace(*end))&&(*end!='\n')&&(*end!=0))
end++;
len = end - start;
ptr = safemalloc(len+1);
strncpy(ptr,start,len);
ptr[len] = 0;
Buttons[num_buttons].icon_file = ptr;
tline = end;
/* skip spaces */
while(isspace(*tline)&&(*tline != '\n')&&(*tline != 0))
tline++;
if(strncasecmp(tline,"swallow",7)==0)
{
/* Look for swallow "identifier", in which
* case GoodStuff spawns and gobbles up window */
i=7;
while((tline[i] != 0)&&
(tline[i] != '"'))
i++;
i2=i+1;
while((tline[i2] != 0)&&
(tline[i2] != '"'))
i2++;
if(i2 - i >1)
{
Buttons[num_buttons].hangon = safemalloc(i2-i);
strncpy(Buttons[num_buttons].hangon,&tline[i+1],i2-i-1);
Buttons[num_buttons].hangon[i2-i-1] = 0;
Buttons[num_buttons].swallow = 1;
}
i2++;
while((isspace(tline[i2]))&&(tline[i2]!=0))
i2++;
len = strlen(&tline[i2]);
tmp = tline + i2 + len -1;
while(((isspace(*tmp))||(*tmp == '\n'))&&(tmp >=(tline + i2)))
{
tmp--;
len--;
}
ptr = safemalloc(len+1);
if(strncasecmp(&tline[i2],"Module",6)==0)
{
Buttons[num_buttons].module = 1;
}
strncpy(ptr,&tline[i2],len);
ptr[len]=0;
SendText(fd,ptr,0);
free(ptr);
Buttons[num_buttons++].action = NULL;
}
else
{
len = strlen(tline);
tmp = tline + len -1;
while(((isspace(*tmp))||(*tmp == '\n'))&&(tmp >=tline))
{
tmp--;
len--;
}
ptr = safemalloc(len+1);
strncpy(ptr,tline,len);
ptr[len]=0;
Buttons[num_buttons++].action = ptr;
}
return;
}
/**************************************************************************
* Change the window name displayed in the title bar.
**************************************************************************/
void change_window_name(char *str)
{
XTextProperty name;
if (XStringListToTextProperty(&str,1,&name) == 0)
{
fprintf(stderr,"%s: cannot allocate window name",MyName);
return;
}
XSetWMName(dpy,main_win,&name);
XSetWMIconName(dpy,main_win,&name);
XFree(name.value);
}
/***************************************************************************
*
* Waits for next X event, or for an auto-raise timeout.
*
****************************************************************************/
int My_XNextEvent(Display *dpy, XEvent *event)
{
fd_set in_fdset;
unsigned long header[HEADER_SIZE];
static int miss_counter = 0;
unsigned long *body;
if(XPending(dpy))
{
XNextEvent(dpy,event);
return 1;
}
FD_ZERO(&in_fdset);
FD_SET(x_fd,&in_fdset);
FD_SET(fd[1],&in_fdset);
select(fd_width,SELECT_TYPE_ARG234 &in_fdset, 0, 0, NULL);
if(FD_ISSET(x_fd, &in_fdset))
{
if(XPending(dpy))
{
XNextEvent(dpy,event);
miss_counter = 0;
return 1;
}
else
miss_counter++;
if(miss_counter > 100)
DeadPipe(0);
}
if(FD_ISSET(fd[1], &in_fdset))
{
if(ReadFvwmPacket(fd[1], header, &body) > 0)
{
process_message(header[1],body);
free(body);
}
}
return 0;
}
void CheckForHangon(unsigned long *body)
{
int button,i,j;
char *cbody;
cbody = (char *)&body[3];
for(i=0;i<num_rows;i++)
for(j=0;j<num_columns; j++)
{
button = i*num_columns + j;
if(Buttons[button].hangon != NULL)
{
if(strcmp(cbody,Buttons[button].hangon)==0)
{
if(Buttons[button].swallow == 1)
{
Buttons[button].swallow = 2;
if(Buttons[button].IconWin != None)
{
XDestroyWindow(dpy,Buttons[button].IconWin);
}
Buttons[button].IconWin = (Window)body[0];
free(Buttons[button].hangon);
Buttons[button].hangon = NULL;
}
else
{
Buttons[button].up = 1;
free(Buttons[button].hangon);
Buttons[button].hangon = NULL;
RedrawWindow(button);
}
}
}
}
}
/**************************************************************************
*
* Process window list messages
*
*************************************************************************/
void process_message(unsigned long type,unsigned long *body)
{
switch(type)
{
case M_NEW_DESK:
new_desk = body[0];
RedrawWindow(-1);
break;
case M_END_WINDOWLIST:
RedrawWindow(-1);
case M_MAP:
swallow(body);
case M_RES_NAME:
case M_RES_CLASS:
case M_WINDOW_NAME:
CheckForHangon(body);
break;
default:
break;
}
}
void swallow(unsigned long *body)
{
char *temp;
int button,i,j,iw,ih;
long supplied;
for(i=0;i<num_rows;i++)
for(j=0;j<num_columns; j++)
{
button = i*num_columns + j;
if((Buttons[button].IconWin == (Window)body[0])&&
(Buttons[button].swallow == 2))
{
Buttons[button].swallow = 3;
/* "Swallow" the window! */
XReparentWindow(dpy,Buttons[button].IconWin, main_win,
j*ButtonWidth+2, i*ButtonHeight+2);
XMapWindow(dpy,Buttons[button].IconWin);
XSelectInput(dpy,(Window)body[0],
PropertyChangeMask|StructureNotifyMask);
Buttons[button].icon_w =
Buttons[button].BWidth * ButtonWidth - 4;
if(strcmp(Buttons[button].title,"-")==0 || font==NULL)
{
Buttons[button].icon_h =
Buttons[button].BHeight*ButtonHeight - 4;
}
else
{
Buttons[button].icon_h =
Buttons[button].BHeight*ButtonHeight - 4
- font->ascent - font->descent;
}
if (!XGetWMNormalHints (dpy, Buttons[button].IconWin,
&Buttons[button].hints,
&supplied))
Buttons[button].hints.flags = 0;
ih = Buttons[button].icon_h + 4;
iw = Buttons[button].icon_w + 4;
ConstrainSize(&Buttons[button].hints, &Buttons[button].icon_w,
&Buttons[button].icon_h);
XResizeWindow(dpy,(Window)body[0], Buttons[button].icon_w,
Buttons[button].icon_h);
XMoveWindow(dpy,Buttons[button].IconWin,
j*ButtonWidth +
(iw - Buttons[button].icon_w)/2,
i*ButtonHeight +
(ih - Buttons[button].icon_h)/2);
XFetchName(dpy, Buttons[button].IconWin, &temp);
XClearArea(dpy,main_win,j*ButtonWidth, i*ButtonHeight,
ButtonWidth,ButtonHeight,0);
if(strcmp(Buttons[button].title,"-")!=0)
CopyString(&Buttons[button].title, temp);
RedrawWindow(-1);
XFree(temp);
}
}
}
/***********************************************************************
*
* Procedure:
* ConstrainSize - adjust the given width and height to account for the
* constraints imposed by size hints
*
* The general algorithm, especially the aspect ratio stuff, is
* borrowed from uwm's CheckConsistency routine.
*
***********************************************************************/
void ConstrainSize (XSizeHints *hints, int *widthp, int *heightp)
{
#define makemult(a,b) ((b==1) ? (a) : (((int)((a)/(b))) * (b)) )
#define _min(a,b) (((a) < (b)) ? (a) : (b))
int minWidth, minHeight, maxWidth, maxHeight, xinc, yinc, delta;
int baseWidth, baseHeight;
int dwidth = *widthp, dheight = *heightp;
if(hints->flags & PMinSize)
{
minWidth = hints->min_width;
minHeight = hints->min_height;
if(hints->flags & PBaseSize)
{
baseWidth = hints->base_width;
baseHeight = hints->base_height;
}
else
{
baseWidth = hints->min_width;
baseHeight = hints->min_height;
}
}
else if(hints->flags & PBaseSize)
{
minWidth = hints->base_width;
minHeight = hints->base_height;
baseWidth = hints->base_width;
baseHeight = hints->base_height;
}
else
{
minWidth = 1;
minHeight = 1;
baseWidth = 1;
baseHeight = 1;
}
if(hints->flags & PMaxSize)
{
maxWidth = hints->max_width;
maxHeight = hints->max_height;
}
else
{
maxWidth = 10000;
maxHeight = 10000;
}
if(hints->flags & PResizeInc)
{
xinc = hints->width_inc;
yinc = hints->height_inc;
}
else
{
xinc = 1;
yinc = 1;
}
/*
* First, clamp to min and max values
*/
if (dwidth < minWidth) dwidth = minWidth;
if (dheight < minHeight) dheight = minHeight;
if (dwidth > maxWidth) dwidth = maxWidth;
if (dheight > maxHeight) dheight = maxHeight;
/*
* Second, fit to base + N * inc
*/
dwidth = ((dwidth - baseWidth) / xinc * xinc) + baseWidth;
dheight = ((dheight - baseHeight) / yinc * yinc) + baseHeight;
/*
* Third, adjust for aspect ratio
*/
#define maxAspectX hints->max_aspect.x
#define maxAspectY hints->max_aspect.y
#define minAspectX hints->min_aspect.x
#define minAspectY hints->min_aspect.y
/*
* The math looks like this:
*
* minAspectX dwidth maxAspectX
* ---------- <= ------- <= ----------
* minAspectY dheight maxAspectY
*
* If that is multiplied out, then the width and height are
* invalid in the following situations:
*
* minAspectX * dheight > minAspectY * dwidth
* maxAspectX * dheight < maxAspectY * dwidth
*
*/
if (hints->flags & PAspect)
{
if (minAspectX * dheight > minAspectY * dwidth)
{
delta = makemult(minAspectX * dheight / minAspectY - dwidth,
xinc);
if (dwidth + delta <= maxWidth)
dwidth += delta;
else
{
delta = makemult(dheight - dwidth*minAspectY/minAspectX,
yinc);
if (dheight - delta >= minHeight) dheight -= delta;
}
}
if (maxAspectX * dheight < maxAspectY * dwidth)
{
delta = makemult(dwidth * maxAspectY / maxAspectX - dheight,
yinc);
if (dheight + delta <= maxHeight)
dheight += delta;
else
{
delta = makemult(dwidth - maxAspectX*dheight/maxAspectY,
xinc);
if (dwidth - delta >= minWidth) dwidth -= delta;
}
}
}
*widthp = dwidth;
*heightp = dheight;
return;
}