463 lines
12 KiB
C
463 lines
12 KiB
C
/* $Xorg: listing.c,v 1.5 2001/02/09 02:05:49 xorgcvs Exp $ */
|
|
/************************************************************
|
|
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.
|
|
|
|
******************************************************************/
|
|
/* $XFree86: xc/programs/xkbcomp/listing.c,v 3.9 2001/12/14 20:01:57 dawes Exp $ */
|
|
|
|
|
|
#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_NOT_LOCAL
|
|
#define DEBUG_VAR listingDebug
|
|
#include "xkbcomp.h"
|
|
#include <stdlib.h>
|
|
#ifndef X_NOT_POSIX
|
|
#ifdef _POSIX_SOURCE
|
|
#include <limits.h>
|
|
#else
|
|
#define _POSIX_SOURCE
|
|
#include <limits.h>
|
|
#undef _POSIX_SOURCE
|
|
#endif
|
|
#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
|
|
#define FileName(file) file->d_name
|
|
#ifndef X_NOT_POSIX
|
|
#include <dirent.h>
|
|
#else
|
|
#ifdef SYSV
|
|
#include <dirent.h>
|
|
#else
|
|
#ifdef USG
|
|
#include <dirent.h>
|
|
#else
|
|
#include <sys/dir.h>
|
|
#ifndef dirent
|
|
#define dirent direct
|
|
#endif
|
|
#endif
|
|
#endif
|
|
#endif
|
|
#endif
|
|
|
|
#include "xkbpath.h"
|
|
#include "parseutils.h"
|
|
#include "misc.h"
|
|
#include "tokens.h"
|
|
#include <X11/extensions/XKBgeom.h>
|
|
|
|
#define lowbit(x) ((x) & (-(x)))
|
|
|
|
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;
|
|
}
|
|
|