start on the cleanup of cmd.c. these aren't used yet, but the parsing is

working
This commit is contained in:
Bill Currie 2002-07-30 17:08:53 +00:00
parent 46ee46fdc6
commit 021decc7bd
2 changed files with 329 additions and 0 deletions

57
include/QF/cbuf.h Normal file
View File

@ -0,0 +1,57 @@
/*
#FILENAME#
#DESCRIPTION#
Copyright (C) 2002 #AUTHOR#
Author: #AUTHOR#
Date: #DATE#
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
See the GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to:
Free Software Foundation, Inc.
59 Temple Place - Suite 330
Boston, MA 02111-1307, USA
$Id$
*/
#ifndef __QF_cbuf_h
#define __QF_cbuf_h
typedef struct cbuf_args_s {
int argc;
struct dstring_s **argv;
const char **args;
int argv_size;
} cbuf_args_t;
typedef struct cbuf_s {
struct dstring_s *buf;
struct dstring_s *line;
cbuf_args_t *args;
void (*extract_line) (struct cbuf_s *cbuf);
void (*parse_line) (struct cbuf_s *cbuf);
} cbuf_t;
cbuf_t *Cbuf_New (void);
void CBuf_Delete (cbuf_t *cbuf);
void Cbuf_AddText (cbuf_t *cbuf, const char *text);
void Cbuf_InsertText (cbuf_t *cbuf, const char *text);
void Cbuf_Execute (cbuf_t *cbuf);
void Cbuf_Execute_Sets (cbuf_t *cbuf);
#endif//__QF_cbuf_h

272
libs/util/cbuf.c Normal file
View File

@ -0,0 +1,272 @@
/*
#FILENAME#
#DESCRIPTION#
Copyright (C) 2002 #AUTHOR#
Author: #AUTHOR#
Date: #DATE#
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
See the GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to:
Free Software Foundation, Inc.
59 Temple Place - Suite 330
Boston, MA 02111-1307, USA
*/
static const char rcsid[] =
"$Id$";
#ifdef HAVE_CONFIG_H
# include "config.h"
#endif
#ifdef HAVE_STRING_H
# include <string.h>
#endif
#ifdef HAVE_STRINGS_H
# include <strings.h>
#endif
#include <ctype.h>
#include <stdlib.h>
#include "QF/cbuf.h"
#include "QF/dstring.h"
#include "QF/qtypes.h"
#include "compat.h"
static dstring_t *_com_token;
const char *com_token;
cbuf_args_t *
Cbuf_ArgsNew (void)
{
return calloc (1, sizeof (cbuf_args_t));
}
void
Cbuf_ArgsDelete (cbuf_args_t *args)
{
int i;
for (i = 0; i < args->argv_size; i++)
dstring_delete (args->argv[i]);
free (args->argv);
free (args->args);
free (args);
}
void
Cbuf_ArgsAdd (cbuf_args_t *args, const char *arg)
{
int i;
if (args->argc == args->argv_size) {
args->argv_size += 4;
args->argv = realloc (args->argv,
args->argv_size * sizeof (dstring_t *));
args->args = realloc (args->args, args->argv_size * sizeof (char *));
for (i = args->argv_size - 4; i < args->argv_size; i++) {
args->argv[i] = dstring_newstr ();
args->args[i] = 0;
}
}
dstring_clearstr (args->argv[args->argc]);
dstring_appendstr (args->argv[args->argc], arg);
args->argc++;
}
const char *
COM_Parse (const char *data)
{
int c;
int i;
if (!_com_token) {
_com_token = dstring_newstr ();
} else {
dstring_clearstr (_com_token);
}
com_token = _com_token->str;
if (!data)
return 0;
skipwhite:
while (isspace ((byte) *data))
data++;
if (!*data)
return 0;
if (data[0] == '/' && data[1] == '/') {
while (*data && *data != '\n')
data++;
goto skipwhite;
}
if (*data == '"') {
data++;
i = 0;
while (1) {
c = data[i++];
if (c == '"' || !c) {
dstring_insert (_com_token, data, i - 1, 0);
goto done;
}
}
}
i = 0;
do {
i++;
} while (data[i] && !isspace ((byte) data[i]));
dstring_insert (_com_token, data, i, 0);
done:
com_token = _com_token->str;
return data + i;
}
void
COM_TokenizeString (const char *str, cbuf_args_t *args)
{
const char *s;
args->argc = 0;
while (1) {
while (isspace ((byte)*str) && *str != '\n')
str++;
if (*str == '\n') {
str++;
break;
}
if (!*str)
return;
s = COM_Parse (str);
if (!s)
return;
Cbuf_ArgsAdd (args, com_token);
args->args[args->argc - 1] = str;
str = s;
}
return;
}
static void
extract_line (cbuf_t *cbuf)
{
int i;
int len = cbuf->buf->size - 1;
char *text = cbuf->buf->str;
int quotes = 0;
dstring_clearstr (cbuf->line);
for (i = 0; i < len; i++) {
if (text[i] == '"')
quotes++;
if (!(quotes & 1)) {
if (text[i] == ';')
// don't break if inside a quoted string
break;
if (text[i] == '/' && text[i + 1] == '/') {
int j = i;
while (j < len && text[j] != '\n' && text[j] != '\r')
i++;
dstring_snip (cbuf->buf, i, j - i);
len -= j - i;
}
}
if (text[i] == '\n' || text[i] == '\r')
break;
}
if (i)
dstring_insert (cbuf->line, text, i, 0);
if (text[i]) {
dstring_snip (cbuf->buf, 0, i + 1);
} else {
// We've hit the end of the buffer, just clear it
dstring_clearstr (cbuf->buf);
}
}
static void
parse_line (cbuf_t *cbuf)
{
COM_TokenizeString (cbuf->line->str, cbuf->args);;
}
cbuf_t *
Cbuf_New (void)
{
cbuf_t *cbuf = calloc (1, sizeof (cbuf_t));
cbuf->buf = dstring_newstr ();
cbuf->line = dstring_newstr ();
cbuf->args = Cbuf_ArgsNew ();
cbuf->extract_line = extract_line;
cbuf->parse_line = parse_line;
return cbuf;
}
void
CBuf_Delete (cbuf_t *cbuf)
{
if (!cbuf)
return;
dstring_delete (cbuf->buf);
dstring_delete (cbuf->line);
Cbuf_ArgsDelete (cbuf->args);
free (cbuf);
}
void
Cbuf_AddText (cbuf_t *cbuf, const char *text)
{
dstring_appendstr (cbuf->buf, text);
}
void
Cbuf_InsertText (cbuf_t *cbuf, const char *text)
{
dstring_insertstr (cbuf->buf, "\n", 0);
dstring_insertstr (cbuf->buf, text, 0);
}
void
Cbuf_Execute (cbuf_t *cbuf)
{
while (cbuf->buf->str[0]) {
cbuf->extract_line (cbuf);
cbuf->parse_line (cbuf);
if (!cbuf->args->argc)
continue;
Cmd_ExecCmd (cbuf->args);
}
}
void
Cbuf_Execute_Sets (cbuf_t *cbuf)
{
while (cbuf->buf->str[0]) {
cbuf->extract_line (cbuf);
cbuf->parse_line (cbuf);
if (!cbuf->args->argc)
continue;
if (strequal (cbuf->args->argv[0]->str, "set")
|| strequal (cbuf->args->argv[0]->str, "setrom"))
Cmd_ExecCmd (cbuf);
}
}