/********************************************************************** | |
reggnu.c - Oniguruma (regular expression library) | |
**********************************************************************/ | |
/*- | |
* Copyright (c) 2002-2019 K.Kosako <sndgk393 AT ybb DOT ne DOT jp> | |
* All rights reserved. | |
* | |
* Redistribution and use in source and binary forms, with or without | |
* modification, are permitted provided that the following conditions | |
* are met: | |
* 1. Redistributions of source code must retain the above copyright | |
* notice, this list of conditions and the following disclaimer. | |
* 2. Redistributions in binary form must reproduce the above copyright | |
* notice, this list of conditions and the following disclaimer in the | |
* documentation and/or other materials provided with the distribution. | |
* | |
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND | |
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | |
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | |
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE | |
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | |
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | |
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | |
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | |
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | |
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | |
* SUCH DAMAGE. | |
*/ | |
#include "regint.h" | |
#include "oniggnu.h" | |
extern void | |
re_free_registers(OnigRegion* r) | |
{ | |
/* 0: don't free self */ | |
onig_region_free(r, 0); | |
} | |
extern int | |
re_adjust_startpos(regex_t* reg, const char* string, int size, | |
int startpos, int range) | |
{ | |
if (startpos > 0 && ONIGENC_MBC_MAXLEN(reg->enc) != 1 && startpos < size) { | |
UChar *p; | |
UChar *s = (UChar* )string + startpos; | |
if (range > 0) { | |
p = onigenc_get_right_adjust_char_head(reg->enc, (UChar* )string, s); | |
} | |
else { | |
p = ONIGENC_LEFT_ADJUST_CHAR_HEAD(reg->enc, (UChar* )string, s); | |
} | |
return (int )(p - (UChar* )string); | |
} | |
return startpos; | |
} | |
extern int | |
re_match(regex_t* reg, const char* str, int size, int pos, | |
struct re_registers* regs) | |
{ | |
return onig_match(reg, (UChar* )str, (UChar* )(str + size), | |
(UChar* )(str + pos), regs, ONIG_OPTION_NONE); | |
} | |
extern int | |
re_search(regex_t* bufp, const char* string, int size, int startpos, int range, | |
struct re_registers* regs) | |
{ | |
return onig_search(bufp, (UChar* )string, (UChar* )(string + size), | |
(UChar* )(string + startpos), | |
(UChar* )(string + startpos + range), | |
regs, ONIG_OPTION_NONE); | |
} | |
extern int | |
re_compile_pattern(const char* pattern, int size, regex_t* reg, char* ebuf) | |
{ | |
int r; | |
OnigErrorInfo einfo; | |
r = onig_compile(reg, (UChar* )pattern, (UChar* )(pattern + size), &einfo); | |
if (r != ONIG_NORMAL) { | |
if (IS_NOT_NULL(ebuf)) | |
(void )onig_error_code_to_str((UChar* )ebuf, r, &einfo); | |
} | |
return r; | |
} | |
extern void | |
re_free_pattern(regex_t* reg) | |
{ | |
onig_free(reg); | |
} | |
extern int | |
re_alloc_pattern(regex_t** reg) | |
{ | |
*reg = (regex_t* )xmalloc(sizeof(regex_t)); | |
if (IS_NULL(*reg)) return ONIGERR_MEMORY; | |
return onig_reg_init(*reg, ONIG_OPTION_DEFAULT, | |
ONIGENC_CASE_FOLD_DEFAULT, | |
OnigEncDefaultCharEncoding, | |
OnigDefaultSyntax); | |
} | |
extern void | |
re_set_casetable(const char* table) | |
{ | |
onigenc_set_default_caseconv_table((UChar* )table); | |
} | |
extern void | |
re_mbcinit(int mb_code) | |
{ | |
OnigEncoding enc; | |
switch (mb_code) { | |
case RE_MBCTYPE_ASCII: | |
enc = ONIG_ENCODING_ASCII; | |
break; | |
} | |
onig_initialize(&enc, 1); | |
onigenc_set_default_encoding(enc); | |
} |