jyapayne/Nim
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Merge pull request #2506 from BlaXpirit/update-pcre

Browse source 
Update and improve PCRE wrapper
This commit is contained in:
Andreas Rumpf 2015-04-21 08:58:28 +02:00
commit 1b80e2f296
2 changed files with 451 additions and 307 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/impure/re.nim
View file

@ -46,8 +46,8 @@ type
## expression will be used only once) ## expression will be used only once)
RegexDesc = object RegexDesc = object
h: PPcre h: ptr Pcre
e: ptr TExtra e: ptr ExtraData
Regex* = ref RegexDesc ## a compiled regular expression Regex* = ref RegexDesc ## a compiled regular expression
@ -63,7 +63,7 @@ proc raiseInvalidRegex(msg: string) {.noinline, noreturn.} =
e.msg = msg e.msg = msg
raise e raise e
proc rawCompile(pattern: string, flags: cint): PPcre = proc rawCompile(pattern: string, flags: cint): ptr Pcre =
var var
msg: cstring msg: cstring
offset: cint offset: cint
@ -87,7 +87,7 @@ proc re*(s: string, flags = {reExtended, reStudy}): Regex =
result.h = rawCompile(s, cast[cint](flags - {reStudy})) result.h = rawCompile(s, cast[cint](flags - {reStudy}))
if reStudy in flags: if reStudy in flags:
var msg: cstring var msg: cstring
result.e = pcre.study(result.h, 0, msg) result.e = pcre.study(result.h, 0, addr msg)
if not isNil(msg): raiseInvalidRegex($msg) if not isNil(msg): raiseInvalidRegex($msg)
proc matchOrFind(s: string, pattern: Regex, matches: var openArray[string], proc matchOrFind(s: string, pattern: Regex, matches: var openArray[string],

608
lib/wrappers/pcre.nim
View file

@ -1,147 +1,179 @@
#************************************************ #************************************************
# Perl-Compatible Regular Expressions * # Perl-Compatible Regular Expressions *
#*********************************************** #************************************************
# This is the public header file for the PCRE library, to be #included by # This is the public header file for the PCRE library, to be #included by
#applications that call the PCRE functions. # applications that call the PCRE functions.
# #
# Copyright (c) 1997-2010 University of Cambridge # Copyright (c) 1997-2014 University of Cambridge
# #
#----------------------------------------------------------------------------- #-----------------------------------------------------------------------------
#Redistribution and use in source and binary forms, with or without # Redistribution and use in source and binary forms, with or without
#modification, are permitted provided that the following conditions are met: # modification, are permitted provided that the following conditions are met:
# #
# Redistributions of source code must retain the above copyright notice, # * Redistributions of source code must retain the above copyright notice,
# this list of conditions and the following disclaimer. # this list of conditions and the following disclaimer.
# #
# Redistributions in binary form must reproduce the above copyright # * Redistributions in binary form must reproduce the above copyright
# notice, this list of conditions and the following disclaimer in the # notice, this list of conditions and the following disclaimer in the
# documentation and/or other materials provided with the distribution. # documentation and/or other materials provided with the distribution.
# #
# Neither the name of the University of Cambridge nor the names of its # * Neither the name of the University of Cambridge nor the names of its
# contributors may be used to endorse or promote products derived from # contributors may be used to endorse or promote products derived from
# this software without specific prior written permission. # this software without specific prior written permission.
# #
#THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" # THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
#AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE # AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
#IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
#ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE # ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
#LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR # LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
#CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF # CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
#SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS # SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
#INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN # INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
#CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) # 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 # ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
#POSSIBILITY OF SUCH DAMAGE. # POSSIBILITY OF SUCH DAMAGE.
#----------------------------------------------------------------------------- #-----------------------------------------------------------------------------
#
{.deadcodeElim: on.} {.deadCodeElim: on.}
when not defined(pcreDll):
when hostOS == "windows":
const pcreDll = "pcre.dll"
elif hostOS == "macosx":
const pcreDll = "libpcre(.3|.1|).dylib"
else:
const pcreDll = "libpcre.so(.3|.1|)"
{.pragma: pcreImport, dynlib: pcreDll.}
else:
{.pragma: pcreImport, header: "<pcre.h>".}
# The current PCRE version information. # The current PCRE version information.
const const
MAJOR* = 8 PCRE_MAJOR* = 8
MINOR* = 31 PCRE_MINOR* = 36
PRERELEASE* = true PCRE_PRERELEASE* = true
DATE* = "2012-07-06" PCRE_DATE* = "2014-09-26"
# When an application links to a PCRE DLL in Windows, the symbols that are # When an application links to a PCRE DLL in Windows, the symbols that are
# imported have to be identified as such. When building PCRE, the appropriate # imported have to be identified as such. When building PCRE, the appropriate
# export setting is defined in pcre_internal.h, which includes this file. So we # export setting is defined in pcre_internal.h, which includes this file. So we
# don't change existing definitions of PCRE_EXP_DECL and PCRECPP_EXP_DECL. # don't change existing definitions of PCRE_EXP_DECL and PCRECPP_EXP_DECL.
# Have to include stdlib.h in order to ensure that size_t is defined; # By default, we use the standard "extern" declarations.
# it is needed here for malloc.
# Allow for C++ users # Allow for C++ users
# Options. Some are compile-time only, some are run-time only, and some are # Public options. Some are compile-time only, some are run-time only, and some
# both, so we keep them all distinct. # are both. Most of the compile-time options are saved with the compiled regex
# so that they can be inspected during studying (and therefore JIT compiling).
# Note that pcre_study() has its own set of options. Originally, all the options
# defined here used distinct bits. However, almost all the bits in a 32-bit word
# are now used, so in order to conserve them, option bits that were previously
# only recognized at matching time (i.e. by pcre_exec() or pcre_dfa_exec()) may
# also be used for compile-time options that affect only compiling and are not
# relevant for studying or JIT compiling.
#
# Some options for pcre_compile() change its behaviour but do not affect the
# behaviour of the execution functions. Other options are passed through to the
# execution functions and affect their behaviour, with or without affecting the
# behaviour of pcre_compile().
#
# Options that can be passed to pcre_compile() are tagged Cx below, with these
# variants:
#
# C1 Affects compile only
# C2 Does not affect compile; affects exec, dfa_exec
# C3 Affects compile, exec, dfa_exec
# C4 Affects compile, exec, dfa_exec, study
# C5 Affects compile, exec, study
#
# Options that can be set for pcre_exec() and/or pcre_dfa_exec() are flagged
# with E and D, respectively. They take precedence over C3, C4, and C5 settings
# passed from pcre_compile(). Those that are compatible with JIT execution are
# flagged with J.
const const
CASELESS* = 0x00000001 CASELESS* = 0x00000001 # C1
MULTILINE* = 0x00000002 MULTILINE* = 0x00000002 # C1
DOTALL* = 0x00000004 DOTALL* = 0x00000004 # C1
EXTENDED* = 0x00000008 EXTENDED* = 0x00000008 # C1
ANCHORED* = 0x00000010 ANCHORED* = 0x00000010 # C4 E D
DOLLAR_ENDONLY* = 0x00000020 DOLLAR_ENDONLY* = 0x00000020 # C2
EXTRA* = 0x00000040 EXTRA* = 0x00000040 # C1
NOTBOL* = 0x00000080 NOTBOL* = 0x00000080 # E D J
NOTEOL* = 0x00000100 NOTEOL* = 0x00000100 # E D J
UNGREEDY* = 0x00000200 UNGREEDY* = 0x00000200 # C1
NOTEMPTY* = 0x00000400 NOTEMPTY* = 0x00000400 # E D J
UTF8* = 0x00000800 UTF8* = 0x00000800 # C4 )
NO_AUTO_CAPTURE* = 0x00001000 UTF16* = 0x00000800 # C4 ) Synonyms
NO_UTF8_CHECK* = 0x00002000 UTF32* = 0x00000800 # C4 )
AUTO_CALLOUT* = 0x00004000 NO_AUTO_CAPTURE* = 0x00001000 # C1
PARTIAL_SOFT* = 0x00008000 NO_UTF8_CHECK* = 0x00002000 # C1 E D J )
PARTIAL* = 0x00008000 # Backwards compatible synonym NO_UTF16_CHECK* = 0x00002000 # C1 E D J ) Synonyms
DFA_SHORTEST* = 0x00010000 NO_UTF32_CHECK* = 0x00002000 # C1 E D J )
DFA_RESTART* = 0x00020000 AUTO_CALLOUT* = 0x00004000 # C1
FIRSTLINE* = 0x00040000 PARTIAL_SOFT* = 0x00008000 # E D J ) Synonyms
DUPNAMES* = 0x00080000 PARTIAL* = 0x00008000 # E D J )
NEWLINE_CR* = 0x00100000
NEWLINE_LF* = 0x00200000
NEWLINE_CRLF* = 0x00300000
NEWLINE_ANY* = 0x00400000
NEWLINE_ANYCRLF* = 0x00500000
BSR_ANYCRLF* = 0x00800000
BSR_UNICODE* = 0x01000000
JAVASCRIPT_COMPAT* = 0x02000000
NO_START_OPTIMIZE* = 0x04000000
NO_START_OPTIMISE* = 0x04000000
PARTIAL_HARD* = 0x08000000
NOTEMPTY_ATSTART* = 0x10000000
UCP* = 0x20000000
# Exec-time and get/set-time error codes # This pair use the same bit.
const
NEVER_UTF* = 0x00010000 # C1 ) Overlaid
DFA_SHORTEST* = 0x00010000 # D ) Overlaid
# This pair use the same bit.
const
NO_AUTO_POSSESS* = 0x00020000 # C1 ) Overlaid
DFA_RESTART* = 0x00020000 # D ) Overlaid
const const
ERROR_NOMATCH* = (- 1) FIRSTLINE* = 0x00040000 # C3
ERROR_NULL* = (- 2) DUPNAMES* = 0x00080000 # C1
ERROR_BADOPTION* = (- 3) NEWLINE_CR* = 0x00100000 # C3 E D
ERROR_BADMAGIC* = (- 4) NEWLINE_LF* = 0x00200000 # C3 E D
ERROR_UNKNOWN_OPCODE* = (- 5) NEWLINE_CRLF* = 0x00300000 # C3 E D
ERROR_UNKNOWN_NODE* = (- 5) # For backward compatibility NEWLINE_ANY* = 0x00400000 # C3 E D
ERROR_NOMEMORY* = (- 6) NEWLINE_ANYCRLF* = 0x00500000 # C3 E D
ERROR_NOSUBSTRING* = (- 7) BSR_ANYCRLF* = 0x00800000 # C3 E D
ERROR_MATCHLIMIT* = (- 8) BSR_UNICODE* = 0x01000000 # C3 E D
ERROR_CALLOUT* = (- 9) # Never used by PCRE itself JAVASCRIPT_COMPAT* = 0x02000000 # C5
ERROR_BADUTF8* = (- 10) NO_START_OPTIMIZE* = 0x04000000 # C2 E D ) Synonyms
ERROR_BADUTF8_OFFSET* = (- 11) NO_START_OPTIMISE* = 0x04000000 # C2 E D )
ERROR_PARTIAL* = (- 12) PARTIAL_HARD* = 0x08000000 # E D J
ERROR_BADPARTIAL* = (- 13) NOTEMPTY_ATSTART* = 0x10000000 # E D J
ERROR_INTERNAL* = (- 14) UCP* = 0x20000000 # C3
ERROR_BADCOUNT* = (- 15)
ERROR_DFA_UITEM* = (- 16)
ERROR_DFA_UCOND* = (- 17)
ERROR_DFA_UMLIMIT* = (- 18)
ERROR_DFA_WSSIZE* = (- 19)
ERROR_DFA_RECURSE* = (- 20)
ERROR_RECURSIONLIMIT* = (- 21)
ERROR_NULLWSLIMIT* = (- 22) # No longer actually used
ERROR_BADNEWLINE* = (- 23)
ERROR_BADOFFSET* = (- 24)
ERROR_SHORTUTF8* = (- 25)
ERROR_RECURSELOOP* = (- 26)
ERROR_JIT_STACKLIMIT* = (- 27)
ERROR_BADMODE* = (- 28)
ERROR_BADENDIANNESS* = (- 29)
ERROR_DFA_BADRESTART* = (- 30)
# Specific error codes for UTF-8 validity checks ## Exec-time and get/set-time error codes
const
ERROR_NOMATCH* = -1
ERROR_NULL* = -2
ERROR_BADOPTION* = -3
ERROR_BADMAGIC* = -4
ERROR_UNKNOWN_OPCODE* = -5
ERROR_UNKNOWN_NODE* = -5 ## For backward compatibility
ERROR_NOMEMORY* = -6
ERROR_NOSUBSTRING* = -7
ERROR_MATCHLIMIT* = -8
ERROR_CALLOUT* = -9 ## Never used by PCRE itself
ERROR_BADUTF8* = -10 ## Same for 8/16/32
ERROR_BADUTF16* = -10 ## Same for 8/16/32
ERROR_BADUTF32* = -10 ## Same for 8/16/32
ERROR_BADUTF8_OFFSET* = -11 ## Same for 8/16
ERROR_BADUTF16_OFFSET* = -11 ## Same for 8/16
ERROR_PARTIAL* = -12
ERROR_BADPARTIAL* = -13
ERROR_INTERNAL* = -14
ERROR_BADCOUNT* = -15
ERROR_DFA_UITEM* = -16
ERROR_DFA_UCOND* = -17
ERROR_DFA_UMLIMIT* = -18
ERROR_DFA_WSSIZE* = -19
ERROR_DFA_RECURSE* = -20
ERROR_RECURSIONLIMIT* = -21
ERROR_NULLWSLIMIT* = -22 ## No longer actually used
ERROR_BADNEWLINE* = -23
ERROR_BADOFFSET* = -24
ERROR_SHORTUTF8* = -25
ERROR_SHORTUTF16* = -25 ## Same for 8/16
ERROR_RECURSELOOP* = -26
ERROR_JIT_STACKLIMIT* = -27
ERROR_BADMODE* = -28
ERROR_BADENDIANNESS* = -29
ERROR_DFA_BADRESTART* = -30
ERROR_JIT_BADOPTION* = -31
ERROR_BADLENGTH* = -32
ERROR_UNSET* = -33
## Specific error codes for UTF-8 validity checks
const const
UTF8_ERR0* = 0 UTF8_ERR0* = 0
UTF8_ERR1* = 1 UTF8_ERR1* = 1
@ -165,16 +197,31 @@ const
UTF8_ERR19* = 19 UTF8_ERR19* = 19
UTF8_ERR20* = 20 UTF8_ERR20* = 20
UTF8_ERR21* = 21 UTF8_ERR21* = 21
UTF8_ERR22* = 22 # Unused (was non-character)
# Request types for pcre_fullinfo() ## Specific error codes for UTF-16 validity checks
const
UTF16_ERR0* = 0
UTF16_ERR1* = 1
UTF16_ERR2* = 2
UTF16_ERR3* = 3
UTF16_ERR4* = 4 # Unused (was non-character)
## Specific error codes for UTF-32 validity checks
const
UTF32_ERR0* = 0
UTF32_ERR1* = 1
UTF32_ERR2* = 2 # Unused (was non-character)
UTF32_ERR3* = 3
## Request types for pcre_fullinfo()
const const
INFO_OPTIONS* = 0 INFO_OPTIONS* = 0
INFO_SIZE* = 1 INFO_SIZE* = 1
INFO_CAPTURECOUNT* = 2 INFO_CAPTURECOUNT* = 2
INFO_BACKREFMAX* = 3 INFO_BACKREFMAX* = 3
INFO_FIRSTBYTE* = 4 INFO_FIRSTBYTE* = 4
INFO_FIRSTCHAR* = 4 # For backwards compatibility INFO_FIRSTCHAR* = 4 ## For backwards compatibility
INFO_FIRSTTABLE* = 5 INFO_FIRSTTABLE* = 5
INFO_LASTLITERAL* = 6 INFO_LASTLITERAL* = 6
INFO_NAMEENTRYSIZE* = 7 INFO_NAMEENTRYSIZE* = 7
@ -189,10 +236,16 @@ const
INFO_JIT* = 16 INFO_JIT* = 16
INFO_JITSIZE* = 17 INFO_JITSIZE* = 17
INFO_MAXLOOKBEHIND* = 18 INFO_MAXLOOKBEHIND* = 18
INFO_FIRSTCHARACTER* = 19
INFO_FIRSTCHARACTERFLAGS* = 20
INFO_REQUIREDCHAR* = 21
INFO_REQUIREDCHARFLAGS* = 22
INFO_MATCHLIMIT* = 23
INFO_RECURSIONLIMIT* = 24
INFO_MATCH_EMPTY* = 25
# Request types for pcre_config(). Do not re-arrange, in order to remain ## Request types for pcre_config(). Do not re-arrange, in order to remain
# compatible. ## compatible.
const const
CONFIG_UTF8* = 0 CONFIG_UTF8* = 0
CONFIG_NEWLINE* = 1 CONFIG_NEWLINE* = 1
@ -204,154 +257,245 @@ const
CONFIG_MATCH_LIMIT_RECURSION* = 7 CONFIG_MATCH_LIMIT_RECURSION* = 7
CONFIG_BSR* = 8 CONFIG_BSR* = 8
CONFIG_JIT* = 9 CONFIG_JIT* = 9
CONFIG_UTF16* = 10
CONFIG_JITTARGET* = 11 CONFIG_JITTARGET* = 11
CONFIG_UTF32* = 12
CONFIG_PARENS_LIMIT* = 13
# Request types for pcre_study(). Do not re-arrange, in order to remain ## Request types for pcre_study(). Do not re-arrange, in order to remain
# compatible. ## compatible.
const const
STUDY_JIT_COMPILE* = 0x00000001 STUDY_JIT_COMPILE* = 0x0001
STUDY_JIT_PARTIAL_SOFT_COMPILE* = 0x00000002 STUDY_JIT_PARTIAL_SOFT_COMPILE* = 0x0002
STUDY_JIT_PARTIAL_HARD_COMPILE* = 0x00000004 STUDY_JIT_PARTIAL_HARD_COMPILE* = 0x0004
STUDY_EXTRA_NEEDED* = 0x0008
# Bit flags for the pcre_extra structure. Do not re-arrange or redefine
# these bits, just add new ones on the end, in order to remain compatible.
## Bit flags for the pcre[16|32]_extra structure. Do not re-arrange or redefine
## these bits, just add new ones on the end, in order to remain compatible.
const const
EXTRA_STUDY_DATA* = 0x00000001 EXTRA_STUDY_DATA* = 0x0001
EXTRA_MATCH_LIMIT* = 0x00000002 EXTRA_MATCH_LIMIT* = 0x0002
EXTRA_CALLOUT_DATA* = 0x00000004 EXTRA_CALLOUT_DATA* = 0x0004
EXTRA_TABLES* = 0x00000008 EXTRA_TABLES* = 0x0008
EXTRA_MATCH_LIMIT_RECURSION* = 0x00000010 EXTRA_MATCH_LIMIT_RECURSION* = 0x0010
EXTRA_MARK* = 0x00000020 EXTRA_MARK* = 0x0020
EXTRA_EXECUTABLE_JIT* = 0x00000040 EXTRA_EXECUTABLE_JIT* = 0x0040
# Types
## Types
type type
TPcre*{.pure, final.} = object Pcre* = object
PPcre* = ptr TPcre Pcre16* = object
Tjit_stack*{.pure, final.} = object Pcre32* = object
Pjit_stack* = ptr Tjit_stack JitStack* = object
JitStack16* = object
JitStack32* = object
# When PCRE is compiled as a C++ library, the subject pointer type can be
# replaced with a custom type. For conventional use, the public interface is a
# const char *.
# The structure for passing additional data to pcre_exec(). This is defined in
# such as way as to be extensible. Always add new fields at the end, in order to
# remain compatible.
## The structure for passing additional data to pcre_exec(). This is defined in
## such as way as to be extensible. Always add new fields at the end, in order
## to remain compatible.
type type
TExtra*{.pure, final.} = object ExtraData* = object
flags*: int ## Bits for which fields are set flags*: clong ## Bits for which fields are set
study_data*: pointer ## Opaque data from pcre_study() study_data*: pointer ## Opaque data from pcre_study()
match_limit*: int ## Maximum number of calls to match() match_limit*: clong ## Maximum number of calls to match()
callout_data*: pointer ## Data passed back in callouts callout_data*: pointer ## Data passed back in callouts
tables*: cstring ## Pointer to character tables tables*: pointer ## Pointer to character tables
match_limit_recursion*: int ## Max recursive calls to match() match_limit_recursion*: clong ## Max recursive calls to match()
mark*: ptr cstring ## For passing back a mark pointer mark*: pointer ## For passing back a mark pointer
executable_jit*: pointer ## Contains a pointer to a compiled jit code executable_jit*: pointer ## Contains a pointer to a compiled jit code
## The structure for passing out data via the pcre_callout_function. We use a
# The structure for passing out data via the pcre_callout_function. We use a ## structure so that new fields can be added on the end in future versions,
# structure so that new fields can be added on the end in future versions, ## without changing the API of the function, thereby allowing old clients to
# without changing the API of the function, thereby allowing old clients to work ## work without modification.
# without modification.
type type
TCalloutBlock*{.pure, final.} = object CalloutBlock* = object
version*: cint ## Identifies version of block version* : cint ## Identifies version of block
callout_number*: cint ## Number compiled into pattern # ------------------------ Version 0 -------------------------------
offset_vector*: ptr cint ## The offset vector callout_number* : cint ## Number compiled into pattern
subject*: cstring ## The subject being matched offset_vector* : ptr cint ## The offset vector
subject_length*: cint ## The length of the subject subject* : cstring ## The subject being matched
start_match*: cint ## Offset to start of this match attempt subject_length* : cint ## The length of the subject
start_match* : cint ## Offset to start of this match attempt
current_position*: cint ## Where we currently are in the subject current_position*: cint ## Where we currently are in the subject
capture_top*: cint ## Max current capture capture_top* : cint ## Max current capture
capture_last*: cint ## Most recently closed capture capture_last* : cint ## Most recently closed capture
callout_data*: pointer ## Data passed in with the call callout_data* : pointer ## Data passed in with the call
# ------------------- Added for Version 1 --------------------------
pattern_position*: cint ## Offset to next item in the pattern pattern_position*: cint ## Offset to next item in the pattern
next_item_length*: cint ## Length of next item in the pattern next_item_length*: cint ## Length of next item in the pattern
mark*: cstring ## Pointer to current mark or NULL # ------------------- Added for Version 2 --------------------------
mark* : pointer ## Pointer to current mark or NULL
# ------------------------------------------------------------------
# Indirection for store get and free functions. These can be set to
#alternative malloc/free functions if required. Special ones are used in the
#non-recursive case for "frames". There is also an optional callout function
#that is triggered by the (?) regex item. For Virtual Pascal, these definitions
#have to take another form.
# User defined callback which provides a stack just before the match starts.
## User defined callback which provides a stack just before the match starts.
type type
TJitCallback* = proc(p: pointer): ptr Tjit_stack{.cdecl.} JitCallback* = proc (a: pointer): ptr JitStack {.cdecl.}
when not defined(usePcreHeader):
when hostOS == "windows":
const pcreDll = "pcre.dll"
elif hostOS == "macosx":
const pcreDll = "libpcre(.3|.1|).dylib"
else:
const pcreDll = "libpcre.so(.3|.1|)"
{.push dynlib: pcreDll.}
else:
{.push header: "<pcre.h>".}
{.push cdecl, importc: "pcre_$1".}
# Exported PCRE functions # Exported PCRE functions
proc compile*(a2: cstring, a3: cint, a4: ptr cstring, a5: ptr cint, proc compile*(pattern: cstring,
a6: ptr char): ptr TPcre{.cdecl, importc: "pcre_compile", options: cint,
pcreImport.} errptr: ptr cstring,
proc compile2*(a2: cstring, a3: cint, a4: ptr cint, a5: ptr cstring, erroffset: ptr cint,
a6: ptr cint, a7: ptr char): ptr TPcre{.cdecl, tableptr: pointer): ptr Pcre
importc: "pcre_compile2", pcreImport.}
proc config*(a2: cint, a3: pointer): cint{.cdecl, importc: "pcre_config", proc compile2*(pattern: cstring,
pcreImport.} options: cint,
proc copy_named_substring*(a2: ptr TPcre, a3: cstring, a4: ptr cint, a5: cint, errorcodeptr: ptr cint,
a6: cstring, a7: cstring, a8: cint): cint{.cdecl, errptr: ptr cstring,
importc: "pcre_copy_named_substring", pcreImport.} erroffset: ptr cint,
proc copy_substring*(a2: cstring, a3: ptr cint, a4: cint, a5: cint, tableptr: pointer): ptr Pcre
a6: cstring,
a7: cint): cint{.cdecl, importc: "pcre_copy_substring", proc config*(what: cint,
pcreImport.} where: pointer): cint
proc dfa_exec*(a2: ptr TPcre, a3: ptr TExtra, a4: cstring, a5: cint,
a6: cint, a7: cint, a8: ptr cint, a9: cint, a10: ptr cint, proc copy_named_substring*(code: ptr Pcre,
a11: cint): cint{.cdecl, importc: "pcre_dfa_exec", subject: cstring,
pcreImport.} ovector: ptr cint,
proc exec*(a2: ptr TPcre, a3: ptr TExtra, a4: cstring, a5: cint, a6: cint, stringcount: cint,
a7: cint, a8: ptr cint, a9: cint): cint {. stringname: cstring,
cdecl, importc: "pcre_exec", pcreImport.} buffer: cstring,
proc free_substring*(a2: cstring){.cdecl, importc: "pcre_free_substring", buffersize: cint): cint
pcreImport.}
proc free_substring_list*(a2: cstringArray){.cdecl, proc copy_substring*(subject: cstring,
importc: "pcre_free_substring_list", pcreImport.} ovector: ptr cint,
proc fullinfo*(a2: ptr TPcre, a3: ptr TExtra, a4: cint, a5: pointer): cint{. stringcount: cint,
cdecl, importc: "pcre_fullinfo", pcreImport.} stringnumber: cint,
proc get_named_substring*(a2: ptr TPcre, a3: cstring, a4: ptr cint, a5: cint, buffer: cstring,
a6: cstring, a7: cstringArray): cint{.cdecl, buffersize: cint): cint
importc: "pcre_get_named_substring", pcreImport.}
proc get_stringnumber*(a2: ptr TPcre, a3: cstring): cint{.cdecl, proc dfa_exec*(code: ptr Pcre,
importc: "pcre_get_stringnumber", pcreImport.} extra: ptr ExtraData,
proc get_stringtable_entries*(a2: ptr TPcre, a3: cstring, a4: cstringArray, subject: cstring,
a5: cstringArray): cint{.cdecl, length: cint,
importc: "pcre_get_stringtable_entries", pcreImport.} startoffset: cint,
proc get_substring*(a2: cstring, a3: ptr cint, a4: cint, a5: cint, options: cint,
a6: cstringArray): cint{.cdecl, ovector: ptr cint,
importc: "pcre_get_substring", pcreImport.} ovecsize: cint,
proc get_substring_list*(a2: cstring, a3: ptr cint, a4: cint, workspace: ptr cint,
a5: ptr cstringArray): cint{.cdecl, wscount: cint): cint
importc: "pcre_get_substring_list", pcreImport.}
proc maketables*(): ptr char{.cdecl, importc: "pcre_maketables", proc exec*(code: ptr Pcre,
pcreImport.} extra: ptr ExtraData,
proc refcount*(a2: ptr TPcre, a3: cint): cint{.cdecl, importc: "pcre_refcount", subject: cstring,
pcreImport.} length: cint,
proc study*(a2: ptr TPcre, a3: cint, a4: var cstring): ptr TExtra{.cdecl, startoffset: cint,
importc: "pcre_study", pcreImport.} options: cint,
proc version*(): cstring{.cdecl, importc: "pcre_version", pcreImport.} ovector: ptr cint,
ovecsize: cint): cint
proc jit_exec*(code: ptr Pcre,
extra: ptr ExtraData,
subject: cstring,
length: cint,
startoffset: cint,
options: cint,
ovector: ptr cint,
ovecsize: cint,
jstack: ptr JitStack): cint
proc free_substring*(stringptr: cstring)
proc free_substring_list*(stringptr: cstringArray)
proc fullinfo*(code: ptr Pcre,
extra: ptr ExtraData,
what: cint,
where: pointer): cint
proc get_named_substring*(code: ptr Pcre,
subject: cstring,
ovector: ptr cint,
stringcount: cint,
stringname: cstring,
stringptr: cstringArray): cint
proc get_stringnumber*(code: ptr Pcre,
name: cstring): cint
proc get_stringtable_entries*(code: ptr Pcre,
name: cstring,
first: cstringArray,
last: cstringArray): cint
proc get_substring*(subject: cstring,
ovector: ptr cint,
stringcount: cint,
stringnumber: cint,
stringptr: cstringArray): cint
proc get_substring_list*(subject: cstring,
ovector: ptr cint,
stringcount: cint,
listptr: ptr cstringArray): cint
proc maketables*(): pointer
proc refcount*(code: ptr Pcre,
adjust: cint): cint
proc study*(code: ptr Pcre,
options: cint,
errptr: ptr cstring): ptr ExtraData
proc free_study*(extra: ptr ExtraData)
proc version*(): cstring
# Utility functions for byte order swaps. # Utility functions for byte order swaps.
proc pattern_to_host_byte_order*(a2: ptr TPcre, a3: ptr TExtra, proc pattern_to_host_byte_order*(code: ptr Pcre,
a4: ptr char): cint{.cdecl, importc: "pcre_pattern_to_host_byte_order", extra: ptr ExtraData,
pcreImport.} tables: pointer): cint
# JIT compiler related functions. # JIT compiler related functions.
proc jit_stack_alloc*(a2: cint, a3: cint): ptr Tjit_stack{.cdecl, proc jit_stack_alloc*(startsize: cint,
importc: "pcre_jit_stack_alloc", pcreImport.} maxsize: cint): ptr JitStack
proc jit_stack_free*(a2: ptr Tjit_stack){.cdecl, importc: "pcre_jit_stack_free",
pcreImport.}
proc assign_jit_stack*(a2: ptr TExtra, a3: TJitCallback, a4: pointer){.cdecl,
importc: "pcre_assign_jit_stack", pcreImport.}
var proc jit_stack_free*(stack: ptr JitStack)
pcre_free*: proc (p: ptr TPcre) {.cdecl.}
proc assign_jit_stack*(extra: ptr ExtraData,
callback: JitCallback,
data: pointer)
proc jit_free_unused_memory*()
# There was an odd function with `var cstring` instead of `ptr`
proc study*(code: ptr Pcre,
options: cint,
errptr: var cstring): ptr ExtraData {.deprecated.}
{.pop.}
{.pop.}
{.deprecated: [MAJOR: PCRE_MAJOR, MINOR: PCRE_MINOR,
PRERELEASE: PCRE_PRERELEASE, DATE: PCRE_DATE].}
{.deprecated: [TPcre: Pcre, TJitStack: JitStack].}
type
PPcre* {.deprecated.} = ptr Pcre
PJitStack* {.deprecated.} = ptr JitStack
{.deprecated: [TExtra: ExtraData].}
{.deprecated: [TCalloutBlock: CalloutBlock].}
{.deprecated: [TJitCallback: JitCallback].}