【PL/I深層解説】ADDR関数でメモリの深淵を覗く：ポインタ操作の作法と陥りやすい罠
若手エンジニアの諸君、今日もメインフレームのバッチジョブと格闘しているか。
我々が保守しているこの巨大なシステム群。その心臓部であるPL/Iコードにおいて、避けて通れないのが「ポインタ」という存在だ。特に`ADDR`ビルトイン関数は、単なるメモリアドレスの取得という枠を超え、システム制御ブロック（SCB）への介入や、VSAMレコードの動的マッピングといった高度な処理を行うための「特権的キー」となる。
今回は、この`ADDR`を正しく、そして安全に使いこなすための勘所を、現場の視点から伝授しよう。
—
1. ADDR関数とは何か：その本質的理解
`ADDR(X)`は、変数`X`がメモリ上のどこに配置されているかを示すポインタ値を返す関数だ。C言語の`&`演算子に近いが、PL/Iにおいてはもっと厳格だ。
ここで注意すべきは、`ADDR`が返すのは「変数の先頭アドレス」であるという点だ。構造体（STRUCTURE）であればその構造体の先頭、配列（ARRAY）であれば第1要素の先頭アドレスを指す。この「基点」を正しく理解していないと、ポインタ演算でオフセットを計算する際に、とんでもないメモリ領域を書き換える地雷を踏むことになる。
—
2. 実践コード：ADDRを用いた動的レコード解析
例えば、VSAMのファイルから読み込んだバッファ領域に対し、特定のビットフラグや制御ブロックを解析するケースを想定してみよう。
1
/ —————————————————————— /
/ PROGRAM: ADDR_DEMO.PLI /
/ PURPOSE: ADDRによるポインタ操作とデータマッピングの実践 /
/ —————————————————————— /
DEMO: PROCEDURE OPTIONS(MAIN);
DCL PTR_VAL POINTER; / アドレスを保持するポインタ変数 /
DCL 1 MY_REC BASED(PTR_VAL), / 読み込んだ領域をマッピング /
3 REC_ID CHAR(4),
3 REC_STATUS BIT(8),
3 REC_DATA CHAR(100);
DCL BUFFER CHAR(108) STATIC; / VSAMから読み込んだ生データ領域 /
/ [処理フロー] /
/ 1. まず、処理対象のバッファの先頭アドレスをADDRで取得する /
PTR_VAL = ADDR(BUFFER);
/ 2. ADDRで取得したアドレスを基点として、構造体MY_RECを重ねる /
/ これにより、BUFFERの生データに名前付きフィールドでアクセス可能になる /
IF REC_STATUS = ‘1’B THEN DO;
PUT SKIP LIST(‘有効レコードを検出しました: ‘ || REC_ID);
END;
/ [重要] ONユニットでの異常系制御 /
ON CONDITION(ABEND_CONDITION) BEGIN;
PUT SKIP LIST(‘メモリ異常発生。ポインタの指し先を確認せよ。’);
STOP;
END;
END DEMO;
—
3. 現場で生き残るための「ポインタの作法」
このコードを見て「単に構造体を使えばいいのでは？」と思ったなら、少し甘い。この手法が真価を発揮するのは、「データの内容に応じてマッピングする構造体を動的に切り替える必要がある時」だ。
例えば、レコードタイプによって先頭の数バイト以降の構成がガラリと変わるような、いわゆる「可変長レコード」の解析において、`ADDR`でポインタをずらしながら`BASED`変数を付け替える手法は、メインフレーム開発の定石中の定石だ。
ここだけは押さえておけ：3つの鉄則
1. ポインタの初期化を怠るな
`DCL P POINTER;` した直後のポインタは「未定義」だ。`ADDR`で値を代入する前に参照すれば、即座にS0C4（アドレッシング例外）でジョブは落ちる。デバッグの手間を省きたければ、宣言と同時に`NULL()`で初期化する癖をつけろ。
2. アライメントを意識せよ
`ADDR`は基本的に境界調整されたアドレスを返すが、`UNALIGNED`属性の変数に対して無理なポインタ演算を行うと、CPUのフェッチ効率が劇的に悪化したり、最悪の場合、例外が発生する。可能な限り`ALIGNED`で運用するのが、大規模システムにおけるパフォーマンス維持の秘訣だ。
3. ONユニットとの併用
`ADDR`を使ってメモリを直接操作する場合、その変数が「本当に有効な領域を指しているか」を常に監視せよ。`ON ERROR`や`ON CONDITION`を使って、メモリ参照違反が発生した際にダンプを取る仕組みを仕込んでおくのが、プロの仕事というものだ。
—
4. 結びに：レガシーを操る誇り
「最近はWebアプリが主流だから、メモリ管理なんて意識しなくていい」という声も聞く。だが、我々が守っているのは、数十年分のビジネスロジックが詰まったこの巨大なメインフレームだ。
`ADDR`を使ってメモリの深淵を覗くことは、コンピュータがどのようにデータを並べ、どう演算しているのかという「本質」に触れることと同義だ。この技術を習得した諸君なら、どんなに複雑なマイグレーション案件であっても、必ず解法を見出せるはずだ。
何か技術的に詰まったら、いつでも聞け。仕様書には載っていない「現場の汗」の匂いがする解決策を、また教えてやろう。
