freelang-editor 11.7.4

package/benchmark-simple.fl

@@ -0,0 +1,38 @@
+(println "🔥 FreeLang 성능 테스트 (간단)")
+(println "════════════════════════════════════")
+(println "")
+(defn factorial [$n] (if (<= $n 1) 1 (* $n (factorial (- $n 1)))))
+(println "📊 Test 1: 재귀 (factorial 25)")
+(let [[$start (now-ms)] [$result (factorial 25)] [$elapsed (- (now-ms) $start)]]
+  (println (str "  시간: " $elapsed "ms")))
+(println "")
+(println "📊 Test 2: 루프 (10K 반복)")
+(let [
+    [$start (now-ms)]
+    [
+    $result
+    (loop [$i 0 $sum 0] (if (>= $i 10000) $sum (recur (+ $i 1) (+ $sum $i))))
+  ]
+    [$elapsed (- (now-ms) $start)]
+  ]
+  (println (str "  결과: " $result))
+  (println (str "  시간: " $elapsed "ms")))
+(println "")
+(println "📊 Test 3: 배열 맵 (1K)")
+(let [
+    [$start (now-ms)]
+    [$arr [1 2 3 4 5 6 7 8 9 10]]
+    [
+    $result
+    (loop
+    [$i 0 $acc []]
+    (if (>= $i 1000)
+      (length $acc)
+      (recur (+ $i 1) (append $acc (map (fn [$x] (* $x 2)) $arr)))))
+  ]
+    [$elapsed (- (now-ms) $start)]
+  ]
+  (println (str "  결과: " $result " items"))
+  (println (str "  시간: " $elapsed "ms")))
+(println "")
+(println "✅ 완료")

package/bin/freelang-migrate

@@ -0,0 +1,310 @@
+#!/usr/bin/env node
+/**
+ * freelang-migrate — v11 → v11.5.x 자동 마이그레이션 도구 (prototype)
+ *
+ * 단계별 변환:
+ *   1. snake_case → kebab-case (alias 매핑 기반)
+ *   2. is_X → X? 술어 통일
+ *   3. 인자 순서 변환 (10개 핵심 함수, 옵션)
+ *   4. $ 접두사 제거 (옵션)
+ *
+ * 사용법:
+ *   freelang-migrate src/                    # 디렉토리 변환 (dry-run)
+ *   freelang-migrate src/ --apply            # 실제 적용
+ *   freelang-migrate file.fl                 # 단일 파일
+ *   freelang-migrate src/ --no-arg-order     # 인자 순서 제외
+ *   freelang-migrate src/ --remove-dollar    # $ 제거
+ */
+
+"use strict";
+
+const fs = require("fs");
+const path = require("path");
+
+// ─────────────────────────────────────────────────────────────
+// v11 → v11.5.x 작명 변환 (snake → kebab + 술어 통일)
+// ─────────────────────────────────────────────────────────────
+const RENAME_MAP = {
+  // 기본 stdlib
+  "str_to_num":   "str-to-num",
+  "str_concat":   "str-concat",
+  "json_parse":   "json-parse",
+  "json_stringify": "json-stringify",
+  "now_ms":       "now-ms",
+  "now_iso":      "now-iso",
+  "now_unix":     "now-unix",
+
+  // HTTP / 서버
+  "http_get":     "http-get",
+  "http_post":    "http-post",
+  "server_start": "server-start",
+  "server_get":   "server-get",
+  "server_post":  "server-post",
+  "server_put":   "server-put",
+  "server_delete":"server-delete",
+  "server_json":  "server-json",
+  "server_html":  "server-html",
+  "server_text":  "server-text",
+  "server_status":"server-status",
+  "server_redirect":"server-redirect",
+  "server_static":"server-static",
+  "server_req_body":  "server-req-body",
+  "server_req_query": "server-req-query",
+  "server_req_params":"server-req-params",
+  "server_req_param": "server-req-param",
+  "server_req_cookie":"server-req-cookie",
+  "server_req_header":"server-req-header",
+
+  // 파일/환경
+  "file_read":    "file-read",
+  "file_write":   "file-write",
+  "file_append":  "file-append",
+  "file_exists":  "file-exists?",
+  "file_mkdir":   "file-mkdir",
+  "file_rmdir":   "file-rmdir",
+  "file_delete":  "file-delete",
+  "file_size":    "file-size",
+  "file_is_dir":  "file-is-dir?",
+  "dir_list":     "dir-list",
+  "shell_env":    "shell-env",
+  "shell_exec":   "shell-exec",
+  "get_env":      "shell-env",
+  "get_env_or":   "shell-env-or",
+  "env_load":     "env-load",
+
+  // DB
+  "mariadb_connect":"mariadb-connect",
+  "mariadb_query":  "mariadb-query",
+  "mariadb_one":    "mariadb-one",
+  "mariadb_exec":   "mariadb-exec",
+
+  // Auth
+  "auth_jwt_sign":   "auth-jwt-sign",
+  "auth_jwt_verify": "auth-jwt-verify",
+  "auth_jwt_expired":"auth-jwt-expired?",
+  "auth_hash_password": "auth-hash-password",
+  "auth_verify_password":"auth-verify-password",
+  "auth_random_token": "auth-random-token",
+  "auth_sha256":  "auth-sha256",
+  "auth_hmac":    "auth-hmac",
+
+  // 술어 통일 (is_X → X?)
+  "is_null":      "nil?",
+  "is_nil":       "nil?",
+  "null?":        "nil?",
+  "is_array":     "array?",
+  "is_string":    "string?",
+  "is_number":    "number?",
+  "is_boolean":   "boolean?",
+
+  // 기타
+  "obj_merge":    "merge",
+  "obj_omit":     "dissoc",
+  "obj_pick":     "pick",
+  "json_keys":    "keys",
+  "object_keys":  "keys",
+  "fl_require":   "fl-require",
+  "fl_require?":  "fl-require?",
+  "fl_modules":   "fl-modules",
+};
+
+// ─────────────────────────────────────────────────────────────
+// 인자 순서 변환 — 10개 핵심 함수 (옵션)
+// (map fn arr) → (map arr fn) 등
+// ─────────────────────────────────────────────────────────────
+const ARG_REORDER_FNS = ["map", "filter", "smart-map", "smart-filter"];
+
+function reorderMapFilter(content) {
+  // 매우 단순한 패턴 매칭 — 정확한 파서가 아님
+  // (map (fn [$x] ...) arr) → (map arr (fn [$x] ...))
+  let changed = 0;
+  const result = content.replace(
+    /\((map|filter)\s+(\(fn\s*\[[^\]]*\][\s\S]*?\))\s+(\[[^\]]*\]|\$?[a-zA-Z][\w\-]*)\)/g,
+    (match, fn, fnExpr, arr) => {
+      changed++;
+      return `(${fn} ${arr} ${fnExpr})`;
+    }
+  );
+  return { result, changed };
+}
+
+// ─────────────────────────────────────────────────────────────
+// $ 접두사 제거 (옵션)
+// ─────────────────────────────────────────────────────────────
+function removeDollar(content) {
+  let changed = 0;
+  // defn/fn의 파라미터 + body의 $name 모두 제거
+  const result = content.replace(/\$([a-zA-Z][\w-]*)/g, (m, name) => {
+    changed++;
+    return name;
+  });
+  return { result, changed };
+}
+
+// ─────────────────────────────────────────────────────────────
+// 핵심 변환
+// ─────────────────────────────────────────────────────────────
+function transformFile(content, opts = {}) {
+  const changes = [];
+
+  // 주석 구간 보호: ;로 시작하는 줄 끝까지를 플레이스홀더로 교체 후 복원
+  const commentPlaceholders = [];
+  let result = content.replace(/;[^\n]*/g, (m) => {
+    const idx = commentPlaceholders.length;
+    commentPlaceholders.push(m);
+    return `\x00COMMENT${idx}\x00`;
+  });
+
+  // 1. 함수명 변환 (RENAME_MAP)
+  for (const [from, to] of Object.entries(RENAME_MAP)) {
+    if (from === to) continue;
+    // 정확한 토큰 매치 — 식별자 경계
+    const escaped = from.replace(/[.*+?^${}()|[\]\\]/g, "\\$&");
+    const re = new RegExp(`(?<![\\w\\-])${escaped}(?![\\w\\-?!])`, "g");
+    let count = 0;
+    result = result.replace(re, () => { count++; return to; });
+    if (count > 0) changes.push({ kind: "rename", from, to, count });
+  }
+
+  // 주석 복원
+  result = result.replace(/\x00COMMENT(\d+)\x00/g, (_, i) => commentPlaceholders[+i]);
+
+  // 2. 인자 순서 변환 (옵션)
+  if (opts.argOrder !== false) {
+    const r = reorderMapFilter(result);
+    result = r.result;
+    if (r.changed > 0) changes.push({ kind: "arg-order", count: r.changed });
+  }
+
+  // 3. $ 제거 (옵션)
+  if (opts.removeDollar) {
+    const r = removeDollar(result);
+    result = r.result;
+    if (r.changed > 0) changes.push({ kind: "remove-dollar", count: r.changed });
+  }
+
+  return { result, changes };
+}
+
+// ─────────────────────────────────────────────────────────────
+// 파일/디렉토리 처리
+// ─────────────────────────────────────────────────────────────
+function findFlFiles(dir) {
+  const files = [];
+  const stack = [{ p: dir, isRoot: true }];
+  while (stack.length) {
+    const { p: cur, isRoot } = stack.pop();
+    const stat = fs.statSync(cur);
+    if (stat.isDirectory()) {
+      if (!isRoot && path.basename(cur).startsWith(".")) continue;
+      if (!isRoot && path.basename(cur) === "node_modules") continue;
+      for (const ent of fs.readdirSync(cur)) {
+        stack.push({ p: path.join(cur, ent), isRoot: false });
+      }
+    } else if (cur.endsWith(".fl")) {
+      files.push(cur);
+    }
+  }
+  return files;
+}
+
+function processFile(filePath, opts) {
+  const content = fs.readFileSync(filePath, "utf-8");
+  const { result, changes } = transformFile(content, opts);
+
+  if (changes.length === 0) {
+    return { filePath, changes: [], content, result };
+  }
+
+  if (opts.apply) {
+    // 백업 + 적용
+    const backupDir = path.join(path.dirname(filePath), ".v11-backup");
+    if (!fs.existsSync(backupDir)) fs.mkdirSync(backupDir, { recursive: true });
+    const backupFile = path.join(backupDir, path.basename(filePath));
+    fs.writeFileSync(backupFile, content);
+    fs.writeFileSync(filePath, result);
+  }
+
+  return { filePath, changes, content, result };
+}
+
+// ─────────────────────────────────────────────────────────────
+// CLI
+// ─────────────────────────────────────────────────────────────
+function main() {
+  const args = process.argv.slice(2);
+  if (args.length === 0 || args.includes("-h") || args.includes("--help")) {
+    console.log(`사용법: freelang-migrate <path> [옵션]
+
+옵션:
+  --apply              실제 적용 (기본: dry-run)
+  --no-arg-order       인자 순서 변환 제외
+  --remove-dollar      $ 접두사 제거
+  --quiet              요약만 출력
+
+예시:
+  freelang-migrate src/                # 미리보기
+  freelang-migrate src/ --apply        # 실제 변환 (.v11-backup/ 자동 생성)
+  freelang-migrate src/main.fl --apply --no-arg-order
+
+전제 (중요):
+  변환된 kebab-case 코드는 v11.5.0+ 런타임에서 작동합니다.
+  v11.4.x 런타임에서는 변환된 코드가 "Function not found" 에러.
+  → 런타임 버전 확인: node bootstrap.js --version
+`);
+    process.exit(args.length === 0 ? 1 : 0);
+  }
+
+  const target = args[0];
+  const opts = {
+    apply:        args.includes("--apply"),
+    argOrder:     !args.includes("--no-arg-order"),
+    removeDollar: args.includes("--remove-dollar"),
+    quiet:        args.includes("--quiet"),
+  };
+
+  if (!fs.existsSync(target)) {
+    console.error(`✖ 경로 없음: ${target}`);
+    process.exit(1);
+  }
+
+  const stat = fs.statSync(target);
+  const files = stat.isDirectory() ? findFlFiles(target) : [target];
+
+  console.log(`📂 ${files.length}개 .fl 파일 ${opts.apply ? "변환 중" : "검사 중 (dry-run)"}`);
+  console.log("");
+
+  let totalChanges = 0;
+  let totalFiles = 0;
+
+  for (const f of files) {
+    const result = processFile(f, opts);
+    if (result.changes.length === 0) continue;
+
+    totalFiles++;
+    if (!opts.quiet) {
+      console.log(`📄 ${path.relative(process.cwd(), f)}`);
+      for (const c of result.changes) {
+        if (c.kind === "rename") {
+          console.log(`   ${c.from.padEnd(25)} → ${c.to} (${c.count}회)`);
+        } else if (c.kind === "arg-order") {
+          console.log(`   인자 순서 변환: ${c.count}회`);
+        } else if (c.kind === "remove-dollar") {
+          console.log(`   $ 접두사 제거: ${c.count}회`);
+        }
+        totalChanges += c.count;
+      }
+      console.log("");
+    }
+  }
+
+  console.log("─".repeat(50));
+  console.log(`총 ${totalFiles}개 파일, ${totalChanges}개 변경`);
+  if (opts.apply) {
+    console.log(`✓ 적용됨. 백업: <dir>/.v11-backup/`);
+  } else {
+    console.log(`💡 실제 적용: --apply`);
+  }
+}
+
+main();

package/bin/freelang-smart

@@ -0,0 +1,258 @@
+#!/usr/bin/env node
+/**
+ * freelang-smart — Phase G+ 자동 힌트 wrapper
+ *
+ * 효과:
+ *   - 함수 못 찾으면 "혹시 X 의미하셨나요?" 자동 출력
+ *   - 인자 순서 오류 패턴 감지 + 수정 제안
+ *   - let 단일 바인딩 자동 이중괄호화 (preprocessing)
+ *   - @변수 문법 → (deref atom) 안내
+ *   - [FUNC] deprecated → defn 변환 제안
+ *
+ * 사용법:
+ *   freelang-smart run app.fl
+ *   freelang-smart app.fl     (run 생략)
+ *
+ *   # 기존 freelang과 호환:
+ *   alias fl=freelang-smart
+ */
+
+"use strict";
+
+const { spawn } = require("child_process");
+const path = require("path");
+const fs = require("fs");
+const os = require("os");
+
+// ─────────────────────────────────────────────────────────────
+// 별칭 — _aliases.json (단일 소스, helpers와 공유)
+// ─────────────────────────────────────────────────────────────
+const ALIASES_JSON_PATH = path.resolve(__dirname, "..", "src", "_aliases.json");
+let ALIASES = {};
+try {
+  const raw = JSON.parse(fs.readFileSync(ALIASES_JSON_PATH, "utf-8"));
+  // _comment 필드는 제외
+  for (const [k, v] of Object.entries(raw)) {
+    if (k.startsWith("_")) continue;
+    ALIASES[k] = v;
+  }
+} catch (e) {
+  // _aliases.json 없으면 빈 객체로 운영 (Levenshtein만 동작)
+  console.error(`[freelang-smart] _aliases.json 로드 실패: ${e.message}`);
+}
+
+const COMMON_FNS = [
+  "println", "print", "map", "filter", "reduce", "append", "get", "assoc", "dissoc",
+  "str", "length", "nil?", "if", "cond", "let", "do", "defn", "fn", "define",
+  "server_start", "server_get", "server_post", "server_put", "server_delete",
+  "server_json", "server_html", "server_text", "server_status", "server_redirect",
+  "server_req_body", "server_req_query", "server_req_params", "server_req_cookie",
+  "mariadb_connect", "mariadb_query", "mariadb_one", "mariadb_exec",
+  "http_get", "http_post", "json_parse", "json_stringify", "json-str",
+  "file_read", "file_write", "file_exists", "file_mkdir",
+  "auth_jwt_sign", "auth_jwt_verify", "auth_hash_password", "auth_random_token",
+  // Phase G 신규
+  "suggest-fn", "alias-of", "help-text",
+  "smart-map", "smart-filter", "smart-get", "smart-assoc",
+  "http-get-json", "http-post-json", "http-status",
+  "try-call", "try-call-1", "ok?", "err?", "unwrap", "unwrap-or",
+];
+
+function levenshtein(a, b) {
+  const m = a.length, n = b.length;
+  if (m === 0) return n;
+  if (n === 0) return m;
+  const dp = Array.from({ length: m + 1 }, (_, i) =>
+    Array.from({ length: n + 1 }, (_, j) => (i === 0 ? j : j === 0 ? i : 0))
+  );
+  for (let i = 1; i <= m; i++) {
+    for (let j = 1; j <= n; j++) {
+      dp[i][j] = a[i - 1] === b[j - 1]
+        ? dp[i - 1][j - 1]
+        : 1 + Math.min(dp[i - 1][j], dp[i][j - 1], dp[i - 1][j - 1]);
+    }
+  }
+  return dp[m][n];
+}
+
+function suggestFn(name) {
+  if (ALIASES[name]) return [ALIASES[name].correct];
+  const limit = Math.max(2, Math.floor(name.length / 3));
+  return COMMON_FNS
+    .map((c) => ({ name: c, dist: levenshtein(name, c) }))
+    .filter((s) => s.dist > 0 && s.dist <= limit)
+    .sort((a, b) => a.dist - b.dist)
+    .slice(0, 3)
+    .map((s) => s.name);
+}
+
+// ─────────────────────────────────────────────────────────────
+// preprocessing: 안전한 자동 수정
+// ─────────────────────────────────────────────────────────────
+function preprocess(code) {
+  let modified = code;
+  const fixes = [];
+
+  // (a) 단일 let 바인딩 자동 이중괄호화
+  //     (let [$x 1] body) → (let [[$x 1]] body)
+  //     주의: 이미 이중괄호인 경우 제외
+  const singleLetPattern = /\(let\s+\[\s*\$([a-zA-Z_][\w-]*)\s+([^\[\]]+?)\]/g;
+  modified = modified.replace(singleLetPattern, (match, name, val) => {
+    fixes.push(`let 단일 바인딩 자동 이중괄호화: $${name}`);
+    return `(let [[$${name} ${val.trim()}]]`;
+  });
+
+  return { code: modified, fixes };
+}
+
+// ─────────────────────────────────────────────────────────────
+// 에러 출력 분석 + hint 추가
+// ─────────────────────────────────────────────────────────────
+function analyzeError(stderr) {
+  const hints = [];
+
+  // 1. Function not found: NAME (이름에 dot, hyphen, ?, ! 허용)
+  const fnMatch = stderr.match(/Function not found:\s*([a-zA-Z_][\w.\-?!]*)/);
+  if (fnMatch) {
+    const name = fnMatch[1];
+    const sims = suggestFn(name);
+    if (sims.length > 0) {
+      const alias = ALIASES[name];
+      if (alias) {
+        hints.push(
+          `💡 '${name}'은(는) 없습니다. 대신 ${alias.correct} 사용:\n     ${alias.usage}`
+        );
+      } else {
+        hints.push(
+          `💡 혹시 이 함수를 의미하셨나요?\n     ${sims.map((s) => `→ (${s} ...)`).join("\n     ")}`
+        );
+      }
+    }
+  }
+
+  // 2. Unexpected character '@'
+  if (stderr.includes("Unexpected character '@'")) {
+    hints.push(
+      "💡 @변수 문법은 지원되지 않습니다.\n" +
+      "     → atom 사용: (define x (atom 0)) (deref x) (reset! x 1)"
+    );
+  }
+
+  // 3. let 파싱 오류 (단일 바인딩이 자동 수정 후에도 발생)
+  if (stderr.includes("파싱 오류") && /\blet\b/.test(stderr)) {
+    hints.push(
+      "💡 let 문법:\n" +
+      "     → 이중괄호: (let [[$x 1] [$y 2]] body)\n" +
+      "     → 단일도 이중: (let [[$x 1]] body)"
+    );
+  }
+
+  // 4. [FUNC] deprecated 경고 (정보)
+  if (stderr.includes("[FUNC ...] 문법은 deprecated")) {
+    hints.push(
+      "💡 [FUNC] → defn 권장:\n" +
+      "     [FUNC name :params [$a $b] :body (...)]\n" +
+      "     → (defn name [$a $b] ...)"
+    );
+  }
+
+  // 5. server_req_body 결과 처리 (자주 틀림)
+  if (stderr.includes("server_req_body") || stderr.includes("Cannot get from string")) {
+    hints.push(
+      "💡 server_req_body는 JSON 문자열 반환:\n" +
+      "     → (json_parse (server_req_body $req)) 으로 파싱"
+    );
+  }
+
+  return hints;
+}
+
+// ─────────────────────────────────────────────────────────────
+// 메인
+// ─────────────────────────────────────────────────────────────
+function main() {
+  const argv = process.argv.slice(2);
+
+  // run 명령 자동 추가
+  let cmd, fileArg, restArgs;
+  if (argv[0] === "run") {
+    cmd = "run";
+    fileArg = argv[1];
+    restArgs = argv.slice(2);
+  } else if (argv[0] && argv[0].endsWith(".fl")) {
+    cmd = "run";
+    fileArg = argv[0];
+    restArgs = argv.slice(1);
+  } else {
+    // 다른 명령은 그대로 전달
+    cmd = argv[0] || "help";
+    fileArg = argv[1];
+    restArgs = argv.slice(2);
+  }
+
+  if (!fileArg && cmd === "run") {
+    console.error("사용법: freelang-smart [run] <file.fl>");
+    process.exit(1);
+  }
+
+  // bootstrap.js 위치
+  const bootstrapPath = path.resolve(__dirname, "..", "bootstrap.js");
+  if (!fs.existsSync(bootstrapPath)) {
+    console.error(`bootstrap.js를 찾을 수 없습니다: ${bootstrapPath}`);
+    process.exit(1);
+  }
+
+  let runFile = fileArg;
+  let cleanup = null;
+
+  // run 명령일 때만 preprocessing
+  if (cmd === "run" && fileArg && fs.existsSync(fileArg)) {
+    const original = fs.readFileSync(fileArg, "utf-8");
+    const { code, fixes } = preprocess(original);
+
+    if (fixes.length > 0) {
+      const tmpFile = path.join(os.tmpdir(), `fl-smart-${Date.now()}.fl`);
+      fs.writeFileSync(tmpFile, code);
+      runFile = tmpFile;
+      cleanup = () => { try { fs.unlinkSync(tmpFile); } catch {} };
+
+      // 자동 수정 알림 (조용히)
+      console.error(`\x1b[33m[자동 수정]\x1b[0m`);
+      fixes.forEach((f) => console.error(`  ✓ ${f}`));
+      console.error("");
+    }
+  }
+
+  // bootstrap 실행
+  const args = cmd === "run" ? ["run", runFile, ...restArgs] : argv;
+  const child = spawn("node", [bootstrapPath, ...args], {
+    stdio: ["inherit", "inherit", "pipe"],
+  });
+
+  let stderrBuf = "";
+  child.stderr.on("data", (chunk) => {
+    const s = chunk.toString();
+    stderrBuf += s;
+    process.stderr.write(s);
+  });
+
+  child.on("close", (code) => {
+    if (cleanup) cleanup();
+
+    // 에러 발생 시 hint 추가
+    if (code !== 0 && stderrBuf) {
+      const hints = analyzeError(stderrBuf);
+      if (hints.length > 0) {
+        console.error("");
+        console.error("\x1b[36m─────────────────────────────────────\x1b[0m");
+        console.error("\x1b[36m  freelang-smart 자동 힌트\x1b[0m");
+        console.error("\x1b[36m─────────────────────────────────────\x1b[0m");
+        hints.forEach((h) => console.error(`\n  ${h}`));
+        console.error("");
+      }
+    }
+    process.exit(code || 0);
+  });
+}
+
+main();