arc-1 1.3.0 → 1.5.0

package/dist/handlers/write/class-edit.d.ts

@@ -0,0 +1,16 @@
+import type { AdtHttpClient } from '../../adt/http.js';
+import type { ClassStructure } from '../../adt/types.js';
+import type { ToolResult } from '../shared.js';
+import type { SapWriteContext } from './context.js';
+interface ClassEdit {
+    http: AdtHttpClient;
+    read(url: string): Promise<string>;
+    readMainAndStructure(): Promise<{
+        main: string;
+        structure: ClassStructure;
+    }>;
+    save(url: string, source: string): Promise<void>;
+}
+export declare function withClassEdit(ctx: SapWriteContext, edit: (locked: ClassEdit) => Promise<ToolResult>): Promise<ToolResult>;
+export {};
+//# sourceMappingURL=class-edit.d.ts.map

package/dist/handlers/write/class-edit.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"class-edit.d.ts","sourceRoot":"","sources":["../../../src/handlers/write/class-edit.ts"],"names":[],"mappings":"AAEA,OAAO,KAAK,EAAE,aAAa,EAAE,MAAM,mBAAmB,CAAC;AAGvD,OAAO,KAAK,EAAE,cAAc,EAAE,MAAM,oBAAoB,CAAC;AAIzD,OAAO,KAAK,EAAE,UAAU,EAAE,MAAM,cAAc,CAAC;AAC/C,OAAO,KAAK,EAAE,eAAe,EAAE,MAAM,cAAc,CAAC;AAEpD,UAAU,SAAS;IACjB,IAAI,EAAE,aAAa,CAAC;IACpB,IAAI,CAAC,GAAG,EAAE,MAAM,GAAG,OAAO,CAAC,MAAM,CAAC,CAAC;IACnC,oBAAoB,IAAI,OAAO,CAAC;QAAE,IAAI,EAAE,MAAM,CAAC;QAAC,SAAS,EAAE,cAAc,CAAA;KAAE,CAAC,CAAC;IAC7E,IAAI,CAAC,GAAG,EAAE,MAAM,EAAE,MAAM,EAAE,MAAM,GAAG,OAAO,CAAC,IAAI,CAAC,CAAC;CAClD;AAED,wBAAsB,aAAa,CACjC,GAAG,EAAE,eAAe,EACpB,IAAI,EAAE,CAAC,MAAM,EAAE,SAAS,KAAK,OAAO,CAAC,UAAU,CAAC,GAC/C,OAAO,CAAC,UAAU,CAAC,CAiDrB"}

package/dist/handlers/write/class-edit.js

@@ -0,0 +1,55 @@
+/** Keep a class surgery's source, structure and write within one SAP lock. */
+import { lockObject, unlockObject, updateSource } from '../../adt/crud.js';
+import { checkOperation, OperationType } from '../../adt/safety.js';
+import { assertSourceHash } from '../../adt/source-precondition.js';
+import { parseClassStructure } from '../../adt/xml-parser.js';
+import { logger } from '../../server/logger.js';
+import { getCachedFeatures } from '../feature-cache.js';
+export async function withClassEdit(ctx, edit) {
+    const { client, objectUrl, srcUrl, name, transport, invalidateWrittenObject } = ctx;
+    checkOperation(client.safety, OperationType.Update, 'EditClass');
+    return client.http.withStatefulSession(async (session) => {
+        const lock = await lockObject(session, client.safety, objectUrl, 'MODIFY', getCachedFeatures()?.abapRelease);
+        let writeAttempted = false;
+        const read = async (url, checkSource = true) => {
+            checkOperation(client.safety, OperationType.Read, 'GetSource');
+            // SAP returns the editable draft (active when none exists). Both endpoints must use
+            // this same selection under the lock; caches and inactive worklists can be stale.
+            const source = (await session.get(url, { 'Cache-Control': 'no-cache' })).body;
+            if (checkSource)
+                assertSourceHash(source, ctx.args.expectedSourceHash, url);
+            return source;
+        };
+        try {
+            return await edit({
+                http: session,
+                read,
+                async readMainAndStructure() {
+                    const main = await read(srcUrl);
+                    const structure = parseClassStructure(await read(`${objectUrl}/objectstructure`, false), name);
+                    return { main, structure };
+                },
+                async save(url, source) {
+                    writeAttempted = true;
+                    await updateSource(session, client.safety, url, source, lock.lockHandle, transport ?? (lock.corrNr || undefined));
+                },
+            });
+        }
+        finally {
+            try {
+                await unlockObject(session, objectUrl, lock.lockHandle);
+            }
+            finally {
+                if (writeAttempted) {
+                    try {
+                        invalidateWrittenObject('CLAS', name);
+                    }
+                    catch {
+                        logger.warn('Class surgery cache invalidation failed after a write attempt.');
+                    }
+                }
+            }
+        }
+    });
+}
+//# sourceMappingURL=class-edit.js.map

package/dist/handlers/write/class-edit.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"class-edit.js","sourceRoot":"","sources":["../../../src/handlers/write/class-edit.ts"],"names":[],"mappings":"AAAA,8EAA8E;AAC9E,OAAO,EAAE,UAAU,EAAE,YAAY,EAAE,YAAY,EAAE,MAAM,mBAAmB,CAAC;AAE3E,OAAO,EAAE,cAAc,EAAE,aAAa,EAAE,MAAM,qBAAqB,CAAC;AACpE,OAAO,EAAE,gBAAgB,EAAE,MAAM,kCAAkC,CAAC;AAEpE,OAAO,EAAE,mBAAmB,EAAE,MAAM,yBAAyB,CAAC;AAC9D,OAAO,EAAE,MAAM,EAAE,MAAM,wBAAwB,CAAC;AAChD,OAAO,EAAE,iBAAiB,EAAE,MAAM,qBAAqB,CAAC;AAWxD,MAAM,CAAC,KAAK,UAAU,aAAa,CACjC,GAAoB,EACpB,IAAgD;IAEhD,MAAM,EAAE,MAAM,EAAE,SAAS,EAAE,MAAM,EAAE,IAAI,EAAE,SAAS,EAAE,uBAAuB,EAAE,GAAG,GAAG,CAAC;IACpF,cAAc,CAAC,MAAM,CAAC,MAAM,EAAE,aAAa,CAAC,MAAM,EAAE,WAAW,CAAC,CAAC;IACjE,OAAO,MAAM,CAAC,IAAI,CAAC,mBAAmB,CAAC,KAAK,EAAE,OAAO,EAAE,EAAE;QACvD,MAAM,IAAI,GAAG,MAAM,UAAU,CAAC,OAAO,EAAE,MAAM,CAAC,MAAM,EAAE,SAAS,EAAE,QAAQ,EAAE,iBAAiB,EAAE,EAAE,WAAW,CAAC,CAAC;QAC7G,IAAI,cAAc,GAAG,KAAK,CAAC;QAC3B,MAAM,IAAI,GAAG,KAAK,EAAE,GAAW,EAAE,WAAW,GAAG,IAAI,EAAE,EAAE;YACrD,cAAc,CAAC,MAAM,CAAC,MAAM,EAAE,aAAa,CAAC,IAAI,EAAE,WAAW,CAAC,CAAC;YAC/D,oFAAoF;YACpF,kFAAkF;YAClF,MAAM,MAAM,GAAG,CAAC,MAAM,OAAO,CAAC,GAAG,CAAC,GAAG,EAAE,EAAE,eAAe,EAAE,UAAU,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC;YAC9E,IAAI,WAAW;gBAAE,gBAAgB,CAAC,MAAM,EAAE,GAAG,CAAC,IAAI,CAAC,kBAAwC,EAAE,GAAG,CAAC,CAAC;YAClG,OAAO,MAAM,CAAC;QAChB,CAAC,CAAC;QACF,IAAI,CAAC;YACH,OAAO,MAAM,IAAI,CAAC;gBAChB,IAAI,EAAE,OAAO;gBACb,IAAI;gBACJ,KAAK,CAAC,oBAAoB;oBACxB,MAAM,IAAI,GAAG,MAAM,IAAI,CAAC,MAAM,CAAC,CAAC;oBAChC,MAAM,SAAS,GAAG,mBAAmB,CAAC,MAAM,IAAI,CAAC,GAAG,SAAS,kBAAkB,EAAE,KAAK,CAAC,EAAE,IAAI,CAAC,CAAC;oBAC/F,OAAO,EAAE,IAAI,EAAE,SAAS,EAAE,CAAC;gBAC7B,CAAC;gBACD,KAAK,CAAC,IAAI,CAAC,GAAG,EAAE,MAAM;oBACpB,cAAc,GAAG,IAAI,CAAC;oBACtB,MAAM,YAAY,CAChB,OAAO,EACP,MAAM,CAAC,MAAM,EACb,GAAG,EACH,MAAM,EACN,IAAI,CAAC,UAAU,EACf,SAAS,IAAI,CAAC,IAAI,CAAC,MAAM,IAAI,SAAS,CAAC,CACxC,CAAC;gBACJ,CAAC;aACF,CAAC,CAAC;QACL,CAAC;gBAAS,CAAC;YACT,IAAI,CAAC;gBACH,MAAM,YAAY,CAAC,OAAO,EAAE,SAAS,EAAE,IAAI,CAAC,UAAU,CAAC,CAAC;YAC1D,CAAC;oBAAS,CAAC;gBACT,IAAI,cAAc,EAAE,CAAC;oBACnB,IAAI,CAAC;wBACH,uBAAuB,CAAC,MAAM,EAAE,IAAI,CAAC,CAAC;oBACxC,CAAC;oBAAC,MAAM,CAAC;wBACP,MAAM,CAAC,IAAI,CAAC,gEAAgE,CAAC,CAAC;oBAChF,CAAC;gBACH,CAAC;YACH,CAAC;QACH,CAAC;IACH,CAAC,CAAC,CAAC;AACL,CAAC"}

package/dist/handlers/write/class-surgery.d.ts

@@ -1,8 +1,8 @@
 /**
  * SAPWrite actions — class-section surgery (issue #303).
  *
- * These actions share a common shape: fetch objectstructure → optional diff/refuse → splice into
- * /source/main (or /includes/<inc> when include= is set) → PUT under lock → no auto-activate.
+ * These actions share a common shape: lock → fresh source/structure → optional diff/refuse → splice into
+ * /source/main (or /includes/<inc> when include= is set) → PUT → unlock, with no auto-activation.
  * Pre-write lint runs on the SPLICED FULL source (not the partial input fragment) because a raw
  * DEFINITION block alone fails abaplint with "Expected CLASSIMPLEMENTATION" (verified live on a4h);
  * lint is skipped for include= writes (same precedent as the `update include=` path).

package/dist/handlers/write/class-surgery.d.ts.map

@@ -1 +1 @@
-{"version":3,"file":"class-surgery.d.ts","sourceRoot":"","sources":["../../../src/handlers/write/class-surgery.ts"],"names":[],"mappings":"AAAA;;;;;;;;GAQG;AAwBH,OAAO,EAAe,KAAK,UAAU,EAAc,MAAM,cAAc,CAAC;AAExE,OAAO,KAAK,EAAE,eAAe,EAAE,MAAM,cAAc,CAAC;AAEpD,wBAAsB,qBAAqB,CAAC,GAAG,EAAE,eAAe,GAAG,OAAO,CAAC,UAAU,CAAC,CA8IrF;AAED,wBAAsB,8BAA8B,CAAC,GAAG,EAAE,eAAe,GAAG,OAAO,CAAC,UAAU,CAAC,CAqH9F;AAED,wBAAsB,8BAA8B,CAAC,GAAG,EAAE,eAAe,GAAG,OAAO,CAAC,UAAU,CAAC,CAkE9F;AAED,wBAAsB,oBAAoB,CAAC,GAAG,EAAE,eAAe,GAAG,OAAO,CAAC,UAAU,CAAC,CAiGpF;AAED,wBAAsB,uBAAuB,CAAC,GAAG,EAAE,eAAe,GAAG,OAAO,CAAC,UAAU,CAAC,CA6DvF;AAED,wBAAsB,iCAAiC,CAAC,GAAG,EAAE,eAAe,GAAG,OAAO,CAAC,UAAU,CAAC,CAsFjG"}
+{"version":3,"file":"class-surgery.d.ts","sourceRoot":"","sources":["../../../src/handlers/write/class-surgery.ts"],"names":[],"mappings":"AAAA;;;;;;;;GAQG;AAwBH,OAAO,EAAe,KAAK,UAAU,EAAc,MAAM,cAAc,CAAC;AAGxE,OAAO,KAAK,EAAE,eAAe,EAAE,MAAM,cAAc,CAAC;AAEpD,wBAAsB,qBAAqB,CAAC,GAAG,EAAE,eAAe,GAAG,OAAO,CAAC,UAAU,CAAC,CAmGrF;AAED,wBAAsB,8BAA8B,CAAC,GAAG,EAAE,eAAe,GAAG,OAAO,CAAC,UAAU,CAAC,CAuF9F;AAED,wBAAsB,8BAA8B,CAAC,GAAG,EAAE,eAAe,GAAG,OAAO,CAAC,UAAU,CAAC,CA6C9F;AAED,wBAAsB,oBAAoB,CAAC,GAAG,EAAE,eAAe,GAAG,OAAO,CAAC,UAAU,CAAC,CAmFpF;AAED,wBAAsB,uBAAuB,CAAC,GAAG,EAAE,eAAe,GAAG,OAAO,CAAC,UAAU,CAAC,CAwCvF;AAED,wBAAsB,iCAAiC,CAAC,GAAG,EAAE,eAAe,GAAG,OAAO,CAAC,UAAU,CAAC,CA2EjG"}