@atlisp/mcp 1.0.6 → 1.0.7

package/README.md

@@ -123,6 +123,9 @@ atlisp-mcp
 | `TRANSPORT` | `http` | 传输模式：`http` 或 `stdio` |
 | `PORT` | `8110` | HTTP 模式监听端口 |
 | `HOST` | `0.0.0.0` | HTTP 模式监听地址 |
+| `MESSAGE_TIMEOUT` | `60000` | 消息超时（毫秒） |
+| `BUSY_RETRIES` | `10` | CAD 忙碌时重试次数 |
+| `BUSY_DELAY` | `500` | CAD 忙碌重试间隔（毫秒） |
 
 ## API
 

package/package.json

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

package/src/cad-worker.js

@@ -2,6 +2,9 @@
 import edge from 'edge-js';
 import process from 'process';
 
+const BUSY_RETRIES = parseInt(process.env.BUSY_RETRIES || '10', 10);
+const BUSY_DELAY = parseInt(process.env.BUSY_DELAY || '500', 10);
+
 const cadConnect = edge.func(function() {/*
   async (input) => {
       // Try existing CAD instances
@@ -104,16 +107,6 @@ const cadSend = edge.func(function() {/*
           dynamic cad = System.Runtime.InteropServices.Marshal.GetActiveObject(progId);
           if (cad != null) {
               dynamic doc = cad.ActiveDocument;
-              if (doc == null || doc.Name == "") {
-                  string templatePath = @"C:\Users\Public\Documents\AutoCAD 2024\Sample\basics.dwg";
-                  if (System.IO.File.Exists(templatePath)) {
-                      cad.Documents.Open(templatePath, false);
-                  } else {
-                      cad.Documents.Add("");
-                  }
-                  System.Threading.Thread.Sleep(2000);
-              }
-              doc = cad.ActiveDocument;
               if (doc != null) {
                   doc.SendCommand(code);
                   return new { success = true };
@@ -122,7 +115,7 @@ const cadSend = edge.func(function() {/*
       } catch {}
       return new { success = false };
   }
-*/});
+ */});
 
 const cadSendWithResult = edge.func(function() {/*
   async (input) => {
@@ -134,22 +127,13 @@ const cadSendWithResult = edge.func(function() {/*
       string tempDir = System.IO.Path.GetTempPath();
       string tempFile = System.IO.Path.Combine(tempDir, "atlisp_result_" + System.Guid.NewGuid().ToString("N") + ".txt");
       
-      string lispCode = code + "\n(setq _atlisp_result (princ-to-string " + code + "))(progn(setq f(open \"" + tempFile.Replace("\\", "\\\\") + "\" \"w\"))(write-line _atlisp_result f)(close f))\n";
+      // Use print to write result directly to file
+      string lispCode = "(progn(setq f(open \"" + tempFile.Replace("\\", "\\\\") + "\" \"w\"))(print " + code + " f)(close f))";
       
       try {
           dynamic cad = System.Runtime.InteropServices.Marshal.GetActiveObject(progId);
           if (cad != null) {
               dynamic doc = cad.ActiveDocument;
-              if (doc == null || doc.Name == "") {
-                  string templatePath = @"C:\Users\Public\Documents\AutoCAD 2024\Sample\basics.dwg";
-                  if (System.IO.File.Exists(templatePath)) {
-                      cad.Documents.Open(templatePath, false);
-                  } else {
-                      cad.Documents.Add("");
-                  }
-                  System.Threading.Thread.Sleep(2000);
-              }
-              doc = cad.ActiveDocument;
               if (doc != null) {
                   doc.SendCommand(lispCode + "\n");
                   System.Threading.Thread.Sleep(500);
@@ -157,7 +141,11 @@ const cadSendWithResult = edge.func(function() {/*
                   if (System.IO.File.Exists(tempFile)) {
                       string result = System.IO.File.ReadAllText(tempFile).Trim();
                       try { System.IO.File.Delete(tempFile); } catch {}
-                      return new { success = true, result = result };
+                      if (!string.IsNullOrEmpty(result)) {
+                          return new { success = true, result = result };
+                      }
+                      // Try evaluate result directly if file is empty
+                      return new { success = true, result = "" };
                   }
                   return new { success = true, result = "" };
               }
@@ -169,7 +157,7 @@ const cadSendWithResult = edge.func(function() {/*
       try { if (System.IO.File.Exists(tempFile)) System.IO.File.Delete(tempFile); } catch {}
       return new { success = false };
   }
-*/});
+ */});
 
 process.stdin.setEncoding('utf8');
 
@@ -242,6 +230,22 @@ const cadNewDoc = edge.func(function() {/*
   }
  */});
 
+async function waitForIdle(platform) {
+  let retries = BUSY_RETRIES;
+  while (retries > 0) {
+    const checkResult = await new Promise((resolve, reject) => {
+      cadIsBusy(platform || 'AutoCAD', (e, r) => {
+        if (e) reject(e);
+        else resolve(r);
+      });
+    });
+    if (!checkResult.isBusy) return true;
+    retries--;
+    if (retries > 0) await new Promise(resolve => setTimeout(resolve, BUSY_DELAY));
+  }
+  return false;
+}
+
 async function handleMessage(msg) {
   if (msg.type === 'connect') {
     return new Promise((resolve, reject) => {
@@ -277,19 +281,7 @@ async function handleMessage(msg) {
     if (!docCheck.hasDoc) {
       return { success: false, error: 'No open document' };
     }
-    let retries = 10;
-    while (retries > 0) {
-      const checkResult = await new Promise((resolve, reject) => {
-        cadIsBusy(msg.platform || 'AutoCAD', (e, r) => {
-          if (e) reject(e);
-          else resolve(r);
-        });
-      });
-      if (!checkResult.isBusy) break;
-      retries--;
-      if (retries > 0) await new Promise(resolve => setTimeout(resolve, 500));
-    }
-    if (retries === 0) {
+    if (!(await waitForIdle(msg.platform))) {
       return { success: false, error: 'CAD is busy, timeout' };
     }
     return new Promise((resolve, reject) => {
@@ -309,19 +301,7 @@ async function handleMessage(msg) {
     if (!docCheck.hasDoc) {
       return { success: false, error: 'No open document' };
     }
-    let retries = 10;
-    while (retries > 0) {
-      const checkResult = await new Promise((resolve, reject) => {
-        cadIsBusy(msg.platform || 'AutoCAD', (e, r) => {
-          if (e) reject(e);
-          else resolve(r);
-        });
-      });
-      if (!checkResult.isBusy) break;
-      retries--;
-      if (retries > 0) await new Promise(resolve => setTimeout(resolve, 500));
-    }
-    if (retries === 0) {
+    if (!(await waitForIdle(msg.platform))) {
       return { success: false, error: 'CAD is busy, timeout' };
     }
     return new Promise((resolve, reject) => {

package/src/cad.js

@@ -11,6 +11,8 @@ const FILE_EXTENSIONS = {
   'BricsCAD': ['.des']
 };
 
+const MESSAGE_TIMEOUT = parseInt(process.env.MESSAGE_TIMEOUT || '60000', 10);
+
 const __dirname = path.dirname(fileURLToPath(import.meta.url));
 const workerPath = path.join(__dirname, 'cad-worker.js');
 
@@ -44,7 +46,7 @@ function sendMessage(msg) {
         responded = true;
         reject(new Error('Timeout waiting for worker'));
       }
-    }, 60000);
+    }, MESSAGE_TIMEOUT);
     
     const handler = (data) => {
       try {

package/src/index.js

@@ -1,7 +1,6 @@
 import express from 'express';
 import { Server } from '@modelcontextprotocol/sdk/server/index.js';
 import { StdioServerTransport } from '@modelcontextprotocol/sdk/server/stdio.js';
-import { SSEServerTransport } from '@modelcontextprotocol/sdk/server/sse.js';
 import {
   ListToolsRequestSchema,
   CallToolRequestSchema,
@@ -223,7 +222,7 @@ async function handleToolCall(name, args) {
 }
 
 const mcpServer = new Server(
-  { name: 'atlisp-mcp-server', version: '1.0.0' },
+  { name: 'atlisp-mcp-server', version: '1.0.7' },
   { capabilities: { tools: {} } }
 );
 
@@ -283,7 +282,7 @@ if (TRANSPORT === 'stdio') {
           result: {
             protocolVersion: '2024-11-05',
             capabilities: { tools: {} },
-            serverInfo: { name: 'atlisp-mcp-server', version: '1.0.0' }
+            serverInfo: { name: 'atlisp-mcp-server', version: '1.0.7' }
           }
         });
       }