MdeModulePkg RegularExpressionDxe: Update Oniguruma from v6.9.0 to v6.9.3

[mirror_edk2.git] / MdeModulePkg / Universal / RegularExpressionDxe / Oniguruma / reggnu.c

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