PB_Includes/lweb
1
0
Fork 0
Code Issues 3 Pull requests Projects 1 Releases 2 Wiki Activity

Add extended Logger function

Browse source
This commit is contained in:
René Linder 2023-03-29 10:44:52 +02:00
parent f342610c4b
commit 18de367ae5
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
inc/lweb_IP.pbi
View file

@ -15,15 +15,15 @@ Procedure IsIPStringValid(Adress.s)
My_Regex_v6_compress = CreateRegularExpression(#PB_Any, "^(([0-9A-Fa-f]{1,4}(:[0-9A-Fa-f]{1,4}){0,5})?)::(([0-9A-Fa-f]{1,4}(:[0-9A-Fa-f]{1,4}){0,5})?)$") My_Regex_v6_compress = CreateRegularExpression(#PB_Any, "^(([0-9A-Fa-f]{1,4}(:[0-9A-Fa-f]{1,4}){0,5})?)::(([0-9A-Fa-f]{1,4}(:[0-9A-Fa-f]{1,4}){0,5})?)$")
If MatchRegularExpression(My_Regex_v4, Adress) And Valid = 0 If MatchRegularExpression(My_Regex_v4, Adress) And Valid = 0
lhs_log::Out("My_Regex_v4") lhs_log_ext::OutL(lhs_web::get_config(lhs_web::#conf_Debug_logUUID), lhs_log_ext::#Debugging,"My_Regex_v4")
Valid = 1 Valid = 1
EndIf EndIf
If MatchRegularExpression(My_Regex_v6_nocompress, Adress) And Valid = 0 If MatchRegularExpression(My_Regex_v6_nocompress, Adress) And Valid = 0
lhs_log::Out("My_Regex_v6_nocompress") lhs_log_ext::OutL(lhs_web::get_config(lhs_web::#conf_Debug_logUUID), lhs_log_ext::#Debugging,"My_Regex_v6_nocompress")
Valid = 1 Valid = 1
EndIf EndIf
If MatchRegularExpression(My_Regex_v6_compress, Adress) And Valid = 0 If MatchRegularExpression(My_Regex_v6_compress, Adress) And Valid = 0
lhs_log::Out("My_Regex_v6_compress") lhs_log_ext::OutL(lhs_web::get_config(lhs_web::#conf_Debug_logUUID), lhs_log_ext::#Debugging,"My_Regex_v6_compress")
Valid = 1 Valid = 1
EndIf EndIf