add for runtimecore

Issue：https://gitcode.com/openharmony/third_party_pcre2/issues/70 Signed-off-by: zhangmingqi <zhangmingqi9@huawei.com>
2026-07-01 10:05:26 -04:00 · 2026-02-10 15:01:51 +08:00
parent 4c5a150453
commit 0c95f93cb8
1 changed files with 189 additions and 0 deletions
@@ -0,0 +1,189 @@
+/**
+ * Copyright (c) 2026 Huawei Device Co., Ltd.
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ * http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS,
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include "pcre2_internal.h"
+
+
+
+/*************************************************
+*      Check for newline at given position       *
+*************************************************/
+
+/* This function is called only via the IS_NEWLINE macro, which does so only
+when the newline type is NLTYPE_ANY or NLTYPE_ANYCRLF. The case of a fixed
+newline (NLTYPE_FIXED) is handled inline. It is guaranteed that the code unit
+pointed to by ptr is less than the end of the string.
+
+Arguments:
+  ptr          pointer to possible newline
+  type         the newline type
+  endptr       pointer to the end of the string
+  lenptr       where to return the length
+  utf          TRUE if in utf mode
+
+Returns:       TRUE or FALSE
+*/
+
+BOOL PRIV(is_newline)(PCRE2_SPTR ptr, uint32_t type, PCRE2_SPTR endptr, uint32_t *lenptr, BOOL utf)
+{
+    uint32_t c;
+
+#ifdef SUPPORT_UNICODE
+    if (utf) {
+        GETCHAR(c, ptr);
+    } else {
+        c = *ptr;
+    }
+#else
+    (void)utf;
+    c = *ptr;
+#endif /* SUPPORT_UNICODE */
+
+    if (type == NLTYPE_ANYCRLF) {
+        switch (c) {
+            case CHAR_LF:
+                *lenptr = 1;
+                return TRUE;
+
+            case CHAR_CR:
+                *lenptr = (ptr < endptr - 1 && ptr[1] == CHAR_LF) ? 2 : 1;
+                return TRUE;
+
+            default:
+                return FALSE;
+        }
+    }
+
+    /* NLTYPE_ANY - ArkTS/ECMAScript behavior: only LF/CR/LS/PS are newlines */
+
+    else switch (c)
+    {
+    case CHAR_LF:
+      *lenptr = 1;
+      return TRUE;
+
+    case CHAR_CR:
+      *lenptr = (ptr < endptr - 1 && ptr[1] == CHAR_LF)? 2 : 1;
+      return TRUE;
+
+#ifndef EBCDIC
+#if PCRE2_CODE_UNIT_WIDTH == 8
+    case 0x2028:   /* LS - Line Separator (U+2028) */
+    case 0x2029:   /* PS - Paragraph Separator (U+2029) */
+      *lenptr = 3;
+      return TRUE;
+#else  /* 16-bit or 32-bit code units */
+    case 0x2028:   /* LS - Line Separator (U+2028) */
+    case 0x2029:   /* PS - Paragraph Separator (U+2029) */
+      *lenptr = 1;
+      return TRUE;
+#endif
+#endif /* Not EBCDIC */
+
+    default:
+      return FALSE;
+    }
+}
+
+
+
+/*************************************************
+*     Check for newline at previous position     *
+*************************************************/
+
+/* This function is called only via the WAS_NEWLINE macro, which does so only
+when the newline type is NLTYPE_ANY or NLTYPE_ANYCRLF. The case of a fixed
+newline (NLTYPE_FIXED) is handled inline. It is guaranteed that the initial
+value of ptr is greater than the start of the string that is being processed.
+
+Arguments:
+  ptr          pointer to possible newline
+  type         the newline type
+  startptr     pointer to the start of the string
+  lenptr       where to return the length
+  utf          TRUE if in utf mode
+
+Returns:       TRUE or FALSE
+*/
+
+BOOL PRIV(was_newline)(PCRE2_SPTR ptr, uint32_t type, PCRE2_SPTR startptr, uint32_t *lenptr, BOOL utf)
+{
+    uint32_t c;
+    ptr--;
+
+#ifdef SUPPORT_UNICODE
+    if (utf)
+  {
+  BACKCHAR(ptr);
+  GETCHAR(c, ptr);
+  }
+    else c = *ptr;
+#else
+    (void)utf;
+    c = *ptr;
+#endif  /* SUPPORT_UNICODE */
+
+if (type == NLTYPE_ANYCRLF) switch(c)
+  {
+  case CHAR_LF:
+  *lenptr = (ptr > startptr && ptr[-1] == CHAR_CR)? 2 : 1;
+  return TRUE;
+
+  case CHAR_CR:
+  *lenptr = 1;
+  return TRUE;
+
+  default:
+  return FALSE;
+  }
+
+/* NLTYPE_ANY - ArkTS/ECMAScript behavior: only LF/CR/LS/PS are newlines */
+
+else switch(c)
+  {
+  case CHAR_LF:
+  *lenptr = (ptr > startptr && ptr[-1] == CHAR_CR)? 2 : 1;
+  return TRUE;
+
+  case CHAR_CR:
+  *lenptr = 1;
+  return TRUE;
+
+#ifndef EBCDIC
+#if PCRE2_CODE_UNIT_WIDTH == 8
+  case 0x2028:   /* LS - Line Separator (U+2028) */
+  case 0x2029:   /* PS - Paragraph Separator (U+2029) */
+  *lenptr = 3;
+  return TRUE;
+
+#else /* 16-bit or 32-bit code units */
+  case 0x2028:   /* LS - Line Separator (U+2028) */
+  case 0x2029:   /* PS - Paragraph Separator (U+2029) */
+  *lenptr = 1;
+  return TRUE;
+#endif
+#endif /* Not EBCDIC */
+
+  default:
+  return FALSE;
+  }
+}
+
+/* End of pcre2_newline.c */