/************************************************************
* Copyright (c) 1994 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.
*
********************************************************/
#include <errno.h>
#include <limits.h>
#include "path.h"
/**
* Extract the first token from an include statement.
* @param str_inout Input statement, modified in-place. Can be passed in
* repeatedly. If str_inout is NULL, the parsing has completed.
* @param file_rtrn Set to the include file to be used.
* @param map_rtrn Set to whatever comes after ), if any.
* @param nextop_rtrn Set to the next operation in the complete statement.
* @param extra_data Set to the string between ( and ), if any.
*
* @return true if parsing was succcessful, false for an illegal string.
*
* Example: "evdev+aliases(qwerty)"
* str_inout = aliases(qwerty)
* nextop_retrn = +
* extra_data = NULL
* file_rtrn = evdev
* map_rtrn = NULL
*
* 2nd run with "aliases(qwerty)"
* str_inout = NULL
* file_rtrn = aliases
* map_rtrn = qwerty
* extra_data = NULL
* nextop_retrn = ""
*
*/
bool
XkbParseIncludeMap(char **str_inout, char **file_rtrn, char **map_rtrn,
char *nextop_rtrn, char **extra_data)
{
char *tmp, *str, *next;
str = *str_inout;
/* search for tokens inside the string */
next = strpbrk(str, "|+");
if (next) {
/* set nextop_rtrn to \0, next to next character */
*nextop_rtrn = *next;
*next++ = '\0';
}
else {
*nextop_rtrn = '\0';
next = NULL;
}
/* search for :, store result in extra_data */
tmp = strchr(str, ':');
if (tmp != NULL) {
*tmp++ = '\0';
*extra_data = strdup(tmp);
}
else {
*extra_data = NULL;
}
tmp = strchr(str, '(');
if (tmp == NULL) {
*file_rtrn = strdup(str);
*map_rtrn = NULL;
}
else if (str[0] == '(') {
free(*extra_data);
return false;
}
else {
*tmp++ = '\0';
*file_rtrn = strdup(str);
str = tmp;
tmp = strchr(str, ')');
if ((tmp == NULL) || (tmp[1] != '\0')) {
free(*file_rtrn);
free(*extra_data);
return false;
}
*tmp++ = '\0';
*map_rtrn = strdup(str);
}
if (*nextop_rtrn == '\0')
*str_inout = NULL;
else if ((*nextop_rtrn == '|') || (*nextop_rtrn == '+'))
*str_inout = next;
else
return false;
return true;
}
/***====================================================================***/
/**
* Return the xkb directory based on the type.
*/
const char *
XkbDirectoryForInclude(enum xkb_file_type type)
{
switch (type) {
case FILE_TYPE_KEYMAP:
return "keymap";
case FILE_TYPE_KEYCODES:
return "keycodes";
case FILE_TYPE_TYPES:
return "types";
case FILE_TYPE_SYMBOLS:
return "symbols";
case FILE_TYPE_COMPAT:
return "compat";
case FILE_TYPE_GEOMETRY:
return "geometry";
case FILE_TYPE_RULES:
return "rules";
default:
return "";
}
}
/***====================================================================***/
/**
* Search for the given file name in the include directories.
*
* @param ctx the XKB ctx containing the include paths
* @param type one of FILE_TYPE_TYPES, FILE_TYPE_COMPAT, ..., or
* FILE_TYPE_KEYMAP or FILE_TYPE_RULES
* @param pathRtrn is set to the full path of the file if found.
*
* @return an FD to the file or NULL. If NULL is returned, the value of
* pathRtrn is undefined.
*/
FILE *
XkbFindFileInPath(struct xkb_context *ctx, const char *name,
enum xkb_file_type type, char **pathRtrn)
{
size_t i;
int ret;
FILE *file = NULL;
char buf[PATH_MAX];
const char *typeDir;
typeDir = XkbDirectoryForInclude(type);
for (i = 0; i < xkb_context_num_include_paths(ctx); i++) {
ret = snprintf(buf, sizeof(buf), "%s/%s/%s",
xkb_context_include_path_get(ctx, i), typeDir, name);
if (ret >= (ssize_t) sizeof(buf)) {
log_err(ctx, "File name (%s/%s/%s) too long\n",
xkb_context_include_path_get(ctx, i), typeDir, name);
continue;
}
file = fopen(buf, "r");
if (file == NULL) {
log_err(ctx, "Couldn't open file (%s/%s/%s): %s\n",
xkb_context_include_path_get(ctx, i), typeDir, name,
strerror(errno));
continue;
}
break;
}
if ((file != NULL) && (pathRtrn != NULL))
*pathRtrn = strdup(buf);
return file;
}