xserver mesa xkbcomp git update 7 nov 2012

xserver: 011f8458805e443ac9130865d2840a929a00cabf
xkbcomp: bd1103ef3cfef9cfed645566f944a69e7ca568b4
mesa: f42518962a08ce927e4ddd233d19d2661e135834

1 files changed, 495 insertions, 495 deletions

diff --git a/xkbcomp/listing.c b/xkbcomp/listing.c
index 479b47cc0..11de88a83 100644
--- a/xkbcomp/listing.c
+++ b/xkbcomp/listing.c
@@ -1,495 +1,495 @@
-/************************************************************

- Copyright 1996 by Silicon Graphics Computer Systems, Inc.

-

- Permission to use, copy, modify, and distribute this

- software and its documentation for any purpose and without

- fee is hereby granted, provided that the above copyright

- notice appear in all copies and that both that copyright

- notice and this permission notice appear in supporting

- documentation, and that the name of Silicon Graphics not be 

- used in advertising or publicity pertaining to distribution 

- of the software without specific prior written permission.

- Silicon Graphics makes no representation about the suitability 

- of this software for any purpose. It is provided "as is"

- without any express or implied warranty.

- 

- SILICON GRAPHICS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS 

- SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY 

- AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL SILICON

- GRAPHICS BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL 

- DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, 

- DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE 

- OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION  WITH

- THE USE OR PERFORMANCE OF THIS SOFTWARE.

-

- ********************************************************/

-/***********************************************************

-

-Copyright 1988, 1998  The Open Group

-

-Permission to use, copy, modify, distribute, and sell this software and its

-documentation for any purpose is hereby granted without fee, provided that

-the above copyright notice appear in all copies and that both that

-copyright notice and this permission notice appear in supporting

-documentation.

-

-The above copyright notice and this permission notice shall be included in

-all copies or substantial portions of the Software.

-

-THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR

-IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,

-FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE

-OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN

-AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN

-CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

-

-Except as contained in this notice, the name of The Open Group shall not be

-used in advertising or otherwise to promote the sale, use or other dealings

-in this Software without prior written authorization from The Open Group.

-

-

-Copyright 1988 by Digital Equipment Corporation, Maynard, Massachusetts.

-

-                        All Rights Reserved

-

-Permission to use, copy, modify, and distribute this software and its 

-documentation for any purpose and without fee is hereby granted, 

-provided that the above copyright notice appear in all copies and that

-both that copyright notice and this permission notice appear in 

-supporting documentation, and that the name of Digital not be

-used in advertising or publicity pertaining to distribution of the

-software without specific, written prior permission.  

-

-DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING

-ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL

-DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR

-ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,

-WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,

-ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS

-SOFTWARE.

-

-******************************************************************/

-

-#include <stdio.h>

-#include <ctype.h>

-#include <sys/types.h>

-#include <sys/stat.h>

-#include <X11/keysym.h>

-

-#if defined(sgi)

-#include <malloc.h>

-#endif

-

-#define	DEBUG_VAR listingDebug

-#include "xkbcomp.h"

-#include <stdlib.h>

-

-#ifdef _POSIX_SOURCE

-# include <limits.h>

-#else

-# define _POSIX_SOURCE

-# include <limits.h>

-# undef _POSIX_SOURCE

-#endif

-

-#ifndef PATH_MAX

-#ifdef WIN32

-#define PATH_MAX 512

-#else

-#include <sys/param.h>

-#endif

-#ifndef PATH_MAX

-#ifdef MAXPATHLEN

-#define PATH_MAX MAXPATHLEN

-#else

-#define PATH_MAX 1024

-#endif

-#endif

-#endif

-

-#ifdef WIN32

-# include <windows.h>

-# define FileName(file) file.cFileName

-# undef TEXT

-# undef ALTERNATE

-#else

-# include <dirent.h>

-# define FileName(file) file->d_name

-#endif

-

-#include "xkbpath.h"

-#include "parseutils.h"

-#include "misc.h"

-#include "tokens.h"

-#include <X11/extensions/XKBgeom.h>

-

-#define	lowbit(x)	((x) & (-(x)))

-

-unsigned int listingDebug;

-

-static int szListing = 0;

-static int nListed = 0;

-static int nFilesListed = 0;

-

-typedef struct _Listing

-{

-    char *file;

-    char *map;

-} Listing;

-

-static int szMapOnly;

-static int nMapOnly;

-static char **mapOnly;

-

-static Listing *list = NULL;

-

-/***====================================================================***/

-

-int

-AddMapOnly(char *map)

-{

-    if (nMapOnly >= szMapOnly)

-    {

-        if (szMapOnly < 1)

-            szMapOnly = 5;

-        else

-            szMapOnly *= 2;

-        mapOnly = uTypedRealloc(list, szMapOnly, char *);

-        if (!mapOnly)

-        {

-            WSGO("Couldn't allocate list of maps\n");

-            return 0;

-        }

-    }

-    mapOnly[nMapOnly++] = map;

-    return 1;

-}

-

-int

-AddListing(char *file, char *map)

-{

-    if (nListed >= szListing)

-    {

-        if (szListing < 1)

-            szListing = 10;

-        else

-            szListing *= 2;

-        list = uTypedRealloc(list, szListing, Listing);

-        if (!list)

-        {

-            WSGO("Couldn't allocate list of files and maps\n");

-            ACTION("Exiting\n");

-            exit(1);

-        }

-    }

-

-    list[nListed].file = file;

-    list[nListed].map = map;

-    nListed++;

-    if (file != NULL)

-        nFilesListed++;

-    return 1;

-}

-

-/***====================================================================***/

-

-static void

-ListFile(FILE * outFile, char *fileName, XkbFile * map)

-{

-    register unsigned flags;

-    char *mapName;

-

-    flags = map->flags;

-    if ((flags & XkbLC_Hidden) && (!(verboseLevel & WantHiddenMaps)))

-        return;

-    if ((flags & XkbLC_Partial) && (!(verboseLevel & WantPartialMaps)))

-        return;

-    if (verboseLevel & WantLongListing)

-    {

-        fprintf(outFile, (flags & XkbLC_Hidden) ? "h" : "-");

-        fprintf(outFile, (flags & XkbLC_Default) ? "d" : "-");

-        fprintf(outFile, (flags & XkbLC_Partial) ? "p" : "-");

-        fprintf(outFile, "----- ");

-        if (map->type == XkmSymbolsIndex)

-        {

-            fprintf(outFile, (flags & XkbLC_AlphanumericKeys) ? "a" : "-");

-            fprintf(outFile, (flags & XkbLC_ModifierKeys) ? "m" : "-");

-            fprintf(outFile, (flags & XkbLC_KeypadKeys) ? "k" : "-");

-            fprintf(outFile, (flags & XkbLC_FunctionKeys) ? "f" : "-");

-            fprintf(outFile, (flags & XkbLC_AlternateGroup) ? "g" : "-");

-            fprintf(outFile, "--- ");

-        }

-        else

-            fprintf(outFile, "-------- ");

-    }

-    mapName = map->name;

-    if ((!(verboseLevel & WantFullNames)) && ((flags & XkbLC_Default) != 0))

-        mapName = NULL;

-    if (dirsToStrip > 0)

-    {

-        char *tmp, *last;

-        int i;

-        for (i = 0, tmp = last = fileName; (i < dirsToStrip) && tmp; i++)

-        {

-            last = tmp;

-            tmp = strchr(tmp, '/');

-            if (tmp != NULL)

-                tmp++;

-        }

-        fileName = (tmp ? tmp : last);

-    }

-    if (mapName)

-        fprintf(outFile, "%s(%s)\n", fileName, mapName);

-    else

-        fprintf(outFile, "%s\n", fileName);

-    return;

-}

-

-/***====================================================================***/

-

-static int

-AddDirectory(char *head, char *ptrn, char *rest, char *map)

-{

-#ifdef WIN32

-    HANDLE dirh;

-    WIN32_FIND_DATA file;

-#else

-    DIR *dirp;

-    struct dirent *file;

-#endif

-    int nMatch;

-

-    if (map == NULL)

-    {

-        char *tmp = ptrn;

-        if ((rest == NULL) && (ptrn != NULL) && (strchr(ptrn, '/') == NULL))

-        {

-            tmp = ptrn;

-            map = strchr(ptrn, '(');

-        }

-        else if ((rest == NULL) && (ptrn == NULL) &&

-                 (head != NULL) && (strchr(head, '/') == NULL))

-        {

-            tmp = head;

-            map = strchr(head, '(');

-        }

-        if (map != NULL)

-        {

-            tmp = strchr(tmp, ')');

-            if ((tmp == NULL) || (tmp[1] != '\0'))

-            {

-                ERROR1("File and map must have the format file(map)\n");

-                return 0;

-            }

-            *map = '\0';

-            map++;

-            *tmp = '\0';

-        }

-    }

-#ifdef WIN32

-    if ((dirh = FindFirstFile("*.*", &file)) == INVALID_HANDLE_VALUE)

-        return 0;

-#else

-    if ((dirp = opendir((head ? head : "."))) == NULL)

-        return 0;

-    nMatch = 0;

-#endif

-#ifdef WIN32

-    do

-#else

-    while ((file = readdir(dirp)) != NULL)

-#endif

-    {

-        char *tmp, *filename;

-        struct stat sbuf;

-

-        filename = FileName(file);

-        if (!filename || filename[0] == '.')

-            continue;

-        if (ptrn && (!XkbNameMatchesPattern(filename, ptrn)))

-            continue;

-        tmp =

-            (char *) uAlloc((head ? strlen(head) : 0) + strlen(filename) + 2);

-        if (!tmp)

-            continue;

-        sprintf(tmp, "%s%s%s", (head ? head : ""), (head ? "/" : ""),

-                filename);

-        if (stat(tmp, &sbuf) < 0)

-        {

-            uFree(tmp);

-            continue;

-        }

-        if (((rest != NULL) && (!S_ISDIR(sbuf.st_mode))) ||

-            ((map != NULL) && (S_ISDIR(sbuf.st_mode))))

-        {

-            uFree(tmp);

-            continue;

-        }

-        if (S_ISDIR(sbuf.st_mode))

-        {

-            if ((rest != NULL) || (verboseLevel & ListRecursive))

-                nMatch += AddDirectory(tmp, rest, NULL, map);

-        }

-        else

-            nMatch += AddListing(tmp, map);

-    }

-#ifdef WIN32

-    while (FindNextFile(dirh, &file));

-#endif

-    return nMatch;

-}

-

-/***====================================================================***/

-

-Bool

-AddMatchingFiles(char *head_in)

-{

-    char *str, *head, *ptrn, *rest = NULL;

-

-    if (head_in == NULL)

-        return 0;

-    ptrn = NULL;

-    for (str = head_in; (*str != '\0') && (*str != '?') && (*str != '*');

-         str++)

-    {

-        if ((str != head_in) && (*str == '/'))

-            ptrn = str;

-    }

-    if (*str == '\0')

-    {                           /* no wildcards */

-        head = head_in;

-        ptrn = NULL;

-        rest = NULL;

-    }

-    else if (ptrn == NULL)

-    {                           /* no slash before the first wildcard */

-        head = NULL;

-        ptrn = head_in;

-    }

-    else

-    {                           /* slash followed by wildcard */

-        head = head_in;

-        *ptrn = '\0';

-        ptrn++;

-    }

-    if (ptrn)

-    {

-        rest = strchr(ptrn, '/');

-        if (rest != NULL)

-        {

-            *rest = '\0';

-            rest++;

-        }

-    }

-    if (((rest && ptrn)

-         && ((strchr(ptrn, '(') != NULL) || (strchr(ptrn, ')') != NULL)))

-        || (head

-            && ((strchr(head, '(') != NULL) || (strchr(head, ')') != NULL))))

-    {

-        ERROR1("Files/maps to list must have the form file(map)\n");

-        ACTION("Illegal specifier ignored\n");

-        return 0;

-    }

-    return AddDirectory(head, ptrn, rest, NULL);

-}

-

-/***====================================================================***/

-

-static Bool

-MapMatches(char *mapToConsider, char *ptrn)

-{

-    int i;

-

-    if (ptrn != NULL)

-        return XkbNameMatchesPattern(mapToConsider, ptrn);

-    if (nMapOnly < 1)

-        return True;

-    for (i = 0; i < nMapOnly; i++)

-    {

-        if (XkbNameMatchesPattern(mapToConsider, mapOnly[i]))

-            return True;

-    }

-    return False;

-}

-

-int

-GenerateListing(char *out_name)

-{

-    int i;

-    FILE *inputFile, *outFile;

-    XkbFile *rtrn, *mapToUse;

-    unsigned oldWarningLevel;

-    char *mapName;

-

-    if (nFilesListed < 1)

-    {

-        ERROR1("Must specify at least one file or pattern to list\n");

-        return 0;

-    }

-    if ((!out_name) || ((out_name[0] == '-') && (out_name[1] == '\0')))

-        outFile = stdout;

-    else if ((outFile = fopen(out_name, "w")) == NULL)

-    {

-        ERROR1("Cannot open \"%s\" to write keyboard description\n",

-               out_name);

-        ACTION("Exiting\n");

-        return 0;

-    }

-#ifdef DEBUG

-    if (warningLevel > 9)

-        fprintf(stderr, "should list:\n");

-#endif

-    for (i = 0; i < nListed; i++)

-    {

-#ifdef DEBUG

-        if (warningLevel > 9)

-        {

-            fprintf(stderr, "%s(%s)\n",

-                    (list[i].file ? list[i].file : "*"),

-                    (list[i].map ? list[i].map : "*"));

-        }

-#endif

-        oldWarningLevel = warningLevel;

-        warningLevel = 0;

-        if (list[i].file)

-        {

-            struct stat sbuf;

-

-            if (stat(list[i].file, &sbuf) < 0)

-            {

-                if (oldWarningLevel > 5)

-                    WARN1("Couldn't open \"%s\"\n", list[i].file);

-                continue;

-            }

-            if (S_ISDIR(sbuf.st_mode))

-            {

-                if (verboseLevel & ListRecursive)

-                    AddDirectory(list[i].file, NULL, NULL, NULL);

-                continue;

-            }

-

-            inputFile = fopen(list[i].file, "r");

-            if (!inputFile)

-            {

-                if (oldWarningLevel > 5)

-                    WARN1("Couldn't open \"%s\"\n", list[i].file);

-                continue;

-            }

-            setScanState(list[i].file, 1);

-            if (XKBParseFile(inputFile, &rtrn) && (rtrn != NULL))

-            {

-                mapName = list[i].map;

-                mapToUse = rtrn;

-                for (; mapToUse; mapToUse = (XkbFile *) mapToUse->common.next)

-                {

-                    if (!MapMatches(mapToUse->name, mapName))

-                        continue;

-                    ListFile(outFile, list[i].file, mapToUse);

-                }

-            }

-            fclose(inputFile);

-        }

-        warningLevel = oldWarningLevel;

-    }

-    return 1;

-}

+/************************************************************
+ Copyright 1996 by Silicon Graphics Computer Systems, Inc.
+
+ Permission to use, copy, modify, and distribute this
+ software and its documentation for any purpose and without
+ fee is hereby granted, provided that the above copyright
+ notice appear in all copies and that both that copyright
+ notice and this permission notice appear in supporting
+ documentation, and that the name of Silicon Graphics not be 
+ used in advertising or publicity pertaining to distribution 
+ of the software without specific prior written permission.
+ Silicon Graphics makes no representation about the suitability 
+ of this software for any purpose. It is provided "as is"
+ without any express or implied warranty.
+ 
+ SILICON GRAPHICS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS 
+ SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY 
+ AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL SILICON
+ GRAPHICS BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL 
+ DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, 
+ DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE 
+ OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION  WITH
+ THE USE OR PERFORMANCE OF THIS SOFTWARE.
+
+ ********************************************************/
+/***********************************************************
+
+Copyright 1988, 1998  The Open Group
+
+Permission to use, copy, modify, distribute, and sell this software and its
+documentation for any purpose is hereby granted without fee, provided that
+the above copyright notice appear in all copies and that both that
+copyright notice and this permission notice appear in supporting
+documentation.
+
+The above copyright notice and this permission notice shall be included in
+all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
+OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
+CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+Except as contained in this notice, the name of The Open Group shall not be
+used in advertising or otherwise to promote the sale, use or other dealings
+in this Software without prior written authorization from The Open Group.
+
+
+Copyright 1988 by Digital Equipment Corporation, Maynard, Massachusetts.
+
+                        All Rights Reserved
+
+Permission to use, copy, modify, and distribute this software and its 
+documentation for any purpose and without fee is hereby granted, 
+provided that the above copyright notice appear in all copies and that
+both that copyright notice and this permission notice appear in 
+supporting documentation, and that the name of Digital not be
+used in advertising or publicity pertaining to distribution of the
+software without specific, written prior permission.  
+
+DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
+ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
+DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
+ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
+WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
+ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
+SOFTWARE.
+
+******************************************************************/
+
+#include <stdio.h>
+#include <ctype.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <X11/keysym.h>
+
+#if defined(sgi)
+#include <malloc.h>
+#endif
+
+#define	DEBUG_VAR listingDebug
+#include "xkbcomp.h"
+#include <stdlib.h>
+
+#ifdef _POSIX_SOURCE
+# include <limits.h>
+#else
+# define _POSIX_SOURCE
+# include <limits.h>
+# undef _POSIX_SOURCE
+#endif
+
+#ifndef PATH_MAX
+#ifdef WIN32
+#define PATH_MAX 512
+#else
+#include <sys/param.h>
+#endif
+#ifndef PATH_MAX
+#ifdef MAXPATHLEN
+#define PATH_MAX MAXPATHLEN
+#else
+#define PATH_MAX 1024
+#endif
+#endif
+#endif
+
+#ifdef WIN32
+# include <X11/Xwindows.h>
+# define FileName(file) file.cFileName
+# undef TEXT
+# undef ALTERNATE
+#else
+# include <dirent.h>
+# define FileName(file) file->d_name
+#endif
+
+#include "xkbpath.h"
+#include "parseutils.h"
+#include "misc.h"
+#include "tokens.h"
+#include <X11/extensions/XKBgeom.h>
+
+#define	lowbit(x)	((x) & (-(x)))
+
+unsigned int listingDebug;
+
+static int szListing = 0;
+static int nListed = 0;
+static int nFilesListed = 0;
+
+typedef struct _Listing
+{
+    char *file;
+    char *map;
+} Listing;
+
+static int szMapOnly;
+static int nMapOnly;
+static char **mapOnly;
+
+static Listing *list = NULL;
+
+/***====================================================================***/
+
+int
+AddMapOnly(char *map)
+{
+    if (nMapOnly >= szMapOnly)
+    {
+        if (szMapOnly < 1)
+            szMapOnly = 5;
+        else
+            szMapOnly *= 2;
+        mapOnly = uTypedRealloc(list, szMapOnly, char *);
+        if (!mapOnly)
+        {
+            WSGO("Couldn't allocate list of maps\n");
+            return 0;
+        }
+    }
+    mapOnly[nMapOnly++] = map;
+    return 1;
+}
+
+int
+AddListing(char *file, char *map)
+{
+    if (nListed >= szListing)
+    {
+        if (szListing < 1)
+            szListing = 10;
+        else
+            szListing *= 2;
+        list = uTypedRealloc(list, szListing, Listing);
+        if (!list)
+        {
+            WSGO("Couldn't allocate list of files and maps\n");
+            ACTION("Exiting\n");
+            exit(1);
+        }
+    }
+
+    list[nListed].file = file;
+    list[nListed].map = map;
+    nListed++;
+    if (file != NULL)
+        nFilesListed++;
+    return 1;
+}
+
+/***====================================================================***/
+
+static void
+ListFile(FILE * outFile, char *fileName, XkbFile * map)
+{
+    register unsigned flags;
+    char *mapName;
+
+    flags = map->flags;
+    if ((flags & XkbLC_Hidden) && (!(verboseLevel & WantHiddenMaps)))
+        return;
+    if ((flags & XkbLC_Partial) && (!(verboseLevel & WantPartialMaps)))
+        return;
+    if (verboseLevel & WantLongListing)
+    {
+        fprintf(outFile, (flags & XkbLC_Hidden) ? "h" : "-");
+        fprintf(outFile, (flags & XkbLC_Default) ? "d" : "-");
+        fprintf(outFile, (flags & XkbLC_Partial) ? "p" : "-");
+        fprintf(outFile, "----- ");
+        if (map->type == XkmSymbolsIndex)
+        {
+            fprintf(outFile, (flags & XkbLC_AlphanumericKeys) ? "a" : "-");
+            fprintf(outFile, (flags & XkbLC_ModifierKeys) ? "m" : "-");
+            fprintf(outFile, (flags & XkbLC_KeypadKeys) ? "k" : "-");
+            fprintf(outFile, (flags & XkbLC_FunctionKeys) ? "f" : "-");
+            fprintf(outFile, (flags & XkbLC_AlternateGroup) ? "g" : "-");
+            fprintf(outFile, "--- ");
+        }
+        else
+            fprintf(outFile, "-------- ");
+    }
+    mapName = map->name;
+    if ((!(verboseLevel & WantFullNames)) && ((flags & XkbLC_Default) != 0))
+        mapName = NULL;
+    if (dirsToStrip > 0)
+    {
+        char *tmp, *last;
+        int i;
+        for (i = 0, tmp = last = fileName; (i < dirsToStrip) && tmp; i++)
+        {
+            last = tmp;
+            tmp = strchr(tmp, '/');
+            if (tmp != NULL)
+                tmp++;
+        }
+        fileName = (tmp ? tmp : last);
+    }
+    if (mapName)
+        fprintf(outFile, "%s(%s)\n", fileName, mapName);
+    else
+        fprintf(outFile, "%s\n", fileName);
+    return;
+}
+
+/***====================================================================***/
+
+static int
+AddDirectory(char *head, char *ptrn, char *rest, char *map)
+{
+#ifdef WIN32
+    HANDLE dirh;
+    WIN32_FIND_DATA file;
+#else
+    DIR *dirp;
+    struct dirent *file;
+#endif
+    int nMatch;
+
+    if (map == NULL)
+    {
+        char *tmp = ptrn;
+        if ((rest == NULL) && (ptrn != NULL) && (strchr(ptrn, '/') == NULL))
+        {
+            tmp = ptrn;
+            map = strchr(ptrn, '(');
+        }
+        else if ((rest == NULL) && (ptrn == NULL) &&
+                 (head != NULL) && (strchr(head, '/') == NULL))
+        {
+            tmp = head;
+            map = strchr(head, '(');
+        }
+        if (map != NULL)
+        {
+            tmp = strchr(tmp, ')');
+            if ((tmp == NULL) || (tmp[1] != '\0'))
+            {
+                ERROR1("File and map must have the format file(map)\n");
+                return 0;
+            }
+            *map = '\0';
+            map++;
+            *tmp = '\0';
+        }
+    }
+#ifdef WIN32
+    if ((dirh = FindFirstFile("*.*", &file)) == INVALID_HANDLE_VALUE)
+        return 0;
+#else
+    if ((dirp = opendir((head ? head : "."))) == NULL)
+        return 0;
+    nMatch = 0;
+#endif
+#ifdef WIN32
+    do
+#else
+    while ((file = readdir(dirp)) != NULL)
+#endif
+    {
+        char *tmp, *filename;
+        struct stat sbuf;
+
+        filename = FileName(file);
+        if (!filename || filename[0] == '.')
+            continue;
+        if (ptrn && (!XkbNameMatchesPattern(filename, ptrn)))
+            continue;
+        tmp =
+            (char *) uAlloc((head ? strlen(head) : 0) + strlen(filename) + 2);
+        if (!tmp)
+            continue;
+        sprintf(tmp, "%s%s%s", (head ? head : ""), (head ? "/" : ""),
+                filename);
+        if (stat(tmp, &sbuf) < 0)
+        {
+            uFree(tmp);
+            continue;
+        }
+        if (((rest != NULL) && (!S_ISDIR(sbuf.st_mode))) ||
+            ((map != NULL) && (S_ISDIR(sbuf.st_mode))))
+        {
+            uFree(tmp);
+            continue;
+        }
+        if (S_ISDIR(sbuf.st_mode))
+        {
+            if ((rest != NULL) || (verboseLevel & ListRecursive))
+                nMatch += AddDirectory(tmp, rest, NULL, map);
+        }
+        else
+            nMatch += AddListing(tmp, map);
+    }
+#ifdef WIN32
+    while (FindNextFile(dirh, &file));
+#endif
+    return nMatch;
+}
+
+/***====================================================================***/
+
+Bool
+AddMatchingFiles(char *head_in)
+{
+    char *str, *head, *ptrn, *rest = NULL;
+
+    if (head_in == NULL)
+        return 0;
+    ptrn = NULL;
+    for (str = head_in; (*str != '\0') && (*str != '?') && (*str != '*');
+         str++)
+    {
+        if ((str != head_in) && (*str == '/'))
+            ptrn = str;
+    }
+    if (*str == '\0')
+    {                           /* no wildcards */
+        head = head_in;
+        ptrn = NULL;
+        rest = NULL;
+    }
+    else if (ptrn == NULL)
+    {                           /* no slash before the first wildcard */
+        head = NULL;
+        ptrn = head_in;
+    }
+    else
+    {                           /* slash followed by wildcard */
+        head = head_in;
+        *ptrn = '\0';
+        ptrn++;
+    }
+    if (ptrn)
+    {
+        rest = strchr(ptrn, '/');
+        if (rest != NULL)
+        {
+            *rest = '\0';
+            rest++;
+        }
+    }
+    if (((rest && ptrn)
+         && ((strchr(ptrn, '(') != NULL) || (strchr(ptrn, ')') != NULL)))
+        || (head
+            && ((strchr(head, '(') != NULL) || (strchr(head, ')') != NULL))))
+    {
+        ERROR1("Files/maps to list must have the form file(map)\n");
+        ACTION("Illegal specifier ignored\n");
+        return 0;
+    }
+    return AddDirectory(head, ptrn, rest, NULL);
+}
+
+/***====================================================================***/
+
+static Bool
+MapMatches(char *mapToConsider, char *ptrn)
+{
+    int i;
+
+    if (ptrn != NULL)
+        return XkbNameMatchesPattern(mapToConsider, ptrn);
+    if (nMapOnly < 1)
+        return True;
+    for (i = 0; i < nMapOnly; i++)
+    {
+        if (XkbNameMatchesPattern(mapToConsider, mapOnly[i]))
+            return True;
+    }
+    return False;
+}
+
+int
+GenerateListing(char *out_name)
+{
+    int i;
+    FILE *inputFile, *outFile;
+    XkbFile *rtrn, *mapToUse;
+    unsigned oldWarningLevel;
+    char *mapName;
+
+    if (nFilesListed < 1)
+    {
+        ERROR1("Must specify at least one file or pattern to list\n");
+        return 0;
+    }
+    if ((!out_name) || ((out_name[0] == '-') && (out_name[1] == '\0')))
+        outFile = stdout;
+    else if ((outFile = fopen(out_name, "w")) == NULL)
+    {
+        ERROR1("Cannot open \"%s\" to write keyboard description\n",
+               out_name);
+        ACTION("Exiting\n");
+        return 0;
+    }
+#ifdef DEBUG
+    if (warningLevel > 9)
+        fprintf(stderr, "should list:\n");
+#endif
+    for (i = 0; i < nListed; i++)
+    {
+#ifdef DEBUG
+        if (warningLevel > 9)
+        {
+            fprintf(stderr, "%s(%s)\n",
+                    (list[i].file ? list[i].file : "*"),
+                    (list[i].map ? list[i].map : "*"));
+        }
+#endif
+        oldWarningLevel = warningLevel;
+        warningLevel = 0;
+        if (list[i].file)
+        {
+            struct stat sbuf;
+
+            if (stat(list[i].file, &sbuf) < 0)
+            {
+                if (oldWarningLevel > 5)
+                    WARN1("Couldn't open \"%s\"\n", list[i].file);
+                continue;
+            }
+            if (S_ISDIR(sbuf.st_mode))
+            {
+                if (verboseLevel & ListRecursive)
+                    AddDirectory(list[i].file, NULL, NULL, NULL);
+                continue;
+            }
+
+            inputFile = fopen(list[i].file, "r");
+            if (!inputFile)
+            {
+                if (oldWarningLevel > 5)
+                    WARN1("Couldn't open \"%s\"\n", list[i].file);
+                continue;
+            }
+            setScanState(list[i].file, 1);
+            if (XKBParseFile(inputFile, &rtrn) && (rtrn != NULL))
+            {
+                mapName = list[i].map;
+                mapToUse = rtrn;
+                for (; mapToUse; mapToUse = (XkbFile *) mapToUse->common.next)
+                {
+                    if (!MapMatches(mapToUse->name, mapName))
+                        continue;
+                    ListFile(outFile, list[i].file, mapToUse);
+                }
+            }
+            fclose(inputFile);
+        }
+        warningLevel = oldWarningLevel;
+    }
+    return 1;
+}