libjar's private copy of xp_regexp
git-svn-id: svn://10.0.0.236/trunk@46512 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
alecf%netscape.com
306
mozilla/modules/libjar/nsWildCard.cpp
Normal file
306
mozilla/modules/libjar/nsWildCard.cpp
Normal file
@@ -0,0 +1,306 @@
|
||||
/* -*- Mode: C; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*-
|
||||
*
|
||||
* The contents of this file are subject to the Netscape Public License
|
||||
* Version 1.0 (the "NPL"); you may not use this file except in
|
||||
* compliance with the NPL. You may obtain a copy of the NPL at
|
||||
* http://www.mozilla.org/NPL/
|
||||
*
|
||||
* Software distributed under the NPL is distributed on an "AS IS" basis,
|
||||
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
|
||||
* for the specific language governing rights and limitations under the
|
||||
* NPL.
|
||||
*
|
||||
* The Initial Developer of this code under the NPL is Netscape
|
||||
* Communications Corporation. Portions created by Netscape are
|
||||
* Copyright (C) 1998 Netscape Communications Corporation. All Rights
|
||||
* Reserved.
|
||||
*/
|
||||
|
||||
/* *
|
||||
*
|
||||
*
|
||||
* shexp.c: shell-like wildcard match routines
|
||||
*
|
||||
* See shexp.h for public documentation.
|
||||
*
|
||||
* Rob McCool
|
||||
*
|
||||
*/
|
||||
|
||||
#include "nsWildCard.h"
|
||||
#include "plstr.h"
|
||||
#include "prmem.h"
|
||||
|
||||
/* ----------------------------- shexp_valid ------------------------------ */
|
||||
|
||||
|
||||
PRIVATE int
|
||||
_valid_subexp(char *expr, char stop)
|
||||
{
|
||||
register int x,y,t;
|
||||
int nsc,np,tld;
|
||||
|
||||
x=0;nsc=0;tld=0;
|
||||
|
||||
while(expr[x] && (expr[x] != stop)) {
|
||||
switch(expr[x]) {
|
||||
case '~':
|
||||
if(tld) return INVALID_SXP;
|
||||
else ++tld;
|
||||
case '*':
|
||||
case '?':
|
||||
case '^':
|
||||
case '$':
|
||||
++nsc;
|
||||
break;
|
||||
case '[':
|
||||
++nsc;
|
||||
if((!expr[++x]) || (expr[x] == ']'))
|
||||
return INVALID_SXP;
|
||||
for(++x;expr[x] && (expr[x] != ']');++x)
|
||||
if(expr[x] == '\\')
|
||||
if(!expr[++x])
|
||||
return INVALID_SXP;
|
||||
if(!expr[x])
|
||||
return INVALID_SXP;
|
||||
break;
|
||||
case '(':
|
||||
++nsc;np = 0;
|
||||
while(1) {
|
||||
if(expr[++x] == ')')
|
||||
return INVALID_SXP;
|
||||
for(y=x;(expr[y]) && (expr[y] != '|') && (expr[y] != ')');++y)
|
||||
if(expr[y] == '\\')
|
||||
if(!expr[++y])
|
||||
return INVALID_SXP;
|
||||
if(!expr[y])
|
||||
return INVALID_SXP;
|
||||
if(expr[y] == '|')
|
||||
++np;
|
||||
t = _valid_subexp(&expr[x],expr[y]);
|
||||
if(t == INVALID_SXP)
|
||||
return INVALID_SXP;
|
||||
x+=t;
|
||||
if(expr[x] == ')') {
|
||||
if(!np)
|
||||
return INVALID_SXP;
|
||||
break;
|
||||
}
|
||||
}
|
||||
break;
|
||||
case ')':
|
||||
case ']':
|
||||
return INVALID_SXP;
|
||||
case '\\':
|
||||
if(!expr[++x])
|
||||
return INVALID_SXP;
|
||||
default:
|
||||
break;
|
||||
}
|
||||
++x;
|
||||
}
|
||||
if((!stop) && (!nsc))
|
||||
return NON_SXP;
|
||||
return ((expr[x] == stop) ? x : INVALID_SXP);
|
||||
}
|
||||
|
||||
PUBLIC int
|
||||
XP_RegExpValid(char *expr)
|
||||
{
|
||||
int x;
|
||||
|
||||
x = _valid_subexp(expr, '\0');
|
||||
return (x < 0 ? x : VALID_SXP);
|
||||
}
|
||||
|
||||
|
||||
/* ----------------------------- shexp_match ----------------------------- */
|
||||
|
||||
|
||||
#define MATCH 0
|
||||
#define NOMATCH 1
|
||||
#define ABORTED -1
|
||||
|
||||
PRIVATE int _shexp_match(char *str, char *expr, PRBool case_insensitive);
|
||||
|
||||
PRIVATE int
|
||||
_handle_union(char *str, char *expr, PRBool case_insensitive)
|
||||
{
|
||||
char *e2 = (char *) PR_Malloc(sizeof(char)*strlen(expr));
|
||||
register int t,p2,p1 = 1;
|
||||
int cp;
|
||||
|
||||
while(1) {
|
||||
for(cp=1;expr[cp] != ')';cp++)
|
||||
if(expr[cp] == '\\')
|
||||
++cp;
|
||||
for(p2 = 0;(expr[p1] != '|') && (p1 != cp);p1++,p2++) {
|
||||
if(expr[p1] == '\\')
|
||||
e2[p2++] = expr[p1++];
|
||||
e2[p2] = expr[p1];
|
||||
}
|
||||
for (t=cp+1; ((e2[p2] = expr[t]) != 0); ++t,++p2) {}
|
||||
if(_shexp_match(str,e2, case_insensitive) == MATCH) {
|
||||
PR_Free(e2);
|
||||
return MATCH;
|
||||
}
|
||||
if(p1 == cp) {
|
||||
PR_Free(e2);
|
||||
return NOMATCH;
|
||||
}
|
||||
else ++p1;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
PRIVATE int
|
||||
_shexp_match(char *str, char *expr, PRBool case_insensitive)
|
||||
{
|
||||
register int x,y;
|
||||
int ret,neg;
|
||||
|
||||
ret = 0;
|
||||
for(x=0,y=0;expr[y];++y,++x) {
|
||||
if((!str[x]) && (expr[y] != '(') && (expr[y] != '$') && (expr[y] != '*'))
|
||||
ret = ABORTED;
|
||||
else {
|
||||
switch(expr[y]) {
|
||||
case '$':
|
||||
if( (str[x]) )
|
||||
ret = NOMATCH;
|
||||
else
|
||||
--x; /* we don't want loop to increment x */
|
||||
break;
|
||||
case '*':
|
||||
while(expr[++y] == '*'){}
|
||||
if(!expr[y])
|
||||
return MATCH;
|
||||
while(str[x]) {
|
||||
switch(_shexp_match(&str[x++],&expr[y], case_insensitive)) {
|
||||
case NOMATCH:
|
||||
continue;
|
||||
case ABORTED:
|
||||
ret = ABORTED;
|
||||
break;
|
||||
default:
|
||||
return MATCH;
|
||||
}
|
||||
break;
|
||||
}
|
||||
if((expr[y] == '$') && (expr[y+1] == '\0') && (!str[x]))
|
||||
return MATCH;
|
||||
else
|
||||
ret = ABORTED;
|
||||
break;
|
||||
case '[':
|
||||
neg = ((expr[++y] == '^') && (expr[y+1] != ']'));
|
||||
if (neg)
|
||||
++y;
|
||||
|
||||
if ((isalnum(expr[y])) && (expr[y+1] == '-') &&
|
||||
(isalnum(expr[y+2])) && (expr[y+3] == ']'))
|
||||
{
|
||||
int start = expr[y], end = expr[y+2];
|
||||
|
||||
/* Droolproofing for pinheads not included */
|
||||
if(neg ^ ((str[x] < start) || (str[x] > end))) {
|
||||
ret = NOMATCH;
|
||||
break;
|
||||
}
|
||||
y+=3;
|
||||
}
|
||||
else {
|
||||
int matched;
|
||||
|
||||
for (matched=0;expr[y] != ']';y++)
|
||||
matched |= (str[x] == expr[y]);
|
||||
if (neg ^ (!matched))
|
||||
ret = NOMATCH;
|
||||
}
|
||||
break;
|
||||
case '(':
|
||||
return _handle_union(&str[x],&expr[y], case_insensitive);
|
||||
break;
|
||||
case '?':
|
||||
break;
|
||||
case '\\':
|
||||
++y;
|
||||
default:
|
||||
if(case_insensitive)
|
||||
{
|
||||
if(toupper(str[x]) != toupper(expr[y]))
|
||||
ret = NOMATCH;
|
||||
}
|
||||
else
|
||||
{
|
||||
if(str[x] != expr[y])
|
||||
ret = NOMATCH;
|
||||
}
|
||||
break;
|
||||
}
|
||||
}
|
||||
if(ret)
|
||||
break;
|
||||
}
|
||||
return (ret ? ret : (str[x] ? NOMATCH : MATCH));
|
||||
}
|
||||
|
||||
PUBLIC int
|
||||
XP_RegExpMatch(char *str, char *xp, PRBool case_insensitive) {
|
||||
register int x;
|
||||
char *expr = PL_strdup(xp);
|
||||
|
||||
if(!expr)
|
||||
return 1;
|
||||
|
||||
for(x=strlen(expr)-1;x;--x) {
|
||||
if((expr[x] == '~') && (expr[x-1] != '\\')) {
|
||||
expr[x] = '\0';
|
||||
if(_shexp_match(str,&expr[++x], case_insensitive) == MATCH)
|
||||
goto punt;
|
||||
break;
|
||||
}
|
||||
}
|
||||
if(_shexp_match(str,expr, FALSE) == MATCH) {
|
||||
PR_Free(expr);
|
||||
return 0;
|
||||
}
|
||||
|
||||
punt:
|
||||
PR_Free(expr);
|
||||
return 1;
|
||||
}
|
||||
|
||||
|
||||
/* ------------------------------ shexp_cmp ------------------------------- */
|
||||
|
||||
#if 0
|
||||
PUBLIC int
|
||||
XP_RegExpSearch(char *str, char *expr)
|
||||
{
|
||||
switch(XP_RegExpValid(expr))
|
||||
{
|
||||
case INVALID_SXP:
|
||||
return -1;
|
||||
case NON_SXP:
|
||||
return (strcmp(expr,str) ? 1 : 0);
|
||||
default:
|
||||
return XP_RegExpMatch(str, expr, FALSE);
|
||||
}
|
||||
}
|
||||
|
||||
PUBLIC int
|
||||
XP_RegExpCaseSearch(char *str, char *expr)
|
||||
{
|
||||
switch(XP_RegExpValid(expr))
|
||||
{
|
||||
case INVALID_SXP:
|
||||
return -1;
|
||||
case NON_SXP:
|
||||
return (strcmp(expr,str) ? 1 : 0);
|
||||
default:
|
||||
return XP_RegExpMatch(str, expr, TRUE);
|
||||
}
|
||||
}
|
||||
#endif
|
||||
|
||||
113
mozilla/modules/libjar/nsWildCard.h
Normal file
113
mozilla/modules/libjar/nsWildCard.h
Normal file
@@ -0,0 +1,113 @@
|
||||
/* -*- Mode: C; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*-
|
||||
*
|
||||
* The contents of this file are subject to the Netscape Public License
|
||||
* Version 1.0 (the "NPL"); you may not use this file except in
|
||||
* compliance with the NPL. You may obtain a copy of the NPL at
|
||||
* http://www.mozilla.org/NPL/
|
||||
*
|
||||
* Software distributed under the NPL is distributed on an "AS IS" basis,
|
||||
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
|
||||
* for the specific language governing rights and limitations under the
|
||||
* NPL.
|
||||
*
|
||||
* The Initial Developer of this code under the NPL is Netscape
|
||||
* Communications Corporation. Portions created by Netscape are
|
||||
* Copyright (C) 1998 Netscape Communications Corporation. All Rights
|
||||
* Reserved.
|
||||
*/
|
||||
|
||||
/*
|
||||
* shexp.h: Defines and prototypes for shell exp. match routines
|
||||
*
|
||||
*
|
||||
* This routine will match a string with a shell expression. The expressions
|
||||
* accepted are based loosely on the expressions accepted by zsh.
|
||||
*
|
||||
* o * matches anything
|
||||
* o ? matches one character
|
||||
* o \ will escape a special character
|
||||
* o $ matches the end of the string
|
||||
* o [abc] matches one occurence of a, b, or c. The only character that needs
|
||||
* to be escaped in this is ], all others are not special.
|
||||
* o [a-z] matches any character between a and z
|
||||
* o [^az] matches any character except a or z
|
||||
* o ~ followed by another shell expression will remove any pattern
|
||||
* matching the shell expression from the match list
|
||||
* o (foo|bar) will match either the substring foo, or the substring bar.
|
||||
* These can be shell expressions as well.
|
||||
*
|
||||
* The public interface to these routines is documented below.
|
||||
*
|
||||
* Rob McCool
|
||||
*
|
||||
*/
|
||||
|
||||
#ifndef SHEXP_H
|
||||
#define SHEXP_H
|
||||
|
||||
#include "xp_core.h"
|
||||
|
||||
/*
|
||||
* Requires that the macro MALLOC be set to a "safe" malloc that will
|
||||
* exit if no memory is available. If not under MCC httpd, define MALLOC
|
||||
* to be the real malloc and play with fire, or make your own function.
|
||||
*/
|
||||
|
||||
#if 0
|
||||
#ifdef MCC_HTTPD
|
||||
#include "../mc-httpd.h"
|
||||
#endif
|
||||
#endif
|
||||
|
||||
#include <ctype.h> /* isalnum */
|
||||
#include <string.h> /* strlen */
|
||||
|
||||
|
||||
XP_BEGIN_PROTOS
|
||||
/* --------------------------- Public routines ---------------------------- */
|
||||
|
||||
|
||||
/*
|
||||
* shexp_valid takes a shell expression exp as input. It returns:
|
||||
*
|
||||
* NON_SXP if exp is a standard string
|
||||
* INVALID_SXP if exp is a shell expression, but invalid
|
||||
* VALID_SXP if exp is a valid shell expression
|
||||
*/
|
||||
|
||||
#define NON_SXP -1
|
||||
#define INVALID_SXP -2
|
||||
#define VALID_SXP 1
|
||||
|
||||
extern int XP_RegExpValid(char *expr);
|
||||
|
||||
|
||||
/* return values for the search routines */
|
||||
#define MATCH 0
|
||||
#define NOMATCH 1
|
||||
#define ABORTED -1
|
||||
|
||||
/*
|
||||
* shexp_match
|
||||
*
|
||||
* Takes a prevalidated shell expression exp, and a string str.
|
||||
*
|
||||
* Returns 0 on match and 1 on non-match.
|
||||
*/
|
||||
|
||||
extern int XP_RegExpMatch(char *str, char *expr, PRBool case_insensitive);
|
||||
|
||||
/*
|
||||
*
|
||||
* Same as above, but validates the exp first. 0 on match, 1 on non-match,
|
||||
* -1 on invalid exp.
|
||||
*/
|
||||
|
||||
extern int XP_RegExpSearch(char *str, char *expr);
|
||||
|
||||
/* same as above but uses case insensitive search
|
||||
*/
|
||||
extern int XP_RegExpCaseSearch(char *str, char *expr);
|
||||
|
||||
XP_END_PROTOS
|
||||
#endif
|
||||
Reference in New Issue
Block a user