wmii/cmd/wm/rule.c
2006-03-26 17:49:31 +02:00

141 lines
2.3 KiB
C

/*
* (C)opyright MMVI Anselm R. Garbe <garbeam at gmail dot com>
* See LICENSE file for license details.
*/
#include <string.h>
#include <stdlib.h>
#include <sys/types.h>
#include <regex.h>
#include "wm.h"
/*
* basic rule matching language
*
* /regex/ -> tag [tag ...]
*
* regex might contain POSIX regex syntax defined in regex(3)
*/
typedef struct {
regex_t regex;
char tag[MAX_TAGS][MAX_TAGLEN];
unsigned int ntag;
Bool is_valid;
} Rule;
enum {
IGNORE,
REGEX,
TAGS
};
static Rule *
parse(char *data, unsigned int *n)
{
static Rule *rule = nil;
static unsigned int rulesz = 0;
unsigned int i;
int mode = IGNORE;
char *p, *r, *t, regex[256], tags[256];
if(!data || !strlen(data))
return nil;
*n = 0;
for(p = data; *p; p++)
if(*p == '\n')
(*n)++;
for(i = 0; i < rulesz; i++)
if(rule[i].is_valid) {
regfree(&rule[i].regex);
rule[i].is_valid = False;
}
if(*n > rulesz) {
if(rule)
free(rule);
rule = cext_emallocz(sizeof(Rule) * (*n));
rulesz = *n;
}
i = 0;
for(p = data; *p; p++)
switch(mode) {
case IGNORE:
if(*p == '/') {
mode = REGEX;
r = regex;
}
else if(*p == '>') {
mode = TAGS;
tags[0] = 0;
t = tags;
}
break;
case REGEX:
if(*p == '/') {
mode = IGNORE;
*r = 0;
rule[i].is_valid = regcomp(&rule[i].regex, regex, 0);
}
else {
*r = *p;
r++;
}
break;
case TAGS:
if(*p == '\n' || *(p + 1) == 0) {
*t = 0;
rule[i].ntag = str2tags(rule[i].tag, tags);
mode = IGNORE;
i++;
}
else {
if((*p == ' ' || *p == '\t') && (tags[0] == 0))
continue; /* skip prefixed whitespaces */
*t = *p;
t++;
}
break;
}
return rule;
}
static void
match(Rule *rule, unsigned int rulesz, Client *c, const char *prop)
{
unsigned int i, j;
regmatch_t tmpregm;
c->ntag = 0;
for(i = 0; i < rulesz && c->ntag < MAX_TAGS; i++) {
Rule *r = &rule[i];
if(r->is_valid) {
if(!regexec(&r->regex, prop, 1, &tmpregm, 0)) {
for(j = 0; c->ntag < MAX_TAGS && j < r->ntag; j++) {
cext_strlcpy(c->tag[c->ntag], r->tag[j], sizeof(c->tag[c->ntag]));
c->ntag++;
}
}
}
}
}
void
match_tags(Client *c)
{
unsigned int n;
Rule *rule;
if(!def.rules)
return;
rule = parse(def.rules, &n);
match(rule, n, c, c->name);
match(rule, n, c, c->classinst);
}