/usr/src/RPM/BUILD/ctwm-4.1.0/parse_yacc.c

Go to the documentation of this file.

/*
 * Parser routines called from yacc code (gram.y)
 *
 * This is very similar to the meaning of parse_be.c; the two may be
 * merged at some point.
 */
 
#include "ctwm.h"
 
#include <stdio.h>
#include <string.h>
#include <strings.h>
 
#include "functions_defs.h"
#include "util.h"
#include "screen.h"
#include "parse.h"
#include "parse_be.h"
#include "parse_yacc.h"
#include "win_decorations_init.h"
 
#include "gram.tab.h"
 
char *Action = "";
char *Name = "";
MenuRoot *root, *pull = NULL;
 
int cont = 0;
int mods = 0;
unsigned int mods_used = (ShiftMask | ControlMask | Mod1Mask);
 
 
void yyerror(char *s)
{
    twmrc_error_prefix();
    fprintf(stderr, "error in input file:  %s\n", s ? s : "");
    ParseError = true;
}
 
void InitGramVariables(void)
{
    mods = 0;
}
 
void RemoveDQuote(char *str)
{
    char *i, *o;
    int n;
    int count;
 
    for(i = str + 1, o = str; *i && *i != '\"'; o++) {
        if(*i == '\\') {
            switch(*++i) {
                case 'n':
                    *o = '\n';
                    i++;
                    break;
                case 'b':
                    *o = '\b';
                    i++;
                    break;
                case 'r':
                    *o = '\r';
                    i++;
                    break;
                case 't':
                    *o = '\t';
                    i++;
                    break;
                case 'f':
                    *o = '\f';
                    i++;
                    break;
                case '0':
                    if(*++i == 'x') {
                        goto hex;
                    }
                    else {
                        --i;
                    }
                case '1':
                case '2':
                case '3':
                case '4':
                case '5':
                case '6':
                case '7':
                    n = 0;
                    count = 0;
                    while(*i >= '0' && *i <= '7' && count < 3) {
                        n = (n << 3) + (*i++ - '0');
                        count++;
                    }
                    *o = n;
                    break;
hex:
                case 'x':
                    n = 0;
                    count = 0;
                    while(i++, count++ < 2) {
                        if(*i >= '0' && *i <= '9') {
                            n = (n << 4) + (*i - '0');
                        }
                        else if(*i >= 'a' && *i <= 'f') {
                            n = (n << 4) + (*i - 'a') + 10;
                        }
                        else if(*i >= 'A' && *i <= 'F') {
                            n = (n << 4) + (*i - 'A') + 10;
                        }
                        else {
                            break;
                        }
                    }
                    *o = n;
                    break;
                case '\n':
                    i++;    /* punt */
                    o--;    /* to account for o++ at end of loop */
                    break;
                case '\"':
                case '\'':
                case '\\':
                default:
                    *o = *i++;
                    break;
            }
        }
        else {
            *o = *i++;
        }
    }
    *o = '\0';
}
 
MenuRoot *GetRoot(char *name, char *fore, char *back)
{
    MenuRoot *tmp;
 
    tmp = FindMenuRoot(name);
    if(tmp == NULL) {
        tmp = NewMenuRoot(name);
    }
 
    if(fore) {
        bool save;
 
        save = Scr->FirstTime;
        Scr->FirstTime = true;
        GetColor(COLOR, &tmp->highlight.fore, fore);
        GetColor(COLOR, &tmp->highlight.back, back);
        Scr->FirstTime = save;
    }
 
    return tmp;
}
 
void GotButton(int butt, int func)
{
    int i;
    MenuItem *item;
 
    for(i = 0; i < NUM_CONTEXTS; i++) {
        if((cont & (1 << i)) == 0) {
            continue;
        }
 
        if(func == F_MENU) {
            pull->prev = NULL;
            AddFuncButton(butt, i, mods, func, pull, NULL);
        }
        else {
            root = GetRoot(TWM_ROOT, NULL, NULL);
            item = AddToMenu(root, "x", Action, NULL, func, NULL, NULL);
            AddFuncButton(butt, i, mods, func, NULL, item);
        }
    }
 
    Action = "";
    pull = NULL;
    cont = 0;
    mods_used |= mods;
    mods = 0;
}
 
void GotKey(char *key, int func)
{
    int i;
 
    for(i = 0; i < NUM_CONTEXTS; i++) {
        if((cont & (1 << i)) == 0) {
            continue;
        }
 
        if(func == F_MENU) {
            pull->prev = NULL;
            if(!AddFuncKey(key, i, mods, func, pull, Name, Action)) {
                break;
            }
        }
        else if(!AddFuncKey(key, i, mods, func, NULL, Name, Action)) {
            break;
        }
    }
 
    Action = "";
    pull = NULL;
    cont = 0;
    mods_used |= mods;
    mods = 0;
}
 
 
void GotTitleButton(char *bitmapname, int func, bool rightside)
{
    if(!CreateTitleButton(bitmapname, func, Action, pull, rightside, true)) {
        twmrc_error_prefix();
        fprintf(stderr,
                "unable to create %s titlebutton \"%s\"\n",
                rightside ? "right" : "left", bitmapname);
    }
    Action = "";
    pull = NULL;
}
 
 
/* Check f.warptoscreen arg */
bool
CheckWarpScreenArg(const char *s)
{
    /* next/prev/back are valid */
    if(strcasecmp(s, WARPSCREEN_NEXT) == 0 ||
                    strcasecmp(s, WARPSCREEN_PREV) == 0 ||
                    strcasecmp(s, WARPSCREEN_BACK) == 0) {
        return true;
    }
 
    /* Or if the whole thing is numeric, it's valid too */
    for(; *s && Isascii(*s) && Isdigit(*s); s++) {
        /* nada */;
    }
    return (*s ? false : true);
}
 
 
/* f.warptoring arg */
bool
CheckWarpRingArg(const char *s)
{
    if(strcasecmp(s, WARPSCREEN_NEXT) == 0 ||
                    strcasecmp(s, WARPSCREEN_PREV) == 0) {
        return true;
    }
 
    return false;
}
 
 
/* f.colormap arg */
bool
CheckColormapArg(const char *s)
{
    if(strcasecmp(s, COLORMAP_NEXT) == 0 ||
                    strcasecmp(s, COLORMAP_PREV) == 0 ||
                    strcasecmp(s, COLORMAP_DEFAULT) == 0) {
        return true;
    }
 
    return false;
}