【入門編】ALLOCATE文によるメモリ確保時のストレージ不足エラー – PL/Iの基本構文とデータ制御実践ガイド

メインフレームの現場へようこそ。Javaで`new`を書き、COBOLで`WORKING-STORAGE`を定義してきた皆さんにとって、PL/Iのメモリ管理は少しだけ「古風で、でもどこか人間臭い」ものに映るかもしれません。

今日は、PL/Iにおける動的メモリ確保の要である`ALLOCATE`文と、それが限界に達したときに発動する「STORAGE条件」についてお話しします。難しそうに見えますか？大丈夫、一つずつ紐解けば、メインフレームのメモリ管理は案外、律儀で頼もしいパートナーだと気づけるはずです。

—

Javaのヒープ領域やCOBOLの動的メモリ（`ALLOCATE`文）をご存知の方なら概念は同じです。PL/Iでは、プログラムの実行中に「あ、今このデータ構造が必要になったな」というタイミングで、OSからメモリを借りてくることができます。

ここで登場するのが`BASED`変数です。

/i
/ BASED属性がついた変数は、まだ実体がない「空の設計図」です /
DCL MY_DATA_PTR POINTER;
DCL MY_DATA CHAR(100) BASED(MY_DATA_PTR);

この`MY_DATA`という変数は、現時点では「どこにデータがあるか」を知りません。これに命を吹き込むのが`ALLOCATE`です。

/i
/ ここで初めてメモリが確保され、MY_DATA_PTRがその場所を指します /
ALLOCATE MY_DATA;

—

さて、ここからが本題です。広大なメインフレームのメモリ空間といえども、無限ではありません。ループの中で何度も`ALLOCATE`を繰り返したり、巨大な構造体を確保しすぎたりすると、OSは「もうこれ以上、貸し出せるメモリはありません！」と悲鳴を上げます。

これがPL/Iでいう「STORAGE条件」です。Javaなら`OutOfMemoryError`が飛んでプログラムが即死するところですが、PL/Iは少し違います。「死ぬ前に、何か手立てはあるか？」と、プログラムに最後のチャンスを与えてくれるのです。

PL/Iには、エラーが起きた瞬間に割り込んで処理を横取りする「ONユニット」という仕組みがあります。これを使えば、メモリ不足の瞬間に「古いデータを解放する」といった緊急処置が可能になります。

/i
/ STORAGE条件が発生したときのハンドリングを定義 /
ON STORAGE
BEGIN;
PUT SKIP LIST (‘警告: メモリが不足しました。整理を開始します。’);
/ ここで不要なポインタをFREEしたり、ログを出力して終了準備をする /
STOP;
END;

/ 実際にメモリを確保する箇所 /
ALLOCATE MY_DATA;

—

現場でよくある「ポインタを使い回す」パターンを想定した、ちょっと丁寧な書き方を紹介します。

/i
TEST_ALLOC: PROCEDURE OPTIONS(MAIN);

/ ポインタとベース変数の宣言 /
DCL P POINTER;
DCL MY_BUFFER CHAR(1024) BASED(P);

/ メモリ不足時の緊急ハンドラ /
ON STORAGE BEGIN;
PUT SKIP LIST (‘メモリ枯渇！システムを安全に停止します。’);
SIGNAL ERROR; / 安全な終了処理へ移行 /
END;

/ 動的確保の実行 /
ALLOCATE MY_BUFFER;

/ 処理が済んだら必ず解放！これを忘れるとメモリリークの元です /
FREE MY_BUFFER;

END TEST_ALLOC;

FREEを忘れない: `ALLOCATE`したら必ず`FREE`する。これはJavaのガベージコレクションに慣れていると忘れがちですが、メインフレームでは「借りたものは返す」が鉄則です。
ポインタの管理: `P`（ポインタ）を不用意に書き換えると、どこにメモリを確保したのか分からなくなり、解放できなくなります。ポインタは丁寧に扱いましょう。

—

PL/Iという言語は、コンパイラやOSと非常に密接に連携しています。`ON STORAGE`のような仕組みは、昔のエンジニアたちが「限られたリソースの中で、いかにシステムを止まらせないか」を必死に考えた知恵の結晶です。

「メモリ不足＝即終了」ではなく、「何とか回復できないか？」と対話しようとするPL/Iの姿勢は、今の時代でも非常に頼もしいものです。

エラーが出ても怖がる必要はありません。それはシステムが「少し休憩をちょうだい」と言っているだけなのですから。一つずつ、変数の寿命と確保のタイミングを見直していけば、必ず安定したプログラムへと導くことができますよ。

それでは、次回のメインフレーム・アーキテクチャ講座でお会いしましょう！何か詰まったときは、いつでもこの現場の知恵を思い出してくださいね。