[
  {
    "name": "initial-parameters",
    "type": "generated-data",
    "id": -1,
    "binary": null,
    "obj": {
      "keypair": {
        "publicKey": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0",
        "secretKey": "f12a0b72a720f9ce6898a1f4c685bee4cc838102143db98f467c5512a726e69225b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0"
      },
      "hashes": [
        "20265674e8aac2dfddd78f86fe5a3dd68d976ca3f5ba23645ec7381480921d0d",
        "10705340e5528f2ef03a6797b72b1bb9f37f9009ad408247387c4bcc4d2a3371",
        "af700793dd51d4cb3c18a6df46f88bfe1665fba9b277487ddecd1e031441d69d"
      ],
      "reqid": "95050429",
      "cancelid": "58b041b1",
      "links": [
        "5049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b3"
      ],
      "ttl": 1,
      "limit": 20,
      "timestamp": 80,
      "timeStart": 0,
      "timeEnd": 100,
      "future": 0,
      "channels": [
        "default",
        "dev",
        "introduction"
      ],
      "channel": "default",
      "username": "cabler",
      "offset": 0,
      "text": "h€llo world",
      "topic": "introduce yourself to the friendly crowd of likeminded folx",
      "oldest": 40,
      "recipients": [
        "a6bac4f48e10f3e036e3915a583977b900e048304f7527b6bf299356219d1e91",
        "2abcc76c670e32d37fd4233a6ea60fd39a3b246c4ac4bfd43a74639360ff7688",
        "89d1baf8b98a135e7a9ab7720dbd809e234a61054187ed8bc1022c44e45010d6"
      ],
      "recipient": "a6bac4f48e10f3e036e3915a583977b900e048304f7527b6bf299356219d1e91",
      "action": 0,
      "role": 0,
      "reason": "the reason is entirely mine own",
      "privacy": 0,
      "drop": 0,
      "undrop": 1,
      "notify": 1
    },
    "posthash": null
  },
  {
    "name": "post request",
    "type": "request",
    "id": 2,
    "binary": "6b020000000095050429010320265674e8aac2dfddd78f86fe5a3dd68d976ca3f5ba23645ec7381480921d0d10705340e5528f2ef03a6797b72b1bb9f37f9009ad408247387c4bcc4d2a3371af700793dd51d4cb3c18a6df46f88bfe1665fba9b277487ddecd1e031441d69d",
    "obj": {
      "msgLen": 107,
      "msgType": 2,
      "reqid": "95050429",
      "ttl": 1,
      "hashes": [
        "20265674e8aac2dfddd78f86fe5a3dd68d976ca3f5ba23645ec7381480921d0d",
        "10705340e5528f2ef03a6797b72b1bb9f37f9009ad408247387c4bcc4d2a3371",
        "af700793dd51d4cb3c18a6df46f88bfe1665fba9b277487ddecd1e031441d69d"
      ]
    },
    "posthash": "000ec3d4c9c9fbc5522ba54fb7ebe97781d222869003ced25e8617e2e373d620"
  },
  {
    "name": "cancel request",
    "type": "request",
    "id": 3,
    "binary": "0e0300000000950504290158b041b1",
    "obj": {
      "msgLen": 14,
      "msgType": 3,
      "reqid": "95050429",
      "ttl": 1,
      "cancelid": "58b041b1"
    },
    "posthash": "6730710ddb5defadc7ff4a16cfc02a0ada947eb2a50c3c8c277a122f37b8e72a"
  },
  {
    "name": "channel time range request",
    "type": "request",
    "id": 4,
    "binary": "15040000000095050429010764656661756c74006414",
    "obj": {
      "msgLen": 21,
      "msgType": 4,
      "reqid": "95050429",
      "ttl": 1,
      "channel": "default",
      "timeStart": 0,
      "timeEnd": 100,
      "limit": 20
    },
    "posthash": "b20a8aef8b489fec5fcd84ef0f48c8ed7a9c45673f1e6307150f50accdd74330"
  },
  {
    "name": "channel state request",
    "type": "request",
    "id": 5,
    "binary": "13050000000095050429010764656661756c7400",
    "obj": {
      "msgLen": 19,
      "msgType": 5,
      "reqid": "95050429",
      "ttl": 1,
      "channel": "default",
      "future": 0
    },
    "posthash": "b54fb8c60c642d49d9072ab750cebb7525550abd3f1a51b36bbb095c5b8977db"
  },
  {
    "name": "channel list request",
    "type": "request",
    "id": 6,
    "binary": "0c060000000095050429010014",
    "obj": {
      "msgLen": 12,
      "msgType": 6,
      "reqid": "95050429",
      "ttl": 1,
      "offset": 0,
      "limit": 20
    },
    "posthash": "f0878f4a7dff80ce1936212b773c305128df0c3d0e1dae1b17f83d03771cd9e2"
  },
  {
    "name": "moderation state request",
    "type": "request",
    "id": 8,
    "binary": "26080000000095050429010764656661756c74036465760c696e74726f64756374696f6e000028",
    "obj": {
      "msgLen": 38,
      "msgType": 8,
      "reqid": "95050429",
      "ttl": 1,
      "channels": [
        "default",
        "dev",
        "introduction"
      ],
      "future": 0,
      "oldest": 40
    },
    "posthash": "95ed44282cb79f959cb20f50cc81e9d1a37ab2f19b3ecba10f6b66511716cbf6"
  },
  {
    "name": "hash response",
    "type": "response",
    "id": 0,
    "binary": "6a0000000000950504290320265674e8aac2dfddd78f86fe5a3dd68d976ca3f5ba23645ec7381480921d0d10705340e5528f2ef03a6797b72b1bb9f37f9009ad408247387c4bcc4d2a3371af700793dd51d4cb3c18a6df46f88bfe1665fba9b277487ddecd1e031441d69d",
    "obj": {
      "msgLen": 106,
      "msgType": 0,
      "reqid": "95050429",
      "hashes": [
        "20265674e8aac2dfddd78f86fe5a3dd68d976ca3f5ba23645ec7381480921d0d",
        "10705340e5528f2ef03a6797b72b1bb9f37f9009ad408247387c4bcc4d2a3371",
        "af700793dd51d4cb3c18a6df46f88bfe1665fba9b277487ddecd1e031441d69d"
      ]
    },
    "posthash": "d7eb301be54e29b65f52d2944d3315ee5bcd89cae125ea8907c42a6c69d7801b"
  },
  {
    "name": "post response",
    "type": "response",
    "id": 1,
    "binary": "97010100000000950504298b0125b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0abb083ecdca569f064564942ddf1944fbf550dc27ea36a7074be798d753cb029703de77b1a9532b6ca2ec5706e297dce073d6e508eeb425c32df8431e4677805015049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b305500764656661756c7400",
    "obj": {
      "msgLen": 151,
      "msgType": 1,
      "reqid": "95050429",
      "posts": [
        "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0abb083ecdca569f064564942ddf1944fbf550dc27ea36a7074be798d753cb029703de77b1a9532b6ca2ec5706e297dce073d6e508eeb425c32df8431e4677805015049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b305500764656661756c74"
      ]
    },
    "posthash": "6f191ac0cd9705d6d02c28186b13a351e45e0cac80b0c926a10dd70a39d12be7"
  },
  {
    "name": "channel list response",
    "type": "response",
    "id": 7,
    "binary": "230700000000950504290764656661756c74036465760c696e74726f64756374696f6e00",
    "obj": {
      "msgLen": 35,
      "msgType": 7,
      "reqid": "95050429",
      "channels": [
        "default",
        "dev",
        "introduction"
      ]
    },
    "posthash": "dda7400532e7e62d3960995090fd6a14c9bb6bec1346f80c6fe8f158f7de4fda"
  },
  {
    "name": "post/text",
    "type": "post",
    "id": 0,
    "binary": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d06725733046b35fa3a7e8dc0099a2b3dff10d3fd8b0f6da70d094352e3f5d27a8bc3f5586cf0bf71befc22536c3c50ec7b1d64398d43c3f4cde778e579e88af05015049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b300500764656661756c740d68e282ac6c6c6f20776f726c64",
    "obj": {
      "publicKey": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0",
      "signature": "6725733046b35fa3a7e8dc0099a2b3dff10d3fd8b0f6da70d094352e3f5d27a8bc3f5586cf0bf71befc22536c3c50ec7b1d64398d43c3f4cde778e579e88af05",
      "links": [
        "5049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b3"
      ],
      "postType": 0,
      "channel": "default",
      "timestamp": 80,
      "text": "h€llo world"
    },
    "posthash": "1971c3829f1df088fc2b0a1172174ada80c14650b679587a305dca7b1c396a39"
  },
  {
    "name": "post/delete",
    "type": "post",
    "id": 1,
    "binary": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0e8fc6c809f3086627879520abe6f76a4810a8bef77a668f41046c48dc98c13ed55aa54ca1e6913076bd7791c6c97aa807850bc6be7415fa5d251b9b26febd101015049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b301500320265674e8aac2dfddd78f86fe5a3dd68d976ca3f5ba23645ec7381480921d0d10705340e5528f2ef03a6797b72b1bb9f37f9009ad408247387c4bcc4d2a3371af700793dd51d4cb3c18a6df46f88bfe1665fba9b277487ddecd1e031441d69d",
    "obj": {
      "publicKey": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0",
      "signature": "e8fc6c809f3086627879520abe6f76a4810a8bef77a668f41046c48dc98c13ed55aa54ca1e6913076bd7791c6c97aa807850bc6be7415fa5d251b9b26febd101",
      "links": [
        "5049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b3"
      ],
      "postType": 1,
      "timestamp": 80,
      "hashes": [
        "20265674e8aac2dfddd78f86fe5a3dd68d976ca3f5ba23645ec7381480921d0d",
        "10705340e5528f2ef03a6797b72b1bb9f37f9009ad408247387c4bcc4d2a3371",
        "af700793dd51d4cb3c18a6df46f88bfe1665fba9b277487ddecd1e031441d69d"
      ]
    },
    "posthash": "9617fbed0a14bf68eeda625ae853206d68a80a04527512d4ae83d88bb4722ba4"
  },
  {
    "name": "post/info",
    "type": "post",
    "id": 2,
    "binary": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d04ccb1c0063ef09a200e031ee89d874bcc99f3e6fd8fd667f5e28f4dbcf4b7de6bb1ce37d5f01cc055a7b70cef175d30feeb34531db98c91fa8b3fa4d7c5fd307015049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b30250046e616d65066361626c657200",
    "obj": {
      "publicKey": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0",
      "signature": "4ccb1c0063ef09a200e031ee89d874bcc99f3e6fd8fd667f5e28f4dbcf4b7de6bb1ce37d5f01cc055a7b70cef175d30feeb34531db98c91fa8b3fa4d7c5fd307",
      "links": [
        "5049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b3"
      ],
      "postType": 2,
      "timestamp": 80,
      "info": [
        [
          "name",
          "cabler"
        ]
      ]
    },
    "posthash": "75c77c259d564f3b29a431963d7243ff83811075ba80fe5e01e2e8a18ad06fab"
  },
  {
    "name": "post/topic",
    "type": "post",
    "id": 3,
    "binary": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0bf7578e781caee4ca708281645b291a2100c4f2138f0e0ac98bc2b4a414b4ba8dca08285751114b05f131421a1745b648c43b17b05392593237dfacc8dff5208015049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b303500764656661756c743b696e74726f6475636520796f757273656c6620746f2074686520667269656e646c792063726f7764206f66206c696b656d696e64656420666f6c78",
    "obj": {
      "publicKey": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0",
      "signature": "bf7578e781caee4ca708281645b291a2100c4f2138f0e0ac98bc2b4a414b4ba8dca08285751114b05f131421a1745b648c43b17b05392593237dfacc8dff5208",
      "links": [
        "5049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b3"
      ],
      "postType": 3,
      "channel": "default",
      "timestamp": 80,
      "topic": "introduce yourself to the friendly crowd of likeminded folx"
    },
    "posthash": "38fe6249a7465e59052d793145b8f7dafcf05188995371d766b600da8d5f8f76"
  },
  {
    "name": "post/join",
    "type": "post",
    "id": 4,
    "binary": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d064425f10fa34c1e14b6101491772d3c5f15f720a952dd56c27d5ad52f61f695130ce286de73e332612b36242339b61c9e12397f5dcc94c79055c7e1cb1dbfb08015049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b304500764656661756c74",
    "obj": {
      "publicKey": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0",
      "signature": "64425f10fa34c1e14b6101491772d3c5f15f720a952dd56c27d5ad52f61f695130ce286de73e332612b36242339b61c9e12397f5dcc94c79055c7e1cb1dbfb08",
      "links": [
        "5049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b3"
      ],
      "postType": 4,
      "channel": "default",
      "timestamp": 80
    },
    "posthash": "e921c9a21bc5d465e6d302851b7c62dde873301e696aefe066353d5acacb9514"
  },
  {
    "name": "post/leave",
    "type": "post",
    "id": 5,
    "binary": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0abb083ecdca569f064564942ddf1944fbf550dc27ea36a7074be798d753cb029703de77b1a9532b6ca2ec5706e297dce073d6e508eeb425c32df8431e4677805015049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b305500764656661756c74",
    "obj": {
      "publicKey": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0",
      "signature": "abb083ecdca569f064564942ddf1944fbf550dc27ea36a7074be798d753cb029703de77b1a9532b6ca2ec5706e297dce073d6e508eeb425c32df8431e4677805",
      "links": [
        "5049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b3"
      ],
      "postType": 5,
      "channel": "default",
      "timestamp": 80
    },
    "posthash": "540b27c2e09a14d8405a892913bf9b2b5131db4210fe82696b5d6a12ba1fe9ed"
  },
  {
    "name": "post/role",
    "type": "post",
    "id": 6,
    "binary": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0f487aa1356906bdf71573248e4615329eaf392f0996a7decf275fcfaf30ee3a35e6ba0b2953eb17ded9c3f239d3ae2048e13c7338563bb8aef78ab74063b2100015049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b306501f74686520726561736f6e20697320656e746972656c79206d696e65206f776e000764656661756c74a6bac4f48e10f3e036e3915a583977b900e048304f7527b6bf299356219d1e9100",
    "obj": {
      "publicKey": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0",
      "signature": "f487aa1356906bdf71573248e4615329eaf392f0996a7decf275fcfaf30ee3a35e6ba0b2953eb17ded9c3f239d3ae2048e13c7338563bb8aef78ab74063b2100",
      "links": [
        "5049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b3"
      ],
      "postType": 6,
      "timestamp": 80,
      "reason": "the reason is entirely mine own",
      "privacy": 0,
      "channel": "default",
      "recipient": "a6bac4f48e10f3e036e3915a583977b900e048304f7527b6bf299356219d1e91",
      "role": 0
    },
    "posthash": "95b371fb4c5e23add1ac474667dbeec0ec731452538efbe47faf33f8dab758ff"
  },
  {
    "name": "post/moderation",
    "type": "post",
    "id": 7,
    "binary": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d09ac00f42db0cfc55575800926954cfe03a15c16132ecde2a6ca8b7365a3e9eec9786c8569e287bcbfff158e584637a0ce235e541acc3bc16d28fcb1024309405015049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b307501f74686520726561736f6e20697320656e746972656c79206d696e65206f776e000764656661756c7403a6bac4f48e10f3e036e3915a583977b900e048304f7527b6bf299356219d1e912abcc76c670e32d37fd4233a6ea60fd39a3b246c4ac4bfd43a74639360ff768889d1baf8b98a135e7a9ab7720dbd809e234a61054187ed8bc1022c44e45010d600",
    "obj": {
      "publicKey": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0",
      "signature": "9ac00f42db0cfc55575800926954cfe03a15c16132ecde2a6ca8b7365a3e9eec9786c8569e287bcbfff158e584637a0ce235e541acc3bc16d28fcb1024309405",
      "links": [
        "5049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b3"
      ],
      "postType": 7,
      "timestamp": 80,
      "reason": "the reason is entirely mine own",
      "privacy": 0,
      "channel": "default",
      "recipients": [
        "a6bac4f48e10f3e036e3915a583977b900e048304f7527b6bf299356219d1e91",
        "2abcc76c670e32d37fd4233a6ea60fd39a3b246c4ac4bfd43a74639360ff7688",
        "89d1baf8b98a135e7a9ab7720dbd809e234a61054187ed8bc1022c44e45010d6"
      ],
      "action": 0
    },
    "posthash": "515b70c1db983217683a8abf90fd5b3890a32013280b1844eedf7cb6303fd275"
  },
  {
    "name": "post/block",
    "type": "post",
    "id": 8,
    "binary": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0e5fffd29b2057983fd427b41164b9a7aeb1ff0dd770f2f21f0f253cdccca063c39c041e81727db5c87810d72a717f0ddf6689734b0d2680680067ff99ea61104015049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b308501f74686520726561736f6e20697320656e746972656c79206d696e65206f776e0003a6bac4f48e10f3e036e3915a583977b900e048304f7527b6bf299356219d1e912abcc76c670e32d37fd4233a6ea60fd39a3b246c4ac4bfd43a74639360ff768889d1baf8b98a135e7a9ab7720dbd809e234a61054187ed8bc1022c44e45010d60001",
    "obj": {
      "publicKey": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0",
      "signature": "e5fffd29b2057983fd427b41164b9a7aeb1ff0dd770f2f21f0f253cdccca063c39c041e81727db5c87810d72a717f0ddf6689734b0d2680680067ff99ea61104",
      "links": [
        "5049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b3"
      ],
      "postType": 8,
      "timestamp": 80,
      "reason": "the reason is entirely mine own",
      "privacy": 0,
      "recipients": [
        "a6bac4f48e10f3e036e3915a583977b900e048304f7527b6bf299356219d1e91",
        "2abcc76c670e32d37fd4233a6ea60fd39a3b246c4ac4bfd43a74639360ff7688",
        "89d1baf8b98a135e7a9ab7720dbd809e234a61054187ed8bc1022c44e45010d6"
      ],
      "drop": 0,
      "notify": 1
    },
    "posthash": "0914802a79af7b2f89bdd1dcdba52fb018acf39f5a766447530e67e745d4bf9c"
  },
  {
    "name": "post/unblock",
    "type": "post",
    "id": 9,
    "binary": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d030ea02c39b2c41e4de986f290b9f6e20ae190fb4cf357599103315aa4040dfa297f288fe3617b3febe5faea7aa7f381ee046823bfb371c45062eabda95c6430e015049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b309501f74686520726561736f6e20697320656e746972656c79206d696e65206f776e0003a6bac4f48e10f3e036e3915a583977b900e048304f7527b6bf299356219d1e912abcc76c670e32d37fd4233a6ea60fd39a3b246c4ac4bfd43a74639360ff768889d1baf8b98a135e7a9ab7720dbd809e234a61054187ed8bc1022c44e45010d601",
    "obj": {
      "publicKey": "25b272a71555322d40efe449a7f99af8fd364b92d350f1664481b2da340a02d0",
      "signature": "30ea02c39b2c41e4de986f290b9f6e20ae190fb4cf357599103315aa4040dfa297f288fe3617b3febe5faea7aa7f381ee046823bfb371c45062eabda95c6430e",
      "links": [
        "5049d089a650aa896cb25ec35258653be4df196b4a5e5b6db7ed024aaa89e1b3"
      ],
      "postType": 9,
      "timestamp": 80,
      "reason": "the reason is entirely mine own",
      "privacy": 0,
      "recipients": [
        "a6bac4f48e10f3e036e3915a583977b900e048304f7527b6bf299356219d1e91",
        "2abcc76c670e32d37fd4233a6ea60fd39a3b246c4ac4bfd43a74639360ff7688",
        "89d1baf8b98a135e7a9ab7720dbd809e234a61054187ed8bc1022c44e45010d6"
      ],
      "undrop": 1
    },
    "posthash": "4b2c0b67be11fd3cb5c45b0a3e467e49034fc409d23445f039d65cc2fe1c8273"
  }
]

-module(examples_from_json).
-export([
         post_request/0, cancel_request/0, channel_time_range_request/0,
         channel_state_request/0, channel_list_request/0,
         hash_response/0, post_response/0, channel_list_response/0,
         post_text/0, post_delete/0, post_info/0, post_topic/0, post_join/0, post_leave/0
]).
post_request() ->
    {ok, D} = unpack_data(2),
    %% assert the json is still formatted as expected
    <<"post request">> = proplists:get_value(name, D),
    D.
cancel_request() ->
    {ok, D} = unpack_data(3),
    <<"cancel request">> = proplists:get_value(name, D),
    D.
channel_time_range_request() ->
    {ok, D} = unpack_data(4),
    <<"channel time range request">> = proplists:get_value(name, D),
    D.
channel_state_request() ->
    {ok, D} = unpack_data(5),
    <<"channel state request">> = proplists:get_value(name, D),
    D.
channel_list_request() ->
    {ok, D} = unpack_data(6),
    <<"channel list request">> = proplists:get_value(name, D),
    D.
%% TODO: moderation_state_request = 7
hash_response() ->
    {ok, D} = unpack_data(8),
    <<"hash response">> = proplists:get_value(name, D),
    D.
post_response() ->
    {ok, D} = unpack_data(9),
    <<"post response">> = proplists:get_value(name, D),
    D.
channel_list_response() ->
    {ok, D} = unpack_data(10),
    <<"channel list response">> = proplists:get_value(name, D),
    D.
post_text() ->
    {ok, D} = unpack_data(11),
    <<"post/text">> = proplists:get_value(name, D),
    D.
post_delete() ->
    {ok, D} = unpack_data(12),
    <<"post/delete">> = proplists:get_value(name, D),
    D.
post_info() ->
    {ok, D} = unpack_data(13),
    <<"post/info">> = proplists:get_value(name, D),
    D.
post_topic() ->
    {ok, D} = unpack_data(14),
    <<"post/topic">> = proplists:get_value(name, D),
    D.
post_join() ->
    {ok, D} = unpack_data(15),
    <<"post/join">> = proplists:get_value(name, D),
    D.
post_leave() ->
    {ok, D} = unpack_data(16),
    <<"post/leave">> = proplists:get_value(name, D),
    D.
%% TODO:
%% "post/role"
%% "post/moderation"
%% "post/block"
%% "post/unblock"
% json helper
% ===========
%% Load JSON data into persistent_term
load() ->
    case file:read_file("cable-examples.json") of
        {ok, Binary} ->
            try
                Json = jsone:decode(Binary),
                persistent_term:put(json_data, Json),
                {ok, Json}
            catch
                _:Error -> {error, Error}
            end;
        {error, Reason} -> {error, Reason}
    end.
%% Retrieve JSON data from persistent_term
get_data(Index) ->
    {ok, J} = case persistent_term:get(json_data, undefined) of
        undefined -> load();
        Json -> {ok, Json}
    end,
    {ok, lists:nth(Index, J)}.
unpack_data(Index) ->
    {ok, J } = get_data(Index),
    #{ <<"binary">> := Bin, <<"obj">> := Obj, <<"name">> := Name } = J,
    {ok, [{name, Name},
          {binary, hex:hexstr_to_bin(binary_to_list(Bin))},
          {obj, Obj}]}.

  J = jsone:decode(D),
  #{ <<"binary">> := Bin, <<"obj">> := Obj } = J,
  [{binary, hex:hexstr_to_bin(binary_to_list(Bin))},
   {obj, Obj}].

    J = jsone:decode(D),
    #{ <<"binary">> := Bin, <<"obj">> := Obj, <<"name">> := Name } = J,
    [{name, Name},
     {binary, hex:hexstr_to_bin(binary_to_list(Bin))},
     {obj, Obj}].

-module(compare_examples).
-export([compare/1, compare_all/0]).
%% List of functions to compare
functions_to_compare() ->
    [
     post_request, cancel_request, channel_time_range_request,
   channel_state_request, channel_list_request,
   hash_response, post_response, channel_list_response,
   post_text, post_delete, post_info, post_topic, post_join, post_leave
    ].
%% Compare all functions in the list
compare_all() ->
    Functions = functions_to_compare(),
    compare_functions(Functions).
%% Compare functions from old and new modules
compare_functions([]) ->
    io:format("Comparison complete~n");
compare_functions([Function | Rest]) ->
    compare(Function),
    compare_functions(Rest).
%% Compare a specific function
compare(Function) ->
    OldResult = apply(examples, Function, []),
    NewResult = apply(examples_from_json, Function, []),
    io:format("Comparing ~p/0~n", [Function]),
    io:format("Old result: ~p~n", [OldResult]),
    io:format("New result: ~p~n", [NewResult]),
    case OldResult of
        NewResult -> io:format("Results match~n");
        _ -> io:format("Results do not match!~n")
    end.