AutoIt語言的json支援

http://www.autoitscript.com/forum/topic/104150-json-udf-library-fully-rfc4627-compliant/

請前往該網址自行下載。

 

不過該庫有個小問題，就是不支援數組或對象結束符前多留個逗號，即支援[1,2,3]當時不支援[1,2,3,]，這很要命的，因為很多json檔案是程式產生的，產生時就多帶了個逗號，C語言都支援這個多餘的逗號，json當然也應該支援，json-c是支援的。

所以必須為這個UDF添加上這個功能，patch內容：

@@ -503,6 +503,10 @@
             case ','
                 __JSONReadNext()
                 __JSONSkipWhitespace()
+                If $__JSONCurr == '}' Then
+                    __JSONReadNext()
+                    return $o
+                EndIf
             case else
                 if not $__JSONWhitespaceWasFound then
                     ; badly-formatted object
@@ -567,6 +571,10 @@
             case ','
                 __JSONReadNext()
                 __JSONSkipWhitespace()
+                If $__JSONCurr == ']' Then
+                    __JSONReadNext()
+                    return $a
+                EndIf
             case else
                 if not $__JSONWhitespaceWasFound then
                     ; badly-formatted array