palmware開発
- DOC形式
- DOC形式の読み込み
- DOC形式のフォーマット
- 圧縮形式の展開
- DOC形式のフォーマット
- 機種固有機能対応
- Clie NR70 のワイドハイレゾ対応
- Treo 600 の 5-way Navigator 対応
- メモ帳
- メモ帳への書き出し
- バグ
- スタック破壊
- その他
- マルチセグメントアプリケーションへの移行
- [辞書を引く]メニューの追加
DOC形式のデータベース読み込み
DOC形式は、タイプが 'TEXt'、クリエータが 'REAd'のデータベース形式で、 データベース名が文書名になっています。 というわけで以下のようなコードでドキュメントの一覧が読み出せます。
Boolean newSearch;
DmSearchStateType state;
UInt16 cardNo;
LocalID dbID;
Char docName[dmDBNameLength];
newSearch = true; NumDocs = 0;
while (1) {
if (errNone != DmGetNextDatabaseByTypeCreator(newSearch, &state,
'TEXt', 'REAd', false, &cardNo, &dbID))
break;
DmDatabaseInfo(cardNo, dbID, docName, NULL, NULL, NULL,
NULL, NULL, NULL, NULL, NULL, NULL, NULL);
newSearch = false;
NumDocs ++;
}
DOC形式のフォーマット
形式に関してはthe pyrite project: doc formatを参考にしました。 DOC形式のフォーマットは大きく分けて3つの部分に分かれます。- ヘッダーレコード(インデックス0のレコード)
- 文書レコード(個数はヘッダーレコードに記述)
- ブックマークレコード
ヘッダーレコードのフォーマット
typedef struct {
UInt16 version;
UInt16 reserved;
UInt32 length;
UInt16 numRecords;
UInt16 recordSize;
} DocHeaderType;
| ヘッダーレコードのフォーマット | ||
|---|---|---|
| version | 2 bytes | 0x0002:圧縮, 0x0001:非圧縮 |
| reserved | 2 bytes | 予約(0) |
| length | 4 bytes | 圧縮前の文書サイズ |
| numRecords | 2 bytes | 文書レコード数 |
| recordSize | 2 bytes | レコードサイズ(通常 4096) |
圧縮形式の展開
文書レコードが非圧縮(version: 0x0001)の場合にはそのまま読み出してレコードを繋げれば文書ができあがります。圧縮形式の場合には文書レコードを展開してやる必要があります。 圧縮形式の展開アルゴリズムは以下になります。| データ(N) | 展開内容 |
|---|---|
| 0x01 - 0x08 | 続くNバイトをそのまま出力する |
| 0x09 - 0x7f | そのまま出力する |
| 0x80 - 0xbf | 続くもう一バイトを使用してUInt16としてスライド辞書コピーをする 得られた UInt16 の下位14bitの内、上位11ビットがコピー開始位置(1-2047bytes)、下位3ビット+3がコピーバイト数(3-10bytes)となる |
| 0xc0 - 0xff | スペース(' ') + N ^ 0x80 を出力する |
ソースを見てもらうのが一番早いと思うのでソースを提示します。 srcP が文書レコードのポインタ、dstPが出力する側のポインタです。 一つだけ注意しないといけないのは dstP 側に用意するメモリのサイズです。 ヘッダの recordSize より少し大きく用意しなければなりません。 恐らくスライドコピー分(10bytes)程度大きければよいと思っていますが、 念のため128bytes位多めに確保しておきます。
while (srcP < srcP + recordSize) {
UInt16 ch = * (UInt8 *) srcP;
if (ch < 0x09) {
/* 続くn(1〜8)文字をそのまま出力する */
srcP ++;
while (ch > 0) {
*(dstP++) = *(srcP++);
ch --;
}
} else if (ch < 0x80) {
/* ASCII文字列をそのまま出力 */
*(dstP++) = *(srcP++);
} else if (ch < 0xc0) {
/* スライド辞書コピー */
UInt16 slide; /* コピー開始位置 */
UInt16 count; /* コピー文字数 */
ch <<= 8; ch += * (UInt8 *) (++srcP); /* 2bytes を使用する */
slide = (ch & 0x3fff) >> 3;
count = (ch & 0x7) + 3;
while (count > 0) {
*dstP = *(dstP - slide);
dstP ++; count --;
}
srcP ++;
} else {
/* スペース + ch ^ 0x80 */
*(dstP++) = ' ';
*(dstP++) = *(srcP++) ^ 0x80;
}
}
Clie NR70系のワイド対応
行う必要があるのは以下の対応です。事前にハイレゾモードにしておく必要があります。テーブルを使用している場合にはテーブルのサイズで行数が変えるようにする必要があります。
- SilkLibEnableResize()を使用して画面サイズの変更ができることを通知
「Programmer's Companion for Sony CLIE」のサンプルプログラムをそのまま使用可能です。
- SysNotifyRegister()を使用してsysNotifyDisplayChangeEventを受け取れるようにする
以下のようにアプリケーションのdbIDを獲得してSysNotifyUnregister()を呼んでやるだけです。
err = DmGetNextDatabaseByTypeCreator(true, &state, 'appl', appFileCreator, true, &cardNo, &dbID); if (!err) SysNotifyUnregister(cardNo, dbID, sysNotifyDisplayChangeEvent, sysNotifyNormalPriority);
- PalmMain(PilotMain)にsysNotifyDisplayChangeEventを処理する関数を追加
通常使ってない(と思う)PalmMainの第二引数がSysNotifyParamTypeへのポインタとなっています。 Wdicでは手抜きしてここからすぐにFrmGotoForm()を呼んでしまってますが、 本当は画面のサイズが変わったかを調べて、 変わっていたら各フォームの再描画関数を呼ぶというふうにした方がよいはずです。
static UInt32 StarterPalmMain(UInt16 cmd, SysNotifyParamType *notifyP, UInt16 launchFlags) { switch (cmd) { case sysAppLaunchCmdNormalLaunch: error = AppStart(); if (error) return error; FrmGotoForm(MainForm); AppEventLoop(); AppStop(); break; case sysAppLaunchCmdNotify: if (notifyP->notifyType != sysNotifyDisplayChangeEvent) break; formID = FrmGetActiveFormID(); if (formID) FrmGotoForm(formID); break; } - 再描画関数で画面サイズを得て、フォームの各オブジェクトを再配置/サイズ変更
- 画面サイズはWinGetDisplayExtent()を使って得られます
WinGetDisplayExtent(NULL, &CurWinExtent);
- フォームのサイズ変更は以下のような関数を作りました(extentにCurWinExtentを渡す)
void ClieSetWindowBounds(FormType *frmP, Coord extent) { WinHandle win; RectangleType r; Coord diff = extent - defaultDisplayExtent; // extent form win = FrmGetWindowHandle(frmP); win = WinSetDrawWindow(win); WinGetDrawWindowBounds(&r); r.extent.y += diff; WinSetWindowBounds(win, &r); } - オブジェクトの位置変更/サイズ変更は以下のような関数を作りました(位置変更はclieChangeTop、サイズ変更はclieChangeExtentを渡す)
void ClieChangeObjectBounds(FormType *frmP, Int16 objID, Coord extent, ClieChangeEnum type) { RectangleType r; Coord diff = extent - defaultDisplayExtent; Int16 index = FrmGetObjectIndex(frmP, objID); FrmGetObjectBounds(frmP, index, &r); if (type == clieChangeTop) r.topLeft.y += diff; else r.extent.y += diff; FrmSetObjectBounds(frmP, index, &r); }
- 画面サイズはWinGetDisplayExtent()を使って得られます
Treo 600の5-Way Navigation
Treo 600 の 5-Way Navigation は Tungsten シリーズに搭載されているものとは、全く別のものです。Treo 600では5-Way Rockerと呼んでいるようです。Handspringの開発ホームページからダウンロード(登録が必要)できる「Developer Reference Guide: Handspring Treo 600 Communicator」に5-way Rockerについての記述がありますが、非常に厄介に見えます。
- まず手始めに5-Way Rockerが搭載されているかどうかの判断です。ソースを見た方が早いので以下を参照のこと
if (FtrGet(hsFtrCreator, hsFtrIDNavigationSupported, &version) == errNone) { hasFiveWayRocker = true; }
メモ帳への書き出し
PalmのホームページからダウンロードできるSDK40-ExampleのMemoMain.cのCreateRecord()を、 ちょっと直せば書き込みルーチンのできあがりです。以下はその例です。 ソートはメモ帳を呼び出した時に行われるので考える必要はありません (Preferenceでレコード数を管理しており、レコードが追加された場合にソートしている)。
#define memoDBType 'DATA'
#define memoMaxLength 4096
static Err CopyToMemoPad(Char *note)
{
UInt16 index;
MemHandle memoRec;
Char *dstP;
UInt16 attr;
DmOpenRef memoDB;
UInt32 size;
memoDB = DmOpenDatabaseByTypeCreator(memoDBType, sysFileCMemo, dmModeReadWrite);
if (!memoDB) {
FrmCustomAlert(InformationAlert,
"メモ帳データベースのオープンに失敗しました", NULL, NULL);
return errNone;
}
size = StrLen(note);
if (size > memoMaxLength) {
if (FrmCustomAlert(ConfirmationAlert, "データが4096文字以上です。\n",
"4096文字以上は切り捨てられますがよろしいですか？", NULL)) {
DmCloseDatabase(memoDB);
return errNone;
}
size = memoMaxLength;
}
index = DmNumRecords(memoDB);
memoRec = DmNewRecord(memoDB, &index, size);
// If the allocate failed, display a warning.
if (!memoRec) {
ErrorMessage("データベースメモリの確保に失敗しました(%d bytes)", size);
DmCloseDatabase(memoDB);
return dmErrMemError;
}
dstP = MemHandleLock (memoRec);
DmWrite(dstP, 0, note, size);
MemHandleUnlock(memoRec);
// Set the category of the new record to the current category.
DmRecordInfo (memoDB, index, &attr, NULL, NULL);
attr &= ~dmRecAttrCategoryMask;
DmSetRecordInfo (memoDB, index, &attr, NULL);
DmReleaseRecord (memoDB, index, true);
DmCloseDatabase(memoDB);
return errNone;
}
バグ
スタック破壊
Wdic Version0.7.00開発中にぶつかったバグ。以下のような現象に見えていました- 関数を呼ぶと引数として渡した変数が壊れる(ステップトレースすると関数から一つ入ったところで変数がおかしくなる)
- スタックトレースが正常に表示されない(でたらめな関数からコールされている(0xFFFFFFFFとか))
- POSEが何も表示せずに終了してしまう(“die like a dog”の表示すら出ないことも多い)