現場のエンジニアへ告ぐ：PL/Iポインタ操作で「メモリの迷宮」を攻略せよ
若手エンジニアから、「PL/Iのポインタ操作がどうも掴みにくい」という相談を受けることがよくある。C言語のポインタとは少し毛色が違い、PL/Iには強力な`BASED`変数という武器がある。これが使いこなせれば、複雑なVSAMレコードの動的解析や、大規模なバッチ処理でのメモリ効率化が劇的に楽になる。
今日は、メインフレームの現場で生き残るための「PL/IポインタとBASED変数」の実践的作法について語ろうと思う。
—
1. 予約語なき自由と、「BASED」の真価
PL/Iの特筆すべき仕様は、「予約語が存在しない」ことだ。`IF`や`THEN`といったキーワードすら、変数名として宣言してしまえばコンパイラはそれを識別子として扱う。これは自由だが、一歩間違えればコードの可読性を殺す諸刃の剣だ。
特にポインタ操作においては、宣言の可読性が命綱になる。`BASED`変数は、メモリ上の「ある特定の場所」に、型という「テンプレート」を被せるためのものだ。これを使うことで、物理的なメモリ配置を意識した柔軟なデータアクセスが可能になる。
2. ポインタ演算とADDR関数の実用パターン
実務で最も遭遇するのは、動的に読み込んだVSAMレコードの特定のオフセットから、構造体としてデータをマッピングするケースだ。ここで`ADDR`関数と`POINTER`型が真価を発揮する。
以下のサンプルコードを見てほしい。これは、バッファとして読み込んだ可変長レコードを、ポインタ経由で構造体にマッピングする典型的な実装だ。
1
/ 構造体定義：BASED属性を付与 /
DCL 1 WORK_REC BASED(P_WORK_REC),
5 REC_TYPE CHAR(1),
5 REC_BODY CHAR(100);
/ ポインタ変数とバッファ用メモリの宣言 /
DCL P_WORK_REC POINTER;
DCL BUFFER CHAR(101) BASED(P_BUFFER);
DCL P_BUFFER POINTER;
/ 処理ロジック /
/ 動的にメモリを確保、あるいは読み込み領域を指定 /
P_BUFFER = ADDR(READ_AREA);
/ ポインタをずらして構造体を適用する（ポインタ演算の基礎） /
/ P_WORK_REC = P_BUFFER + 5; ※PL/Iでは組み込み関数を使用する /
P_WORK_REC = ADDPOINTER(P_BUFFER, 5);
/ これで、REC_TYPEにはREAD_AREAの6バイト目からがマッピングされる /
IF REC_TYPE = ‘A’ THEN DO;
/ 業務ロジックを実行 /
END;
ここで重要なのは、`ADDPOINTER`（コンパイラ・環境により`PTRADD`）などの組み込み関数を活用することだ。ポインタに対して生の値で加算するのは、バグの温床になるから絶対に避けるべきだ。
3. 注意すべき「ONユニット」とメモリの罠
動的メモリ操作を行う際、`ALLOCATE`文でメモリを確保したなら、必ず`FREE`文で解放する責任が伴う。これを忘れると、長時間稼働するバッチジョブでは「ストレージ枯渇（S0C4やABEND U4038）」という最悪の結末を迎える。
ここで、`ON ERROR`や`ON STORAGE`を適切に配置しておくのがベテランの流儀だ。予期せぬメモリ不足が発生した際に、中途半端な状態でダンプを吐かせるのではなく、確実にエラーログを出力して資源を解放するフローを組み込んでおくこと。
1
ON STORAGE(P_WORK_REC) BEGIN;
PUT SKIP LIST(‘ 致命的：メモリ不足が発生しました ‘);
CALL CLEANUP_ROUTINE; / 資源解放処理 /
STOP;
END;
4. 現場のアドバイス：デバッグのコツ
ポインタ操作のデバッグで最も苦労するのは、意図しないアドレスを指したままの構造体アクセスだ。そんな時、メインフレームのデバッガ（IBM Debug Tool / z/OS Debugger）で以下のことを意識してほしい。
1. ポインタの値を常に監視せよ: 変数名だけでなく、`P_WORK_REC`が指すアドレス値（16進数）が、読み込んでいるデータの開始位置と一致しているか確認する。
2. 構造体の境界を確認せよ: `ALIGNED`属性を指定していない構造体は、メモリ上でパッキングされている。`UNALIGNED`か`ALIGNED`か、定義と実データが一致しているか常に疑うこと。
3. 変数の「定義」を信じるな: ポインタをキャストしてアクセスしている場合、コンパイラは型チェックをバイパスする。ダンプ上の値と構造体の宣言を照らし合わせる「眼力」こそが、この言語を使いこなす最後のピースだ。
—
PL/Iは、ハードウェアの特性を色濃く反映した強力な言語だ。ポインタを恐れず、しかし慎重に扱うことで、君たちが書くコードはより堅牢で、かつパフォーマンスの高いものへと進化するだろう。
何か行き詰まったら、いつでも聞くといい。メインフレームの歴史と技術は、こうして受け継がれていくものだからな。
