PART 04 — シンボル・リストファイルから手がかりを集める
コンパイルリスト・リンカーマップの読み方と依存関係グラフの作成

# PROGRAM-ID の一覧
grep -i "PROGRAM-ID" module.lst

# ENTRY 文の一覧
grep -i "^\s*ENTRY\b" module.lst

# CALL 文の一覧（静的 CALL）
grep -iE "^\s*CALL\s+'[A-Z0-9-]+'" module.lst

# CALL 文の一覧（動的 CALL、変数呼び出し）
grep -iE "^\s*CALL\s+[A-Z][A-Z0-9-]*\b" module.lst

# GnuCOBOL でリンカーマップを生成してコンパイル
cobc -x -Wl,-Map=output.map main.cbl

# エントリポイントシンボルを抽出（COBOL プログラム名は先頭が数字になることがある）
grep -E "^\s+0x[0-9a-f]+" output.map | grep -i "cob_"

# エントリポイントに絞り込む（GLOBAL シンボル）
nm -g --defined-only output.so | grep " T "

# グローバルシンボル一覧（T=テキストセクション関数）
nm -g --defined-only libmodule.so

# 全シンボル（未定義含む）
nm -a libmodule.so

# セクション情報とシンボルサイズ
objdump -t libmodule.so | grep -v "^0\{16\}"

# 文字列の検索（コンパイラ情報・PROGRAM-ID 残存確認）
strings libmodule.so | grep -i "cobol\|gnucobol\|program\|version"

# 依存ライブラリの確認
readelf -d libmodule.so | grep NEEDED

//AMBLIST  JOB  CLASS=A,MSGCLASS=X
//STEP1    EXEC PGM=AMBLIST
//SYSPRINT DD   SYSOUT=*
//SYSLIB   DD   DSN=YOUR.LOADLIB,DISP=SHR
//SYSIN    DD   *
  LISTLOAD OUTPUT=XREF,MEMBER=YOURMOD
/*

#!/bin/bash
# 各 .lst ファイルから PROGRAM-ID → CALL 先の関係を抽出してCSV出力
echo "caller,callee"
for lst in *.lst; do
  # PROGRAM-ID を取得
  caller=$(grep -i "PROGRAM-ID" "$lst" | head -1 | grep -oiE "[A-Z0-9-]{2,30}" | tail -1)
  # 静的 CALL の CALLEE を取得
  grep -iE "CALL\s+'([A-Z0-9-]+)'" "$lst" \
    | grep -oiE "'[A-Z0-9-]+'" \
    | tr -d "'" \
    | sort -u \
    | while read callee; do
        echo "$caller,$callee"
      done
done