mirror of
https://github.com/openbsd/xenocara.git
synced 2025-12-09 10:48:48 +00:00
Importing from X.Org 7.2RC2
This commit is contained in:
matthieu
462
app/xkbcomp/listing.c
Normal file
462
app/xkbcomp/listing.c
Normal file
@@ -0,0 +1,462 @@
|
||||
/* $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;
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user