1/*************************************************
2* Perl-Compatible Regular Expressions *
3*************************************************/
4
5/* PCRE is a library of functions to support regular expressions whose syntax
6and semantics are as close as possible to those of the Perl 5 language.
7
8 Written by Philip Hazel
9 Original API code Copyright (c) 1997-2012 University of Cambridge
10 New API code Copyright (c) 2018-2021 University of Cambridge
11
12-----------------------------------------------------------------------------
13Redistribution and use in source and binary forms, with or without
14modification, are permitted provided that the following conditions are met:
15
16 * Redistributions of source code must retain the above copyright notice,
17 this list of conditions and the following disclaimer.
18
19 * Redistributions in binary form must reproduce the above copyright
20 notice, this list of conditions and the following disclaimer in the
21 documentation and/or other materials provided with the distribution.
22
23 * Neither the name of the University of Cambridge nor the names of its
24 contributors may be used to endorse or promote products derived from
25 this software without specific prior written permission.
26
27THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
28AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
29IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
30ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
31LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
32CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
33SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
34INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
35CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
36ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
37POSSIBILITY OF SUCH DAMAGE.
38-----------------------------------------------------------------------------
39*/
40
41/* This module contains internal functions for comparing and finding the length
42of strings. These are used instead of strcmp() etc because the standard
43functions work only on 8-bit data. */
44
45
46#ifdef HAVE_CONFIG_H
47#include "config.h"
48#endif
49
50#include "pcre2_internal.h"
51
52
53/*************************************************
54* Emulated memmove() for systems without it *
55*************************************************/
56
57/* This function can make use of bcopy() if it is available. Otherwise do it by
58steam, as there some non-Unix environments that lack both memmove() and
59bcopy(). */
60
61#if !defined(VPCOMPAT) && !defined(HAVE_MEMMOVE)
62void *
63PRIV(memmove)(void *d, const void *s, size_t n)
64{
65#ifdef HAVE_BCOPY
66bcopy(s, d, n);
67return d;
68#else
69size_t i;
70unsigned char *dest = (unsigned char *)d;
71const unsigned char *src = (const unsigned char *)s;
72if (dest > src)
73 {
74 dest += n;
75 src += n;
76 for (i = 0; i < n; ++i) *(--dest) = *(--src);
77 return (void *)dest;
78 }
79else
80 {
81 for (i = 0; i < n; ++i) *dest++ = *src++;
82 return (void *)(dest - n);
83 }
84#endif /* not HAVE_BCOPY */
85}
86#endif /* not VPCOMPAT && not HAVE_MEMMOVE */
87
88
89/*************************************************
90* Compare two zero-terminated PCRE2 strings *
91*************************************************/
92
93/*
94Arguments:
95 str1 first string
96 str2 second string
97
98Returns: 0, 1, or -1
99*/
100
101int
102PRIV(strcmp)(PCRE2_SPTR str1, PCRE2_SPTR str2)
103{
104PCRE2_UCHAR c1, c2;
105while (*str1 != '\0' || *str2 != '\0')
106 {
107 c1 = *str1++;
108 c2 = *str2++;
109 if (c1 != c2) return ((c1 > c2) << 1) - 1;
110 }
111return 0;
112}
113
114
115/*************************************************
116* Compare zero-terminated PCRE2 & 8-bit strings *
117*************************************************/
118
119/* As the 8-bit string is almost always a literal, its type is specified as
120const char *.
121
122Arguments:
123 str1 first string
124 str2 second string
125
126Returns: 0, 1, or -1
127*/
128
129int
130PRIV(strcmp_c8)(PCRE2_SPTR str1, const char *str2)
131{
132PCRE2_UCHAR c1, c2;
133while (*str1 != '\0' || *str2 != '\0')
134 {
135 c1 = *str1++;
136 c2 = *str2++;
137 if (c1 != c2) return ((c1 > c2) << 1) - 1;
138 }
139return 0;
140}
141
142
143/*************************************************
144* Compare two PCRE2 strings, given a length *
145*************************************************/
146
147/*
148Arguments:
149 str1 first string
150 str2 second string
151 len the length
152
153Returns: 0, 1, or -1
154*/
155
156int
157PRIV(strncmp)(PCRE2_SPTR str1, PCRE2_SPTR str2, size_t len)
158{
159PCRE2_UCHAR c1, c2;
160for (; len > 0; len--)
161 {
162 c1 = *str1++;
163 c2 = *str2++;
164 if (c1 != c2) return ((c1 > c2) << 1) - 1;
165 }
166return 0;
167}
168
169
170/*************************************************
171* Compare PCRE2 string to 8-bit string by length *
172*************************************************/
173
174/* As the 8-bit string is almost always a literal, its type is specified as
175const char *.
176
177Arguments:
178 str1 first string
179 str2 second string
180 len the length
181
182Returns: 0, 1, or -1
183*/
184
185int
186PRIV(strncmp_c8)(PCRE2_SPTR str1, const char *str2, size_t len)
187{
188PCRE2_UCHAR c1, c2;
189for (; len > 0; len--)
190 {
191 c1 = *str1++;
192 c2 = *str2++;
193 if (c1 != c2) return ((c1 > c2) << 1) - 1;
194 }
195return 0;
196}
197
198
199/*************************************************
200* Find the length of a PCRE2 string *
201*************************************************/
202
203/*
204Argument: the string
205Returns: the length
206*/
207
208PCRE2_SIZE
209PRIV(strlen)(PCRE2_SPTR str)
210{
211PCRE2_SIZE c = 0;
212while (*str++ != 0) c++;
213return c;
214}
215
216
217/*************************************************
218* Copy 8-bit 0-terminated string to PCRE2 string *
219*************************************************/
220
221/* Arguments:
222 str1 buffer to receive the string
223 str2 8-bit string to be copied
224
225Returns: the number of code units used (excluding trailing zero)
226*/
227
228PCRE2_SIZE
229PRIV(strcpy_c8)(PCRE2_UCHAR *str1, const char *str2)
230{
231PCRE2_UCHAR *t = str1;
232while (*str2 != 0) *t++ = *str2++;
233*t = 0;
234return t - str1;
235}
236
237/* End of pcre2_string_utils.c */
238