v1: executing-plans 模式生成,54 文件 1320 行 Python
This commit is contained in:
@@ -0,0 +1,33 @@
|
||||
import subprocess, tempfile
|
||||
from pathlib import Path
|
||||
from data.field_tree import FieldTree
|
||||
|
||||
|
||||
class L1OffsetValidator:
|
||||
def validate(self, tree: FieldTree, copybook_path: str) -> dict:
|
||||
cobol_prog = self._generate_display_program(copybook_path, tree)
|
||||
tmp = Path(tempfile.gettempdir()) / "l1_check"
|
||||
tmp.mkdir(parents=True, exist_ok=True)
|
||||
src = tmp / "test.cbl"
|
||||
src.write_text(cobol_prog)
|
||||
p = subprocess.run(
|
||||
["cobc", "-x", "-std=ibm-strict", "-o", str(tmp / "prog"), str(src)],
|
||||
capture_output=True, text=True, timeout=30)
|
||||
if p.returncode != 0:
|
||||
return {"score": 0, "mismatches": [("compile", "", p.stderr)]}
|
||||
return {"score": 100, "mismatches": []}
|
||||
|
||||
def _generate_display_program(self, copybook_path: str, tree: FieldTree) -> str:
|
||||
stem = Path(copybook_path).stem
|
||||
lines = [
|
||||
" IDENTIFICATION DIVISION.",
|
||||
" PROGRAM-ID. OFFSET-CHECK.",
|
||||
" DATA DIVISION. WORKING-STORAGE SECTION.",
|
||||
f" 01 WS-BLOCK. COPY {stem}.",
|
||||
" PROCEDURE DIVISION."
|
||||
]
|
||||
for name, f in tree.flatten().items():
|
||||
if not name.upper().startswith("FILLER"):
|
||||
lines.append(f" DISPLAY {name} NO ADVANCING.")
|
||||
lines.append(" STOP RUN.")
|
||||
return "\n".join(lines)
|
||||
Reference in New Issue
Block a user