悪夢のS0C4を断つ：PL/Iポインタ操作とBASED変数の守護術
現場の諸君、お疲れ様。今日もどこかで深夜のジョブが終わらず、SYSLOGに無情な「SYSTEM COMPLETION CODE 0C4」が吐き出されていることだろう。
PL/IにおいてS0C4（Protection Exception）は、いわば「避けては通れない洗礼」だ。だが、長年この世界で生き抜いてきた者からすれば、0C4は単なるエラーではない。「お前、メモリアドレスの扱いに敬意を払っていないぞ」というシステムからの警告に他ならない。
今回は、特に`BASED`変数とポインタが絡む現場特有のトラブルについて、実務的な視点で深掘りしよう。
—
1. S0C4の正体：無効なアドレスへの「不敬」
S0C4が発生する主な理由はシンプルだ。プログラムが「許可されていない領域」や「存在しないアドレス」へアクセスを試みたとき、ハードウェアが即座に割り込みをかけて処理を停止させる。
特にPL/Iの`BASED`変数は強力だ。明示的にポインタを指定してメモリを操作できる反面、そのポインタが「たまたまゴミを指していた」場合、あるいは「解放済み（`FREE`）の領域を再参照した」場合に、容赦なくS0C4を食らう。
2. ポインタの妥当性検証：基本かつ最強の防衛線
現場でよくある失敗は、`ALLOCATE`した直後のポインタを初期化せず、そのまま`FETCH`や`READ`処理に回してしまうケースだ。`NULL()`関数による検証は、もはや呼吸と同じレベルで実装しなければならない。
以下に、現場で推奨される「安全なポインタ操作」のコード例を示す。
/i
/ 構造体の定義とポインタの宣言 /
DCL 1 MY_DATA BASED(P_MY_DATA),
2 KEY_VAL CHAR(10),
2 DATA_VAL CHAR(50);
DCL P_MY_DATA POINTER INIT(NULL()); / 常にNULLで初期化する習慣を /
/ メモリ確保と妥当性チェック /
ALLOCATE MY_DATA;
IF P_MY_DATA = NULL() THEN DO;
PUT SKIP LIST(‘MEMORY ALLOCATION FAILED’);
SIGNAL ERROR;
END;
/ ここで初めて安全にアクセス可能 /
P_MY_DATA->KEY_VAL = ‘REC001’;
3. VSAMアクセスとONユニットの連携
VSAMファイルを読み込む際、レコードの読み込み先として`BASED`変数を使うことは多いだろう。この時、`ENDFILE`条件を`ON`ユニットで適切にキャッチしないと、ファイル終端を突き抜けて不正なメモリを参照し、結果としてS0C4を招くことがある。
/i
/ VSAM読み込みループの定石 /
ON ENDFILE(VSAM_FILE) BEGIN;
EOF_FLAG = ‘1’B;
END;
READ FILE(VSAM_FILE) SET(P_MY_DATA);
DO WHILE (EOF_FLAG = ‘0’B);
/ 読み込み成功後のポインタアクセス /
IF P_MY_DATA ^= NULL() THEN DO;
/ データの処理 /
CALL PROCESS_DATA(P_MY_DATA);
END;
READ FILE(VSAM_FILE) SET(P_MY_DATA);
END;
ここで重要なのは、`READ`の`SET`オプションで受け取ったポインタが、ループの最後でどうなっているかを意識することだ。`END`ユニットを抜ける際や、エラー発生時のポインタの挙動を常にトレースできるようにしておくのが、ベテランの流儀だ。
4. 現場で使えるデバッグの知恵
もし君が今、S0C4の迷宮に迷い込んでいるなら、以下のステップを試してみてほしい。
1. STORAGE CHECK: コンパイルオプションに`CHECK(STORAGE)`を一時的に付与し、境界違反がないか確認する。オーバーヘッドは大きいが、原因究明の近道だ。
2. PL/I DUMPの解析: `ON ERROR`ユニットで`CALL PLIDUMP(‘TFBC’);`を呼び出すように仕込んでおく。`T`（トレースバック）と`B`（ブロック情報）、`C`（変数の値）があれば、ほぼ確実にどのポインタが暴走したか特定できる。
3. FREE後のNULL化: `FREE`文の直後に必ず`P_MY_DATA = NULL();`を記述すること。これを怠ると、「解放したつもりのメモリ」へアクセスするダングリングポインタが爆弾となって後続処理を破壊する。
最後に
PL/Iは、システムに近い位置で仕事ができる素晴らしい言語だ。しかし、その分だけ「責任」がプログラマー側に委ねられている。ポインタを扱うということは、メモリという広大な荒野に君自身が道標を置くということだ。
エラーを恐れるな。S0C4が出るということは、君がそのプログラムの核心に触れようとしている証拠でもある。丁寧に、論理的に、そして何より「ポインタを信じすぎない」慎重さを持ってコードを書いてほしい。
何かあればいつでも相談してくれ。バッチの夜は長い。解決策は必ずコードの中にある。
