mirror of
git://sourceware.org/git/lvm2.git
synced 2024-12-21 13:34:40 +03:00
145 lines
2.8 KiB
C
145 lines
2.8 KiB
C
/*
|
|
* Copyright (C) 2001-2004 Sistina Software, Inc. All rights reserved.
|
|
* Copyright (C) 2004 Red Hat, Inc. All rights reserved.
|
|
*
|
|
* This file is part of LVM2.
|
|
*
|
|
* This copyrighted material is made available to anyone wishing to use,
|
|
* modify, copy, or redistribute it subject to the terms and conditions
|
|
* of the GNU General Public License v.2.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software Foundation,
|
|
* Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
|
|
#include "matcher.h"
|
|
#include "dbg_malloc.h"
|
|
#include "log.h"
|
|
|
|
#include <stdio.h>
|
|
#include <ctype.h>
|
|
#include <string.h>
|
|
#include <sys/types.h>
|
|
#include <sys/stat.h>
|
|
#include <unistd.h>
|
|
#include <fcntl.h>
|
|
#include <sys/mman.h>
|
|
|
|
|
|
static int _read_spec(const char *file, char ***regex, int *nregex)
|
|
{
|
|
char buffer[1024], *start, *ptr;
|
|
FILE *fp = fopen(file, "r");
|
|
int asize = 100;
|
|
char **rx = dbg_malloc(sizeof(*rx) * asize);
|
|
int nr = 0;
|
|
|
|
if (!fp)
|
|
return 0;
|
|
|
|
while (fgets(buffer, sizeof(buffer),fp)) {
|
|
|
|
/* trim leading whitespace */
|
|
for (ptr = buffer; *ptr && isspace((int) *ptr); ptr++);
|
|
|
|
if (!*ptr || *ptr == '#')
|
|
continue;
|
|
|
|
if (*ptr == '\"') {
|
|
ptr++;
|
|
start = ptr;
|
|
while (*ptr && *ptr != '\"') {
|
|
if (*ptr == '\\')
|
|
ptr++;
|
|
ptr++;
|
|
}
|
|
|
|
if (!*ptr) {
|
|
fprintf(stderr, "Formatting error : "
|
|
"No terminating quote\n");
|
|
return 0;
|
|
}
|
|
|
|
rx[nr] = dbg_malloc((ptr - start) + 1);
|
|
strncpy(rx[nr], start, ptr - start);
|
|
rx[nr][ptr - start] = '\0';
|
|
nr++;
|
|
} else {
|
|
fprintf(stderr, "%s", ptr);
|
|
fprintf(stderr, "Formatting error : \"<regex>\" "
|
|
"<token_name>\n");
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
*regex = rx;
|
|
*nregex = nr;
|
|
return 1;
|
|
}
|
|
|
|
static void _free_regex(char **regex, int nregex)
|
|
{
|
|
int i;
|
|
for (i = 0; i < nregex; i++)
|
|
dbg_free(regex[i]);
|
|
|
|
dbg_free(regex);
|
|
}
|
|
|
|
static void _scan_input(struct matcher *m, char **regex)
|
|
{
|
|
char buffer[256], *ptr;
|
|
int r;
|
|
|
|
while (fgets(buffer, sizeof(buffer), stdin)) {
|
|
if ((ptr = strchr(buffer, '\n')))
|
|
*ptr = '\0';
|
|
|
|
r = matcher_run(m, buffer);
|
|
|
|
if (r >= 0)
|
|
printf("%s : %s\n", buffer, regex[r]);
|
|
}
|
|
}
|
|
|
|
int main(int argc, char **argv)
|
|
{
|
|
struct pool *mem;
|
|
struct matcher *scanner;
|
|
char **regex;
|
|
int nregex;
|
|
|
|
if (argc < 2) {
|
|
fprintf(stderr, "Usage : %s <pattern_file>\n", argv[0]);
|
|
exit(1);
|
|
}
|
|
|
|
init_log(stderr);
|
|
init_debug(_LOG_DEBUG);
|
|
|
|
if (!(mem = pool_create(10 * 1024))) {
|
|
fprintf(stderr, "Couldn't create pool\n");
|
|
exit(2);
|
|
}
|
|
|
|
if (!_read_spec(argv[1], ®ex, &nregex)) {
|
|
fprintf(stderr, "Couldn't read the lex specification\n");
|
|
exit(3);
|
|
}
|
|
|
|
if (!(scanner = matcher_create(mem, (const char **) regex, nregex))) {
|
|
fprintf(stderr, "Couldn't build the lexer\n");
|
|
exit(4);
|
|
}
|
|
|
|
_scan_input(scanner, regex);
|
|
_free_regex(regex, nregex);
|
|
pool_destroy(mem);
|
|
|
|
dump_memory();
|
|
fin_log();
|
|
return 0;
|
|
}
|
|
|