1/* $NetBSD: type_regex.c,v 1.8 2021/04/13 13:13:04 christos Exp $ */ 2 3/*- 4 * Copyright (c) 1998-1999 Brett Lymn 5 * (blymn@baea.com.au, brett_lymn@yahoo.com.au) 6 * All rights reserved. 7 * 8 * This code has been donated to The NetBSD Foundation by the Author. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. The name of the author may not be used to endorse or promote products 16 * derived from this software without specific prior written permission 17 * 18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 19 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 20 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 21 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 22 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 23 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 24 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 25 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 26 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 27 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 28 * 29 * 30 */ 31 32#include <sys/cdefs.h> 33__RCSID("$NetBSD: type_regex.c,v 1.8 2021/04/13 13:13:04 christos Exp $"); 34 35#include <stdlib.h> 36#include <sys/types.h> 37#include <regex.h> 38#include "form.h" 39#include "internals.h" 40 41/* 42 * The regex type handling. 43 */ 44 45typedef struct 46{ 47 regex_t compiled; 48 unsigned references; 49} regex_args; 50 51/* 52 * Create the regex arguments structure from the given args. Return NULL 53 * if the call fails, otherwise return a pointer to the structure allocated. 54 */ 55static char * 56create_regex_args(va_list *args) 57{ 58 regex_args *new; 59 char *expression; 60 61 new = malloc(sizeof(*new)); 62 63 if (new != NULL) { 64 new->references = 1; 65 expression = va_arg(*args, char *); 66 if ((regcomp(&new->compiled, expression, 67 (REG_EXTENDED | REG_NOSUB | REG_NEWLINE))) != 0) { 68 free(new); 69 return NULL; 70 } 71 } 72 73 return (void *) new; 74} 75 76/* 77 * Copy the regex argument structure. 78 */ 79static char * 80copy_regex_args(char *args) 81{ 82 ((regex_args *) (void *) args)->references++; 83 84 return (void *) args; 85} 86 87/* 88 * Free the allocated storage associated with the type arguments. 89 */ 90static void 91free_regex_args(char *args) 92{ 93 if (args != NULL) { 94 ((regex_args *) (void *) args)->references--; 95 if (((regex_args *) (void *) args)->references == 0) 96 free(args); 97 } 98} 99 100/* 101 * Check the contents of the field buffer match the regex. 102 */ 103static int 104regex_check_field(FIELD *field, char *args) 105{ 106 if ((args != NULL) && 107 (regexec(&((regex_args *) (void *) field->args)->compiled, 108 args, (size_t) 0, NULL, 0) == 0)) 109 return TRUE; 110 111 return FALSE; 112} 113 114static FIELDTYPE builtin_regex = { 115 _TYPE_HAS_ARGS | _TYPE_IS_BUILTIN, /* flags */ 116 0, /* refcount */ 117 NULL, /* link */ 118 create_regex_args, /* make_args */ 119 copy_regex_args, /* copy_args */ 120 free_regex_args, /* free_args */ 121 regex_check_field, /* field_check */ 122 NULL, /* char_check */ 123 NULL, /* next_choice */ 124 NULL /* prev_choice */ 125}; 126 127FIELDTYPE *TYPE_REGEXP = &builtin_regex; 128 129 130