Edit

kc3-lang/libxkbcommon/src/xkbcomp/path.c

Branch :

  • Show log

    Commit

  • Author : Ran Benita
    Date : 2012-07-25 17:29:08
    Hash : 724f62c8
    Message : Convert defines to enums in xkbcomp.h For statement / expression types. Signed-off-by: Ran Benita <ran234@gmail.com>

  • src/xkbcomp/path.c
  • /************************************************************
     * 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;
    }