UnquotedJson 1.0.10

UnquotedJson

UnquotedJson is a JSON parser that parse the standard JSON format. UnquotedJson also relax the rules a little and allows unquoted strings which are keys and/or in values.

The quote signs of string may be omitted if shorten does not cause parsing ambiguity or errors.

The string must be quoted if a string is unquoted will causes parsing ambiguity or errors.

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 usage see also FSharpConverter.fs The return value of JSON.parse is JsonValue type that is a Discriminated Union type of F#.

UrlQuery

UnquotedJson can be used for query strings in URLs. When the field is of primitive type, the query string format is used. When the field is a complex type, use the Unqoted Json format.

The source see UrlQuery

The usage see also UrlQueryTest.fs

API

The main structure types are defined as follows:

• The type JsonValue see to JsonValue.

• The type JsonToken see to JsonToken.