@atlisp/mcp 1.4.1 → 1.4.3

package/dist/cad-worker.js

@@ -331,6 +331,42 @@ const cadBringToFront = edge.func(function() {/*
   }
  */});
 
+const cadConnectByName = edge.func(function() {/*
+  async (input) => {
+      try {
+          string platform = input.ToString();
+          string progId = platform + ".Application";
+          dynamic cad = System.Runtime.InteropServices.Marshal.GetActiveObject(progId);
+          if (cad != null) {
+              string ver = cad.Version.ToString();
+              return new { success = true, platform = platform, version = ver, launched = false };
+          }
+      } catch (Exception ex) {
+          System.Diagnostics.Debug.WriteLine("cadConnectByName existing error: " + ex.Message);
+      }
+      try {
+          string platform = input.ToString();
+          string progId = platform + ".Application";
+          var type = System.Type.GetTypeFromProgID(progId);
+          if (type != null) {
+              dynamic cad = System.Activator.CreateInstance(type);
+              if (cad != null) {
+                  for (int retry = 0; retry < 60; retry++) {
+                      await System.Threading.Tasks.Task.Delay(500);
+                      try {
+                          string ver = cad.Version.ToString();
+                          return new { success = true, platform = platform, version = ver, launched = true };
+                      } catch {}
+                  }
+              }
+          }
+      } catch (Exception ex) {
+          System.Diagnostics.Debug.WriteLine("cadConnectByName launch error: " + ex.Message);
+      }
+      return new { success = false, error = "Not found" };
+  }
+ */});
+
 async function waitForIdle(platform) {
   let retries = BUSY_RETRIES;
   while (retries > 0) {
@@ -379,11 +415,23 @@ export function checkParens(code) {
   return { valid: true };
 }
 
+async function connectToPlatform(targetPlatform) {
+  return new Promise((resolve, reject) => {
+    cadConnectByName(targetPlatform, (e, r) => {
+      if (e) reject(e);
+      else resolve(r);
+    });
+  });
+}
+
 async function handleMessage(msg) {
   if (msg.type === 'ping') {
     return { pong: true };
   }
   if (msg.type === 'connect') {
+    if (msg.platform) {
+      return await connectToPlatform(msg.platform);
+    }
     try {
       const result = await new Promise((resolve, reject) => {
         cadConnect({}, (e, r) => {

package/package.json

@@ -1,6 +1,6 @@
 {
     "name": "@atlisp/mcp",
-    "version": "1.4.1",
+    "version": "1.4.3",
     "description": "MCP Server for @lisp on CAD",
     "type": "module",
     "bin": {