JSON parsing and composing library
1-planninga library to parse and compose JSON strings from local variables
Brought to you by:
tvm
MIT License
Unlicense
[r2]: / trunk / Functions / JSON_TO_STRUCT / svnobj Maximize Restore History
7 lines (7 with data), 17.3 kB
Gx_l ¬C ! 0
jüow3 ãOèQ
O S y s t e m . S t r i n g L{ 6 f 9 d a c 9 9 - 8 d e 1 - 4 e f c - 8 4 6 5 - 6 8 a c 4 4 3 b 7 d 0 8 } S p e c i a l F u n c L{ 0 d b 3 d 7 b b - c d e 0 - 4 4 1 6 - 9 a 7 b - c e 4 9 a 0 1 2 4 3 2 3 } N o n e I m p l e m e n t a t i o n L{ 3 b 8 3 b 7 7 6 - f b 2 5 - 4 3 b 8 - 9 9 f 2 - 3 c 5 0 7 c 9 1 4 3 f c } T e x t D o c u m e n t L{ f 3 8 7 8 2 8 5 - 8 e 4 f - 4 9 0 b - b b 1 b - 9 a c b b 7 e b 0 4 d b }
T e x t L i n e s L{ a 5 d e 0 b 0 b - 1 c b 5 - 4 9 1 3 - a c 2 1 - 9 d 7 0 2 9 3 e c 0 0 d } I d
l o n g T a g T e x t Ò( * = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = J S O N _ T O _ S T R U C T ( ) VA u t h o r : T i m V a n M e p p e l e n , P r o E l e c t r i c I n c . (t i m v @ p r o e l e c t r i c . c o m "D a t e : N o v 2 , 2 0 1 8 ¨p a r s e J S O N s t r i n g a n d p l a c e t h e v a l u e s i n a m a t c h i n g l o c a l s t r u c t u r e o f t y p e J S O N V A R Ô= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = * ) t h i s l o o p s t a r t t i m e : = T I M E ( ) ; / / s t o r e t h e t i m e o f t h e b e g i n n i n g o f t h i s l o o p 8E x e c u t e _ T R I G ( C L K : = E x e c u t e ) ; 0A b o r t _ T R I G ( C L K : = A b o r t ) ; ,I F E x e c u t e _ T R I G . Q T H E N h/ / m u s t s e e a r i s i n g e d g e o n e x e c u t e t o s t a r t p a r s i n g s t a r t t i m e : = T I M E ( ) ; / / s t o r e t h e t i m e o f t h e b e g i n n i n g o f e x e c u t i o n p a r s e : = T R U E ; ( b u f f e r p o s i t i o n : = 1 ; B u s y : = T R U E ; !" A b o r t e d : = F A L S E ; " D o n e : = F A L S E ; # E r r o r : = F A L S E ; $& E r r o r P o s i t i o n : = 0 ; % o b j _ l e v e l : = 0 ; &H F O R i : = 1 T O G P L _ J S O N . M A X _ L E V E L S D O '2 N a m e V a l u e [ i ] . N a m e : = ' ' ; (4 N a m e V a l u e [ i ] . V a l u e : = ' ' ; )> N a m e V a l u e [ i ] . I s A r r a y : = F A L S E ; *< N a m e V a l u e [ i ] . A r r a y I n d e x : = 0 ; + E N D _ F O R , E N D _ I F -(I F A b o r t _ T R I G . Q T H E N . B u s y : = F A L S E ; / A b o r t e d : = T R U E ; 0 p a r s e : = F A L S E ; 1z( * = = = = = = = = = = = = = = = = = = = = P A R S E J S O N S T R I N G = = = = = = = = = = = = = = = = = = = = * ) 2/ / p a r s e t h e i n p u t s t r i n g , a n d s t a r t s t o r i n g v a l u e s i n N a m e V a l u e a r r a y 3 W H I L E p a r s e D O 4° I F ( J S O N S t r i n g ^ [ b u f f e r p o s i t i o n ] = A S C I I . N U L L ) O R ( b u f f e r p o s i t i o n > J S O N S t r i n g S i z e ) T H E N 5^ / / s t r i n g s a r e t e r m i n a t e d w i t h a n u l l c h a r a c t e r 6ä / / t h e r e m i g h t n o t a l w a y s b e a n u l l c h a r a c t e r , f o r e x a m p l e i n a n e t w o r k b u f f e r t h a t i s s t o r e d a s a n a r r a y o f b y t e s 7 p a r s e : = F A L S E ; 8 D o n e : = T R U E ; 9 B u s y : = F A L S E ; :B P a r s e T i m e : = T I M E ( ) - s t a r t t i m e ; ; R E T U R N ; < E N D _ I F =J C A S E J S O N S t r i n g ^ [ b u f f e r p o s i t i o n ] O F >J A S C I I . D O U B L E _ Q U O T E : / / " n a m e s t r i n g ? N a m e ( ) ; @ AV A S C I I . O P E N _ B R A C E : / / { , b e g i n n i n g o f o b j e c t B O p e n O b j e c t ( ) ; CL A S C I I . C L O S E _ B R A C E : / / } , e n d o f o b j e c t D C l o s e O b j e c t ( ) ; EZ A S C I I . O P E N _ B R A C K E T : / / [ , b e g i n n i n g o f a r r a y F O p e n A r r a y ( ) ; GP A S C I I . C L O S E _ B R A C K E T : / / ] , e n d o f a r r a y H C l o s e A r r a y ( ) ; Id A S C I I . C O L O N : / / : , s e p a r a t o r f o r n a m e : v a l u e p a i r s J V a l u e ( ) ; KL A S C I I . C O M M A : / / , m o v e t o n e x t o b j e c t L C o m m a ( ) ; M N A S C I I . S O H . . A S C I I . S P A C E : / / s k i p a l l c o n t r o l c h a r a c t e r s , i n c l u d i n g s p a c e s OL b u f f e r p o s i t i o n : = b u f f e r p o s i t i o n + 1 ; P
E L S E Q< / / e r r o r , u n e x p e c t e d c h a r a c t e r R" E r r o r H a n d l e r ( ) ; S E N D _ C A S E Tì ( * = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = L O O K F O R N A M E S I N L O C A L V A R I A B L E S = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = * ) U" I F f i n d n a m e T H E N V / / t h e r e i s a t l e a s t o n e v a l i d n a m e : v a l u e p a i r i n t h e N a m e V a l u e a r r a y - - c h e c k f o r a m a t c h i n t h e C o n f i g a r r a y , i n c l u d i n g n e s t e d o b j e c t s W& f i n d n a m e : = F A L S E ; XJ F O R f i n d l o o p : = 1 T O N u m b e r O f V a r s D O Yä ( * l o o p t h r o u g h a l l c o n f i g u r e d o b j e c t s a n d l o o k f o r t h e n a m e t h a t i s c u r r e n t l y b e i n g w o r k e d o n i n t h e J S O N s t r i n g Zì L o c a l J S O N o b j e c t s h o u l d b e a s c l o s e l y m a t c h e d t o t h e e x p e c t e d J S O N s t r i n g a s p o s s i b l e , t o d e c r e a s e p a r s i n g s p e e d . [ê T h i s f u n c t i o n w i l l e v e n t u a l l y f i n d a l l o b j e c t s , b u t i t w i l l s t a r t l o o k i n g a f t e r t h e p r e v i o u s f o u n d v a r i a b l e , a s i t \ i s a s s u m e d t h a t t h a t ' s t h e m o s t l i k e l y p o s i t i o n f o r t h e n e x t v a r i a b l e * ) ]R I F ( j s o n v a r i n d e x > = N u m b e r O f V a r s ) T H E N ^* j s o n v a r i n d e x : = 1 ; _ E L S E `H j s o n v a r i n d e x : = j s o n v a r i n d e x + 1 ; a E N D _ I F b| n a m e s : = J S O N V a r s ^ [ j s o n v a r i n d e x ] . N a m e s ; / / t e m p o r a r y v a r i a b l e cH F O R n a m e i n d e x : = 1 T O o b j _ l e v e l D O dÒ / / M a t c h n a m e a n d a r r a y i n d e x . A r r a y i n d e x w i l l b e 0 i f t h e c u r r e n t n a m e : v a l u e i s n o t p a r t o f a n a r r a y eÀ I F ( n a m e s [ n a m e i n d e x ] . N a m e = N a m e V a l u e [ o b j _ l e v e l - ( n a m e i n d e x - 1 ) ] . N a m e A N D ( N a m e V a l u e [ o b j _ l e v e l - ( n a m e i n d e x - 1 ) ] . A r r a y I n d e x = n a m e s [ n a m e i n d e x ] . A r r a y I n d e x ) ) T H E N f f o u n d n a m e : = T R U E ; / / n a m e i n J S O N s t r i n g m a t c h e s t h e l o c a l v a r i a b l e n a m e g E L S E hÊ f o u n d n a m e : = F A L S E ; / / n a m e i n J S O N s t r i n g d o e s n o t m a t c h t h e l o c a l v a r i a b l e n a m e , g o t o n e x t n a m e i E X I T ; j E N D _ I F k E N D _ F O R l( I F f o u n d n a m e T H E N m E X I T ; n E N D _ F O R o ( * = = = = = = = = = = = = = = = = = = = = F O U N D N A M E , W R I T E L O C A L V A R = = = = = = = = = = = = = = = = = = = = * ) p& I F f o u n d n a m e T H E N q` / / l o c a l v a r n a m e m a t c h e s w i t h J S O N s t r i n g n a m e r* f o u n d n a m e : = F A L S E ; s J S O N V a r s ^ [ j s o n v a r i n d e x ] . A s S t r i n g : = N a m e V a l u e [ o b j _ l e v e l ] . V a l u e ; t E N D _ I F u E N D _ I F v I F T I M E ( ) > = ( t h i s l o o p s t a r t t i m e + G P L _ J S O N . M A X _ E X E C U T I O N _ T I M E ) T H E N w¬ / / t h i s f u n c t i o n b l o c k w o n ' t t a k e u p m o r e t h a n G P L _ J S O N . M A X _ E X E C U T I O N _ T I M E o n o n e s c a n xØ / / v e r y l o n g s t r i n g s o r f i l e s c o u l d t a k e t o o l o n g t o p a r s e i n o n e t a s k c y c l e , a n d c a u s e a w a t c h d o g e x c e p t i o n yE N D _ W H I L E zI n t e r f a c e {L{ a 9 e d 5 b 7 e - 7 5 c 5 - 4 6 5 1 - a f 1 6 - d 2 c 2 7 e 9 8 c b 9 4 } |:F U N C T I O N _ B L O C K J S O N _ T O _ S T R U C T }V A R _ I N P U T ~| E x e c u t e : B O O L ; / / r i s i n g e d g e t r i g g e r s p a r s e o f J S O N s t r i n g x A b o r t : B O O L ; / / r i s i n g e d g e s t o p s p a r s i n g o f J S O N s t r i n g ú { a t t r i b u t e ' d i s p l a y m o d e ' : = ' h e x ' } J S O N S t r i n g : P O I N T E R T O A R R A Y [ 1 . . G P L _ J S O N . M A X _ J S O N _ S T R I N G ] O F B Y T E ; / / p o i n t e r t o J S O N s t r i n g T J S O N S t r i n g S i z e : U D I N T ; / / s i z e o f s t r i n g è J S O N V a r s : P O I N T E R T O A R R A Y [ 1 . . G P L _ J S O N . M A X _ V A R S ] O F J S O N V A R ; / / p o i n t e r t o l o c a l s t r u c t u r e m a d e u p o f t y p e J S O N V A R N u m b e r O f V a r s : U I N T ; / / n u m b e r o f v a r i a b l e s i n t h e l o c a l s t r u c t u r e o r a r r a y E N D _ V A R
V A R _ O U T P U T P B u s y : B O O L ; / / b u s y p a r s i n g a s t r i n g D o n e : B O O L ; / / s u c c e s s f u l l y p a r s e d t h e w h o l e s t r i n g w i t h n o e r r o r s f A b o r t e d : B O O L ; / / p a r s i n g a b o r t e d b y A b o r t i n p u t E r r o r : B O O L ; / / u n e x p e c t e d c h a r a c t e r d e t e c t e d , s t r i n g n o t c o m p l e t e l y p a r s e d ¬ E r r o r P o s i t i o n : U D I N T ; / / c h a r a c t e r p o s i t i o n w h e r e t h e u n e x p e c t e d c h a r a c t e r w a s f o u n d n P a r s e T i m e : T I M E ; / / t i m e i t t o o k t o p a r s e t h e s t r i n g V A R r b u f f e r p o s i t i o n : U D I N T ; / / c u r r e n t p o s i t i o n i n t h e s t r i n g Ô N a m e V a l u e : A R R A Y [ 1 . . G P L _ J S O N . M A X _ L E V E L S ] O F J S O N N A M E V A L U E ; / / n a m e : v a l u e p a i r s c u r r e n t l y b e i n g w o r k e d o n \ o b j _ l e v e l : U I N T ; / / n u m b e r o f n e s t e d o b j e c t s p n a m e _ s t a r t : U D I N T ; / / i n d e x o f t h e b e g i n n i n g o f a n a m e b n a m e _ s t o p : U D I N T ; / / i n d e x o f t h e e n d o f a n a m e r v a l u e _ s t a r t : U D I N T ; / / i n d e x o f t h e b e g i n n i n g o f a v a l u e f v a l u e _ s t o p : U D I N T ; / / i n d e x o f t h e e n d o f a v a l u e r f i n d n a m e : B O O L ; / / l o o k f o r n a m e i n c o n f i g u r a t i o n a r r a y f o u n d n a m e : B O O L ; / / f o u n d a m a t c h i n g n a m e i n c o n f i g u r a t i o n a r r a y : i : U D I N T ; / / l o o p i n d e x e s * j s o n v a r i n d e x : U I N T ; ( l e v e l i n d e x : U I N T ; & n a m e i n d e x : U I N T ; Ð n a m e s : A R R A Y [ 1 . . G P L _ J S O N . M A X _ L E V E L S ] O F J S O N V A R N A M E ; / / t e m p v a r i a b l e - - c a n ' t a c c e s s a n a r r a y p r o p e r t y t t h i s l o o p s t a r t t i m e : T I M E ; / / t i m e t h e c u r r e n t l o o p s t a r t e d V s t a r t t i m e : T I M E ; / / t i m e p a r s i n g s t a r t e d . E x e c u t e _ T R I G : R _ T R I G ; , A b o r t _ T R I G : R _ T R I G ; $ f i n d l o o p : U I N T ; p a r s e : B O O L ; ¡"U n i q u e I d G e n e r a t o r ¢4 3 1 £P O U L e v e l ¤L{ 8 e 5 7 5 c 5 b - 1 d 3 7 - 4 9 c 6 - 9 4 1 b - 5 c 0 e c 7 8 7 4 7 8 7 } ¥S t a n d a r d ¦ C h i l d O b j e c t G u i d s §8S y s t e m . C o l l e c t i o n s . A r r a y L i s t ¨,A d d A t t r i b u t e S u b s e q u e n t ©b o o l Ð Ð-ÐÐ E
}Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
% ÚÐ-Ð Ð
ÚÐ-Ð Ð
û ÚÐ-Ð Ð
@ ÚÐ-Ð Ð
ü ÚÐ-Ð Ð
ý ÚÐ-Ð Ð
/ ÚÐ-Ð Ð
O ÚÐ- Ð Ð
, ÚÐ- Ð Ð
þ ÚÐ- Ð Ð
J ÚÐ- Ð Ð
I ÚÐ- Ð Ð
ÚÐ-!Ð Ð
ÚÐ-"Ð Ð
ÚÐ-#Ð Ð
W ÚÐ-$Ð Ð
X ÚÐ-%Ð Ð
8 ÚÐ-&Ð Ð
: ÚÐ-'Ð Ð
f ÚÐ-(Ð Ð
g ÚÐ-)Ð Ð
9 ÚÐ-*Ð Ð
ÿ ÚÐ-+Ð Ð
A ÚÐ-,Ð Ð
B ÚÐ-Ð Ð
G ÚÐ--Ð Ð
H ÚÐ-.Ð Ð
C ÚÐ-/Ð Ð
D ÚÐ-0Ð Ð
ÚÐ-,Ð Ð
, ÚÐ-Ð Ð
- ÚÐ-1Ð Ð
ÚÐ-2Ð Ð
¤ ÚÐ-3Ð Ð
¨ ÚÐ-4Ð Ð
© ÚÐ-5Ð Ð
ª ÚÐ-6Ð Ð
« ÚÐ-7Ð Ð
¬ ÚÐ-8Ð Ð
ÚÐ-9Ð Ð
® ÚÐ-:Ð Ð
¯ ÚÐ-;Ð Ð
¦ ÚÐ-<Ð Ð
0 ÚÐ-Ð Ð
1 ÚÐ-=Ð Ð
ÚÐ-Ð Ð
7 ÚÐ->Ð Ð
V ÚÐ-?Ð Ð
W ÚÐ-@Ð Ð
r ÚÐ-AÐ Ð
ÚÐ-BÐ Ð
^ ÚÐ-@Ð Ð
_ ÚÐ-CÐ Ð
j ÚÐ-DÐ Ð
k ÚÐ-@Ð Ð
l ÚÐ-EÐ Ð
Z ÚÐ-FÐ Ð
o ÚÐ-@Ð Ð
p ÚÐ-GÐ Ð
r ÚÐ-HÐ Ð
s ÚÐ-@Ð Ð
t ÚÐ-IÐ Ð
& ÚÐ-JÐ Ð
' ÚÐ-@Ð Ð
{ ÚÐ-KÐ Ð
ÚÐ-LÐ Ð
$ ÚÐ-MÐ Ð
¡ ÚÐ-NÐ Ð
© ÚÐ-OÐ Ð
ª ÚÐ-Ð Ð
« ÚÐ-PÐ Ð
. ÚÐ-QÐ Ð
¯ ÚÐ-RÐ Ð
° ÚÐ-SÐ Ð
ÚÐ-MÐ Ð
² ÚÐ-TÐ Ð
³ ÚÐ-UÐ Ð
´ ÚÐ-VÐ Ð
µ ÚÐ-WÐ Ð
¹ ÚÐ-XÐ Ð
ÚÐ-YÐ Ð
y ÚÐ-ZÐ Ð
z ÚÐ-[Ð Ð
ÚÐ-\Ð Ð
ÚÐ-]Ð Ð
ÚÐ-^Ð Ð
ÚÐ-_Ð Ð
ÚÐ-`Ð Ð
º ÚÐ-aÐ Ð
» ÚÐ-bÐ Ð
ÚÐ-cÐ Ð
¿ ÚÐ-dÐ Ð
 ÚÐ-eÐ Ð
à ÚÐ-fÐ Ð
Ä ÚÐ-gÐ Ð
Å ÚÐ-hÐ Ð
Æ ÚÐ-iÐ Ð
Ç ÚÐ-jÐ Ð
È ÚÐ-kÐ Ð
É ÚÐ-lÐ Ð
Ê ÚÐ-mÐ Ð
Ë ÚÐ-aÐ Ð
Ì ÚÐ-nÐ Ð
Í ÚÐ-MÐ Ð
Î ÚÐ-oÐ Ð
Ï ÚÐ-pÐ Ð
Ð ÚÐ-qÐ Ð
Ñ ÚÐ-rÐ Ð
Ò ÚÐ-sÐ Ð
Ó ÚÐ-tÐ Ð
Ô ÚÐ-uÐ Ð
Õ ÚÐ-Ð Ð
ÚÐ-vÐ Ð
ÚÐ-wÐ Ð
Ö ÚÐ-xÐ Ð
× ÚÐ-;Ð Ð
ÚÐ-uÐ Ð
ÚÐ-yÐ Ð
ÚÐ-Ðz{Ð E
*Ð Ð
ÚÐ-|Ð Ð
ú ÚÐ-}Ð Ð
= ÚÐ-~Ð Ð
Ú ÚÐ-Ð Ð
ÚÐ-Ð Ð
Û ÚÐ-Ð Ð
Ü ÚÐ-Ð Ð
Ý ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
F ÚÐ-
Ð Ð
ÚÐ-Ð Ð
> ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
M ÚÐ-Ð Ð
ÚÐ-Ð Ð
Þ ÚÐ-Ð Ð
á ÚÐ-Ð Ð
ù ÚÐ-Ð Ð
â ÚÐ-Ð Ð
ã ÚÐ-Ð Ð
ä ÚÐ-Ð Ð
ç ÚÐ-Ð Ð
è ÚÐ-Ð Ð
é ÚÐ-Ð Ð
ê ÚÐ-Ð Ð
ë ÚÐ-Ð Ð
ì ÚÐ-Ð Ð
í ÚÐ-Ð Ð
ð ÚÐ-Ð Ð
ñ ÚÐ-Ð Ð
ò ÚÐ-Ð Ð
õ ÚÐ-Ð Ð
ö ÚÐ-Ð Ð
÷ ÚÐ-Ð Ð
? ÚÐ-Ð Ð
ÚÐ-Ð Ð
+ ÚÐ-Ð Ð
ÚÐ- Ð Ð
ÚÐ-Ð Ð
ÚÐ-С-¢Ð£¤-¥¦§ Ш©