コード例 #1
0
//===========================================================================
int varset_message(int tokencount, char *tokens[], bool from_core, module* caller)
{
    int varnameidx;
    bool is_static;
    if (tokencount == 4)
    {
        varnameidx = 2;
        is_static = false;
    }
    else if (tokencount == 5 && !strcmp(tokens[2], "Static") )
    {
        varnameidx = 3;
        is_static = true;
    }
    else
        return 1;

    int i = atoi(variables_get(tokens[varnameidx],"0", caller));
    if	(	config_set_int(tokens[varnameidx+1],&i) //Try reading it as an int
            ||	config_set_int_expr(tokens[varnameidx+1],&i) // Try calculating the string as an expression
       )
        variables_set(is_static,tokens[varnameidx],i, caller);
    else variables_set(is_static, tokens[varnameidx], tokens[varnameidx+1], caller);
    return 0;
}
コード例 #2
0
ファイル: prompt_lexer.c プロジェクト: bensisko69/projet_42
static void	fetch_variable(t_context *context, t_token *token)
{
	char	*var_value;

	token->type = CHARS;
	if (!ft_strcmp(token->lexeme, "?"))
		var_value = ft_itoa(context->last_status);
	else
	{
		var_value = variables_get(context->vars, token->lexeme);
		if (!var_value)
			var_value = environ_get(context, token->lexeme);
		var_value = (var_value ? ft_strdup(var_value) : ft_strnew(0));
	}
	free(token->lexeme);
	token->lexeme = var_value;
}
コード例 #3
0
char *message_preprocess(char *buffer, module* defmodule)
{
    char *start = buffer, *end = NULL;
    while (NULL != (start = strchr(start, '$')) && NULL != (end = strchr(start+1, '$')))
    {
        int varlen = ++end - start - 2;
        const char *replacement = NULL;
        if (varlen)
        {
            char expression[400];
            extract_string(expression, start+1, varlen);
            if (0 == memcmp(expression, "Mouse.", 6))
            {
                POINT pt;
                GetCursorPos(&pt);
                switch (expression[6]) {
                case 'X':
                    sprintf(expression, "%d", (int)pt.x-10),  replacement = expression;
                    break;
                case 'Y':
                    sprintf(expression, "%d", (int)pt.y-10),  replacement = expression;
                    break;
                }
            }
            // Check if it's indirect access
            else if (expression[0] == '*')
            {
                //Indirection.
                if (char* cnameend = strchr(expression, '.')) // Refers to a property of a control.
                {
                    char cname[64], propname[64];
                    int cnamelen = cnameend-expression-1;
                    extract_string(cname, expression+1, cnamelen);
                    extract_string(propname, cnameend+1, varlen-cnamelen-1);
                    if (control *c = control_get(variables_get(cname, NULL, defmodule),defmodule) )
                    {
                        get_property_by_name(expression, c, propname);
                        replacement = expression;
                    } else replacement = NULL; // No '.' in other variable names - we failed locating the control.
                }
                else
                {
                    const char *key = variables_get(expression+1, NULL, defmodule);
                    replacement = key ? variables_get(key,NULL, defmodule) : NULL;
                }
            }
            else
            {
                //No indirection.
                if (char* cnameend = strchr(expression, '.')) // Refers to a property of a control.
                {
                    char cname[64], propname[64];
                    int cnamelen = cnameend-expression;
                    extract_string(cname, expression, cnamelen);
                    extract_string(propname, cnameend+1, varlen-cnamelen-1);
                    // Try and look up the control with the given name
                    if (!strcmp(cname,"DroppedFile")) // "fake" properties of the DroppedFile
                    {
                        strcpy(expression, variables_get("DroppedFile", NULL, defmodule));
                        if (!strcmp(propname, "Path"))
                        {
                            char* s = strrchr(expression, '\\');
                            replacement = s ? *s = 0, expression : NULL;
                        }
                        else if (!strcmp(propname, "Name"))
                        {
                            char* s = strrchr(expression, '\\');
                            char* t = strrchr(expression, '.');
                            s = s ? s+1 : expression; // step s past final slash, or set to start
                            if (t && (t-s > 0)) *t = 0;
                            replacement = s;
                        }
                        else if (!strcmp(propname, "Extension"))
                        {
                            char* s = strrchr(expression, '.');
                            replacement = s ? s+1 : NULL;
                        }
                        else if (!strcmp(propname, "Filename"))
                        {
                            char* s = strrchr(expression, '\\');
                            replacement = s ? s+1 : NULL;
                        }
                        else replacement = NULL;
                    }
                    else if (control *c = control_get(cname, defmodule) )
                    {
                        get_property_by_name(expression, c, propname);
                        replacement = expression;
                    } else replacement = NULL; // No '.' in other variable names - we failed locating the control.

                } else
                    replacement = variables_get(expression, NULL, defmodule);
            }

        }
        else
            replacement = "$"; // default: $$ becomes $

        if (replacement)
        {
            int newlen = strlen(replacement);
            memmove(start + newlen, end, strlen(end) + 1);
            memmove(start, replacement, newlen);
            end = start + newlen;
        }
        start = end;
    }
    return buffer;
}