今年で日本語プログラミングは30周年、なでしこは10周年ですか(^^)。
プログラミング言語と言えば、手続き型、関数型、オブジェクト指向
などなど色々あるけど、ほぼ英語。日本語プログラミングはMindとか
先駆的なものもあるけど、なかなか広まらないですね。
「なでしこ」はそんな中でかなり自然な日本語で書けるプログラミング
言語。ただ、あまり日本語っぽさにこだわると、プログラミングっぽく
なくなっちゃうんだけど(^^;。なでしこからプログラミングに入門すれば
その他の言語にも割りとスムーズに移行できそうだけどなあ。Cや
Javaやってからなでしこイジってるからそう思うだけ？
普及には何かしらマニュアルが必要かな～と思って、なでしこの
基本的な部分のマニュアル書こうかと計画中。最近はAmazonが
Kindle Direct Publishing(KDP)なんてサービスもやってるし、販売
してみても面白いかも(ё∇ё)。…気長にやろう！。
------
そういえば、MSXも祝30周年。ヒマがあればMSXのエミュとか作って
みたいし、MSX3の妄想もしてみたいけどなかなか時間が…。今、
STMicroとかが出してる格安のARM Cortex-M4なLSIとか使えば
結構面白いハード作れそうなんだけどなあ。PlayStation4など、
最新のハードでHDバリバリのゲームもいいけど、おっさん世代は
軽いハードで、頑張って動く昔ながらの「ゲーム性の高い」ヤツが
好きなんです(^^;。ああ、ワクワクするＯ(≧∇≦)Ｏ。
2014年2月16日日曜日
2013年12月31日火曜日
【なでしこ】nako_comm.dll
2013年も今日で終わりか！！Σ（￣口￣；；。ってことで結局あまり時間が
とれずにデバッグ出来なかったけど、取りあえず現状の"nako_comm.dll"を公開
します。
上記のリンクを辿るとnako_comm.7zをDL出来ますので、適当なところに解凍
します。
------ここから------
\nako_comm
| debug.c
| dll_comm_funcs.c
| dll_comm_funcs.h
| dnako_callback_funcs.c
| dnako_import.c
| dnako_import.h
| dnako_import_def.h
| dnako_import_types.c
| dnako_import_types.h
| dnako_plugin_body.c
| log.txt
| nako_comm.txt
|
\---nako_dll_base
| dnako_import.def
| nako_dll_base.sln
| nako_dll_base.vcxproj
| nako_dll_base.vcxproj.user
|
\---dll
nako_comm_d.dll
nako_comm_r.dll
------ここまで------
\nako_dll_base\dllの中に2つDLLが入ってます。「_d」がデバッグ版、
「_r」がリリース版でVC++でコンパイルしてます。使用の際は、それぞれ
「nako_comm.dll」にリネーム後、なでしこの\plug-insフォルダに
コピーして使ってください。
再コンパイルする場合には\nako_dll_base\nako_dll_base.slnをクリックして
VC++(Express)を起動して、コンパイルしてください。
含まれる命令（関数）仕様は以下の通りですが、あんまりデバッグ
してませんので、今回のものはDLLのサンプル程度に参照して
ください。来年（暇があったら）デバッグします(^^;。
------ここから------
■関数仕様
・バイト確保
書式：バイト確保（[int]バイト数、[int]初期値)
戻値：[int]ハンドル
説明：バイト数に1,2,4の何れかを指定して、変数を確保し、初期値を
代入する。以降、戻り値のハンドルを使用して、値を読み書き
出来る。
確保されるメモリ領域は内部でunsignedで扱われる。この値は
なでしこ側から見るとグローバルな領域になるので、関数内等
ローカルスコープから本関数をコールした場合も、変数自体は
グローバルに確保されていることに注意すること（つまり、
なでしこの関数を抜けても、変数領域は解放されない）。
確保が成功した場合には0以上の整数が、失敗した場合には-1
が返される。使用が終了した場合はハンドルを解放すること。
・バイト読込
書式：バイト読込（[int]ハンドル)
戻値：[int]変数値
説明：バイト確保命令で取得したハンドルの、現在の値を取得する。
戻り値は整数型になる。無効なハンドル値を指定した場合には
常に0が返される。
・バイト書込
書式：バイト書込（[int]ハンドル、[int]値）
戻値：[int]結果
説明：バイト確保命令で取得したハンドルに対して、指定した値を
書き込む。書き込める値の範囲は確保されている領域サイズに
より異なり、範囲外の値を指定した場合にはエラーとなる。
書込が成功した場合には0が、失敗した場合には-1が返される。
・エンディアン変換
書式：エンディアン変換（[int]ハンドル)
戻値：[int]結果
説明：バイト確保命令で取得したハンドルに対応する値のエンディアン
変換を実施する。変換後の値はハンドル対応値に上書きされる。
成功した場合は0が、無効なハンドルを指定した場合は-1が
返される。
・バッファ確保
書式：バッファ確保（[int]サイズ）
戻値：[int]ハンドル
説明：メモリを動的に確保して、そのハンドルを返す。成功した場合、
0以上のハンドル値が、失敗した場合には-1が返される。
なお、メモリは動的に確保されているので、使用後はかならず
ハンドルの解放を実施して確保されたメモリ領域を解放する
こと。
・バッファクリア
書式：バッファクリア（[int]ハンドル、[int]クリア値）
戻値：[int]結果
説明：バッファ確保命令で取得したハンドルの領域をクリア値を用いて
クリアする。クリア値には0～255(0xFF)までの1byte値を指定
する。
成功した場合は0が、無効なハンドル、クリア値を指定した
場合は-1が返される。
・バッファコピー
書式：バッファコピー（[int]元ハンドル、[int]先ハンドル、[int]サイズ）
戻値：[int]結果
説明：既に確保されているコピー元ハンドルから、コピー先ハンドルに
データをコピーする。先ハンドルはバッファでなくては
ならないが、元ハンドルについてはバッファ、もしくは
上記バイト確保命令で取得したハンドルでも良い。
成功した場合は0が、無効なハンドルを指定した場合には-1が
返される。
・バッファ読込
書式：バッファ読込（[int]ハンドル、[int]オフセット）
戻値：[int]読込データ
説明：既に確保されているメモリ領域（ハンドル）の、所定のオフセット
位置から、1byteのデータを取得して返す。
無効な引数を指定した場合には0が返される。
・バッファ書込
書式：バッファ書込（[int]ハンドル、[int]オフセット、[int]データ）
戻値：[int]結果
説明：既に確保されているメモリ領域（ハンドル）の、所定のオフセット
位置に、1byteのデータを書き込む。データには0～255の値を
指定する。
成功した場合には0が、無効な引数を指定した場合には-1が
返される。
・リングバッファ確保
書式：バッファ確保（[int]サイズ）
戻値：[int]ハンドル
説明：メモリを動的に確保して、そのハンドルを返す。成功した場合、
0以上のハンドル値が、失敗した場合には-1が返される。
なお、メモリは動的に確保されているので、使用後はかならず
ハンドルの解放を実施して確保されたメモリ領域を解放する
こと。
「バッファ確保」と処理内容は一緒だが、以降このバッファは
リングバッファとして扱われる。
・リングバッファ読込
書式：リングバッファ読込（[int]ハンドル、[int]先ハンドル、[int]サイズ）
戻値：[int]サイズ
説明：確保されているリングバッファハンドルから、サイズ分を読み
込んで先ハンドル(バッファ）に書き込む。読み込めるサイズは
コピー先のバッファサイズに依存し、バッファサイズ以上の
データは読み込まない。読み込めたサイズは戻り値として返される。
リングバッファなので、読み込みの開始位置は現在の読込位置
となり、読み込んだサイズ分は以降書込可能領域となる。
引数が不正な場合等、エラーの場合は-1が返される。
・リングバッファ書込
書式：リングバッファ書込（[int]ハンドル、[int]元ハンドル、[int]サイズ）
戻値：[int]サイズ
説明：作成済みの元ハンドル（バッファ）からサイズ分読み込んで、
確保されているリングバッファハンドルに対して書き込む。
書き込めるサイズは元ハンドルのサイズに依存し、それ以上の
サイズを指定した場合は、書き込めるだけ書き込む。
（データがある分だけ書き込む）。書き込めたサイズが戻り値
として返される。
書き込み位置はリングバッファ中の書き込み可能な領域の先頭
からとなり、書き込んだ分は以降読込可能となる。書き込む前に
空き領域を知りたい場合には「リングバッファ空きサイズ」
命令でサイズを取得出来る。
引数が不正な場合等、エラーの場合は-1が返される。
・リングバッファ読込サイズ
書式：リングバッファ読込サイズ（[int]ハンドル）
戻値：[int]読込可能サイズ
説明：確保されているリングバッファハンドルの、現在読み込める
データサイズを返す。
引数が不正な場合等、エラーの場合は-1が返される。
・キュー作成
書式：キュー作成（＃引数なし）
戻値：[int]ハンドル
説明：空のキューを作成して、そのハンドルを返す。キューに対しては
本ライブラリで生成出来るハンドルを追加・取得出来る（FIFO）。
成功した場合にはハンドル値が、失敗した場合には-1が返される。
・キュー追加
書式：キュー追加（[int]キュー、[int]ハンドル）
戻値：[int]結果
説明：指定のキューハンドルに、ハンドルを追加する。
成功した場合は0が、失敗した場合は-1が返される。
・キュー取得
書式：キュー取得（[int]キュー）
戻値：[int]ハンドル
説明：指定されたキューから、先頭の1要素を取得して返す。
成功した場合にはハンドル値が、失敗した場合には-1が返される。
・キュー要素数取得
書式：キュー要素数（[int]ハンドル）
戻値：[int]要素数
説明：指定されたキューに繋がれているハンドル数（要素数）を
返す。失敗した場合には-1が返される。
・スタック作成
書式：スタック作成（＃引数なし）
戻値：[int]ハンドル
説明：空のスタックを作成して、そのハンドルを返す。スタックに対しては
本ライブラリで生成出来るハンドルを追加・取得出来る（LIFO）。
成功した場合にはハンドル値が、失敗した場合には-1が返される。
・スタック追加
書式：スタック追加（[int]スタック、[int]ハンドル）
戻値：[int]結果
説明：指定のスタックハンドルに、ハンドルを追加する。
成功した場合は0が、失敗した場合は-1が返される。
・スタック取得
書式：スタック取得（[int]スタック）
戻値：[int]ハンドル
説明：指定されたスタックから、末尾の1要素を取得して返す。
成功した場合にはハンドル値が、失敗した場合には-1が返される。
・スタック要素数取得
書式：スタック要素数（[int]ハンドル）
戻値：[int]要素数
説明：指定されたスタックに繋がれているハンドル数（要素数）を
返す。失敗した場合には-1が返される。
・バイナリオープン
書式：バイナリオープン（[str]ファイル名、[int]モード）
戻値：[int]ハンドル
説明：ファイル名で指定されたファイルを、モードで指定された方法で
オープンする。モードには0,1,2,3の何れかを指定し、意味は
以下のとおり。
0 : 読込専用
1 : 書込専用
2 : 読み書き
3 : 追記
ファイルは常にバイナリとしてオープンされる。テキストモード
で扱いたい場合には、なでしこの組み込み命令を使用すると良い。
成功すると0以上のハンドルが返される。失敗した場合には-1が
返される（ファイルがない、モードが範囲外など）
・バイナリ読込
書式：バイナリ読込（[int]ハンドル、[int]先ハンドル、[int]サイズ）
戻値：[int]サイズ
説明：バイナリオープンされているハンドルから、サイズ分を読み
込んで先ハンドル（バッファ）に書き込む。読み込めるサイズは
コピー先のバッファサイズに依存し、バッファサイズ以上の
データは読み込まない。読み込めたサイズは戻り値として
返される。
読み込み開始位置は現在の開始位置で、読み込む毎にオフセット
がプラスされる。現在の開始位置はバイナリ位置取得命令で
取得出来、位置の変更はバイナリシーク命令で可能である。
引数が不正な場合等、エラーの場合は-1が返される。
・バイナリ書込
書式：バイナリ書込（[int]ハンドル、[int]元ハンドル、[int]サイズ）
戻値：[int]サイズ
説明：作成済みのバッファ（元ハンドル）からサイズ分読み込んで、
バイナリオープンされているハンドルに対して書き込む。
書き込めるサイズは元ハンドルのサイズに依存し、それ以上の
サイズを指定した場合は、書き込めるだけ書き込む。
（データがある分だけ書き込む）。書き込めたサイズが戻り値
として返される。
書込開始位置は、書込専用、読み書き用にオープンしている場合は
ファイルの先頭から開始し、書き込む毎にオフセットがプラスされ
る。既存ファイルの場合は一旦ファイルが消去されるので注意する
こと。追記モードの場合はファイルの終端から書込が開始される。
引数が不正な場合等、エラーの場合は-1が返される。
・バイナリシーク
書式：バイナリシーク（[int]ハンドル、[int]オフセット）
戻値：[int]オフセット
説明：バイナリオープンされているハンドルの読み込み・書込開始
位置をオフセットの値に設定する。オフセットは0以上の
値で、ファイルサイズ以上の値を設定した場合には、ファイルの
末尾となる。
成功した場合にはオフセット値が、失敗した場合には-1が
返される。
・バイナリ位置取得
書式：バイナリ位置取得（[int]ハンドル）
戻値：[int]位置
説明：バイナリオープンされているハンドルの、現在開始位置を
返す。引数が不正だった場合には-1が返される。
・ビットチェック
書式：ビットチェック（[int]ハンドル、[int]パターン）
戻値：[int]結果
説明：対象となるハンドルと、パターンを指定して、パターンビット
が対象に含まれているかチェックする。対象はバイト確保
されたハンドルであること。
パターンが含まれている場合には1(TRUE)が、含まれていない
場合は0(FALSE)が返される。引数が不正な場合には0が返される。
・ビットセット
書式：ビットセット（[int]対象、[int]パターン）
戻値：[int]結果
説明：対象のハンドル値に、パターンビットを設定する。対象は
バイト確保されたハンドルを指定する。
成功した場合には0が、引数に不正があった場合には-1が
返される。
・ビットクリア
書式：ビットクリア（[int]対象、[int]パターン）
戻値：[int]結果
説明：対象のハンドル値の、パターンで指定されるビットをクリア
する。対象はバイト確保されたハンドルであること。
成功した場合には0が、引数に不正があった場合には-1が
返される。
・ソケットオープン
書式：ソケットオープン（[int]タイプ）
戻値：[int]ハンドル
説明：タイプを指定してソケットを作成（オープンする）。
タイプには以下の何れかを指定する。
0 : TCP
1 : UDP
成功した場合には0以上のハンドル値が返される。失敗
した場合には-1が返される。
・ソケット接続待ち
書式：ソケット接続待ち（[int]ハンドル、[int]ポート）
戻値：[int]ソケットハンドル
説明：ソケットオープンで取得済のハンドルと、指定のポートを
使って、TCPで相手が接続してくるのを待つ。
成功した場合は新規のソケットハンドルが、失敗した場合は
-1が返される。成功した場合、後述の「相手ＩＰアドレス取得」
命令を使用して、接続相手のアドレスを取得することが出来る。
・ソケット接続
書式：ソケット接続（[int]ハンドル、[str]相手のアドレス、[int]ポート）
戻値：[int]結果
説明：ソケットオープンで取得済のハンドルと、サーバ側のアドレス、
ポートを指定してTCPで接続する。
接続が成功した場合には0が、失敗した場合には-1が返される。
・ＴＣＰ送信
書式：ＴＣＰ送信（[int]ハンドル、[int]バッファ、[int]サイズ）
戻値：[int]サイズ
説明：ソケットオープンで取得済のハンドル、且つこのソケットで
相手に接続している場合に、バッファで指定されるハンドル
のデータをサイズ分送信する。バッファはバッファ確保で
取得したハンドルを指定すること。
成功した場合には送信出来たサイズが返される。失敗した
場合には-1が返される。
・ＴＣＰ受信
書式：ＴＣＰ受信（[int]ハンドル、[int]バッファ）
戻値：[int]サイズ
説明：ソケットオープンで取得済のハンドル、且つこのソケットで
相手に接続している場合に、バッファで指定されるハンドル
にデータを受信する。
成功した場合には受信出来たサイズが返される。失敗した
場合には-1が返される。
・ＵＤＰ送信
書式：ＵＤＰ送信（[int]ハンドル、[int]バッファ、[str]相手アドレス、[str]ポート）
戻値：[int]サイズ
説明：ソケットオープンで取得済のハンドルと、送信対象のバッファ
のハンドル、及び相手アドレスとポートを指定してデータを
送信する。ソケットハンドルはUDPでオープンされていること。
成功した場合には送信サイズが返さえる。失敗した場合には
-1が返される。
・ＵＤＰ受信
書式：ＵＤＰ送信（[int]ハンドル、[int]バッファ、[str]ポート）
戻値：[int]サイズ
説明：ソケットオープンで取得済のハンドルと、受信データ書きこみ
用のバッファハンドル、及びポートを指定してデータを受信
する。
成功した場合には受信出来たサイズが返される。失敗した
場合には-1が返される。
・相手ＩＰアドレス取得
書式：相手ＩＰアドレス取得（[int]ハンドル）
戻値：[str]相手ＩＰアドレス（文字列）
説明：ソケットハンドルを指定して、TCP通信で接続した相手のアドレス、
及びUDP通信で受信した場合の相手のＩＰアドレスを文字列で返す。
・シリアルオープン
書式：シリアルオープン（[int]ポート、[int]ボーレート）
戻値：[int]ハンドル
説明：ポートとボーレートを指定して、シリアルポートをオープン
する。ポート、ボーレート以外のパラメータは、
データ ：8bit
パリティ ：なし
ストップ ：1bit
フロー制御：なし
となる。
成功した場合は0以上のハンドル値が返される。失敗した場合は
-1が返される。
・シリアル送信
書式：シリアル送信（[int]ハンドル、[int]バッファ、[int]サイズ）
戻値：[int]サイズ
説明：シリアルオープンで取得済のハンドル、及びバッファ確保した
ハンドルを指定してサイズ分のデータを送信する。
成功した場合には送信出来たサイズが、失敗した場合には-1が
返される。
・シリアル受信
書式：シリアル受信（[int]ハンドル、[int]バッファ、[int]サイズ）
戻値：[int]サイズ
説明：シリアルオープンで取得済のハンドル、及びバッファ確保した
ハンドルを指定してサイズ分のデータを受信する。
成功した場合には受信サイズが、失敗した場合には-1が
返される。
・シリアルデータサイズ
書式：シリアルデータサイズ（[int]ハンドル）
戻値：[int]サイズ
説明：シリアルオープンで取得済のハンドルで指定されるシリアル
ポートに対して、そのバッファに受信されているデータ
サイズを取得する。
ここでのバッファとは上記バッファ確保したものではなく
Windowsのシリアルドライバが保持している受信バッファで
ある。
・ハンドルタイプ取得
書式：ハンドルタイプ（[int]ハンドル）
戻値：[int]ハンドルタイプ
説明：指定ハンドルの種別を取得する。戻り値は以下のとおり。
-1 ：エラー（使われてない、など）
1 ：バイト
2 ：バッファ（リングバッファ）
4 ：ファイル
8 ：キュー
16 ：スタック
32 ：ソケット
64 ：シリアルポート
・ハンドル解放
書式：ハンドル解放（[int]ハンドル）
戻値：なし
説明：取得したハンドルを解放する。対象がメモリの場合はメモリ
が解放され、バイナリ（ファイル）やソケットの場合は
それらがクローズされる。
------ここまで------
いや～、なんか色々入れすぎた感もありますが、使いこなせば
C言語に近い動作をさせられそう♪。ただ、この後別のアプリを
なでしこでざっと作ってみて、なでしこに足りない部分はこの手の
命令よりも、実はGUIかなあ…と思ってます。エディタの簡易GUI
構築環境…思ってたよりも使えなかったなあ（￣へ￣；。
来年はこのあたりの解決方法を検討しよう♪
とれずにデバッグ出来なかったけど、取りあえず現状の"nako_comm.dll"を公開
します。
上記のリンクを辿るとnako_comm.7zをDL出来ますので、適当なところに解凍
します。
------ここから------
\nako_comm
| debug.c
| dll_comm_funcs.c
| dll_comm_funcs.h
| dnako_callback_funcs.c
| dnako_import.c
| dnako_import.h
| dnako_import_def.h
| dnako_import_types.c
| dnako_import_types.h
| dnako_plugin_body.c
| log.txt
| nako_comm.txt
|
\---nako_dll_base
| dnako_import.def
| nako_dll_base.sln
| nako_dll_base.vcxproj
| nako_dll_base.vcxproj.user
|
\---dll
nako_comm_d.dll
nako_comm_r.dll
------ここまで------
\nako_dll_base\dllの中に2つDLLが入ってます。「_d」がデバッグ版、
「_r」がリリース版でVC++でコンパイルしてます。使用の際は、それぞれ
「nako_comm.dll」にリネーム後、なでしこの\plug-insフォルダに
コピーして使ってください。
再コンパイルする場合には\nako_dll_base\nako_dll_base.slnをクリックして
VC++(Express)を起動して、コンパイルしてください。
含まれる命令（関数）仕様は以下の通りですが、あんまりデバッグ
してませんので、今回のものはDLLのサンプル程度に参照して
ください。来年（暇があったら）デバッグします(^^;。
------ここから------
■関数仕様
・バイト確保
書式：バイト確保（[int]バイト数、[int]初期値)
戻値：[int]ハンドル
説明：バイト数に1,2,4の何れかを指定して、変数を確保し、初期値を
代入する。以降、戻り値のハンドルを使用して、値を読み書き
出来る。
確保されるメモリ領域は内部でunsignedで扱われる。この値は
なでしこ側から見るとグローバルな領域になるので、関数内等
ローカルスコープから本関数をコールした場合も、変数自体は
グローバルに確保されていることに注意すること（つまり、
なでしこの関数を抜けても、変数領域は解放されない）。
確保が成功した場合には0以上の整数が、失敗した場合には-1
が返される。使用が終了した場合はハンドルを解放すること。
・バイト読込
書式：バイト読込（[int]ハンドル)
戻値：[int]変数値
説明：バイト確保命令で取得したハンドルの、現在の値を取得する。
戻り値は整数型になる。無効なハンドル値を指定した場合には
常に0が返される。
・バイト書込
書式：バイト書込（[int]ハンドル、[int]値）
戻値：[int]結果
説明：バイト確保命令で取得したハンドルに対して、指定した値を
書き込む。書き込める値の範囲は確保されている領域サイズに
より異なり、範囲外の値を指定した場合にはエラーとなる。
書込が成功した場合には0が、失敗した場合には-1が返される。
・エンディアン変換
書式：エンディアン変換（[int]ハンドル)
戻値：[int]結果
説明：バイト確保命令で取得したハンドルに対応する値のエンディアン
変換を実施する。変換後の値はハンドル対応値に上書きされる。
成功した場合は0が、無効なハンドルを指定した場合は-1が
返される。
・バッファ確保
書式：バッファ確保（[int]サイズ）
戻値：[int]ハンドル
説明：メモリを動的に確保して、そのハンドルを返す。成功した場合、
0以上のハンドル値が、失敗した場合には-1が返される。
なお、メモリは動的に確保されているので、使用後はかならず
ハンドルの解放を実施して確保されたメモリ領域を解放する
こと。
・バッファクリア
書式：バッファクリア（[int]ハンドル、[int]クリア値）
戻値：[int]結果
説明：バッファ確保命令で取得したハンドルの領域をクリア値を用いて
クリアする。クリア値には0～255(0xFF)までの1byte値を指定
する。
成功した場合は0が、無効なハンドル、クリア値を指定した
場合は-1が返される。
・バッファコピー
書式：バッファコピー（[int]元ハンドル、[int]先ハンドル、[int]サイズ）
戻値：[int]結果
説明：既に確保されているコピー元ハンドルから、コピー先ハンドルに
データをコピーする。先ハンドルはバッファでなくては
ならないが、元ハンドルについてはバッファ、もしくは
上記バイト確保命令で取得したハンドルでも良い。
成功した場合は0が、無効なハンドルを指定した場合には-1が
返される。
・バッファ読込
書式：バッファ読込（[int]ハンドル、[int]オフセット）
戻値：[int]読込データ
説明：既に確保されているメモリ領域（ハンドル）の、所定のオフセット
位置から、1byteのデータを取得して返す。
無効な引数を指定した場合には0が返される。
・バッファ書込
書式：バッファ書込（[int]ハンドル、[int]オフセット、[int]データ）
戻値：[int]結果
説明：既に確保されているメモリ領域（ハンドル）の、所定のオフセット
位置に、1byteのデータを書き込む。データには0～255の値を
指定する。
成功した場合には0が、無効な引数を指定した場合には-1が
返される。
・リングバッファ確保
書式：バッファ確保（[int]サイズ）
戻値：[int]ハンドル
説明：メモリを動的に確保して、そのハンドルを返す。成功した場合、
0以上のハンドル値が、失敗した場合には-1が返される。
なお、メモリは動的に確保されているので、使用後はかならず
ハンドルの解放を実施して確保されたメモリ領域を解放する
こと。
「バッファ確保」と処理内容は一緒だが、以降このバッファは
リングバッファとして扱われる。
・リングバッファ読込
書式：リングバッファ読込（[int]ハンドル、[int]先ハンドル、[int]サイズ）
戻値：[int]サイズ
説明：確保されているリングバッファハンドルから、サイズ分を読み
込んで先ハンドル(バッファ）に書き込む。読み込めるサイズは
コピー先のバッファサイズに依存し、バッファサイズ以上の
データは読み込まない。読み込めたサイズは戻り値として返される。
リングバッファなので、読み込みの開始位置は現在の読込位置
となり、読み込んだサイズ分は以降書込可能領域となる。
引数が不正な場合等、エラーの場合は-1が返される。
・リングバッファ書込
書式：リングバッファ書込（[int]ハンドル、[int]元ハンドル、[int]サイズ）
戻値：[int]サイズ
説明：作成済みの元ハンドル（バッファ）からサイズ分読み込んで、
確保されているリングバッファハンドルに対して書き込む。
書き込めるサイズは元ハンドルのサイズに依存し、それ以上の
サイズを指定した場合は、書き込めるだけ書き込む。
（データがある分だけ書き込む）。書き込めたサイズが戻り値
として返される。
書き込み位置はリングバッファ中の書き込み可能な領域の先頭
からとなり、書き込んだ分は以降読込可能となる。書き込む前に
空き領域を知りたい場合には「リングバッファ空きサイズ」
命令でサイズを取得出来る。
引数が不正な場合等、エラーの場合は-1が返される。
・リングバッファ読込サイズ
書式：リングバッファ読込サイズ（[int]ハンドル）
戻値：[int]読込可能サイズ
説明：確保されているリングバッファハンドルの、現在読み込める
データサイズを返す。
引数が不正な場合等、エラーの場合は-1が返される。
・キュー作成
書式：キュー作成（＃引数なし）
戻値：[int]ハンドル
説明：空のキューを作成して、そのハンドルを返す。キューに対しては
本ライブラリで生成出来るハンドルを追加・取得出来る（FIFO）。
成功した場合にはハンドル値が、失敗した場合には-1が返される。
・キュー追加
書式：キュー追加（[int]キュー、[int]ハンドル）
戻値：[int]結果
説明：指定のキューハンドルに、ハンドルを追加する。
成功した場合は0が、失敗した場合は-1が返される。
・キュー取得
書式：キュー取得（[int]キュー）
戻値：[int]ハンドル
説明：指定されたキューから、先頭の1要素を取得して返す。
成功した場合にはハンドル値が、失敗した場合には-1が返される。
・キュー要素数取得
書式：キュー要素数（[int]ハンドル）
戻値：[int]要素数
説明：指定されたキューに繋がれているハンドル数（要素数）を
返す。失敗した場合には-1が返される。
・スタック作成
書式：スタック作成（＃引数なし）
戻値：[int]ハンドル
説明：空のスタックを作成して、そのハンドルを返す。スタックに対しては
本ライブラリで生成出来るハンドルを追加・取得出来る（LIFO）。
成功した場合にはハンドル値が、失敗した場合には-1が返される。
・スタック追加
書式：スタック追加（[int]スタック、[int]ハンドル）
戻値：[int]結果
説明：指定のスタックハンドルに、ハンドルを追加する。
成功した場合は0が、失敗した場合は-1が返される。
・スタック取得
書式：スタック取得（[int]スタック）
戻値：[int]ハンドル
説明：指定されたスタックから、末尾の1要素を取得して返す。
成功した場合にはハンドル値が、失敗した場合には-1が返される。
・スタック要素数取得
書式：スタック要素数（[int]ハンドル）
戻値：[int]要素数
説明：指定されたスタックに繋がれているハンドル数（要素数）を
返す。失敗した場合には-1が返される。
・バイナリオープン
書式：バイナリオープン（[str]ファイル名、[int]モード）
戻値：[int]ハンドル
説明：ファイル名で指定されたファイルを、モードで指定された方法で
オープンする。モードには0,1,2,3の何れかを指定し、意味は
以下のとおり。
0 : 読込専用
1 : 書込専用
2 : 読み書き
3 : 追記
ファイルは常にバイナリとしてオープンされる。テキストモード
で扱いたい場合には、なでしこの組み込み命令を使用すると良い。
成功すると0以上のハンドルが返される。失敗した場合には-1が
返される（ファイルがない、モードが範囲外など）
・バイナリ読込
書式：バイナリ読込（[int]ハンドル、[int]先ハンドル、[int]サイズ）
戻値：[int]サイズ
説明：バイナリオープンされているハンドルから、サイズ分を読み
込んで先ハンドル（バッファ）に書き込む。読み込めるサイズは
コピー先のバッファサイズに依存し、バッファサイズ以上の
データは読み込まない。読み込めたサイズは戻り値として
返される。
読み込み開始位置は現在の開始位置で、読み込む毎にオフセット
がプラスされる。現在の開始位置はバイナリ位置取得命令で
取得出来、位置の変更はバイナリシーク命令で可能である。
引数が不正な場合等、エラーの場合は-1が返される。
・バイナリ書込
書式：バイナリ書込（[int]ハンドル、[int]元ハンドル、[int]サイズ）
戻値：[int]サイズ
説明：作成済みのバッファ（元ハンドル）からサイズ分読み込んで、
バイナリオープンされているハンドルに対して書き込む。
書き込めるサイズは元ハンドルのサイズに依存し、それ以上の
サイズを指定した場合は、書き込めるだけ書き込む。
（データがある分だけ書き込む）。書き込めたサイズが戻り値
として返される。
書込開始位置は、書込専用、読み書き用にオープンしている場合は
ファイルの先頭から開始し、書き込む毎にオフセットがプラスされ
る。既存ファイルの場合は一旦ファイルが消去されるので注意する
こと。追記モードの場合はファイルの終端から書込が開始される。
引数が不正な場合等、エラーの場合は-1が返される。
・バイナリシーク
書式：バイナリシーク（[int]ハンドル、[int]オフセット）
戻値：[int]オフセット
説明：バイナリオープンされているハンドルの読み込み・書込開始
位置をオフセットの値に設定する。オフセットは0以上の
値で、ファイルサイズ以上の値を設定した場合には、ファイルの
末尾となる。
成功した場合にはオフセット値が、失敗した場合には-1が
返される。
・バイナリ位置取得
書式：バイナリ位置取得（[int]ハンドル）
戻値：[int]位置
説明：バイナリオープンされているハンドルの、現在開始位置を
返す。引数が不正だった場合には-1が返される。
・ビットチェック
書式：ビットチェック（[int]ハンドル、[int]パターン）
戻値：[int]結果
説明：対象となるハンドルと、パターンを指定して、パターンビット
が対象に含まれているかチェックする。対象はバイト確保
されたハンドルであること。
パターンが含まれている場合には1(TRUE)が、含まれていない
場合は0(FALSE)が返される。引数が不正な場合には0が返される。
・ビットセット
書式：ビットセット（[int]対象、[int]パターン）
戻値：[int]結果
説明：対象のハンドル値に、パターンビットを設定する。対象は
バイト確保されたハンドルを指定する。
成功した場合には0が、引数に不正があった場合には-1が
返される。
・ビットクリア
書式：ビットクリア（[int]対象、[int]パターン）
戻値：[int]結果
説明：対象のハンドル値の、パターンで指定されるビットをクリア
する。対象はバイト確保されたハンドルであること。
成功した場合には0が、引数に不正があった場合には-1が
返される。
・ソケットオープン
書式：ソケットオープン（[int]タイプ）
戻値：[int]ハンドル
説明：タイプを指定してソケットを作成（オープンする）。
タイプには以下の何れかを指定する。
0 : TCP
1 : UDP
成功した場合には0以上のハンドル値が返される。失敗
した場合には-1が返される。
・ソケット接続待ち
書式：ソケット接続待ち（[int]ハンドル、[int]ポート）
戻値：[int]ソケットハンドル
説明：ソケットオープンで取得済のハンドルと、指定のポートを
使って、TCPで相手が接続してくるのを待つ。
成功した場合は新規のソケットハンドルが、失敗した場合は
-1が返される。成功した場合、後述の「相手ＩＰアドレス取得」
命令を使用して、接続相手のアドレスを取得することが出来る。
・ソケット接続
書式：ソケット接続（[int]ハンドル、[str]相手のアドレス、[int]ポート）
戻値：[int]結果
説明：ソケットオープンで取得済のハンドルと、サーバ側のアドレス、
ポートを指定してTCPで接続する。
接続が成功した場合には0が、失敗した場合には-1が返される。
・ＴＣＰ送信
書式：ＴＣＰ送信（[int]ハンドル、[int]バッファ、[int]サイズ）
戻値：[int]サイズ
説明：ソケットオープンで取得済のハンドル、且つこのソケットで
相手に接続している場合に、バッファで指定されるハンドル
のデータをサイズ分送信する。バッファはバッファ確保で
取得したハンドルを指定すること。
成功した場合には送信出来たサイズが返される。失敗した
場合には-1が返される。
・ＴＣＰ受信
書式：ＴＣＰ受信（[int]ハンドル、[int]バッファ）
戻値：[int]サイズ
説明：ソケットオープンで取得済のハンドル、且つこのソケットで
相手に接続している場合に、バッファで指定されるハンドル
にデータを受信する。
成功した場合には受信出来たサイズが返される。失敗した
場合には-1が返される。
・ＵＤＰ送信
書式：ＵＤＰ送信（[int]ハンドル、[int]バッファ、[str]相手アドレス、[str]ポート）
戻値：[int]サイズ
説明：ソケットオープンで取得済のハンドルと、送信対象のバッファ
のハンドル、及び相手アドレスとポートを指定してデータを
送信する。ソケットハンドルはUDPでオープンされていること。
成功した場合には送信サイズが返さえる。失敗した場合には
-1が返される。
・ＵＤＰ受信
書式：ＵＤＰ送信（[int]ハンドル、[int]バッファ、[str]ポート）
戻値：[int]サイズ
説明：ソケットオープンで取得済のハンドルと、受信データ書きこみ
用のバッファハンドル、及びポートを指定してデータを受信
する。
成功した場合には受信出来たサイズが返される。失敗した
場合には-1が返される。
・相手ＩＰアドレス取得
書式：相手ＩＰアドレス取得（[int]ハンドル）
戻値：[str]相手ＩＰアドレス（文字列）
説明：ソケットハンドルを指定して、TCP通信で接続した相手のアドレス、
及びUDP通信で受信した場合の相手のＩＰアドレスを文字列で返す。
・シリアルオープン
書式：シリアルオープン（[int]ポート、[int]ボーレート）
戻値：[int]ハンドル
説明：ポートとボーレートを指定して、シリアルポートをオープン
する。ポート、ボーレート以外のパラメータは、
データ ：8bit
パリティ ：なし
ストップ ：1bit
フロー制御：なし
となる。
成功した場合は0以上のハンドル値が返される。失敗した場合は
-1が返される。
・シリアル送信
書式：シリアル送信（[int]ハンドル、[int]バッファ、[int]サイズ）
戻値：[int]サイズ
説明：シリアルオープンで取得済のハンドル、及びバッファ確保した
ハンドルを指定してサイズ分のデータを送信する。
成功した場合には送信出来たサイズが、失敗した場合には-1が
返される。
・シリアル受信
書式：シリアル受信（[int]ハンドル、[int]バッファ、[int]サイズ）
戻値：[int]サイズ
説明：シリアルオープンで取得済のハンドル、及びバッファ確保した
ハンドルを指定してサイズ分のデータを受信する。
成功した場合には受信サイズが、失敗した場合には-1が
返される。
・シリアルデータサイズ
書式：シリアルデータサイズ（[int]ハンドル）
戻値：[int]サイズ
説明：シリアルオープンで取得済のハンドルで指定されるシリアル
ポートに対して、そのバッファに受信されているデータ
サイズを取得する。
ここでのバッファとは上記バッファ確保したものではなく
Windowsのシリアルドライバが保持している受信バッファで
ある。
・ハンドルタイプ取得
書式：ハンドルタイプ（[int]ハンドル）
戻値：[int]ハンドルタイプ
説明：指定ハンドルの種別を取得する。戻り値は以下のとおり。
-1 ：エラー（使われてない、など）
1 ：バイト
2 ：バッファ（リングバッファ）
4 ：ファイル
8 ：キュー
16 ：スタック
32 ：ソケット
64 ：シリアルポート
・ハンドル解放
書式：ハンドル解放（[int]ハンドル）
戻値：なし
説明：取得したハンドルを解放する。対象がメモリの場合はメモリ
が解放され、バイナリ（ファイル）やソケットの場合は
それらがクローズされる。
------ここまで------
いや～、なんか色々入れすぎた感もありますが、使いこなせば
C言語に近い動作をさせられそう♪。ただ、この後別のアプリを
なでしこでざっと作ってみて、なでしこに足りない部分はこの手の
命令よりも、実はGUIかなあ…と思ってます。エディタの簡易GUI
構築環境…思ってたよりも使えなかったなあ（￣へ￣；。
来年はこのあたりの解決方法を検討しよう♪
2013年11月10日日曜日
【Buffalo】無線ルータと簡易NASの話
近所のJoshinが閉店セールとかやってたので行ってみたら、無線ルータが
アマゾンよりやすい値段で速攻で購入♪
旧：Buffalo WZR-HP-G301NH
新：Buffalo WZR-600DHP2
となって快適な無線LAN環境が出来上がるハズだったのに、問題発生。
まず、iPhone5/5Cは5GHz帯（802.11a/n）の掴みがあまりよろしく
ない。ルーターが2階にあるからなのかもしれないが、KindleFireHDの
方は流石に良くつかんでる。ってことで、iPhoneの方は2.4GHz帯で
しばらく運用。
もう一点はG301の方にも600DHP2の方にも簡易NAS機能がついてて
USBのHDDつなげられる様になっているけど、G301で使ってたHDDを
600DHP2の方につなぎ変えても認識しない（正確には認識はするけど
未フォーマットと言われる）。
Buffaloのルータについてる簡易NAS機能は、LinuxのXFSフォーマット
になってるけど、どうもG301のこのフォーマットが質が悪いみたいで
LinuxPCでも600DHP2でも認識しない。試しに再度G301に接続
し直してみると、これはちゃんと認識した。ってことで、再度G301を
復活させて、WInPC介して余ってたHDDにコピー。115GBのデータが
入ってたので、4時間ぐらいかかった…。
コピーし終わったら、NAS用のHDDを600DHP2側でXFSフォーマット。
これを試しにLinuxPFでマウントすると、ちゃんと認識する。WinPC
介して、今度は600DHP2上の簡易NASにHDDからデータコピーしようと
思ったら23時間とかでたのでヤメ。Linuxで認識するんだから、Linux上
でコピーすればいいやってことで、昨日つくったPuppyLinux5.7.1環境
でHDD→HDDのコピー。時間は表示されないけど、まあそこそこの
スピードでコピーしてくれてるから、3時間もあれば終わるかな。
これもBuffalo系の商品だけど、玄人志向の
KURO-DACHI/CLONE/U3
と言う商品に最近非常にお世話になってる。上記のHDD→HDDコピーも
これ一台をLinuxに繋げれば2ドライブ見えてコピーできるし、そもそも
PCがなくてもHDDのクローンが作れる。これでノートPCのHDDを
SSHDに交換した♪。
PuppyLinuxは150MBぐらいの容量があれば全部入るので、USBフラッシュ
メモリに入れて使ってる。ちょっと構成にクセはあるけど、何かカワイイ
からお気に入り(^^)。
ああ…本当はなでしこのプログラミングしようと思ってたのになあ…
アマゾンよりやすい値段で速攻で購入♪
旧：Buffalo WZR-HP-G301NH
新：Buffalo WZR-600DHP2
となって快適な無線LAN環境が出来上がるハズだったのに、問題発生。
まず、iPhone5/5Cは5GHz帯（802.11a/n）の掴みがあまりよろしく
ない。ルーターが2階にあるからなのかもしれないが、KindleFireHDの
方は流石に良くつかんでる。ってことで、iPhoneの方は2.4GHz帯で
しばらく運用。
もう一点はG301の方にも600DHP2の方にも簡易NAS機能がついてて
USBのHDDつなげられる様になっているけど、G301で使ってたHDDを
600DHP2の方につなぎ変えても認識しない（正確には認識はするけど
未フォーマットと言われる）。
Buffaloのルータについてる簡易NAS機能は、LinuxのXFSフォーマット
になってるけど、どうもG301のこのフォーマットが質が悪いみたいで
LinuxPCでも600DHP2でも認識しない。試しに再度G301に接続
し直してみると、これはちゃんと認識した。ってことで、再度G301を
復活させて、WInPC介して余ってたHDDにコピー。115GBのデータが
入ってたので、4時間ぐらいかかった…。
コピーし終わったら、NAS用のHDDを600DHP2側でXFSフォーマット。
これを試しにLinuxPFでマウントすると、ちゃんと認識する。WinPC
介して、今度は600DHP2上の簡易NASにHDDからデータコピーしようと
思ったら23時間とかでたのでヤメ。Linuxで認識するんだから、Linux上
でコピーすればいいやってことで、昨日つくったPuppyLinux5.7.1環境
でHDD→HDDのコピー。時間は表示されないけど、まあそこそこの
スピードでコピーしてくれてるから、3時間もあれば終わるかな。
これもBuffalo系の商品だけど、玄人志向の
KURO-DACHI/CLONE/U3
と言う商品に最近非常にお世話になってる。上記のHDD→HDDコピーも
これ一台をLinuxに繋げれば2ドライブ見えてコピーできるし、そもそも
PCがなくてもHDDのクローンが作れる。これでノートPCのHDDを
SSHDに交換した♪。
PuppyLinuxは150MBぐらいの容量があれば全部入るので、USBフラッシュ
メモリに入れて使ってる。ちょっと構成にクセはあるけど、何かカワイイ
からお気に入り(^^)。
ああ…本当はなでしこのプログラミングしようと思ってたのになあ…
2013年10月22日火曜日
【なでしこ】カレンダーを作ってみる
今、gnakoを使って少し大きめのアプリ書いてるんですが…。
gnakoの問題点が色々分かって、やっぱりGUIのエディタは
別のモノを使ったほうがいいんじゃないかと。通信DLLは
大体出来てるので、この辺り片付けたら、次はWinAPIを
もうちょっとダイレクトに触れるDLLなりexeなり作ろうかなあ。
さて、今回は「少し大きめのアプリ」でも使ってるカレンダー
機能のお話し。なでしこのくみこみ関数使ってある程度は
できるんですが、GUI用に使うならこれぐらいは欲しいかなあ
と言う部分を補完。
------ここから------
■GRP年月日
・｛整数｝年
・｛整数｝月
・｛整数｝日数
・日
・日数設定～
日数＝月日数判断（年、月）
・曜日設定～
日数回
年月日＝「｛年｝」＆「/」＆「｛月｝」＆「/」＆「｛回数｝」
日\回数＝年月日の曜日
●二月日数判断（Yの）
もしYを4で割った余り＝0ならば
もしYを100で割った余り＝0ならば
もしYを400で割った余り＝0ならば
日数＝29
違えば
日数＝28
違えば
日数＝29
違えば
日数＝28
日数で戻る
●月日数判断（Y、M）
Mで条件分岐
1ならば
日数＝31
2ならば
日数＝Yの二月日数判断
3ならば
日数＝31
4ならば
日数＝30
5ならば
日数＝31
6ならば
日数＝30
7ならば
日数＝31
8ならば
日数＝31
9ならば
日数＝30
10ならば
日数＝31
11ならば
日数＝30
12ならば
日数＝31
違えば
日数＝0
日数で戻る
------ここまで------
こんなもんでしょうか。「■GRP年月日」がカレンダー情報を
保持していて、要素「日」は配列です。「年」と「月」を設定して
「日数設定」メソッドと、「曜日設定」メソッドを呼べば、「日数」
にその月が何日あるかと、「日」にそれぞれの日が何曜日か
を代入します。「日」は配列の添え字（0～）が日（1～）に対応
してます。
アルゴリズム的にはC言語とそんなに変わらない感じ。なでしこは
グループ昨日を使いこなしていけばそこそこ複雑なことも出きる
ので、「なでしこでアルゴリズム」みたいな本があれば面白いのに
なあ。
gnakoの問題点が色々分かって、やっぱりGUIのエディタは
別のモノを使ったほうがいいんじゃないかと。通信DLLは
大体出来てるので、この辺り片付けたら、次はWinAPIを
もうちょっとダイレクトに触れるDLLなりexeなり作ろうかなあ。
さて、今回は「少し大きめのアプリ」でも使ってるカレンダー
機能のお話し。なでしこのくみこみ関数使ってある程度は
できるんですが、GUI用に使うならこれぐらいは欲しいかなあ
と言う部分を補完。
------ここから------
■GRP年月日
・｛整数｝年
・｛整数｝月
・｛整数｝日数
・日
・日数設定～
日数＝月日数判断（年、月）
・曜日設定～
日数回
年月日＝「｛年｝」＆「/」＆「｛月｝」＆「/」＆「｛回数｝」
日\回数＝年月日の曜日
●二月日数判断（Yの）
もしYを4で割った余り＝0ならば
もしYを100で割った余り＝0ならば
もしYを400で割った余り＝0ならば
日数＝29
違えば
日数＝28
違えば
日数＝29
違えば
日数＝28
日数で戻る
●月日数判断（Y、M）
Mで条件分岐
1ならば
日数＝31
2ならば
日数＝Yの二月日数判断
3ならば
日数＝31
4ならば
日数＝30
5ならば
日数＝31
6ならば
日数＝30
7ならば
日数＝31
8ならば
日数＝31
9ならば
日数＝30
10ならば
日数＝31
11ならば
日数＝30
12ならば
日数＝31
違えば
日数＝0
日数で戻る
------ここまで------
こんなもんでしょうか。「■GRP年月日」がカレンダー情報を
保持していて、要素「日」は配列です。「年」と「月」を設定して
「日数設定」メソッドと、「曜日設定」メソッドを呼べば、「日数」
にその月が何日あるかと、「日」にそれぞれの日が何曜日か
を代入します。「日」は配列の添え字（0～）が日（1～）に対応
してます。
アルゴリズム的にはC言語とそんなに変わらない感じ。なでしこは
グループ昨日を使いこなしていけばそこそこ複雑なことも出きる
ので、「なでしこでアルゴリズム」みたいな本があれば面白いのに
なあ。
2013年10月6日日曜日
【なでしこ】グループをシリアライズしてみる
ああ、なんか時間取れない…と思ってるウチにかなり時間が
開いてしまった(￣ω￣;。
DLLの話はちょっとおいておいて、なでしこのグループの話。
なでしこのグループを作成して、それをいったんファイルに保存
しておき、今度ファイルからよんでまたグループに値を代入する
と言うお話。なでしこは中間コードを生成するわけではないので
ホントにシリアライズは出来ないんだけど、まあイベントとか
関数とか含まないグループならファイルに保存するぐらいなら
可能かな。
ってことでまずはグループを作ってみます。
------ここから------
■GRPプロジェクト
・｛文字列｝GRP名｛=「GRPプロジェクト」｝
・｛整数｝ノード｛=0｝
・｛文字列｝名前
・｛文字列｝開始日
・｛文字列｝終了日
・｛整数｝次ノード｛=1｝
------ここまで------
実はちょっと仕掛けが必要で、グループ要素の先頭に
文字列で「GRPプロジェクト」と、グループ名(GRP名）を
入れておきます。あとは文字列とか整数とかで値を列挙。
＃あるプログラム用なので、要素名とかはあまり気に
しないでください(^^;。
これをファイルに保存しておきたい分けですが、折角
だからXML風に保存します。
------ここから------
<GRPプロジェクト>
<コード>0</コード>
<名前>IIU向け新PFの開発</名前>
<開始日>2013/10/04</開始日>
<終了日></終了日>
<関係者コード>100</関係者コード>
<管理項目コード>200</管理項目コード>
<フェーズコード>300</フェーズコード>
</GRPプロジェクト>
------ここまで------
グループ名が<GRPプロジェクト>～</GRPプロジェクト>の
タグになって、あとは要素がそれぞれのタグとなります。
これを実現するのに、下記のコードを書きました。
------ここから------
●XML化（GRPを）
GRP名＝GRPのグループ判定
もしGRP名＝空ならば
＃何もしない
違えば
メンバーズはGRPのメンバ詳細列挙
メンバ数はメンバーズの配列要素数
メンバ数回
メンバーズ\（回数-1）の「(」から「)」まで範囲切り取る
タグペアはメンバーズ\（回数-1）を「 = 」で区切る
もし（回数-1）=0ならば
グループ終了タグ＝「</」＆「｛タグペア\1｝」＆「>」
XML結果＝「<」＆「｛タグペア\1｝」＆「>」＆改行
違えば
アイテム開始タグ＝「 」＆「<」＆「｛タグペア\0｝」＆「>」
アイテム終了タグ＝「</」＆「｛タグペア\0｝」＆「>」
XML結果＝XML結果＆アイテム開始タグ＆「｛タグペア\1｝」＆アイテム終了タグ＆改行
XML結果＝XML結果＆グループ終了タグ＆改行＆改行
XML結果で戻る
------ここまで------
開いてしまった(￣ω￣;。
DLLの話はちょっとおいておいて、なでしこのグループの話。
なでしこのグループを作成して、それをいったんファイルに保存
しておき、今度ファイルからよんでまたグループに値を代入する
と言うお話。なでしこは中間コードを生成するわけではないので
ホントにシリアライズは出来ないんだけど、まあイベントとか
関数とか含まないグループならファイルに保存するぐらいなら
可能かな。
ってことでまずはグループを作ってみます。
------ここから------
■GRPプロジェクト
・｛文字列｝GRP名｛=「GRPプロジェクト」｝
・｛整数｝ノード｛=0｝
・｛文字列｝名前
・｛文字列｝開始日
・｛文字列｝終了日
・｛整数｝次ノード｛=1｝
実はちょっと仕掛けが必要で、グループ要素の先頭に
文字列で「GRPプロジェクト」と、グループ名(GRP名）を
入れておきます。あとは文字列とか整数とかで値を列挙。
＃あるプログラム用なので、要素名とかはあまり気に
しないでください(^^;。
これをファイルに保存しておきたい分けですが、折角
だからXML風に保存します。
------ここから------
<GRPプロジェクト>
<コード>0</コード>
<名前>IIU向け新PFの開発</名前>
<開始日>2013/10/04</開始日>
<終了日></終了日>
<関係者コード>100</関係者コード>
<管理項目コード>200</管理項目コード>
<フェーズコード>300</フェーズコード>
</GRPプロジェクト>
グループ名が<GRPプロジェクト>～</GRPプロジェクト>の
タグになって、あとは要素がそれぞれのタグとなります。
これを実現するのに、下記のコードを書きました。
------ここから------
●XML化（GRPを）
GRP名＝GRPのグループ判定
もしGRP名＝空ならば
＃何もしない
違えば
メンバーズはGRPのメンバ詳細列挙
メンバ数はメンバーズの配列要素数
メンバ数回
メンバーズ\（回数-1）の「(」から「)」まで範囲切り取る
タグペアはメンバーズ\（回数-1）を「 = 」で区切る
もし（回数-1）=0ならば
グループ終了タグ＝「</」＆「｛タグペア\1｝」＆「>」
XML結果＝「<」＆「｛タグペア\1｝」＆「>」＆改行
違えば
アイテム開始タグ＝「 」＆「<」＆「｛タグペア\0｝」＆「>」
アイテム終了タグ＝「</」＆「｛タグペア\0｝」＆「>」
XML結果＝XML結果＆アイテム開始タグ＆「｛タグペア\1｝」＆アイテム終了タグ＆改行
XML結果＝XML結果＆グループ終了タグ＆改行＆改行
XML結果で戻る
「グループ判定」「メンバ詳細列挙」というのはなでしこの命令です。
一番最初なら大くくりのタグを作って、2番目以降は1行に開始
タグと終了タグを入れてます。
ファイルから呼んでグループに戻すのは…省略(^^;。比較的簡単に
出来ますよ。最初のタグ読んだときにグループを生成し、それ以降は
生成したグループに値（<xxxx>～</xxxx>の間にある文字列）を入れる
だけ。
なでしこの変数はファジーに出来ていて、
｛整数｝X
と宣言したところにたとえば文字列で「1」と入れてあげても、以降
ちゃんと整数として扱ってくれます（2byte系の文字列「１」ではダメ
でした。半角数字なら 整数として代入してくれるようです）。なので
ファイルに文字列として書き出していても、次にそれを読み込んで
変数に代入すれば整数として扱ってくれるんですね～♪
2013年9月15日日曜日
【なでしこ】プラグインを作ってみる ～実装編 管理用構造体を作る～
さて、設計したプラグインをいよいよ実装するわけですが、
今回はなでしこから見ると全部「ハンドル」として見えるので、
DLL側で全てのハンドルを管理できる構造体を作成します。
------ここから------
typedef struct
{
int index;
unsigned long flag;
int size;
CRITICAL_SECTION crit;
union
{
unsigned long byte_hdl;
unsigned char b[4];
void *buf_hdl;
void *list_hdl;
FILE *fp_hdl;
int sock_hdl;
HANDLE ser_hdl;
}u;
void *pextend;
void *pprev;
void *pnext;
}COMM_HANDLE;
------ここまで------
このプラグインは主に通信用途と、一般的なC的関数の実装
を意識したのでCommunication, Commonを意識して"COMM_"
としました。
構造自体は簡単で、unionの中にハンドル本体を保存する
変数、もしくはポインタが配置されてます。1,2,4byteのバイト
配列はunsigned char, unsigned short, unsigned longに相当
するものとして、これは構造体の中で値を管理します。
その他のハンドルはポインタです。あ、socketはポインタ
じゃなかったな(^^;。
pextendは各ハンドルに対して付加的な情報が必要な場合に
使用します。pprevとpnextはキューとかスタックをリスト構造で
管理してるので、それらを管理する場合にこの構造体を
連結するためのものです。
実際、なでしこの各変数もこれに近い構造体で管理している
ので、こういう言語拡張系のDLLではまずまず一般的な
形なのではないかと思います。
今回はなでしこから見ると全部「ハンドル」として見えるので、
DLL側で全てのハンドルを管理できる構造体を作成します。
------ここから------
typedef struct
{
int index;
unsigned long flag;
int size;
CRITICAL_SECTION crit;
union
{
unsigned long byte_hdl;
unsigned char b[4];
void *buf_hdl;
void *list_hdl;
FILE *fp_hdl;
int sock_hdl;
HANDLE ser_hdl;
}u;
void *pextend;
void *pprev;
void *pnext;
}COMM_HANDLE;
このプラグインは主に通信用途と、一般的なC的関数の実装
を意識したのでCommunication, Commonを意識して"COMM_"
としました。
構造自体は簡単で、unionの中にハンドル本体を保存する
変数、もしくはポインタが配置されてます。1,2,4byteのバイト
配列はunsigned char, unsigned short, unsigned longに相当
するものとして、これは構造体の中で値を管理します。
その他のハンドルはポインタです。あ、socketはポインタ
じゃなかったな(^^;。
pextendは各ハンドルに対して付加的な情報が必要な場合に
使用します。pprevとpnextはキューとかスタックをリスト構造で
管理してるので、それらを管理する場合にこの構造体を
連結するためのものです。
実際、なでしこの各変数もこれに近い構造体で管理している
ので、こういう言語拡張系のDLLではまずまず一般的な
形なのではないかと思います。
2013年9月9日月曜日
【なでしこ】お、イベント発生成功！
どうもプログラムが間違っていたらしく、DLLでイベント発生成功！。思ってた
通り、
------ここから------
if (arg1->VType == varGroup)
{
ret = pfnako->nako_group_findMember(arg1, "発生した時");
if (ret->VType != varNil)
{
pfnako->nako_group_exec(arg1, "発生した時");
}
else
{
/*Do Nothing*/
;
}
}
------ここまで------
の様なコード書いておいて、なでしこ側で
------ここから------
■テストグループ
・｛イベント｝発生した時
G1とはテストグループ
G1→発生した時は～
「イベント発生」と表示
DLL引数ダンプ（G1） /*ここでDLLの関数をコール。グループを渡す*/
------ここまで------
と、やってやると、テストグループのイベントをDLL側からコールできました(^^)。
これで今までなでしこ→DLLの一方方向なコールシーケンスしか出来なかった
けど、DLL→なでしこなコールシーケンスも書ける！。ただし、一旦なでしこ定義の
関数に処理が渡ってること考えると、スレッドセーフではない気はします。
セマフォとか同期処理を上手く入れてやればDLL側のスレッドでもコールできる
かも…。
通り、
------ここから------
if (arg1->VType == varGroup)
{
ret = pfnako->nako_group_findMember(arg1, "発生した時");
if (ret->VType != varNil)
{
pfnako->nako_group_exec(arg1, "発生した時");
}
else
{
/*Do Nothing*/
;
}
}
------ここまで------
の様なコード書いておいて、なでしこ側で
------ここから------
■テストグループ
・｛イベント｝発生した時
G1とはテストグループ
G1→発生した時は～
「イベント発生」と表示
DLL引数ダンプ（G1） /*ここでDLLの関数をコール。グループを渡す*/
------ここまで------
と、やってやると、テストグループのイベントをDLL側からコールできました(^^)。
これで今までなでしこ→DLLの一方方向なコールシーケンスしか出来なかった
けど、DLL→なでしこなコールシーケンスも書ける！。ただし、一旦なでしこ定義の
関数に処理が渡ってること考えると、スレッドセーフではない気はします。
セマフォとか同期処理を上手く入れてやればDLL側のスレッドでもコールできる
かも…。
登録:
投稿 (Atom)