#!/usr/bin/env python3
#
# SymbiYosys (sby) -- Front-end for Yosys-based formal verification flows
#
# Copyright (C) 2016  Claire Xenia Wolf <claire@yosyshq.com>
#
# Permission to use, copy, modify, and/or distribute this software for any
# purpose with or without fee is hereby granted, provided that the above
# copyright notice and this permission notice appear in all copies.
#
# THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
# WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
# MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
# ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
# WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
# ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
# OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
#

import json, os, sys, shutil, tempfile, re
sys.path += [os.path.dirname(__file__) + p for p in ["/share/python3", "/../share/yosys/python3"]]
from sby_cmdline import parser_func
from sby_core import SbyConfig, SbyTask, SbyAbort, SbyTaskloop, process_filename, dress_message
from sby_jobserver import SbyJobClient, process_jobserver_environment
from sby_status import SbyStatusDb, remove_db, FileInUseError
import time, platform, click

release_version = 'unknown SBY version'
release_version = 'SBY v0.58-2-g11fd202'

process_jobserver_environment()  # needs to be called early

parser = parser_func(release_version)

args = parser.parse_args()

sbyfile = args.sbyfile
workdir = args.workdir
workdir_prefix = args.workdir_prefix
if workdir is not None and workdir_prefix is not None:
    print("ERROR: -d and --prefix are mutually exclusive.", file=sys.stderr)
    sys.exit(1)
tasknames = args.arg_tasknames + args.tasknames
opt_force = args.force
opt_backup = args.backup
opt_tmpdir = args.tmpdir
exe_paths = args.exe_paths
throw_err = args.throw_err
dump_cfg = args.dump_cfg
dump_tags = args.dump_tags
dump_tasks = args.dump_tasks
dump_defaults = args.dump_defaults
dump_taskinfo = args.dump_taskinfo
dump_files = args.dump_files
reusedir = False
setupmode = args.setupmode
linkmode = args.linkmode
autotune = args.autotune
autotune_config = args.autotune_config
sequential = args.sequential
jobcount = args.jobcount
init_config_file = args.init_config_file
status_show = args.status
status_reset = args.status_reset
status_cancels = args.status_cancels
task_status = args.task_status
status_live_formats = args.live_formats
status_format = args.status_format
status_latest = args.status_latest

if autotune and linkmode:
    print("ERROR: --link flag currently not available with --autotune")
    sys.exit(1)

if status_show or status_reset or task_status or status_format:
    target = workdir_prefix or workdir or sbyfile
    if target is None:
        print("ERROR: Specify a .sby config file or working directory to use --status.")
        sys.exit(1)
    if not os.path.isdir(target) and target.endswith('.sby'):
        target = target[:-4]
    if not os.path.isdir(target):
        print(f"ERROR: No directory found at {target!r}.", file=sys.stderr)
        sys.exit(1)

    try:
        with open(f"{target}/status.path", "r") as status_path_file:
            status_path = f"{target}/{status_path_file.read().rstrip()}"
    except FileNotFoundError:
        status_path = f"{target}/status.sqlite"

    if not os.path.exists(status_path):
        print(f"ERROR: No status database found at {status_path!r}.", file=sys.stderr)
        sys.exit(1)

    status_db = SbyStatusDb(status_path, task=None)

    if status_reset:
        status_db.reset()
    elif status_db.test_schema():
        print(f"ERROR: Status database does not match expected format.  Use --statusreset to reset.")
        sys.exit(1)

    if status_show:
        status_db.print_status_summary(status_latest)

    if status_format:
        status_db.print_status_summary_fmt(tasknames, status_format, status_latest)
        
    if task_status:
        status_db.print_task_summary()

    status_db.db.close()

    if status_live_formats:
        print(f"WARNING: --live option found but not used.")

    sys.exit(0)
elif status_latest:
    print(f"WARNING: --latest flag found but not used.")


if sbyfile is not None:
    if os.path.isdir(sbyfile):
        if workdir is not None:
            print("ERROR: Can't use -d when running in existing directory.", file=sys.stderr)
            sys.exit(1)
        workdir = sbyfile
        sbyfile += "/config.sby"
        reusedir = True
        if not opt_force and os.path.exists(workdir + "/model"):
            print("ERROR: Use -f to re-run in existing directory.", file=sys.stderr)
            sys.exit(1)
        if tasknames:
            print("ERROR: Can't use tasks when running in existing directory.", file=sys.stderr)
            sys.exit(1)
        if setupmode:
            print("ERROR: Can't use --setup with existing directory.", file=sys.stderr)
            sys.exit(1)
        if opt_force:
            for f in "PASS FAIL UNKNOWN ERROR TIMEOUT".split():
                if os.path.exists(workdir + "/" + f):
                    os.remove(workdir + "/" + f)
    elif not sbyfile.endswith(".sby"):
        print("ERROR: Sby file does not have .sby file extension.", file=sys.stderr)
        sys.exit(1)

elif init_config_file is not None:
    sv_file = init_config_file + ".sv"
    sby_file = init_config_file + ".sby"
    with open(sby_file, 'w') as config:
        config.write(f"""[options]
mode bmc

[engines]
smtbmc

[script]
read -formal {sv_file}
prep -top top

[files]
{sv_file}
""")

    print(f"sby config written to {sby_file}", file=sys.stderr)
    sys.exit(0)

early_logmsgs = list()

def early_log(workdir, msg):
    early_logmsgs.append(dress_message(workdir, msg))
    click.echo(early_logmsgs[-1])

def read_sbyconfig(sbydata, taskname):
    cfgdata = list()
    tasklist = list()
    defaultlist = None
    task_matched = False

    pycode = None
    tasks_section = False
    task_tags_active = set()
    task_tags_all = set()
    task_skip_block = False
    task_skiping_blocks = False

    def handle_line(line):
        nonlocal pycode, tasks_section, task_tags_active, task_tags_all
        nonlocal task_skip_block, task_skiping_blocks, task_matched
        nonlocal defaultlist

        line = line.rstrip("\n")
        line = line.rstrip("\r")

        if pycode is not None:
            if line == "--pycode-end--":
                gdict = globals().copy()
                gdict["task"] = taskname
                gdict["tags"] = set(task_tags_active)
                gdict["output_lines"] = list()
                exec("def output(line):\n  output_lines.append(line)\n" + pycode, gdict)
                pycode = None
                for line in gdict["output_lines"]:
                    handle_line(line)
                return
            pycode += line + "\n"
            return

        if line == "--pycode-begin--":
            pycode = ""
            return

        if tasks_section and line.startswith("["):
            tasks_section = False

        if task_skiping_blocks:
            if line == "--":
                task_skip_block = False
                task_skiping_blocks = False
                return

        if not tasks_section:
            found_task_tag = False
            task_skip_line = False

            for t in task_tags_all:
                if line.startswith(t+":"):
                    line = line[len(t)+1:].lstrip()
                    match = t in task_tags_active
                elif line.startswith("~"+t+":"):
                    line = line[len(t)+2:].lstrip()
                    match = t not in task_tags_active
                else:
                    continue

                if line == "":
                    task_skiping_blocks = True
                    task_skip_block = not match
                    task_skip_line = True
                else:
                    task_skip_line = not match

                found_task_tag = True
                break

            if len(task_tags_all) and not found_task_tag:
                tokens = line.split()
                if len(tokens) > 0 and tokens[0][0] == line[0] and tokens[0].endswith(":"):
                    print(f"ERROR: Invalid task specifier \"{tokens[0]}\".", file=sys.stderr)
                    sys.exit(1)

            if task_skip_line or task_skip_block:
                return

        if tasks_section:
            if taskname is None:
                cfgdata.append(line)
            if line.startswith("#"):
                return

            line = line.split(":")
            if len(line) == 1:
                line = line[0].split()
                if len(line) > 0:
                    lhs, rhs = line[:1], line[1:]
                else:
                    return
            elif len(line) == 2:
                lhs, rhs = line[0].split(), line[1].split()
            else:
                print("ERROR: Syntax error in tasks block.", file=sys.stderr)
                sys.exit(1)

            for tagname in rhs:
                if tagname == "default":
                    continue
                if all(map(lambda c: c not in "(?*.[]|)", tagname)):
                    task_tags_all.add(tagname)

            for tname in lhs:
                if all(map(lambda c: c not in "(?*.[]|)", tname)):
                    if tname not in tasklist:
                        tasklist.append(tname)
                    if "default" in rhs:
                        if defaultlist is None:
                            defaultlist = list()
                        if tname not in defaultlist:
                            defaultlist.append(tname)
                    task_tags_all.add(tname)

                if taskname is not None and re.fullmatch(tname, taskname):
                    task_matched = True
                    task_tags_active.add(tname)
                    for tagname in rhs:
                        if tagname == "default":
                            continue
                        if all(map(lambda c: c not in "(?*.[]|)", tagname)):
                            task_tags_active.add(tagname)
                        else:
                            for t in task_tags_all:
                                if re.fullmatch(tagname, t):
                                    task_tags_active.add(t)

        elif line == "[tasks]":
            if taskname is None:
                cfgdata.append(line)
            tasks_section = True

        else:
            cfgdata.append(line)

    for line in sbydata:
        handle_line(line)

    if taskname is not None and not task_matched:
        print(f"ERROR: Task name '{taskname}' didn't match any lines in [tasks].", file=sys.stderr)
        sys.exit(1)

    if defaultlist is None:
        defaultlist = tasklist

    return cfgdata, tasklist, defaultlist, sorted(list(task_tags_all))


sbydata = list()
if sbyfile is None:
    print("Reading .sby configuration from stdin:")
with (open(sbyfile, "r") if sbyfile is not None else sys.stdin) as f:
    for line in f:
        sbydata.append(line)

if dump_cfg:
    assert len(tasknames) < 2
    sbyconfig, _, _, _ = read_sbyconfig(sbydata, tasknames[0] if len(tasknames) else None)
    print("\n".join(sbyconfig))
    sys.exit(0)

if dump_files:
    file_set = set()

    def find_files(taskname):
        sbyconfig, _, _, _ = read_sbyconfig(sbydata, taskname)

        start_index = -1
        for i in range(len(sbyconfig)):
            if sbyconfig[i].strip() == "[files]":
                start_index = i
                break

        if start_index == -1:
            return

        for line in sbyconfig[start_index+1:]:
            line = line.strip()
            if line.startswith("["):
                break
            if line == "" or line.startswith("#"):
                continue
            filename = line.split()[-1]
            file_set.add(process_filename(filename))

    if len(tasknames):
        for taskname in tasknames:
            find_files(taskname)
    else:
        find_files(None)
    print("\n".join(file_set))
    sys.exit(0)

if dump_tags:
    _, _, _, tagnames = read_sbyconfig(sbydata, None)
    for tag in tagnames:
        print(tag)
    sys.exit(0)

if dump_tasks or dump_defaults or dump_tags:
    _, tasks, dtasks, tags = read_sbyconfig(sbydata, None)
    for name in tasks if dump_tasks else dtasks if dump_defaults else tags:
        if name is not None:
            print(name)
    sys.exit(0)

if dump_taskinfo:
    _, _, tasknames, _ = read_sbyconfig(sbydata, None)
    taskinfo = {}
    for taskname in tasknames or [None]:
        task_sbyconfig, _, _, _ = read_sbyconfig(sbydata, taskname)
        taskinfo[taskname or ""] = info = {}
        cfg = SbyConfig()
        cfg.parse_config(task_sbyconfig)
        taskinfo[taskname or ""] = {
            "mode": cfg.options.get("mode"),
            "engines": cfg.engines,
            "script": cfg.script,
            "cancelledby": cfg.cancelledby,
        }
    print(json.dumps(taskinfo, indent=2))
    sys.exit(0)

if len(tasknames) == 0:
    _, _, tasknames, _ = read_sbyconfig(sbydata, None)
    if len(tasknames) == 0:
        tasknames = [None]

if (workdir is not None) and (len(tasknames) != 1):
    print("ERROR: Exactly one task is required when workdir is specified. Specify the task or use --prefix instead of -d.", file=sys.stderr)
    sys.exit(1)

# Check there are no files in this dir or any of its subdirs
def check_dirtree_empty_of_files(dir):
    list = os.listdir(dir)
    if list:
        for fn in list:
            child_dir = os.path.join(dir, fn)
            if os.path.isdir(child_dir) and check_dirtree_empty_of_files(child_dir):
                continue
            return False
    return True

def start_task(taskloop, taskname):
    sbyconfig, _, _, _ = read_sbyconfig(sbydata, taskname)

    my_opt_tmpdir = opt_tmpdir
    my_workdir = None
    my_status_db = None

    if workdir is not None:
        my_workdir = workdir
    elif workdir_prefix is not None:
        if taskname is None:
            my_workdir = workdir_prefix
        else:
            my_workdir = workdir_prefix + "_" + taskname
            my_status_db = f"../{os.path.basename(workdir_prefix)}/status.sqlite"

    if my_workdir is None and sbyfile is not None and not my_opt_tmpdir:
        my_workdir = sbyfile[:-4]
        if taskname is not None:
            my_status_db = f"../{os.path.basename(my_workdir)}/status.sqlite"
            my_workdir += "_" + taskname

    if my_workdir is not None:
        if opt_backup:
            backup_idx = 0
            while os.path.exists("{}.bak{:03d}".format(my_workdir, backup_idx)):
                backup_idx += 1
            early_log(my_workdir, "Moving directory '{}' to '{}'.".format(my_workdir, "{}.bak{:03d}".format(my_workdir, backup_idx)))
            shutil.move(my_workdir, "{}.bak{:03d}".format(my_workdir, backup_idx))

        if opt_force and not reusedir:
            early_log(my_workdir, f"Removing directory '{os.path.abspath(my_workdir)}'.")
            shutil.rmtree(my_workdir, ignore_errors=True)

        if reusedir:
            pass
        elif os.path.isdir(my_workdir) and not check_dirtree_empty_of_files(my_workdir):
            print(f"ERROR: Directory '{my_workdir}' already exists, use -f to overwrite the existing directory.")
            sys.exit(1)
        elif not os.path.isdir(my_workdir):
            os.makedirs(my_workdir)

    else:
        my_opt_tmpdir = True
        my_workdir = tempfile.mkdtemp()

    if os.getenv("SBY_WORKDIR_GITIGNORE"):
        with open(f"{my_workdir}/.gitignore", "w") as gitignore:
            print("*", file=gitignore)

    if my_status_db is not None:
        os.makedirs(f"{my_workdir}/{os.path.dirname(my_status_db)}", exist_ok=True)
        if os.getenv("SBY_WORKDIR_GITIGNORE"):
            with open(f"{my_workdir}/{os.path.dirname(my_status_db)}/.gitignore", "w") as gitignore:
                print("*", file=gitignore)
        with open(f"{my_workdir}/status.path", "w") as status_path:
            print(my_status_db, file=status_path)
        if os.path.exists(f"{my_workdir}/{my_status_db}") and opt_force:
            try:
                remove_db(f"{my_workdir}/{my_status_db}")
            except FileInUseError:
                # don't delete an open database
                pass

    junit_ts_name = os.path.basename(sbyfile[:-4]) if sbyfile is not None else workdir if workdir is not None else "stdin"
    junit_tc_name = taskname if taskname is not None else "default"

    if reusedir:
        junit_filename = os.path.basename(my_workdir)
    elif sbyfile is not None:
        junit_filename = os.path.basename(sbyfile[:-4])
        if taskname is not None:
            junit_filename += "_" + taskname
    elif taskname is not None:
        junit_filename = taskname
    else:
        junit_filename = "junit"

    task = SbyTask(sbyconfig, my_workdir, early_logmsgs, reusedir, status_cancels, taskloop, name=taskname, live_formats=status_live_formats)

    for k, v in exe_paths.items():
        task.exe_paths[k] = v

    def exit_callback():
        if not autotune and not setupmode:
            task.summarize()
            task.write_summary_file()

        if my_opt_tmpdir:
            task.log(f"Removing directory '{my_workdir}'.")
            shutil.rmtree(my_workdir, ignore_errors=True)

        if setupmode:
            task.log(f"SETUP COMPLETE (rc={task.retcode})")
        else:
            task.log(f"DONE ({task.status}, rc={task.retcode})")
        task.logfile.close()

        if not my_opt_tmpdir and not setupmode and not autotune:
            with open("{}/{}.xml".format(task.workdir, junit_filename), "w") as f:
                task.print_junit_result(f, junit_ts_name, junit_tc_name, junit_format_strict=False)

            with open(f"{task.workdir}/status", "w") as f:
                print(f"{task.status} {task.retcode} {task.total_time}", file=f)

    task.exit_callback = exit_callback

    if not autotune:
        task.setup_procs(setupmode, linkmode)
        task.task_local_abort = not throw_err

    return task

failed = []
retcode = 0

if jobcount is not None and jobcount < 1:
    print("ERROR: The -j option requires a positive number as argument")
    sys.exit(1)

# Autotune is already parallel, parallelizing it across tasks needs some more work
if autotune:
    sequential = True

if sequential:
    if autotune:
        jobclient = None  # TODO make autotune use a jobclient
    else:
        jobclient = SbyJobClient(jobcount)

    for taskname in tasknames:
        taskloop = SbyTaskloop(jobclient)
        try:
            task = start_task(taskloop, taskname)
        except SbyAbort:
            if throw_err:
                raise
            sys.exit(1)

        if autotune:
            from sby_autotune import SbyAutotune
            SbyAutotune(task, autotune_config).run()
        elif setupmode:
            task.exit_callback()
        else:
            taskloop.run()
        retcode |= task.retcode
        if task.retcode:
            failed.append(taskname)
else:
    jobclient = SbyJobClient(jobcount)
    taskloop = SbyTaskloop(jobclient)

    tasks = {}
    for taskname in tasknames:
        try:
            tasks[taskname] = start_task(taskloop, taskname)
        except SbyAbort:
            if throw_err:
                raise
            sys.exit(1)

    taskloop.run()

    for taskname, task in tasks.items():
        retcode |= task.retcode
        if task.retcode:
            failed.append(taskname)

if failed and (len(tasknames) > 1 or tasknames[0] is not None):
    click.echo(dress_message(None, click.style(f"The following tasks failed: {failed}", fg="red", bold=True)))

sys.exit(retcode)
