ロードモジュール

１　ジョブとして実行できるもの

Ｗｉｎｄｏｗｓではxxx.exeとかxxx.com、xxx.batなどのファイルが、プログラムとして実行することができます。それに対してＡ−ＶＸで実行できるものは、ロードモジュール、ジョブストリーム、パラメータメンバの３種類があります。

このうちジョブストリームとパラメータメンバについては説明済みです。 ここではロードモジュールについて説明します。

２　ロードモジュール（ＬＭ）とは

Ｗｉｎｄｏｗｓでxxx.exeやxxx.comに相当するものが、ロードモジュールです。ＣＯＢＯＬ言語やＦＯＲＴＲＡＮ言語でソースプログラムを作り、それをコンパイル／リンクした後にできる実行形式のものがロードモジュール（LM）です。Ａ−ＶＸ付属のいろいろなユーティリティ（#ABCとか#MAPとか）もロードモジュールです。

ロードモジュールはロードモジュールライブラリ（ＬＭＬ）に格納します。

ロードモジュールは、ジョブとしてＲＵＮコマンドやＪＣＬの／ＲＵＮ文、メニューなどから実行します。

３　ロードモジュール（ＬＭ）の構造

ロードモジュールを起動・実行するうえではロードモジュールの構造など知っていなくても問題ありません。

プログラムエラー発生時にもしかしたら役に立つかも、程度です。
後はソースプログラムをコンパイル／リンクするときに「このパラメータは何か？」と思ったときに役に立つかもしれない、程度でしょうか。

ロードモジュールをＡ−ＶＸはセグメントという単位で管理しているようです。ロードモジュールを１つあるいはいくつかのセグメントに分割してＬＭＬに格納しておき、ロードモジュール実行時に必要になる都度セグメントをメモリに読み込んで実行していくという仕組みのようです。

セグメント内もいろいろなものが混在しているわけではなく、このセグメントはデータ部、このセグメントはメインルーチンの部分、こっちのセグメントはコールされたプログラムの部分と分けられています。

セグメントのサイズは最大６４キロバイトの可変の長さのようです。大きいプログラムなら６４キロバイトのサイズのセグメントが複数個、小さいプログラムなら４キロバイトのセグメントが１個だけとかになります。

セグメントは２種類あるようです。

１つめはノンシェラブルセグメント。書き込みや読み込みができるセグメントで、データ部のようにデータを書いたり読んだりするような目的に使うセグメントのようです。Non-shareable、つまり実行したプログラム毎に状態が違うので共有できないセグメントということでしょうかね。

もう１つはリエントラントセグメント。書き込みができないセグメントで、命令部のように書き換わらない部分に使われるセグメントのようです。命令が勝手に書き換わったらウイルスみたいで嫌ですからね。re-entrantということでしょう。

ロードモジュールのセグメントの個数やそれぞれのサイズ、セグメントの種類などの情報はリンク時に出力されるマップを見ればわかります。

４　ロードモジュール（ＬＭ）の種類

ロードモジュールは４種類あるようです。

５　混合型ＬＭ

セグメント内にいろいろなものが混在しているわけではないと書いておきながら、いきなり混合型です。
１つのセグメント内にデータ部と命令部（手続き部）が混在しています。といってもリンカが出力するリンクマップを見るとセグメントの前半がデータ部、後半が命令部と分けられているようです。

１つのセグメントで構成され、サイズは最大６３キロバイトです。

他の種類のロードモジュールとは実行モードが異なるので、実行スピードが劣るそうです。

このタイプだと最大でも６３キロバイト分の大きさのプログラムしか作れません。 はるか昔１９７０年や１９８０年頃はオフコンの搭載メモリも１メガバイトあるかどうかというものでした。（今はパソコンでもメモリは数ギガバイトありますよね。）その頃に誕生したタイプのＬＭです。１メガバイトもないようなメモリでも実行できるタイプです。
なので今は積極的にこのタイプのＬＭを作るような場面はありません。

Ａ−ＶＸ０２のような最新のＯＳでも１９７０年や１９８０年頃に作ったロードモジュールがそのまま動きます、ということを表します。

ユーティリティにも混合型ＬＭのものがいくつもあります。今でも動いている例としてよく挙がるので#BEDITで１セグメントでそのサイズは12キロバイトぐらい、#ALLOCがサイズが63キロバイトぐらいです。

混合型ＬＭもさらに細かく分類すると４つの形態に分かれるようです。

混合型ＬＭの４形態

形　態	概　要
シンプル構造ノンシェアラブル型ＬＭ	最も単純な構造のＬＭ
リージョン構造ＬＭ	手続き部をリージョン構造にオーバレイしているＬＭ
トリー構造ＬＭ	手続き部をトリー構造にオーバレイしているＬＭ
シンプル構造リエントラント型ＬＭ	シンプルノンシェアラブルをリエントラント化したＬＭ

形態別に細かい説明もいまさら不要だと思うのでこれ以上は立ち入りません。

６　分離型ＬＭ

ノンシェラブルセグメント（つまりデータ部）のセグメントが１つ、リエントラントセグメント（つまり命令部）のセグメントが１つの計２個のセグメントで構成されるＬＭです。

データ部が最大６３キロバイト、命令部が最大６３キロバイトのプログラムまではこの分離型ＬＭとして作ることができます。

これも古いタイプのロードモジュールで、たぶん「混合型ＬＭだと大きなサイズのプログラムができない」と言われて作ったタイプかなと思います。でも２つのセグメント合わせても１２６キロバイトのサイズのロードモジュールしか作れません。

分離型ＬＭも混合型ＬＭと同様に実行スピードが劣るそうなので、今コンパイル／リンク時に積極的にこのタイプを選択する必要はありません。

混合型ＬＭと同様に従来互換のためのＬＭです。

ユーティリティにもいくつか分離型ＬＭがあります。#ABANAはノンシェラブルセグメントが６３キロバイト、リエントラントセグメントが３２キロバイトの分離型ＬＭです。

ちなみにＡ−ＶＸ０２でもこのタイプのＬＭを作ることはできます。ＣＯＢＯＬコンパイラ（COBOL74規格の古い方のコンパイラね）でCSGパラメータにSEPARATE指定してコンパイルし、リンクするとできます。

分離ＬＭもさらに細かく分類すると３つの形態に分かれるようです。

分離型ＬＭの３形態

形　態	概　要
シンプル構造ノンシェアラブル型／リエントラント型ＬＭ	データ部と手続き部が分かれた単純構造のＬＭ
リージョン構造ＬＭ	手続き部をリージョン構造にオーバレイしているＬＭ
トリー構造ＬＭ	手続き部をトリー構造にオーバレイしているＬＭ

分離型ＬＭも今新規に作ることもあまりないため、形態別に細かい説明もいまさら不要だと思うのでこれ以上は立ち入りません。

６　複数分離型ＬＭ

これが今の標準のタイプのＬＭです。

複数のセグメント構成で最大６メガバイトのＬＭを作ることができます。

ノンシェラブルセグメントがデータ部を集めたセグメント、リエントラントセグメントが命令部を集めたセグメントです。
最小構成でノンシェラブルセグメント１個、リエントラントセグメント１個の２セグメント構成。セグメントの組み合わせは自由で、例えばデータ部が多いならノンシェラブルセグメントが２０個、リエントラントセグメントが１個みたいな構成もできます。
１セグメントのサイズは最小４キロバイト、最大６４キロバイト。

ＣＯＢＯＬ８５コンパイラでＬＭを作るとデフォルトでこのタイプのＬＭになります。

複数分離型ＬＭもさらに細かく分類すると２つの形態に分かれるようです。

分離型ＬＭの２形態

形　態	概　要
シンプル構造ノンシェアラブル型／リエントラント型ＬＭ	データ部と手続き部が分かれた単純構造のＬＭ
リージョン構造ＬＭ	手続き部をリージョン構造にオーバレイしているＬＭ

オーバレイ構造のＬＭは、１個の常駐セグメントと複数の非常駐セグメントから構成され、ＬＭの実行時、常駐セグメントは常時メモリに存在し、非常駐セグメントは制御が移るたびにメモリにロードされます。非常駐セグメントはシステムが自動的に必要になればメモリ上に読み込み、不要になればメモリ上から削除されるため、メモリ空間を節約できます。
今のオフコンはメモリは数ギガバイト搭載しています。１セグメント６４キロバイトです。（1キロ＝0.001メガ＝0.00001ギガです）それが複数あったとしてもメモリの節約量はわずかです。使用できるメモリが少なかった昔に使用メモリを節約するために用意された形態です。
シンプル構造のＬＭを作れば問題ないです。今ならオーバレイで作る必要はありません。オーバレイ構造はセグメント構成を考える必要があるので面倒です。

６　高速型ＬＭ

特殊なＬＭで、このタイプはシステムユーティリティしかないようです。

構造は複数分離型ＬＭと同じなようです。普通のＬＭよりも高速に実行できるタイプのＬＭのようです。

調べたところ#MERGEや#SORTがこのタイプでした。

Ａ−ＶＸ３時代に一時的にこのタイプのＬＭを出力する専用のコンパイラがありましたが、カスタマイズしすぎたのかこのコンパイラで出力したＬＭはＡ−ＶＸ４以降で動きません。このような問題があったからなのかＡ−ＶＸ４以降ではこのコンパイラは使用できない（インストールできない）＆販売中止になっています。
私はこのコンパイラは製品説明ぐらいしか見たことがないので、詳細はよくわかりません。

７　ロードモジュールのセグメントを深堀してみる

ＣＯＢＯＬプログラムをコンパイルしてリンクするとロードモジュールができます。

リンクするときに出力されるリンクマップを見るとセグメントの状態がわかります。それで少しセグメントについて説明したいと思います。

下があるプログラムをリンクした結果出力されたリスト（の一部）です。使用するところだけ載せています。
「MAP LIST」から「END OF MAP LIST」までがリンクマップです。

ＣＯＢＯＬ８５で作成したプログラムをリンクしました。複数分離型ＬＭです。

MAP LIST RESIDENT PART ******************************* *** DATA PART ****************************** ******** SEGMENT 0000 (0004) SIZE = 00001928 ( 6440) FILE CU-NAME REV. COMPILED ATR LANG SIZE FROM -TO ADDR EXT/COMM SIZE SEG. STAC 000002A0 ( 672) 00040100-0004039F SCF LNK@OV 0018 62/03/14 DATA SYS 0000001A ( 26) 000403A0-000403B9 LNK@OVSG 000403B4 SCF SYS@ID V101 94/08/11 S006 SYS 00000002 ( 2) 000403BC-000403BD SCF SYS@ID V101 94/08/11 S001 SYS 00000634 ( 1588) 000403C0-000409F3 SYS@IDPB 000405E4 CUF1 PERENT 0003 26/05/26 S100 CBL 000000AC ( 172) 000409F4-00040A9F 0005099C COB@4APR 0001 000509FC COB@0VDP 0001 00050878 CHILD1 0001 000508F0 CHILD2 0001 00050BC8 COB@0UAP 0001 00050D90 COB@0XSR 0001 00050DE8 COB@0BEP 0001 CUF1 CHILD1 0002 26/05/26 S100 CBL 00000064 ( 100) 00040AA0-00040B03 0005099C COB@4APR 0001 000509FC COB@0VDP 0001 00050DE8 COB@0BEP 0001 00050D90 COB@0XSR 0001 CUF1 CHILD2 0002 26/05/26 S100 CBL 0000009C ( 156) 00040B04-00040B9F 0005099C COB@4APR 0001 00050BC8 COB@0UAP 0001 000509FC COB@0VDP 0001 00050DE8 COB@0BEP 0001 00050D90 COB@0XSR 0001 SCF SYS@0V 0022 01/03/16 DATA SYS 00000074 ( 116) 00040BA0-00040C13 00050CB0 COB@9AAB 0001 00050F0C COB@9WWK 0001 SCF SYS@0U 0006 87/04/21 DATA SYS 0000004C ( 76) 00040C14-00040C5F 00050CB0 COB@9AAB 0001 00050F0C COB@9WWK 0001 SCF SYS@9A 0005 91/05/21 DATA SYS 00000074 ( 116) 00040C60-00040CD3 COB@9ACM 00040C60 COB@9ACC 00040C60 COB@9ASV 00040C70 COB@9AAB 00040CB0 COB@9ADB 00040CC0 SCF SYS@IT 0001 84/07/29 DATA SYS 00000010 ( 16) 00040CD4-00040CE3 SCF SYS@9W 0006 93/03/08 DATA SYS 00000B28 ( 2856) 00040CE4-0004180B COB@9WDT 00040CE4 COB@9WWK 00040F0C COB@9WPS 0004170C SCF SYS@9G 0003 94/08/09 DATA SYS 0000011C ( 284) 0004180C-00041927 COB@9GEP 0004180C COB@9GCA 00041910 COB@9GDB 00041914 *** PROC PART ****************************** ******** SEGMENT 0001 (0005) SIZE = 00000E74 ( 3700) FILE CU-NAME REV. COMPILED ATR LANG SIZE FROM -TO ADDR EXT/COMM SIZE SEG. SCF LNK@OV 0018 62/03/14 PROC SYS 000000AA ( 170) 00050000-000500A9 LNK@OVCA 00050026 LNK@OVLD 00050024 LNK@OVBC 00050000 LNK@OVBL 00050012 LNK@OVIT 00050070 SCF SYS@ID V101 94/08/11 S003 SYS 000006FC ( 1788) 000500AC-000507A7 SYS@ID 000500AC SYS@IDPT 0005061A CUF1 PERENT 0003 26/05/26 S000 CBl 000000D0 ( 208) 000507A8-00050877 PERENT 000507A8 CUF1 CHILD1 0002 26/05/26 S000 CBl 00000078 ( 120) 00050878-000508EF CHILD1 00050878 CUF1 CHILD2 0002 26/05/26 S000 CBl 000000AA ( 170) 000508F0-00050999 CHILD2 000508F0 SCF SYS@4A 0004 84/07/28 PROC SYS 0000005E ( 94) 0005099C-000509F9 COB@4APR 0005099C 00040CB0 COB@9AAB 0000 00050E34 SYS@ITEM 0001 00040F0C COB@9WWK 0000 00040C60 COB@9ACM 0000 SCF SYS@0V 0022 01/03/16 PROC SYS 000001CC ( 460) 000509FC-00050B COB@0VDP 000509FC SCF SYS@0U 0006 87/04/21 PROC SYS 000001C6 ( 454) 00050BC8-00050D COB@0UAP 00050BC8 SCF SYS@0X 0001 92/03/30 PROC SYS 00000056 ( 86) 00050D90-00050D COB@0XSR 00050D90 00040CB0 COB@9AAB 0000 00041910 COB@9GCA 0000 00040C60 COB@9ACM 0000 SCF SYS@0B 0003 87/04/20 PROC SYS 0000004A ( 74) 00050DE8-00050E COB@0BEP 00050DE8 00040CB0 COB@9AAB 0000 00050E34 SYS@ITEM 0001 SCF SYS@IT 0001 84/07/29 PROC SYS 0000003E ( 62) 00050E34-00050E SYS@ITEN 00050E34 END OF MAP LIST LOAD SEGMENT GRAPH LIST LM FORM = ADM 2 RESIDENT PART ******************* **** DATA PART ****************** LSA = 004 LSEG-ID. ADDR SIZE:HEX(DEC) MAIN CU ....-....1....-....2 LSEG0000 0000 01928( 6440) PERENT ******* **** PROC PART ****************** LSA = 005 LSEG-ID. ADDR SIZE:HEX(DEC) MAIN CU ....-....1....-....2 LSEG0001 0000 00E74( 3700) PERENT **** END OF LOAD SEGMENT GRAPH LIST

まず大きく見るとDATA PARTとPROC PARTに分かれています。
DATA PARTがデータ部（つまりノンシェラブルセグメント）のセグメント群、PROC PARTが命令部（つまりリエントラントセグメント）のセグメント群になります。

もう少し詳細にみていきましょう。 DATA PARTの次の行に「SEGMENT 0000 (0004)」と書いてあります。ここから下はSEGMENT 0000の情報になります。0000はセグメント番号と言ってセグメントに順番につけられている番号です。セグメント番号が0のセグメントの情報になります。 DATA PARTにはセグメント番号0のセグメントしかありません。もしDATA PART中にSEGMENT 0001とかSEGMENT 0002とかがあれば、データ部に複数のセグメントがあることになります。今回はデータ部のセグメントは、セグメント番号0のセグメントが1つだけということになります。

次にPROC PARTを見てみます。「SEGMENT 0001 (0005)」があります。命令部にはセグメント番号0001のセグメントが１つだけあります。

今回はデータ部のセグメントが１つ、命令部のセグメントが１つ、合計２つのセグメントを持つ一番単純な複数分離型ＬＭでした。（分離型ＬＭも2つのセグメントを持ちますが、今回は複数分離型ＬＭを指定してリンクしているので複数分離型ＬＭです。）

データ部と命令部のセグメントは連番になっています。例えばデータ部のセグメントが４つ、命令部のセグメントが３つあるときは、データ部はセグメント番号0000、0001、0002、0003、命令部はセグメント番号0004、0005、0006のセグメントがあるはずです。

「SEGMENT 0000 (0004)」の括弧の中の４桁の数字はＬＳＡ番号といいます。セグメントをメモリ上に読み込んだ時の番号です。セグメント番号とはまた違う番号です。

シンプル構造ノンシェアラブル型／リエントラント型ＬＭの場合は、セグメント番号＋４の値がＬＳＡ番号になります。単純構造なので。

リージョン構造ＬＭの場合は、オーバレイしているセグメントは同じＬＳＡ番号になります。例えばセグメント番号0008とセグメント番号0009がオーバーレイしているのならば「SEGMENT 0008 (0012)」「SEGMENT 0009(0012)」のように同じＬＳＡ番号になります。

「SEGMENT 0000 (0004)」の次にLNK@OVとかSYS@IDとかPERENTとかいろいろ書いてある行があります。これが何かというと、このセグメントを構成しているソースプログラムの名前です。xxx@xxxとなっているのはたいていシステムが用意したプログラムです。あなたが作ったＣＯＢＯＬプログラムをリンクするとシステムが必要なプログラムをいろいろとくっつけてロードモジュールを作ってくれます。

私が作ったのはPERENT、CHILD1、CHILD2という３つの小さなプログラムだけなのですが、リンク時にシステムが必要なプログラムを自動的にくっつけてくれました。

セグメント番号0000のセグメントは１２個のプログラムから構成されています。セグメント番号0001のセグメントは１１個のプログラムから構成されています。

このようにロードモジュールは、複数のセグメント（混合型ＬＭは１つのセグメント）から構成され、そのセグメントの中もたくさんのプログラムで構成されています。

「LOAD SEGMENT GRAPH LIST」から「END OF LOAD SEGMENT GRAPH LIST」の間はロードセグメントのサイズなどの情報をまとめたものです。

「LM FORM = ADM 2」の意味ですが、ADM2は複数分離型ＬＭを意味します。ADM0が混合型、ADM1が分離型です。
「DATA PART」の「LSA = 004」はLSA番号が0004ということ。「LSEG0000 0000 01928( 6440) PERENT」はLSA番号が0004のセグメントはセグメント番号0000の１つだけで、そのサイズは十進数で6440バイト、メインのCUはPERENT。
「PROC PART」の「LSA = 005」はLSA番号が0005ということ。「LSEG0001 0000 00E74( 3700) PERENT」はLSA番号が0005のセグメントはセグメント番号0001の１つだけで、そのサイズは十進数で3700バイト、メインのCUはPERENT。