merge: integrate merkwerk binary detection into multi-tenant

- Add universal merkwerk binary detection from main
- Required for furt installations (no install without merkwerk)
- Maintains compatibility with multi-tenant architecture

Merges main branch changes for issue #94 into feature/issue-89-multi-tenant
This commit is contained in:
michael 2025-08-28 18:20:54 +02:00
commit a5db9a633f
5 changed files with 424 additions and 68 deletions

6
.version_history Normal file
View file

@ -0,0 +1,6 @@
# merkwerk version history
# Format: content_hash,vcs_hash,branch,timestamp,author,vcs_type,project_type
7e82f537,7053af3,main,2025-08-19T18:14:06Z,michael,git,lua-api
7e41647c,00b8a18,main,2025-08-19T19:36:33Z,michael,git,lua-api
7e41647c,62ddc17,main,2025-08-20T04:08:04Z,michael,git,lua-api
7e41647c,95dcdba,main,2025-08-28T15:34:36Z,michael,git,lua-api

1
VERSION Normal file
View file

@ -0,0 +1 @@
0.1.1

352
integrations/lua-api.lua Normal file
View file

@ -0,0 +1,352 @@
-- integrations/lua-api.lua - merkwerk Lua API integration
-- Provides merkwerk version information for Lua applications
local merkwerk = {}
-- Cache for version info to avoid repeated shell calls
local cache = {
data = nil,
timestamp = 0,
ttl = 300 -- 5 minutes default TTL
}
-- Find merkwerk binary using universal detection pattern
local function find_merkwerk_binary()
-- Check development binary
local dev_handle = io.popen("test -x './bin/merkwerk' && echo './bin/merkwerk' 2>/dev/null")
if dev_handle then
local dev_result = dev_handle:read("*line")
dev_handle:close()
if dev_result and dev_result ~= "" then
return dev_result
end
end
-- Check installed binary
local inst_handle = io.popen("test -x '/usr/local/bin/merkwerk' && echo '/usr/local/bin/merkwerk' 2>/dev/null")
if inst_handle then
local inst_result = inst_handle:read("*line")
inst_handle:close()
if inst_result and inst_result ~= "" then
return inst_result
end
end
-- Check PATH
local path_handle = io.popen("command -v merkwerk 2>/dev/null")
if path_handle then
local path_result = path_handle:read("*line")
path_handle:close()
if path_result and path_result ~= "" then
return "merkwerk"
end
end
return nil
end
-- Execute merkwerk command and return result
local function execute_merkwerk(args)
args = args or "info --json"
local merkwerk_cmd = find_merkwerk_binary()
if not merkwerk_cmd then
return nil, "merkwerk binary not found"
end
local command = merkwerk_cmd .. " " .. args .. " 2>/dev/null"
local handle = io.popen(command)
if not handle then
return nil, "Failed to execute merkwerk command"
end
local result = handle:read("*a")
local success, exit_reason, exit_code = handle:close()
if not success or (exit_code and exit_code ~= 0) then
return nil, "merkwerk command failed with exit code " .. (exit_code or "unknown")
end
if result == "" then
return nil, "merkwerk returned empty result"
end
return result, nil
end
-- Parse JSON response (simple parser for basic merkwerk JSON)
local function parse_json_response(json_str)
if not json_str then return nil end
-- Try to use cjson if available
local ok, cjson = pcall(require, "cjson")
if ok then
local success, data = pcall(cjson.decode, json_str)
if success then return data end
end
-- Fallback: simple manual parsing for merkwerk JSON structure
local data = {}
-- Extract basic fields using pattern matching
data.project_name = json_str:match('"project_name"%s*:%s*"([^"]*)"') or "unknown"
data.project_type = json_str:match('"project_type"%s*:%s*"([^"]*)"') or "unknown"
data.base_version = json_str:match('"base_version"%s*:%s*"([^"]*)"') or "?.?.?"
data.content_hash = json_str:match('"content_hash"%s*:%s*"([^"]*)"') or "unknown"
data.full_version = json_str:match('"full_version"%s*:%s*"([^"]*)"') or "?.?.?+unknown"
data.timestamp = json_str:match('"timestamp"%s*:%s*"([^"]*)"') or ""
-- Extract VCS info
local vcs_block = json_str:match('"vcs"%s*:%s*{([^}]*)}')
if vcs_block then
data.vcs = {}
data.vcs.type = vcs_block:match('"type"%s*:%s*"([^"]*)"') or "none"
data.vcs.hash = vcs_block:match('"hash"%s*:%s*"([^"]*)"') or ""
data.vcs.branch = vcs_block:match('"branch"%s*:%s*"([^"]*)"') or ""
else
data.vcs = { type = "none", hash = "", branch = "" }
end
return data
end
-- Read latest entry from .version_history file
local function read_version_history()
local file = io.open(".version_history", "r")
if not file then
return nil, "No .version_history file found"
end
local last_line = nil
for line in file:lines() do
-- Skip comment lines
if not line:match("^%s*#") and line:match("%S") then
last_line = line
end
end
file:close()
if not last_line then
return nil, ".version_history contains no valid entries"
end
-- Parse: content_hash,vcs_hash,branch,timestamp,author,vcs_type,project_type
local parts = {}
for part in last_line:gmatch("([^,]+)") do
table.insert(parts, part)
end
if #parts < 7 then
return nil, "Invalid .version_history format"
end
-- Get base version from VERSION file if available
local base_version = "?.?.?"
local version_file = io.open("VERSION", "r")
if version_file then
local version_content = version_file:read("*line")
if version_content and not version_content:match("^%s*$") then
base_version = version_content:match("^%s*(.-)%s*$")
end
version_file:close()
end
-- Build response in same format as merkwerk
local data = {
project_name = parts[7] and parts[7]:gsub("-api$", "") or "unknown", -- lua-api → lua
project_type = parts[7] or "unknown",
base_version = base_version,
content_hash = parts[1] or "unknown",
full_version = base_version .. "+" .. (parts[1] or "unknown"),
version = base_version .. "+" .. (parts[1] or "unknown"),
timestamp = parts[4] or "",
vcs = {
type = parts[6] or "none",
hash = parts[2] or "",
branch = parts[3] or ""
},
source = "version_history"
}
return data, nil
end
-- Generate fallback info when merkwerk is unavailable
local function fallback_info()
return {
project_name = "unknown",
project_type = "lua-api",
base_version = "?.?.?",
content_hash = "unknown",
full_version = "?.?.?+unknown",
timestamp = os.date("%Y-%m-%dT%H:%M:%SZ"),
vcs = {
type = "none",
hash = "",
branch = ""
},
source = "fallback",
error = "merkwerk not available"
}
end
-- Check if cached data is still valid
local function is_cache_valid(ttl)
ttl = ttl or cache.ttl
local current_time = os.time()
return cache.data and (current_time - cache.timestamp) < ttl
end
-- Get version information with NEW priority order
function merkwerk.get_info(options)
options = options or {}
local use_cache = options.cache ~= false
local cache_ttl = options.cache_ttl or cache.ttl
local fallback_version = options.fallback_version
local include_build_info = options.include_build_info or false
-- Return cached data if valid and caching enabled
if use_cache and is_cache_valid(cache_ttl) then
local result = cache.data
if include_build_info then
result.build_info = {
cached = true,
cache_age = os.time() - cache.timestamp,
cache_ttl = cache_ttl
}
end
return result
end
-- PRODUCTION PRIORITY: Try .version_history FIRST
local history_data, history_error = read_version_history()
if history_data then
-- Success: Use version history data
if include_build_info then
history_data.build_info = {
cached = false,
source = "version_history",
method = "production_ready"
}
end
-- Update cache
if use_cache then
cache.data = history_data
cache.timestamp = os.time()
end
return history_data
end
-- FALLBACK: Try merkwerk command (development/testing)
local json_result, error_msg = execute_merkwerk("info --json")
if json_result then
local data = parse_json_response(json_result)
if data then
data.source = "merkwerk"
if include_build_info then
data.build_info = {
cached = false,
source = "merkwerk_command",
method = "development_fallback",
history_error = history_error
}
end
-- Update cache
if use_cache then
cache.data = data
cache.timestamp = os.time()
end
return data
end
end
-- LAST RESORT: Pure fallback
local fallback = fallback_info()
if fallback_version then
fallback.base_version = fallback_version
fallback.full_version = fallback_version .. "+unknown"
end
fallback.error = "Both version_history and merkwerk failed"
if include_build_info then
fallback.build_info = {
cached = false,
source = "fallback",
method = "emergency_fallback",
history_error = history_error,
merkwerk_error = error_msg or "merkwerk unavailable"
}
end
return fallback
end
-- Get only the content hash (lightweight)
function merkwerk.get_hash()
local hash_result, error_msg = execute_merkwerk("hash")
if not hash_result then
return "unknown"
end
-- Clean up the result (remove whitespace)
return hash_result:gsub("%s+", "")
end
-- Get version for HTTP health endpoints
function merkwerk.get_health_info()
local info = merkwerk.get_info({ cache = true, cache_ttl = 600 }) -- 10 minute cache for health checks
return {
service = info.project_name,
version = info.full_version,
content_hash = info.content_hash,
vcs_info = info.vcs,
timestamp = info.timestamp,
source = info.source
}
end
-- Get minimal version string for logging
function merkwerk.get_version_string()
local info = merkwerk.get_info({ cache = true })
return info.full_version
end
-- Clear cache (useful for testing or forced refresh)
function merkwerk.clear_cache()
cache.data = nil
cache.timestamp = 0
end
-- Set cache TTL
function merkwerk.set_cache_ttl(ttl)
cache.ttl = ttl or 300
end
-- Get cache status (for debugging)
function merkwerk.get_cache_status()
return {
has_data = cache.data ~= nil,
timestamp = cache.timestamp,
age = cache.data and (os.time() - cache.timestamp) or 0,
ttl = cache.ttl,
valid = is_cache_valid()
}
end
-- Validate merkwerk availability
function merkwerk.validate()
local result, error_msg = execute_merkwerk("info")
return result ~= nil, error_msg
end
return merkwerk

View file

@ -1,38 +0,0 @@
.
├── furt-lua
│   ├── config
│   │   └── server.lua
│   ├── deployment
│   │   └── openbsd
│   │   └── rc.d-furt
│   ├── production_checklist.md
│   ├── README.md
│   ├── scripts
│   │   ├── cleanup_debug.sh
│   │   ├── manual_mail_test.sh
│   │   ├── production_test_sequence.sh
│   │   ├── setup_env.sh
│   │   ├── start.sh
│   │   ├── stress_test.sh
│   │   ├── test_auth.sh
│   │   ├── test_curl.sh
│   │   ├── test_modular.sh
│   │   └── test_smtp.sh
│   ├── src
│   │   ├── auth.lua
│   │   ├── ip_utils.lua
│   │   ├── main.lua
│   │   ├── rate_limiter.lua
│   │   ├── routes
│   │   │   ├── auth.lua
│   │   │   └── mail.lua
│   │   └── smtp.lua
│   └── tests
│   └── test_http.lua
├── LICENSE
├── projct-tree.txt
├── README.md
└── tools
└── gitea -> /home/michael/tools/tool-gitea-workflow/scripts
11 directories, 25 files

View file

@ -13,6 +13,31 @@ local AuthRoute = require("src.routes.auth")
-- Load configuration -- Load configuration
local config = require("config.server") local config = require("config.server")
local function get_version_info()
-- Load merkwerk integration
local success, merkwerk = pcall(require, "integrations.lua-api")
if not success then
print("WARNING: merkwerk integration not available, using fallback")
return {
service = "furt-lua",
version = "?.?.?",
content_hash = "unknown",
vcs_info = { type = "none", hash = "", branch = "" },
source = "fallback-no-merkwerk"
}
end
-- Get merkwerk health info
local health_info = merkwerk.get_health_info()
-- Ensure compatibility with old VERSION-only expectations
if not health_info.version then
health_info.version = "?.?.?"
end
return health_info
end
-- HTTP-Server Module -- HTTP-Server Module
local FurtServer = {} local FurtServer = {}
@ -47,23 +72,23 @@ function FurtServer:parse_request(client)
if not request_line then if not request_line then
return nil return nil
end end
-- Parse request line: "POST /v1/mail/send HTTP/1.1" -- Parse request line: "POST /v1/mail/send HTTP/1.1"
local method, path, protocol = request_line:match("(%w+) (%S+) (%S+)") local method, path, protocol = request_line:match("(%w+) (%S+) (%S+)")
if not method then if not method then
return nil return nil
end end
-- Parse headers -- Parse headers
local headers = {} local headers = {}
local content_length = 0 local content_length = 0
while true do while true do
local line = client:receive() local line = client:receive()
if not line or line == "" then if not line or line == "" then
break break
end end
local key, value = line:match("([^:]+): (.+)") local key, value = line:match("([^:]+): (.+)")
if key and value then if key and value then
headers[key:lower()] = value headers[key:lower()] = value
@ -72,13 +97,13 @@ function FurtServer:parse_request(client)
end end
end end
end end
-- Parse body -- Parse body
local body = "" local body = ""
if content_length > 0 then if content_length > 0 then
body = client:receive(content_length) body = client:receive(content_length)
end end
return { return {
method = method, method = method,
path = path, path = path,
@ -97,11 +122,11 @@ function FurtServer:add_cors_headers(request)
"https://dragons-at-work.de", "https://dragons-at-work.de",
"https://www.dragons-at-work.de" "https://www.dragons-at-work.de"
} }
-- Check if request has Origin header -- Check if request has Origin header
local origin = request and request.headers and request.headers.origin local origin = request and request.headers and request.headers.origin
local cors_origin = "*" -- Default fallback local cors_origin = "*" -- Default fallback
-- If origin is provided and in allowed list, use it -- If origin is provided and in allowed list, use it
if origin then if origin then
for _, allowed in ipairs(allowed_origins) do for _, allowed in ipairs(allowed_origins) do
@ -111,7 +136,7 @@ function FurtServer:add_cors_headers(request)
end end
end end
end end
return { return {
["Access-Control-Allow-Origin"] = cors_origin, ["Access-Control-Allow-Origin"] = cors_origin,
["Access-Control-Allow-Methods"] = "GET, POST, PUT, DELETE, OPTIONS", ["Access-Control-Allow-Methods"] = "GET, POST, PUT, DELETE, OPTIONS",
@ -125,38 +150,38 @@ end
function FurtServer:create_response(status, data, content_type, additional_headers, request) function FurtServer:create_response(status, data, content_type, additional_headers, request)
content_type = content_type or "application/json" content_type = content_type or "application/json"
local body = "" local body = ""
if type(data) == "table" then if type(data) == "table" then
body = cjson.encode(data) body = cjson.encode(data)
else else
body = tostring(data or "") body = tostring(data or "")
end end
-- Start with CORS headers -- Start with CORS headers
local headers = self:add_cors_headers(request) local headers = self:add_cors_headers(request)
-- Add standard headers -- Add standard headers
headers["Content-Type"] = content_type headers["Content-Type"] = content_type
headers["Content-Length"] = tostring(#body) headers["Content-Length"] = tostring(#body)
headers["Connection"] = "close" headers["Connection"] = "close"
headers["Server"] = "Furt-Lua/1.1" headers["Server"] = "Furt-Lua/1.1"
-- Add additional headers if provided -- Add additional headers if provided
if additional_headers then if additional_headers then
for key, value in pairs(additional_headers) do for key, value in pairs(additional_headers) do
headers[key] = value headers[key] = value
end end
end end
-- Build response -- Build response
local response = string.format("HTTP/1.1 %d %s\r\n", status, self:get_status_text(status)) local response = string.format("HTTP/1.1 %d %s\r\n", status, self:get_status_text(status))
for key, value in pairs(headers) do for key, value in pairs(headers) do
response = response .. key .. ": " .. value .. "\r\n" response = response .. key .. ": " .. value .. "\r\n"
end end
response = response .. "\r\n" .. body response = response .. "\r\n" .. body
return response return response
end end
@ -184,23 +209,23 @@ function FurtServer:handle_client(client)
client:send(response) client:send(response)
return return
end end
print(string.format("[%s] %s %s", os.date("%Y-%m-%d %H:%M:%S"), print(string.format("[%s] %s %s", os.date("%Y-%m-%d %H:%M:%S"),
request.method, request.path)) request.method, request.path))
-- Handle OPTIONS preflight requests (CORS) -- Handle OPTIONS preflight requests (CORS)
if request.method == "OPTIONS" then if request.method == "OPTIONS" then
local response = self:create_response(204, "", "text/plain", nil, request) local response = self:create_response(204, "", "text/plain", nil, request)
client:send(response) client:send(response)
return return
end end
-- Route handling -- Route handling
local handler = nil local handler = nil
if self.routes[request.method] and self.routes[request.method][request.path] then if self.routes[request.method] and self.routes[request.method][request.path] then
handler = self.routes[request.method][request.path] handler = self.routes[request.method][request.path]
end end
if handler then if handler then
local success, result = pcall(handler, request, self) local success, result = pcall(handler, request, self)
if success then if success then
@ -223,13 +248,18 @@ function FurtServer:start()
if not self.server then if not self.server then
error("Failed to bind to " .. self.host .. ":" .. self.port) error("Failed to bind to " .. self.host .. ":" .. self.port)
end end
local version_info = get_version_info()
print(string.format("Furt HTTP-Server started on %s:%d", self.host, self.port)) print(string.format("Furt HTTP-Server started on %s:%d", self.host, self.port))
print("Version: " .. version_info.version .. " (merkwerk)")
print("Content-Hash: " .. (version_info.content_hash or "unknown"))
print("VCS: " .. (version_info.vcs_info and version_info.vcs_info.hash or "none"))
print("API-Key authentication: ENABLED") print("API-Key authentication: ENABLED")
print("Rate limiting: ENABLED (60 req/hour per API key, 100 req/hour per IP)") print("Rate limiting: ENABLED (60 req/hour per API key, 100 req/hour per IP)")
print("CORS enabled for configured origins") print("CORS enabled for configured origins")
print("Press Ctrl+C to stop") print("Press Ctrl+C to stop")
while true do while true do
local client = self.server:accept() local client = self.server:accept()
if client then if client then
@ -245,15 +275,20 @@ local server = FurtServer:new()
-- Public routes (no authentication required) -- Public routes (no authentication required)
server:add_route("GET", "/health", function(request, server) server:add_route("GET", "/health", function(request, server)
local version_info = get_version_info()
local response_data = { local response_data = {
status = "healthy", status = "healthy",
service = "furt-lua", service = version_info.service or "furt-lua",
version = "1.1.0", version = version_info.version,
content_hash = version_info.content_hash,
vcs_info = version_info.vcs_info,
timestamp = os.time(), timestamp = os.time(),
source = version_info.source,
features = { features = {
smtp_configured = config.mail and config.mail.username ~= nil, smtp_configured = config.mail and config.mail.username ~= nil,
auth_enabled = true, auth_enabled = true,
rate_limiting = true rate_limiting = true,
merkwerk_integrated = version_info.source == "merkwerk"
} }
} }
return server:create_response(200, response_data, nil, nil, request) return server:create_response(200, response_data, nil, nil, request)
@ -268,15 +303,15 @@ if os.getenv("ENABLE_TEST_ENDPOINT") == "true" then
headers_count = 0, headers_count = 0,
warning = "This is a development endpoint" warning = "This is a development endpoint"
} }
-- Count headers -- Count headers
for _ in pairs(request.headers) do for _ in pairs(request.headers) do
response_data.headers_count = response_data.headers_count + 1 response_data.headers_count = response_data.headers_count + 1
end end
return server:create_response(200, response_data, nil, nil, request) return server:create_response(200, response_data, nil, nil, request)
end) end)
print("⚠️ Test endpoint enabled (development mode)") print("[WARN] Test endpoint enabled (development mode)")
end end
-- Protected routes (require authentication) -- Protected routes (require authentication)