Now that fvwm24 is released, maybe you can look at the windowlist.c that
i updated
It sorts first by class, grouping all windows for an app-type together.
It also displays which page (relative to current page each window is.
It's preferable to use absolute page, but i was going for quick and
dirty.
Diff it against the release version to see changes.
/* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
/****************************************************************************
* This module is all new
* by Rob Nation
* A little of it is borrowed from ctwm.
* Copyright 1993 Robert Nation. No restrictions are placed on this code,
* as long as the copyright notice is preserved
****************************************************************************/
/***********************************************************************
*
* fvwm window-list popup code
*
***********************************************************************/
#include "config.h"
#include <stdio.h>
#include <limits.h>
#include "libs/fvwmlib.h"
#include "fvwm.h"
#include "externs.h"
#include "cursor.h"
#include "functions.h"
#include "bindings.h"
#include "misc.h"
#include "screen.h"
#include "fvwmlib.h"
#include "menus.h"
#include "conditional.h"
#include "stack.h"
extern FvwmWindow *Tmp_win;
extern FvwmWindow *ButtonWindow;
#define SHOW_GEOMETRY (1<<0)
#define SHOW_ALLDESKS (1<<1)
#define SHOW_NORMAL (1<<2)
#define SHOW_ICONIC (1<<3)
#define SHOW_STICKY (1<<4)
#define NO_DESK_SORT (1<<6)
#define SHOW_ICONNAME (1<<7)
#define SHOW_ALPHABETIC (1<<8)
#define SHOW_INFONOTGEO (1<<9)
#define SHOW_EVERYTHING (SHOW_GEOMETRY | SHOW_ALLDESKS | SHOW_NORMAL |
SHOW_ICONIC | SHOW_STICKY)
/* Function to compare window title names
*/
static int globalFlags;
static int winCompare(const FvwmWindow **a, const FvwmWindow **b)
{
if(globalFlags & SHOW_ICONNAME)
return strcasecmp((*a)->icon_name,(*b)->icon_name);
else {
int cmp;
cmp = strcasecmp((*a)->class.res_class,(*b)->class.res_class);
if (cmp != 0) return cmp;
else return strcasecmp((*a)->name,(*b)->name);
}
}
/*
* Change by PRB ([EMAIL PROTECTED]), 31/10/93. Prepend a hot key
* specifier to each item in the list. This means allocating the
* memory for each item (& freeing it) rather than just using the window
* title directly. */
void CMD_WindowList(F_CMD_ARGS)
{
MenuRoot *mr;
MenuParameters mp;
char* ret_action = NULL;
FvwmWindow *t;
FvwmWindow **windowList;
int numWindows;
int ii;
char tname[80] = "";
char loc[40];
char *name=NULL;
int dwidth;
int dheight;
char tlabel[50]="";
int last_desk_done = INT_MIN;
int last_desk_displayed = INT_MIN;
int next_desk = 0;
char *t_hot=NULL; /* Menu label with hotkey added */
char scut = '0'; /* Current short cut key */
char *opts=NULL;
char *tok=NULL;
int desk = Scr.CurrentDesk;
int flags = SHOW_EVERYTHING;
char *func = NULL;
char *tfunc = NULL;
char *default_action = NULL;
MenuReturn mret;
XEvent *teventp;
MenuOptions mops;
int low_layer = 0; /* show all layers by default */
int high_layer = INT_MAX;
int tc;
int show_listskip = 0; /* do not show listskip by default */
Bool use_hotkey = True;
KeyCode old_sor_keycode;
char sor_default_keyname[8] = { 'M', 'e', 't', 'a', '_', 'L' };
char *sor_keyname = sor_default_keyname;
/* Condition vars. */
Bool use_condition = False;
WindowConditionMask mask;
char *cond_flags;
memset(&(mops.flags), 0, sizeof(mops.flags));
memset(&mret, 0, sizeof(MenuReturn));
if (action && *action)
{
/* Look for condition - CreateFlagString returns NULL if no '(' or '[' */
cond_flags = CreateFlagString(action, &action);
if (cond_flags)
{
/* Create window mask */
use_condition = True;
DefaultConditionMask(&mask);
/* override for Current [] */
mask.my_flags.use_circulate_hit = 1;
mask.my_flags.use_circulate_hit_icon = 1;
CreateConditionMask(cond_flags, &mask);
free(cond_flags);
}
if (action && *action)
{
/* parse postitioning args */
opts = GetMenuOptions(action, w, tmp_win, NULL, NULL, &mops);
}
/* parse options */
while (opts && *opts)
{
opts = GetNextSimpleOption(opts, &tok);
if (!tok)
break;
if (StrEquals(tok,"NoHotkeys"))
{
use_hotkey = False;
}
else if (StrEquals(tok,"Function"))
{
opts = GetNextSimpleOption(opts, &func);
}
else if (StrEquals(tok,"Desk"))
{
free(tok);
opts = GetNextSimpleOption(opts, &tok);
if (tok)
{
desk = atoi(tok);
flags &= ~SHOW_ALLDESKS;
}
}
else if (StrEquals(tok,"CurrentDesk"))
{
desk = Scr.CurrentDesk;
flags &= ~SHOW_ALLDESKS;
}
else if (StrEquals(tok,"NotAlphabetic"))
flags &= ~SHOW_ALPHABETIC;
else if (StrEquals(tok,"Alphabetic"))
flags |= SHOW_ALPHABETIC;
else if (StrEquals(tok,"NoDeskSort"))
flags |= NO_DESK_SORT;
else if (StrEquals(tok,"UseIconName"))
flags |= SHOW_ICONNAME;
else if (StrEquals(tok,"NoGeometry"))
{
flags &= ~SHOW_GEOMETRY;
flags &= ~SHOW_INFONOTGEO;
}
else if (StrEquals(tok,"NoGeometryWithInfo"))
{
flags &= ~SHOW_GEOMETRY;
flags |= SHOW_INFONOTGEO;
}
else if (StrEquals(tok,"Geometry"))
{
flags |= SHOW_GEOMETRY;
flags &= ~SHOW_INFONOTGEO;
}
else if (StrEquals(tok,"NoIcons"))
flags &= ~SHOW_ICONIC;
else if (StrEquals(tok,"Icons"))
flags |= SHOW_ICONIC;
else if (StrEquals(tok,"OnlyIcons"))
flags = SHOW_ICONIC;
else if (StrEquals(tok,"NoNormal"))
flags &= ~SHOW_NORMAL;
else if (StrEquals(tok,"Normal"))
flags |= SHOW_NORMAL;
else if (StrEquals(tok,"OnlyNormal"))
flags = SHOW_NORMAL;
else if (StrEquals(tok,"NoSticky"))
flags &= ~SHOW_STICKY;
else if (StrEquals(tok,"Sticky"))
flags |= SHOW_STICKY;
else if (StrEquals(tok,"OnlySticky"))
flags = SHOW_STICKY;
else if (StrEquals(tok,"UseListSkip"))
show_listskip = 1;
else if (StrEquals(tok,"OnlyListSkip"))
show_listskip = 2;
/*
these are a bit dubious, but we
should keep the OnTop options
for compatibility
*/
else if (StrEquals(tok, "NoOnTop"))
{
if (high_layer >= Scr.TopLayer)
high_layer = Scr.TopLayer - 1;
}
else if (StrEquals(tok, "OnTop"))
{
if (high_layer < Scr.TopLayer)
high_layer = Scr.TopLayer;
}
else if (StrEquals(tok, "OnlyOnTop"))
{
high_layer = low_layer = Scr.TopLayer;
}
else if (StrEquals(tok, "NoOnBottom"))
{
if (low_layer <= Scr.BottomLayer)
low_layer = Scr.BottomLayer - 1;
}
else if (StrEquals(tok, "OnBottom"))
{
if (low_layer > Scr.BottomLayer)
low_layer = Scr.BottomLayer;
}
else if (StrEquals(tok, "OnlyOnBottom"))
{
high_layer = low_layer = Scr.BottomLayer;
}
else if (StrEquals(tok, "Layer"))
{
free(tok);
opts = GetNextSimpleOption(opts, &tok);
if (tok)
{
low_layer = high_layer = atoi(tok);
free(tok);
opts = GetNextSimpleOption(opts, &tok);
if (tok)
{
high_layer = atoi(tok);
}
}
}
else if (StrEquals(tok, "SelectOnRelease"))
{
if (sor_keyname != sor_default_keyname)
free(sor_keyname);
sor_keyname = NULL;
opts = GetNextSimpleOption(opts, &sor_keyname);
}
else if (!opts || !*opts)
default_action = safestrdup(tok);
else
{
fvwm_msg(ERR,"WindowList","Unknown option '%s'",tok);
}
if (tok)
free(tok);
}
}
globalFlags = flags;
if (flags & SHOW_GEOMETRY)
{
sprintf(tlabel,"Desk: %d\tGeometry",desk);
}
else
{
sprintf(tlabel,"Desk: %d",desk);
}
mr = NewMenuRoot(tlabel);
AddToMenu(mr, tlabel, "TITLE", FALSE, FALSE);
numWindows = 0;
for (t = Scr.FvwmRoot.next; t != NULL; t = t->next)
{
numWindows++;
}
windowList = malloc(numWindows*sizeof(t));
if (windowList == NULL)
{
return;
}
/* get the windowlist starting from the current window (if any)*/
if ((t = get_focus_window()) == NULL)
t = Scr.FvwmRoot.next;
for (ii = 0; ii < numWindows; ii++)
{
windowList[ii] = t;
if (t->next)
t = t->next;
else
t = Scr.FvwmRoot.next;
}
/* Do alphabetic sort */
if (flags & SHOW_ALPHABETIC)
qsort(windowList,numWindows,sizeof(t),
(int(*)(const void*,const void*))winCompare);
while(next_desk != INT_MAX)
{
/* Sort window list by desktop number */
if((flags & SHOW_ALLDESKS) && !(flags & NO_DESK_SORT))
{
/* run through the windowlist finding the first desk not already
* processed */
next_desk = INT_MAX;
for (ii = 0; ii < numWindows; ii++)
{
t = windowList[ii];
if((t->Desk >last_desk_done)&&(t->Desk < next_desk))
next_desk = t->Desk;
}
}
if(!(flags & SHOW_ALLDESKS))
{
/* if only doing one desk and it hasn't been done */
if(last_desk_done == INT_MIN)
next_desk = desk; /* select the desk */
else
next_desk = INT_MAX; /* flag completion */
}
if(flags & NO_DESK_SORT)
next_desk = INT_MAX; /* only go through loop once */
last_desk_done = next_desk;
for (ii = 0; ii < numWindows; ii++)
{
t = windowList[ii];
if(((t->Desk == next_desk) || (flags & NO_DESK_SORT)))
{
if (!show_listskip && DO_SKIP_WINDOW_LIST(t))
continue; /* don't want listskip windows - skip */
if (show_listskip == 2 && !DO_SKIP_WINDOW_LIST(t))
continue; /* don't want no listskip one - skip */
if (use_condition && !MatchesConditionMask(t, &mask))
continue; /* doesn't match specified condition */
if (!(flags & SHOW_ICONIC) && (IS_ICONIFIED(t)))
continue; /* don't want icons - skip */
if (!(flags & SHOW_STICKY) && (IS_STICKY(t)))
continue; /* don't want sticky ones - skip */
if (!(flags & SHOW_NORMAL) &&
!((IS_ICONIFIED(t)) || (IS_STICKY(t))))
continue; /* don't want "normal" ones - skip */
if ((get_layer(t) < low_layer) || (get_layer(t) > high_layer))
continue; /* don't want this layer */
/* add separator between desks when geometry shown but not at the top*/
if (t->Desk != last_desk_displayed)
{
if (last_desk_displayed != INT_MIN)
if ((flags & SHOW_GEOMETRY) || (flags & SHOW_INFONOTGEO))
AddToMenu(mr, NULL, NULL, FALSE, FALSE);
last_desk_displayed = t->Desk;
}
if(flags & SHOW_ICONNAME)
name = t->icon_name;
else
name = t->name;
if (!name)
name = "NULL_NAME";
t_hot = safemalloc(strlen(name) + 48);
if(t->frame_g.x > 1151)
sprintf(loc,"+%d ",(t->frame_g.x)/1152);
else if(t->frame_g.x < 0)
sprintf(loc,"%d ",((t->frame_g.x)-1151)/1152);
else
sprintf(loc," 0 ");
if (use_hotkey)
sprintf(t_hot, "&%c. %s ", scut, loc); /* Generate label */
else
*t_hot = 0;
if(!(flags & SHOW_INFONOTGEO))
strcat(t_hot, name);
if (*t_hot == 0)
strcpy(t_hot, " ");
/* Next shortcut key */
if (scut == '9')
scut = 'A';
else if (scut == 'Z')
scut = '0';
else
scut++;
if (flags & SHOW_INFONOTGEO)
{
tname[0]=0;
if(!IS_ICONIFIED(t))
{
sprintf(loc,"%d:", t->Desk);
strcat(tname,loc);
}
else
strcat(tname, "(");
strcat(t_hot,"\t");
strcat(t_hot,tname);
strcat(t_hot, name);
if(IS_ICONIFIED(t))
strcat(t_hot, ")");
}
else if (flags & SHOW_GEOMETRY)
{
tname[0]=0;
if(IS_ICONIFIED(t))
strcpy(tname, "(");
sprintf(loc,"%d(%d):",t->Desk, get_layer(t));
strcat(tname,loc);
/* only show relative page
dheight = t->frame_g.height - t->title_g.height -2*t->boundary_width;
dwidth = t->frame_g.width - 2*t->boundary_width;
dwidth -= t->hints.base_width;
dheight -= t->hints.base_height;
dwidth /= t->hints.width_inc;
dheight /= t->hints.height_inc;
sprintf(loc,"%d",dwidth);
strcat(tname, loc);
sprintf(loc,"x%d",dheight);
strcat(tname, loc);
if(t->frame_g.y >=0)
sprintf(loc,"+%d",t->frame_g.y);
else
sprintf(loc,"%d",t->frame_g.y);
strcat(tname, loc);
*/
if (IS_STICKY(t))
strcat(tname, " S");
if (IS_ICONIFIED(t))
strcat(tname, ")");
strcat(t_hot,"\t");
strcat(t_hot,tname);
}
if (!func)
{
tfunc = safemalloc(40);
sprintf(tfunc,"WindowListFunc %lu", t->w);
}
else
{
tfunc = safemalloc(strlen(func) + 32);
sprintf(tfunc,"%s %lu", func, t->w);
}
AddToMenu(mr, t_hot, tfunc, FALSE, FALSE);
free(tfunc);
#ifdef MINI_ICONS
/* Add the title pixmap */
if (t->mini_icon) {
MI_MINI_ICON(MR_LAST_ITEM(mr))[0] = t->mini_icon;
t->mini_icon->count++; /* increase the cache count!!
otherwise the pixmap will be
eventually removed from the
cache by DestroyMenu */
}
#endif
if (t_hot)
free(t_hot);
}
}
}
if (func)
free(func);
free(windowList);
if (!default_action && eventp && eventp->type == KeyPress)
teventp = (XEvent *)1;
else
teventp = eventp;
/* Use the WindowList menu style is there is one */
change_mr_menu_style(mr, "WindowList");
/* Activate select_on_release style */
old_sor_keycode = MST_SELECT_ON_RELEASE_KEY(mr);
if (sor_keyname &&
(!MST_SELECT_ON_RELEASE_KEY(mr) || sor_keyname != sor_default_keyname))
{
KeyCode keycode = 0;
if (sor_keyname)
{
keycode = XKeysymToKeycode(dpy, FvwmStringToKeysym(dpy, sor_keyname));
}
MST_SELECT_ON_RELEASE_KEY(mr) =
XKeysymToKeycode(dpy, FvwmStringToKeysym(dpy, sor_keyname));
}
memset(&mp, 0, sizeof(mp));
mp.menu = mr;
mp.parent_menu = NULL;
mp.parent_item = NULL;
t = Tmp_win;
mp.pTmp_win = &t;
mp.button_window = ButtonWindow;
tc = context;
mp.pcontext = &tc;
mp.flags.has_default_action = (default_action && *default_action != 0);
mp.flags.is_menu_from_frame_or_window_or_titlebar = False;
mp.flags.is_sticky = True;
mp.flags.is_submenu = False;
mp.flags.is_already_mapped = False;
mp.eventp = teventp;
mp.pops = &mops;
mp.ret_paction = &ret_action;
mp.event_propagate_to_submenu = NULL;
do_menu(&mp, &mret);
/* Restore old menu style */
MST_SELECT_ON_RELEASE_KEY(mr) = old_sor_keycode;
if (ret_action)
free(ret_action);
DestroyMenu(mr, False, False);
if (mret.rc == MENU_DOUBLE_CLICKED && default_action && *default_action)
old_execute_function(
default_action, tmp_win, eventp, context, *Module, 0 , NULL);
if (default_action != NULL)
free(default_action);
if (use_condition)
FreeConditionMask(&mask);
}
