「なでしこv1」開発掲示板

【症状】どのような症状、現象か？
【再現方法】サンプルソース、再現手順など

『[1,2,3]』をJSONデコードの変数型確認を表示
『[null]』をJSONデコードの変数型確認を表示

【要望】どのような解決が望ましいか？

null 値は、空文字列か、もしくは NIL として解釈するように。

【バージョン】nadesiko ver.1.5329
【その他】

Twitter 連携ライブラリ「なこったー / nakotter」のβ版を公開しました。
　http://www.undefin.net/nadesiko/xpln/lesson/L3-1

nakotter では、取得データの整形処理が、デフォルトでは「JSONデコード」を
利用するようにしています:

　　# HTTP Response の処理。デフォルトでは JSON 想定
　　レスポンス処理は～
　　　レスポンス部分の『:null』を『:""』に置換してJSONデコード

しかし「JSONデコード」命令では null 値があると失敗してしまうため、
暫定的に null を空文字列に置換して利用しています。

XML フォーマットで取得してタグ関連の命令でぐちゃぐちゃとやるのでもいいのですが、
タグ関連の命令はそこまで充実していないし、階層タグ命令等も使いづらいです。
JSONデコードを使ってきちんとなでしこの配列/ハッシュに変換できれば、

　Nakotterから返信取得して反復、対象@`text`を表示

のように、XML で切り盛り（？）するよりも圧倒的に楽です。

----
ということで、null は空文字列か、NIL としてデコードされて欲しいです。
修正案が他にあればお願いします。

整数型で扱えない巨大な数が現れると、オーバーフローして正しくない数値データが
読み込まれてしまいます（具体的には、 status_id など）。

こちらの対処は難しそうですが、一応報告だけ。

-JSONデコードで大きな整数が扱えない問題を修正(r239)(@532)

状態が確認待ちになっていますが、片方、null の問題の方は未解決なので
よろしくお願いします。

# なんかこの前もどっかで同じことを言ったような気もしますが（汗；

//再現コード
A=『[1,null,3]』をJSONデコード。
Aの変数型確認を表示。 // 配列じゃない！
A[0]を表示。// 1 ではない
A[2]を表示。// 3 ではない

こんにちは。LSIです。

なでしこのソースコードを読んでいて、怪しいところを見つけたので、報告します。

unit_kabin.pasのJsonObject2PHiValue()のcase文で、
obj.JsonTypeがjson_type_nullの時、nilを返していますが、
これを空のHiValueオブジェクトへのポインタを返すようにすると、
 U D さんが望んでいる動作になりそうな気がします。

JsonObject2PHiValue()でnilを返していることで、
大本の関数sys_json_decode()でもnilを返すので、
戻り値なしの扱いになっているようです。

ただ、Delphiの開発環境を持っておらず、実際に試したわけではないです。
外していたらごめんなさい。

// 現在のcase文
// ここから
  case obj.JsonType of
    json_type_null:     Result := nil;
    json_type_boolean:  Result := hi_newBool(obj.AsBoolean);
    json_type_string:
    // ……
  end;
// ここまで

// 以下のように変更
// ここから
  case obj.JsonType of
    json_type_null:     Result := hi_var_new;
    json_type_boolean:  Result := hi_newBool(obj.AsBoolean);
    json_type_string:
    // ……
  end;
// ここまで

unit_kabin.pas - JsonObject2PHiValue()
http://code.google.com/p/nadesiko/source/browse/trunk/hi_unit/unit_kabin.pas?r=249#104

重要度を上げさせていただきます。


JSONデコード、エンコード共に完全ではないようです。
//再現ここから

元ハッシュとはハッシュ
元ハッシュ@"a" = "AAA"
元ハッシュ@"b" = "BBB"
元ハッシュ@"c" = "CCC"
元ハッシュを言う

JSONデータは元ハッシュをJSONエンコード
JSONデータを言う
//ここで末尾に"":nullという無駄なデータが入る

復元ハッシュはJSONデータをJSONデコード
復元ハッシュを言う
//そもそも空が帰ってくる

『{"a":"AAA","b":"BBB","c":"CCC"}』をJSONデコード
それを言う
//正常にデコード出来る
//再現ここまで


これから考えるに、エンコードが悪いようです。
デコードも、最後のnullのせいでうまくいってないように感じます。


JSONはオブジェクトを保存する上でとても大事なので、
改善されることを願っています。


ちなみに、このサンプルは現時点の最新バージョン(1.5332)です

・ハッシュをエンコードすると「"":null」というエントリが混ざる
文字列の余分なエリアの切り捨て漏れです。nako_hash_keysの返却値を受け取るようにしてSetLengthすると良さそうです。
----------- unit_kabin.pas(78付近)
    SetLength(s, 1024 * 16);
    i :=nako_hash_keys(p, PAnsiChar(s), 1024 * 16);
    SetLength(s,i);
-----------
・\uXXXXで正しく変換されない文字がある
json.pasがXXXXの16進表記で英大文字を受け付けないためです。'A'..'F'も十六進表記文字の一覧に加えると良さそうです。
-----------json.pas(454付近)
  json_hex_chars = '0123456789abcdef';
  json_hex_chars_set = ['0'..'9','a'..'f','A'..'F'];
-----------
・jsonのデータにnullがあるとデコードで全体が空になる
objがnullの場合のデータを生成していないため。nullに対してはobjがnullというデータとして取得され、json_type_nullは無効なjsonデータのときに使われるようです。
-----------unit_kabin.pas(111付近)
  if obj = nil then
  begin
    Result := hi_var_new;
    Exit;
  end;
-----------
他、jsonのハッシュのキーが非ASCIIの場合、デコードの際にutf8toAnsiを介さず返されるためにキーだけUTF8のままになっています。JSONの仕様上発生しえるのなら、あわせて対処が必要そうです。

うぇいくさん、修正情報ありがとうございます。
無事に、エラーが出るサンプルが動くようになりました。
(r254)