/* This module, and the entire ModuleDebugger program, and the concept for * interfacing this module to the Window Manager, are all original work * by Robert Nation * * Copyright 1994, 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 0 #include "config.h" #include #include #include #include #include #include #include #include #include #ifdef HAVE_SYS_BSDTYPES_H #include /* Saul */ #endif /* Saul */ #include #if HAVE_SYS_SELECT_H #include #endif #include #include #include #include #include #include "../../fvwm/module.h" #include "../../libs/fvwmlib.h" #include "FvwmPager.h" #include "../../fvwm/fvwm.h" char *MyName; int fd_width; int fd[2]; PagerStringList *FindDeskStrings(int desk); PagerStringList *NewPagerStringItem(PagerStringList *last, int desk); /************************************************************************* * * Screen, font, etc info * **************************************************************************/ ScreenInfo Scr; PagerWindow *Start = NULL; PagerWindow *FocusWin = NULL; Display *dpy; /* which display are we talking to */ int x_fd,fd_width; char *PagerFore = NULL; char *PagerBack = NULL; char *font_string = NULL; char *smallFont = NULL; char *HilightC = NULL; char *WindowBack = NULL; char *WindowFore = NULL; char *WindowHiBack = NULL; char *WindowHiFore = NULL; int ShowBalloons = 0, ShowPagerBalloons = 0, ShowIconBalloons = 0; char *BalloonTypeString = NULL; char *BalloonBack = NULL; char *BalloonFore = NULL; char *BalloonFont = NULL; char *BalloonBorderColor = NULL; int BalloonBorderWidth = 1; int BalloonYOffset = 2; int window_w=0, window_h=0, window_x=0, window_y=0; int icon_x=-10000, icon_y=-10000, icon_w=0, icon_h=0; int usposition = 0,uselabel = 1; int xneg = 0, yneg = 0; extern DeskInfo *Desks; int StartIconic = 0; int MiniIcons = 0; int Rows = -1, Columns = -1; int desk1=0, desk2 =0; int ndesks = 0; Pixel win_back_pix = -1; Pixel win_fore_pix = -1; Pixel win_hi_back_pix = -1; Pixel win_hi_fore_pix = -1; char fAlwaysCurrentDesk = 0; PagerStringList string_list = { NULL, 0, NULL, NULL }; Bool error_occured = False; static volatile sig_atomic_t isTerminated = False; static RETSIGTYPE TerminateHandler(int); /*********************************************************************** * * Procedure: * main - start of module * ***********************************************************************/ int main(int argc, char **argv) { char *temp, *s; char *display_name = NULL; int itemp,i; char line[100]; /* Save our program name - for error messages */ temp = argv[0]; s=strrchr(argv[0], '/'); if (s != NULL) temp = s + 1; MyName = safemalloc(strlen(temp)+2); strcpy(MyName, temp); if(argc < 6) { fprintf(stderr,"%s Version %s should only be executed by fvwm!\n",MyName, VERSION); exit(1); } if(argc < 8) { fprintf(stderr,"%s Version %s requires two arguments: %s n m\n", MyName,VERSION,MyName); fprintf(stderr," where desktops n through m are displayed\n"); fprintf(stderr, " if n and m are \"*\" the current desktop is displayed\n"); exit(1); } #ifdef HAVE_SIGACTION { struct sigaction sigact; sigemptyset(&sigact.sa_mask); # ifdef SA_INTERRUPT sigact.sa_flags = SA_INTERRUPT; # else sigact.sa_flags = 0; # endif sigact.sa_handler = TerminateHandler; sigaction(SIGPIPE, &sigact, NULL); sigaction(SIGTERM, &sigact, NULL); sigaction(SIGQUIT, &sigact, NULL); sigaction(SIGINT, &sigact, NULL); sigaction(SIGHUP, &sigact, NULL); } #else /* We don't have sigaction(), so fall back to less robust methods. */ signal(SIGPIPE, TerminateHandler); signal(SIGTERM, TerminateHandler); signal(SIGQUIT, TerminateHandler); signal(SIGINT, TerminateHandler); signal(SIGHUP, TerminateHandler); #endif fd[0] = atoi(argv[1]); fd[1] = atoi(argv[2]); fd_width = GetFdWidth(); desk1 = atoi(argv[6]); desk2 = atoi(argv[7]); if(desk2 < desk1) { itemp = desk1; desk1 = desk2; desk2 = itemp; } ndesks = desk2 - desk1 + 1; if (StrEquals(argv[6], "*") && StrEquals(argv[7], "*")) { desk1 = Scr.CurrentDesk; desk2 = Scr.CurrentDesk; fAlwaysCurrentDesk = 1; } PagerFore = strdup("black"); PagerBack = strdup("white"); font_string = strdup("fixed"); HilightC = strdup("black"); BalloonFont = strdup("fixed"); BalloonBorderColor = strdup("black"); Desks = (DeskInfo *)safemalloc(ndesks*sizeof(DeskInfo)); for(i=0;inext); t = t->next; i++; } *prev = (PagerWindow *)safemalloc(sizeof(PagerWindow)); (*prev)->w = body[0]; (*prev)->t = (char *)body[2]; (*prev)->frame = body[1]; (*prev)->x = body[3]; (*prev)->y = body[4]; (*prev)->width = body[5]; (*prev)->height = body[6]; (*prev)->desk = body[7]; (*prev)->next = NULL; (*prev)->flags = body[8]; (*prev)->pager_view_width = 0; (*prev)->pager_view_height = 0; (*prev)->icon_view_width = 0; (*prev)->icon_view_height = 0; (*prev)->icon_name = NULL; (*prev)->mini_icon.picture = 0; (*prev)->title_height = body[9]; (*prev)->border_width = body[10]; (*prev)->icon_w = body[19]; (*prev)->icon_pixmap_w = body[20]; if ((win_fore_pix != -1) && (win_back_pix != -1)) { (*prev)->text = win_fore_pix; (*prev)->back = win_back_pix; } else { (*prev)->text = body[22]; (*prev)->back = body[23]; } AddNewWindow(*prev); } /*********************************************************************** * * Procedure: * list_configure - displays packet contents to stderr * ***********************************************************************/ void list_configure(unsigned long *body) { PagerWindow *t; Window target_w; target_w = body[0]; t = Start; while((t!= NULL)&&(t->w != target_w)) { t = t->next; } if(t== NULL) { list_add(body); } else { t->t = (char *)body[2]; t->frame = body[1]; t->frame_x = body[3]; t->frame_y = body[4]; t->frame_width = body[5]; t->frame_height = body[6]; t->title_height = body[9]; t->border_width = body[10]; t->flags = body[8]; t->icon_w = body[19]; t->icon_pixmap_w = body[20]; if ((win_fore_pix != -1) && (win_back_pix != -1)) { t->text = win_fore_pix; t->back = win_back_pix; } else { t->text = body[22]; t->back = body[23]; } if(t->flags & ICONIFIED) { t->x = t->icon_x; t->y = t->icon_y; t->width = t->icon_width; t->height = t->icon_height; if(t->flags & SUPPRESSICON) { t->x = -10000; t->y = -10000; } } else { t->x = t->frame_x; t->y = t->frame_y; t->width = t->frame_width; t->height = t->frame_height; } if(t->desk != body[7]) { ChangeDeskForWindow(t,body[7]); } else MoveResizePagerView(t); if(FocusWin == t) Hilight(t,ON); else Hilight(t,OFF); } } /*********************************************************************** * * Procedure: * list_destroy - displays packet contents to stderr * ***********************************************************************/ void list_destroy(unsigned long *body) { PagerWindow *t,**prev; Window target_w; target_w = body[0]; t = Start; prev = &Start; while((t!= NULL)&&(t->w != target_w)) { prev = &(t->next); t = t->next; } if(t!= NULL) { if(prev != NULL) *prev = t->next; /* remove window from the chain */ if(t->PagerView != None) XDestroyWindow(dpy,t->PagerView); XDestroyWindow(dpy,t->IconView); if(FocusWin == t) FocusWin = NULL; free(t); } } /*********************************************************************** * * Procedure: * list_focus - displays packet contents to stderr * ***********************************************************************/ void list_focus(unsigned long *body) { PagerWindow *t,*temp; Window target_w; extern Pixel focus_pix, focus_fore_pix; target_w = body[0]; if ((win_hi_fore_pix != -1) && (win_hi_back_pix != -1)) { focus_pix = win_hi_back_pix; focus_fore_pix = win_hi_fore_pix; } else { focus_pix = body[4]; focus_fore_pix = body[3]; } t = Start; while((t!= NULL)&&(t->w != target_w)) { t = t->next; } if(t != FocusWin) { temp = FocusWin; FocusWin = t; if(temp != NULL) Hilight(temp,OFF); if(FocusWin != NULL) Hilight(FocusWin,ON); } } /*********************************************************************** * * Procedure: * list_new_page - displays packet contents to stderr * ***********************************************************************/ void list_new_page(unsigned long *body) { Scr.Vx = (long)body[0]; Scr.Vy = (long)body[1]; Scr.CurrentDesk = (long)body[2]; if((Scr.VxMax != body[3])||(Scr.VyMax != body[4])) { Scr.VxMax = body[3]; Scr.VyMax = body[4]; ReConfigure(); } MovePage(); MoveStickyWindows(); Hilight(FocusWin,OFF); Hilight(FocusWin,ON); } /*********************************************************************** * * Procedure: * list_new_desk - displays packet contents to stderr * ***********************************************************************/ void list_new_desk(unsigned long *body) { int oldDesk; oldDesk = Scr.CurrentDesk; Scr.CurrentDesk = (long)body[0]; if (fAlwaysCurrentDesk && oldDesk != Scr.CurrentDesk) { PagerWindow *t; PagerStringList *item; char line[100]; desk1 = Scr.CurrentDesk; desk2 = Scr.CurrentDesk; for (t = Start; t != NULL; t = t->next) { if (t->desk == oldDesk || t->desk == Scr.CurrentDesk) ChangeDeskForWindow(t, t->desk); } item = FindDeskStrings(Scr.CurrentDesk); if (Desks[0].label != NULL) { free(Desks[0].label); Desks[0].label = NULL; } if (item->next != NULL && item->next->label != NULL) { CopyString(&Desks[0].label, item->next->label); } else { sprintf(line, "Desk %d", desk1); CopyString(&Desks[0].label, line); } XStoreName(dpy, Scr.Pager_w, Desks[0].label); XSetIconName(dpy, Scr.Pager_w, Desks[0].label); if (Desks[0].Dcolor != NULL) { free(Desks[0].Dcolor); Desks[0].Dcolor = NULL; } if (item->next != NULL && item->next->Dcolor != NULL) { CopyString(&Desks[0].Dcolor, item->next->Dcolor); } else { /* Use default title if not specified by user. */ CopyString(&Desks[0].Dcolor, PagerBack); } XSetWindowBackground(dpy, Desks[0].w, GetColor(Desks[0].Dcolor)); XClearWindow(dpy, Desks[0].w); } MovePage(); DrawGrid(oldDesk - desk1,1); DrawGrid(Scr.CurrentDesk - desk1,1); MoveStickyWindows(); Hilight(FocusWin,OFF); Hilight(FocusWin,ON); } /*********************************************************************** * * Procedure: * list_raise - displays packet contents to stderr * ***********************************************************************/ void list_raise(unsigned long *body) { PagerWindow *t; Window target_w; target_w = body[0]; t = Start; while((t!= NULL)&&(t->w != target_w)) { t = t->next; } if(t!= NULL) { if(t->PagerView != None) XRaiseWindow(dpy,t->PagerView); XRaiseWindow(dpy,t->IconView); } } /*********************************************************************** * * Procedure: * list_lower - displays packet contents to stderr * ***********************************************************************/ void list_lower(unsigned long *body) { PagerWindow *t; Window target_w; target_w = body[0]; t = Start; while((t!= NULL)&&(t->w != target_w)) { t = t->next; } if(t!= NULL) { if(t->PagerView != None) XLowerWindow(dpy,t->PagerView); if((t->desk - desk1>=0)&&(t->desk - desk1desk - desk1].CPagerWin); XLowerWindow(dpy,t->IconView); } } /*********************************************************************** * * Procedure: * list_unknow - handles an unrecognized packet. * ***********************************************************************/ void list_unknown(unsigned long *body) { /* fprintf(stderr,"Unknown packet type\n");*/ } /*********************************************************************** * * Procedure: * list_iconify - displays packet contents to stderr * ***********************************************************************/ void list_iconify(unsigned long *body) { PagerWindow *t; Window target_w; target_w = body[0]; t = Start; while((t!= NULL)&&(t->w != target_w)) { t = t->next; } if(t== NULL) { return; } else { t->t = (char *)body[2]; t->frame = body[1]; t->icon_x = body[3]; t->icon_y = body[4]; t->icon_width = body[5]; t->icon_height = body[6]; t->flags |= ICONIFIED; t->x = t->icon_x; t->y = t->icon_y; if(t->flags & SUPPRESSICON) { t->x = -10000; t->y = -10000; } t->width = t->icon_width; t->height = t->icon_height; /* if iconifying main pager window turn balloons on or off */ if ( t->w == Scr.Pager_w ) ShowBalloons = ShowIconBalloons; MoveResizePagerView(t); } } /*********************************************************************** * * Procedure: * list_deiconify - displays packet contents to stderr * ***********************************************************************/ void list_deiconify(unsigned long *body) { PagerWindow *t; Window target_w; target_w = body[0]; t = Start; while((t!= NULL)&&(t->w != target_w)) { t = t->next; } if(t== NULL) { return; } else { t->flags &= ~ICONIFIED; t->x = t->frame_x; t->y = t->frame_y; t->width = t->frame_width; t->height = t->frame_height; /* if deiconifying main pager window turn balloons on or off */ if ( t->w == Scr.Pager_w ) ShowBalloons = ShowPagerBalloons; MoveResizePagerView(t); if(FocusWin == t) Hilight(t,ON); else Hilight(t,OFF); } } /*********************************************************************** * * Procedure: * list_icon_name - displays packet contents to stderr * ***********************************************************************/ void list_icon_name(unsigned long *body) { PagerWindow *t; Window target_w; target_w = body[0]; t = Start; while((t!= NULL)&&(t->w != target_w)) { t = t->next; } if(t!= NULL) { if(t->icon_name != NULL) free(t->icon_name); CopyString(&t->icon_name,(char *)(&body[3])); LabelWindow(t); LabelIconWindow(t); } } void list_mini_icon(unsigned long *body) { PagerWindow *t; Window target_w; target_w = body[0]; t = Start; while (t && (t->w != target_w)) t = t->next; if (t) { t->mini_icon.width = body[3]; t->mini_icon.height = body[4]; t->mini_icon.depth = body[5]; t->mini_icon.picture = body[6]; t->mini_icon.mask = body[7]; PictureWindow (t); PictureIconWindow (t); } } /*********************************************************************** * * Procedure: * list_end - displays packet contents to stderr * ***********************************************************************/ void list_end(void) { unsigned int nchildren,i; Window root, parent, *children; PagerWindow *ptr; if(!XQueryTree(dpy, Scr.Root, &root, &parent, &children, &nchildren)) return; for(i=0; iframe == children[i])||(ptr->icon_w == children[i])|| (ptr->icon_pixmap_w == children[i])) { if(ptr->PagerView != None) XRaiseWindow(dpy,ptr->PagerView); XRaiseWindow(dpy,ptr->IconView); } ptr = ptr->next; } } if(nchildren > 0) XFree((char *)children); } /*************************************************************************** * * 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); if (select(fd_width,SELECT_TYPE_ARG234 &in_fdset, 0, 0, NULL) > 0) { if(FD_ISSET(x_fd, &in_fdset)) { if(XPending(dpy)) { XNextEvent(dpy,event); miss_counter = 0; return 1; } 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; } /***************************************************************************** * * This routine is responsible for reading and parsing the config file * ****************************************************************************/ void ParseOptions(void) { char *tline= NULL; int Clength,n,desk; Scr.FvwmRoot = NULL; Scr.Hilite = NULL; Scr.VScale = 32; Scr.MyDisplayWidth = DisplayWidth(dpy, Scr.screen); Scr.MyDisplayHeight = DisplayHeight(dpy, Scr.screen); Scr.VxMax = 3*Scr.MyDisplayWidth - Scr.MyDisplayWidth; Scr.VyMax = 3*Scr.MyDisplayHeight - Scr.MyDisplayHeight; if(Scr.VxMax <0) Scr.VxMax = 0; if(Scr.VyMax <0) Scr.VyMax = 0; Scr.Vx = 0; Scr.Vy = 0; Clength = strlen(MyName); for (GetConfigLine(fd,&tline); tline != NULL; GetConfigLine(fd,&tline)) { int g_x, g_y, flags; unsigned width,height; char *resource; char *resource_string; char *arg1; char *arg2; char *tline2; resource_string = arg1 = arg2 = NULL; tline2 = GetModuleResource(tline, &resource, MyName); if (!resource) continue; tline2 = GetNextToken(tline2, &arg1); if (!arg1) { arg1 = (char *)safemalloc(1); arg1[0] = 0; } tline2 = GetNextToken(tline2, &arg2); if (!arg2) { arg2 = (char *)safemalloc(1); arg2[0] = 0; } if (StrEquals(resource, "Geometry")) { flags = XParseGeometry(arg1,&g_x,&g_y,&width,&height); if (flags & WidthValue) { window_w = width; } if (flags & HeightValue) { window_h = height; } if (flags & XValue) { window_x = g_x; usposition = 1; } if (flags & YValue) { window_y = g_y; usposition = 1; } if (flags & XNegative) { xneg = 1; } if (flags & YNegative) { window_y = g_y; yneg = 1; } } else if (StrEquals(resource, "IconGeometry")) { flags = XParseGeometry(arg1,&g_x,&g_y,&width,&height); if (flags & WidthValue) icon_w = width; if (flags & HeightValue) icon_h = height; if (flags & XValue) { icon_x = g_x; } if (flags & YValue) { icon_y = g_y; } } else if (StrEquals(resource, "Label")) { if (StrEquals(arg1, "*")) { desk = Scr.CurrentDesk; } else { desk = desk1; sscanf(arg1,"%d",&desk); } if (fAlwaysCurrentDesk) { PagerStringList *item; item = FindDeskStrings(desk); if (item->next != NULL) { /* replace label */ if (item->next->label != NULL) { free(item->next->label); item->next->label = NULL; } CopyString(&(item->next->label), arg2); } else { /* new Dcolor and desktop */ item = NewPagerStringItem(item, desk); CopyString(&(item->label), arg2); } if (desk == Scr.CurrentDesk) { free(Desks[0].label); CopyString(&Desks[0].label, arg2); } } else if((desk >= desk1)&&(desk <=desk2)) { free(Desks[desk - desk1].label); CopyString(&Desks[desk - desk1].label, arg2); } } else if (StrEquals(resource, "Font")) { if (font_string) free(font_string); CopyString(&font_string,arg1); if(strncasecmp(font_string,"none",4) == 0) uselabel = 0; } else if (StrEquals(resource, "Fore")) { if(Scr.d_depth > 1) { if (PagerFore) free(PagerFore); CopyString(&PagerFore,arg1); } } else if (StrEquals(resource, "Back")) { if(Scr.d_depth > 1) { if (PagerBack) free(PagerBack); CopyString(&PagerBack,arg1); for (n=0;nnext != NULL) { /* replace Dcolor */ if (item->next->Dcolor != NULL) { free(item->next->Dcolor); item->next->Dcolor = NULL; } CopyString(&(item->next->Dcolor), arg2); } else { /* new Dcolor and desktop */ item = NewPagerStringItem(item, desk); CopyString(&(item->Dcolor), arg2); } if (desk == Scr.CurrentDesk) { free(Desks[0].Dcolor); CopyString(&Desks[0].Dcolor, arg2); } } else if((desk >= desk1)&&(desk <=desk2)) { free(Desks[desk - desk1].Dcolor); CopyString(&Desks[desk - desk1].Dcolor, arg2); } } else if (StrEquals(resource, "Hilight")) { if(Scr.d_depth > 1) { if (HilightC) free(HilightC); CopyString(&HilightC,arg1); } } else if (StrEquals(resource, "SmallFont")) { if (smallFont) free(smallFont); CopyString(&smallFont,arg1); if(strncasecmp(smallFont,"none",4) == 0) { free(smallFont); smallFont = NULL; } } else if (StrEquals(resource, "MiniIcons")) { MiniIcons = 1; } else if (StrEquals(resource, "StartIconic")) { StartIconic = 1; } else if (StrEquals(resource, "Rows")) { sscanf(arg1,"%d",&Rows); } else if (StrEquals(resource, "Columns")) { sscanf(arg1,"%d",&Columns); } else if (StrEquals(resource, "DeskTopScale")) { sscanf(arg1,"%d",&Scr.VScale); } else if (StrEquals(resource, "WindowColors")) { if (Scr.d_depth > 1) { if (WindowFore) free(WindowFore); if (WindowBack) free(WindowBack); if (WindowHiFore) free(WindowHiFore); if (WindowHiBack) free(WindowHiBack); CopyString(&WindowFore, arg1); CopyString(&WindowBack, arg2); tline2 = GetNextToken(tline2, &WindowHiFore); GetNextToken(tline2, &WindowHiBack); } } /* ... and get Balloon config options ... -- ric@giccs.georgetown.edu */ else if (StrEquals(resource, "Balloons")) { if (BalloonTypeString) free(BalloonTypeString); CopyString(&BalloonTypeString, arg1); if ( strncasecmp(BalloonTypeString, "Pager", 5) == 0 ) { ShowPagerBalloons = 1; ShowIconBalloons = 0; } else if ( strncasecmp(BalloonTypeString, "Icon", 4) == 0 ) { ShowPagerBalloons = 0; ShowIconBalloons = 1; } else { ShowPagerBalloons = 1; ShowIconBalloons = 1; } /* turn this on initially so balloon window is created; later this variable is changed to match ShowPagerBalloons or ShowIconBalloons whenever we receive iconify or deiconify packets */ ShowBalloons = 1; } else if (StrEquals(resource, "BalloonBack")) { if (Scr.d_depth > 1) { if (BalloonBack) free(BalloonBack); CopyString(&BalloonBack, arg1); } } else if (StrEquals(resource, "BalloonFore")) { if (Scr.d_depth > 1) { if (BalloonFore) free(BalloonFore); CopyString(&BalloonFore, arg1); } } else if (StrEquals(resource, "BalloonFont")) { if (BalloonFont) free(BalloonFont); CopyString(&BalloonFont, arg1); } else if (StrEquals(resource, "BalloonBorderColor")) { if (BalloonBorderColor) free(BalloonBorderColor); CopyString(&BalloonBorderColor, arg1); } else if (StrEquals(resource, "BalloonBorderWidth")) { sscanf(arg1, "%d", &BalloonBorderWidth); } else if (StrEquals(resource, "BalloonYOffset")) { sscanf(arg1, "%d", &BalloonYOffset); } free(resource); free(arg1); free(arg2); } return; } /* Returns the item in the sring list that has item->next->desk == desk or * the last item (item->next == NULL) if no entry matches the desk number. */ PagerStringList *FindDeskStrings(int desk) { PagerStringList *item; item = &string_list; while (item->next != NULL) { if (item->next->desk == desk) break; item = item->next; } return item; } PagerStringList *NewPagerStringItem(PagerStringList *last, int desk) { PagerStringList *newitem; newitem = (PagerStringList *)safemalloc(sizeof(PagerStringList)); last->next = newitem; newitem->desk = desk; newitem->next = NULL; newitem->label = NULL; newitem->Dcolor = NULL; return newitem; }