UnquotedJson 1.0.4

UnquotedJson

UnquotedJson is a JSON parser. In addition to being able to parse the standard JSON format, UnquotedJson also allows unquoted strings which are keys and/or in values.

When a string is unquoted and does not cause parsing ambiguity or errors, the string can be unquoted or quoted.

When a string is unquoted and causes parsing ambiguity or errors, the string must be quoted. Those that cannot be omitted must not be omitted.

Format Convert

unquoted format convert to normal json format:

let x = """{
    0:{index:0, license:t, nameSID:n, image:"img:left", descriptionSID:t, category:r}
    }"""
let y = 
    x
    |> JSON.parse
    |> JSON.stringifyNormalJson

UnquotedJson is a superset of JSON, so the JSON.parse parsing function can directly parse normal JSON. follows code convert the normal format to unquoted json format:

let n = """{
    "0":{"index":0,"license":"t","nameSID":"n","image":"img:left","descriptionSID":"t","category":"r"}
    }"""

let y = 
    n
    |> JSON.parse
    |> JSON.stringifyUnquotedJson

Object Serialization

You can define serialization and deserialization functions for objects.

let serialize<'t> obj =
    obj
    |> JSON.read<'t>
    |> JSON.stringifyNormalJson

let deserialize<'t> text =
    text
    |> JSON.parse 
    |> JSON.write<'t>

Here are some examples of serialization of common object types.

Tuple

(1,"x")

[1,"x"]

Array, list, Set and so on

[1;2;3]

[1,2,3]

Record

Supports serialization of anonymous records also.

{ name = "abcdefg"; age = 18 }

{"name":"abcdefg","age":18}

Map

Map [1,"1";2,"2"]

[[1,"1"],[2,"2"]]

Option

[Some 1;None]

[1,null]

Union

type UionExample =
| Zero
| OnlyOne of int
| Pair of int * string

[Zero;OnlyOne 1;Pair(2,"b")]

["Zero",{"OnlyOne":1},{"Pair":[2,"b"]}]

Provide tryRead and tryWrite to custom your convert rule

The signature of tryRead is:

tryRead:Type -> obj -> ((Type -> obj -> JsonValue) -> JsonValue) option

The signature of tryWrite is:

tryWrite:Type -> JsonValue -> ((Type -> JsonValue -> obj) -> obj) option

The return value of JSON.parse is JsonValue type that is a Discriminated Union type of F#.