Download ot4xb 1.7.0.20
Released 2024.03.18
lStrWildCmpEx() new flags
ot4xb version 1.6.4.81 introducing the new function lStrWildCmpEx() that is an extension of the existing lStrWildCmp()
As the lStrWildCmp() old function the new lStrWildCmpEx() function compare an input string with a template string that can contain wildcards * and ? like the directory wildcards.
The previous function was only supporting the flag 1 or .T. meaning case insensitive compare
lStrWildCmpEx() with the flag 0x200 support C++ 14 stdlib regular expressions ( faster than the ot4xb rgx class or functions based on the VB Script reg exp)
Another new feature is that we can provide also an array of wildcard strings instead of a single wildcard string
As the lStrWildCmp() old function the new lStrWildCmpEx() function compare an input string with a template string that can contain wildcards * and ? like the directory wildcards.
The previous function was only supporting the flag 1 or .T. meaning case insensitive compare
lStrWildCmpEx() with the flag 0x200 support C++ 14 stdlib regular expressions ( faster than the ot4xb rgx class or functions based on the VB Script reg exp)
Another new feature is that we can provide also an array of wildcard strings instead of a single wildcard string
Syntax
lStrWildCmpEx( cWild|aWild , cStr,[nFlags],[regex_flags],[regex_match_flags]) -> lMatch
- cWild|aWild
- ....
- cStr
- ....
- nFlags
- Can be a combination of zero or more of the following flags
- 0x0001 = case insensitive
0x0002 = return found index ( first or last if flags & 4 )
0x0004 = stop at last ocurrence
0x0008 = add * at the begining and end of the wildcard emulating the $ operator (1.6.4.84)
0x0010 = compare left trimmed string if not using regexp
0x0020 = compare right trimmed string if not using regexp
0x0040 = allow ^ at the begining as negation ( 1.6.4.85)
0x0200 = ot4xb_regex_match
0x8000 = ( only arrays without regexp) ( 1.6.4.85) - if ~ ( char 126) at the begining the expression MUST NOT exist
- if ` ( char 96) at the begining the expression MUST exist
- 0x0100 = use template characters ( alphanumeric(A) ,numbers (9) and symbols )
- regex_flags
- Only with nFlags & 0x200
- ECMAScript = 0x01 ( DEFAULT )
basic = 0x02
extended = 0x04
awk = 0x08
grep = 0x10
egrep = 0x20
_Gmask = 0x3F
icase = 0x0100
nosubs = 0x0200
optimize = 0x0400
collate = 0x0800 - regex_match_flags
- Only with nFlags & 0x200
- match_default = 0x0000,
match_not_bol = 0x0001,
match_not_eol = 0x0002,
match_not_bow = 0x0004,
match_not_eow = 0x0008,
match_any = 0x0010,
match_not_null = 0x0020,
match_continuous = 0x0040,
match_prev_avail = 0x0100,
format_default = 0x0000,
format_sed = 0x0400,
format_no_copy = 0x0800,
format_first_only = 0x1000
ot4xb_cng() new methods for rc4 encryption
ot4xb version 1.6.4.83 introducing 2 new class methods to add RC4 encryption to the ot4xb_cng() class
The previous function was only supporting the flag 1 or .T. meaning case insensitive compare
AES 256 methods
RC4 methods
The previous function was only supporting the flag 1 or .T. meaning case insensitive compare
CLASS ot4xb_cng
The purpose of the ot4xb_cng class is to provide some encryption and decryption methods using the Windows CNG API
Syntax
AES 256 methods
ot4xb_cng():aes_encrypt( cInputStr , flags) -> cOutputString
ot4xb_cng():aes_decrypt( cInputStr , flags ) -> cOutputString
RC4 methods
ot4xb_cng():rc4_encrypt( cInputStr , flags ) -> cOutputString
ot4xb_cng():rc4_decrypt( cInputStr , flags ) -> cOutputString
- flags
- _ot4xb_expando_() object providing the required parameters for the encryption or decryption operations
- cInputStr
- The string to be encrypted or decrypted. flags:encode_input will determine the expected content
- cOutputString
- The string resulting from the encryption or decryption operation. flags:encode_input will determine the expected content
common flags
- flags:encode_input
- supported values are "bin","hex" and "base64" or "b64"
- flags:encode_output
- supported values are "bin","hex" and "base64" or "b64"
- flags:key
- key or password phrase used for the encryption or decryption operation
- flags:encode_key
- supported values are "bin","hex" and "base64" or "b64"
- flags:mode
- Suported modes for AES are "ebc" or "cbc"
- flags:aes_block_padding
- Logical value. default .F.
- flags:IV
- CBC mode will require a 16 bytes initialization string
- flags:encode_IV
- supported values are "bin","hex" and "base64" or "b64"
AES 256 specific flags
StrTrimEx() with flag 0x200
Working with some existing stuff where I had a method now like this to return a yyymmddThh:mm:ss string that I used in several places of the project I'm working on.
INLINE CLASS METHOD now local ft := ChrR(0,8) ft64_now(@ft,.T.) return ft64_GetTs(ft,'%04.4hu-%02.2hu-%02.2huT%02.2hu:%02.2hu:%02.2hu')
But for the new stuff I needed to put this time string into 2 fields one for the date and another for the time, and have just remembered the flag 0x200 of the old ot4xb StrTrimEx() function, so I can keep only digits and the : for the hour, and was written quick this 2 methods.
INLINE CLASS METHOD ts2date(ts) return StoD( Left(StrTrimEx( ts , "0123456789:",0x200),8) )
and
INLINE CLASS METHOD ts2time(ts) return SubStr( StrTrimEx( ts , "0123456789:",0x200),9)One of this days will post an example for the condense string flags, ....
StrTrimEx()
Syntax
StrTrimEx(cStr,cTrimChars,nFlags,chReplaceForCondenseString) --> cStr_trimmed
- cStr
- ....
- cTrimChars
- ....
- nFlags
0x01 - Trim characters on the left side of the string 0x02 - Trim characters on the right side of the string 0x03 - Trim characters on both sides of the string 0x100 - Condense String 0x200 - Remove unsafe ( list is safe unless 0x1000 ) 0x1000 - INVERT TABLE if 0x200 only then list is unsafe- chReplaceForCondenseString
- By default a single space
Subscribe to:
Posts (Atom)