# coding=utf-8
import ast
import base64
import getpass
import gzip
import json
import os
import pwd
import random
import resource
import socket
import subprocess
import sys
import tempfile
import time

from contextlib import contextmanager
from contextlib import suppress
from textwrap import dedent

import uuid_utils.compat as uuid
from django.utils.translation import gettext_lazy as _
from common.utils.logger import maxkb_logger
from lzkb.const import BASE_DIR, CONFIG
from lzkb.const import PROJECT_DIR

_enable_sandbox = bool(int(CONFIG.get('SANDBOX', 0)))
_run_user = 'sandbox' if _enable_sandbox else getpass.getuser()
_sandbox_path = CONFIG.get("SANDBOX_HOME", '/opt/maxkb-app/sandbox') if _enable_sandbox else os.path.join(PROJECT_DIR, 'data', 'sandbox')
_sandbox_python_sys_path = CONFIG.get_sandbox_python_package_paths().split(',')
_process_limit_timeout_seconds = int(CONFIG.get("SANDBOX_PYTHON_PROCESS_LIMIT_TIMEOUT_SECONDS", '3600'))
_process_limit_cpu_cores = min(max(int(CONFIG.get("SANDBOX_PYTHON_PROCESS_LIMIT_CPU_CORES", '1')), 1), len(os.sched_getaffinity(0))) if sys.platform.startswith("linux") else os.cpu_count()  # 只支持linux，window和mac不支持
_process_limit_mem_mb = int(CONFIG.get("SANDBOX_PYTHON_PROCESS_LIMIT_MEM_MB", '256'))

if not _enable_sandbox:
    maxkb_logger.warning(
        "SANDBOX is disabled (SANDBOX=0). User tool code executes as the current OS user. "
        "Set SANDBOX=1 in production for security."
    )

class ToolExecutor:

    def __init__(self):
        pass

    @staticmethod
    def init_sandbox_dir():
        if not _enable_sandbox:
            # 不启用sandbox就不初始化目录
            return
        try:
            # 只初始化一次
            fd = os.open(os.path.join(PROJECT_DIR, 'tmp', 'tool_executor_init_dir.lock'), os.O_CREAT | os.O_EXCL | os.O_WRONLY)
            os.close(fd)
        except FileExistsError:
            # 文件已存在 → 已初始化过
            return
        maxkb_logger.info("Init sandbox dir.")
        try:
            subprocess.run(["chmod", "-R", "g-rwx", "/dev/shm", "/dev/mqueue"], check=False)
            subprocess.run(["chmod", "o-rwx", "/run/postgresql"], check=False)
        except Exception as e:
            maxkb_logger.warning(f'Exception: {e}', exc_info=True)
            pass
        if CONFIG.get("SANDBOX_TMP_DIR_ENABLED", '0') == "1":
            subprocess.run(["chmod", "g+rwx", "/tmp"], check=False)
        # 初始化sandbox配置文件
        sandbox_lib_path = os.path.dirname(f'{_sandbox_path}/lib/sandbox.so')
        sandbox_conf_file_path = f'{sandbox_lib_path}/.sandbox.conf'
        if os.path.exists(sandbox_conf_file_path):
            os.remove(sandbox_conf_file_path)
        banned_hosts = CONFIG.get("SANDBOX_PYTHON_BANNED_HOSTS", '').strip()
        allow_dl_paths = CONFIG.get("SANDBOX_PYTHON_ALLOW_DL_PATHS",'').strip()
        allow_dl_open = CONFIG.get("SANDBOX_PYTHON_ALLOW_DL_OPEN",'0')
        allow_subprocess = CONFIG.get("SANDBOX_PYTHON_ALLOW_SUBPROCESS", '0')
        allow_syscall = CONFIG.get("SANDBOX_PYTHON_ALLOW_SYSCALL", '0')
        if banned_hosts:
            hostname = socket.gethostname()
            local_ip = socket.gethostbyname(hostname)
            banned_hosts = f"{banned_hosts},{local_ip}"
            banned_hosts = ",".join(s.strip() for s in banned_hosts.split(",") if s.strip() and s.strip().lower() != hostname.lower())
        with open(sandbox_conf_file_path, "w") as f:
            f.write(f"SANDBOX_PYTHON_BANNED_HOSTS={banned_hosts}\n")
            f.write(f"SANDBOX_PYTHON_ALLOW_DL_PATHS={','.join(sorted(set(filter(None, sys.path + _sandbox_python_sys_path + allow_dl_paths.split(',')))))}\n")
            f.write(f"SANDBOX_PYTHON_ALLOW_DL_OPEN={allow_dl_open}\n")
            f.write(f"SANDBOX_PYTHON_ALLOW_SUBPROCESS={allow_subprocess}\n")
            f.write(f"SANDBOX_PYTHON_ALLOW_SYSCALL={allow_syscall}\n")
        subprocess.run(["chmod", "-R", "550", _sandbox_path], check=False)

    try:
        init_sandbox_dir()
    except Exception as e:
        maxkb_logger.error(f'Exception: {e}', exc_info=True)

    def exec_code(self, code_str, keywords, function_name=None):
        _id = str(uuid.uuid7())
        action_function = f'({function_name !a}, locals_v.get({function_name !a}))' if function_name else 'locals_v.popitem()'
        set_run_user = f'os.setgid({pwd.getpwnam(_run_user).pw_gid});os.setuid({pwd.getpwnam(_run_user).pw_uid});' if _enable_sandbox else ''
        _exec_code = f"""
try:
    import os, sys, json
    from contextlib import redirect_stdout
    path_to_exclude = ['/opt/py3/lib/python3.11/site-packages', '/opt/maxkb-app/apps']
    sys.path = [p for p in sys.path if p not in path_to_exclude]
    sys.path += {_sandbox_python_sys_path}
    _id = os.environ.get("_ID")
    locals_v = {{}}
    keywords = {keywords}
    globals_v = {{}}
    {set_run_user}
    os.environ.clear()
    with redirect_stdout(open(os.devnull, 'w')):
        exec({dedent(code_str)!a}, globals_v, locals_v)
        f_name, f = {action_function}
        globals_v.update(locals_v)
        exec_result = f(**keywords)
    sys.stdout.write("\\n" + _id)
    json.dump({{'code':200,'msg':'success','data':exec_result}}, sys.stdout, default=str)
except Exception as e:
    if isinstance(e, MemoryError): e = Exception("Cannot allocate more memory: exceeded the limit of {_process_limit_mem_mb} MB.")
    sys.stdout.write("\\n" + _id)
    json.dump({{'code':500,'msg':str(e),'data':None}}, sys.stdout, default=str)
sys.stdout.write("\\n" + _id + "__END__\\n")
sys.stdout.flush()
"""
        maxkb_logger.debug(f"Tool execution({_id}) execute code: {_exec_code}")
        with tempfile.NamedTemporaryFile(mode='w', suffix='.py', delete=True) as f:
            f.write(_exec_code)
            f.flush()
            with execution_timer(_id):
                subprocess_result = self._exec(f.name, _id)
        if subprocess_result.returncode != 0:
            raise Exception(subprocess_result.stderr or subprocess_result.stdout or "Unknown exception occurred")
        lines = subprocess_result.stdout.splitlines()
        if len(lines) < 2 or lines[-1] != f"{_id}__END__":
            raise Exception("Execution interrupted or tampered")
        last_line = lines[-2]
        if not last_line.startswith(_id):
            raise Exception("No result found.")
        result = json.loads(last_line[len(_id):])
        if result.get('code') == 200:
            return result.get('data')
        raise Exception(result.get('msg') + (f'\n{subprocess_result.stderr}' if subprocess_result.stderr else ''))

    def _generate_mcp_server_code(self, _code, params, name=None, description=None, tool_id=None):
        # 解析代码,提取导入语句和函数定义
        try:
            tree = ast.parse(_code)
        except SyntaxError:
            return _code
        imports = []
        functions = []
        other_code = []
        for node in tree.body:
            if isinstance(node, ast.Import) or isinstance(node, ast.ImportFrom):
                imports.append(ast.unparse(node))
            elif isinstance(node, ast.FunctionDef):
                if node.name.startswith('_'):
                    other_code.append(ast.unparse(node))
                    continue
                # 修改函数参数以包含 params 中的默认值
                arg_names = [arg.arg for arg in node.args.args]
                # 为参数添加默认值,确保参数顺序正确
                defaults = []
                num_defaults = 0
                # 从后往前检查哪些参数有默认值
                for i, arg_name in enumerate(arg_names):
                    if arg_name in params:
                        num_defaults = len(arg_names) - i
                        break
                # 为有默认值的参数创建默认值列表
                if num_defaults > 0:
                    for i in range(len(arg_names) - num_defaults, len(arg_names)):
                        arg_name = arg_names[i]
                        if arg_name in params:
                            default_value = params[arg_name]
                            if isinstance(default_value, str):
                                defaults.append(ast.Constant(value=default_value))
                            elif isinstance(default_value, (int, float, bool)):
                                defaults.append(ast.Constant(value=default_value))
                            elif default_value is None:
                                defaults.append(ast.Constant(value=None))
                            else:
                                defaults.append(ast.Constant(value=str(default_value)))
                        else:
                            # 如果某个参数没有默认值,需要添加 None 占位
                            defaults.append(ast.Constant(value=None))
                    node.args.defaults = defaults
                # 修改返回类型注解为 Result
                node.returns = ast.Name(id='Result', ctx=ast.Load())
                # 修改 return 语句为 return Result(result=..., tool_id=...)
                class ReturnTransformer(ast.NodeTransformer):
                    def __init__(self, func_name):
                        self.func_name = func_name
                    def visit_Return(self, node):
                        if node.value is None:
                            # return 语句没有返回值
                            new_return = ast.Return(
                                value=ast.Call(
                                    func=ast.Name(id='Result', ctx=ast.Load()),
                                    args=[],
                                    keywords=[
                                        ast.keyword(arg='result', value=ast.Constant(value=None)),
                                        ast.keyword(arg='tool_id', value=ast.Constant(value=tool_id))
                                    ]
                                )
                            )
                        else:
                            # return 语句有返回值
                            new_return = ast.Return(
                                value=ast.Call(
                                    func=ast.Name(id='Result', ctx=ast.Load()),
                                    args=[],
                                    keywords=[
                                        ast.keyword(arg='result', value=node.value),
                                        ast.keyword(arg='tool_id', value=ast.Constant(value=tool_id))
                                    ]
                                )
                            )
                        return ast.copy_location(new_return, node)
                transformer = ReturnTransformer(node.name)
                node = transformer.visit(node)
                ast.fix_missing_locations(node)
                func_code = ast.unparse(node)
                # 有些模型不支持name是中文,例如: deepseek, 其他模型未知
                escaped_desc = (name + ' ' + description).replace('\n', ' ').replace("'", " ")
                functions.append(f"@mcp.tool(description='{escaped_desc}')\n{func_code}\n")
            else:
                other_code.append(ast.unparse(node))
        # 构建完整的 MCP 服务器代码
        code_parts = ["from mcp.server.fastmcp import FastMCP"]
        code_parts.extend(imports)
        code_parts.append(f"\nfrom pydantic import BaseModel")
        code_parts.append(f"\nfrom typing import Any")
        code_parts.append(f"\nclass Result(BaseModel):")
        code_parts.append(f"\n\tresult: Any")
        code_parts.append(f"\n\ttool_id: str\n")
        code_parts.append(f"\nmcp = FastMCP(\"{uuid.uuid7()}\")\n")
        code_parts.extend(other_code)
        code_parts.extend(functions)
        code_parts.append("\nmcp.run(transport=\"stdio\")\n")
        return "\n".join(code_parts)

    def generate_mcp_server_code(self, code_str, params, name, description, tool_id):
        code = self._generate_mcp_server_code(code_str, params, name, description, tool_id)
        set_run_user = f'os.setgid({pwd.getpwnam(_run_user).pw_gid});os.setuid({pwd.getpwnam(_run_user).pw_uid});' if _enable_sandbox else ''
        return f"""
import os, sys, logging
logging.basicConfig(level=logging.WARNING)
logging.getLogger("mcp").setLevel(logging.ERROR)
logging.getLogger("mcp.server").setLevel(logging.ERROR)
path_to_exclude = ['/opt/py3/lib/python3.11/site-packages', '/opt/maxkb-app/apps']
sys.path = [p for p in sys.path if p not in path_to_exclude]
sys.path += {_sandbox_python_sys_path}
{set_run_user}
os.environ.clear()
exec({dedent(code)!a})
"""

    def get_tool_mcp_config(self, tool, params):
        _code = self.generate_mcp_server_code(tool.code, params, tool.name, tool.desc, str(tool.id))
        maxkb_logger.debug(f"Python code of mcp tool: {_code}")
        compressed_and_base64_encoded_code_str = base64.b64encode(gzip.compress(_code.encode())).decode()
        tool_config = {
            'command': sys.executable,
            'args': [
                '-c',
                f'import base64,gzip; exec(gzip.decompress(base64.b64decode(\'{compressed_and_base64_encoded_code_str}\')).decode())',
            ],
            'cwd': _sandbox_path,
            'env': {
                'LD_PRELOAD': f'{_sandbox_path}/lib/sandbox.so',
            },
            'transport': 'stdio',
        }
        return tool_config

    def get_app_mcp_config(self, api_key):
        app_config = {
            'url': f'http://127.0.0.1:8080{CONFIG.get_chat_path()}/api/mcp',
            'transport': 'streamable_http',
            'headers': {
                'Authorization': f'Bearer {api_key}',
            },
        }
        return app_config

    def _exec(self, execute_file, _id):
        kwargs = {'cwd': BASE_DIR, 'env': {
            'LD_PRELOAD': f'{_sandbox_path}/lib/sandbox.so',
            '_ID': _id,
        }}
        def _set_resource_limit():
            if not _enable_sandbox or not sys.platform.startswith("linux"): return
            with suppress(Exception): resource.setrlimit(resource.RLIMIT_AS, (_process_limit_mem_mb * 1024 * 1024,) * 2)
            with suppress(Exception): os.sched_setaffinity(0, set(random.sample(list(os.sched_getaffinity(0)), _process_limit_cpu_cores)))
        try:
            subprocess_result = subprocess.run(
                [sys.executable, execute_file],
                timeout=_process_limit_timeout_seconds,
                text=True,
                capture_output=True,
                **kwargs,
                preexec_fn=_set_resource_limit
            )
            return subprocess_result
        except subprocess.TimeoutExpired:
            raise Exception(_(f"Process execution timed out after {_process_limit_timeout_seconds} seconds."))

    def validate_mcp_transport(self, code_str):
        servers = json.loads(code_str)
        for server, config in servers.items():
            if config.get('transport') not in ['sse', 'streamable_http']:
                raise Exception(_('Only support transport=sse or transport=streamable_http'))

@contextmanager
def execution_timer(id=""):
    start = time.perf_counter()
    try:
        yield
    finally:
        maxkb_logger.debug(f"Tool execution({id}) takes {time.perf_counter() - start:.6f} seconds.")
