import os
import re
import json
import logging
from flask import (
    Flask,
    request,
    session,
    g,
    redirect,
    url_for,
    abort,
    render_template,
)
from revprox import ReverseProxied

# configuration
VERSION = "2022.06.14"
IMAGEDIR = "/data/images/"
LABELDIR = "/data/labels/"
CONFIG_FILE = "/data/config.json"
DEBUG = False
SECRET_KEY = os.environ.get("SECRETKEY", "development key")
for d in (IMAGEDIR, LABELDIR):
    try:
        os.makedirs(d)
    except FileExistsError:
        pass

app = Flask(__name__)
app.config.from_object(__name__)
app.wsgi_app = ReverseProxied(app.wsgi_app)


def read_config():
    try:
        with open(app.config["CONFIG_FILE"], "rt") as fp:
            config = json.load(fp)
    except Exception as e:
        logging.warning(e)
        logging.warning("config.json could not be read. using defaults.")
        config = {
            "title": "Labeler",
            "labels": [
                {"type": "checkbox", "name": "my_check", "default": "off"},
                {"type": "text", "name": "my_text", "default": "Some text"},
                {
                    "type": "range",
                    "name": "my_slider",
                    "default": "75",
                    "min": "0",
                    "max": "100",
                },
            ],
            "users": "user",
        }

    if not "title" in config:
        config["title"] = "Labeler"
    if not "images" in config:
        config["images"] = "global"
    if not config["images"] in ("global", "personal"):
        raise ValueError("Config 'images' is not global / personal")

    for label in config["labels"]:
        if label["type"] == "range":
            label["value"] = label.get("default", label.get("min", ""))
        elif label["type"] == "info":
            label["name"] = ""
            label["value"] = ""
        else:
            label["value"] = label.get("default", "")
    return config


app.config["user_config"] = read_config()


@app.before_request
def before_request_func():
    g.version = app.config["VERSION"]
    g.config = app.config["user_config"]
    g.labels = app.config["user_config"]["labels"]
    g.users = app.config["user_config"]["users"]


def natural_key(string_):
    """See http://www.codinghorror.com/blog/archives/001018.html"""
    return [int(s) if s.isdigit() else s for s in re.split(r"(\d+)", string_)]


def get_metadata_path(image_path):
    base, ext = os.path.splitext(os.path.basename(image_path))
    jsonpath = os.path.join(app.config["LABELDIR"], get_user(), base + ".json")
    return jsonpath


def get_current_image(images):
    for i, f in enumerate(images):
        jsonpath = get_metadata_path(f)
        if not os.path.exists(jsonpath):
            return i
    return i


def get_image_list():
    if g.config["images"] == "global":
        image_path = app.config["IMAGEDIR"]
    if g.config["images"] == "personal":
        image_path = os.path.join(app.config["IMAGEDIR"], get_user())
    image_list = sorted(
        [
            os.path.join(image_path, x)
            for x in os.listdir(image_path)
            if not x.endswith("json")
        ],
        key=natural_key,
    )
    if len(image_list) == 0:
        return [None]
    return image_list


def get_metadata(imagepath):
    try:
        with open(get_metadata_path(imagepath), "rt") as fp:
            values = json.load(fp)
            metadata = [x.copy() for x in g.labels.copy()]
            for label in metadata:
                if not "name" in label:
                    continue
                if label["name"] in values:
                    label["value"] = values[label["name"]]
                else:
                    label["value"] = label.get("default", "")

            return metadata
    except FileNotFoundError:
        # Return defaults
        return g.labels
    except Exception as e:
        logging.error(e)
        # Return defaults
        return g.labels


def set_metadata(values, imagepath):
    """Write metadata as json"""
    metadata = [x.copy() for x in g.labels.copy() if x["type"] != "info"]
    for label in metadata:
        if not "name" in label:
            continue
        if not label["name"] in values:
            values[label["name"]] = label.get("default", "")

    with open(get_metadata_path(imagepath), "wt") as fp:
        return json.dump(values, fp, indent=2, sort_keys=True)


def set_user(user_name):
    """Set user in session, create dir for user labels"""
    if user_name not in g.users:
        raise ValueError("No such user {}".format(user_name))
    session["user"] = user_name
    try:
        os.makedirs(os.path.join(app.config["LABELDIR"], user_name))
    except FileExistsError:
        pass


def get_user():

    return session.get("user", None)


@app.route("/", methods=["GET", "POST"])
@app.route("/user:<int:user>", methods=["GET", "POST"])
def main(user=None):

    if request.method == "POST":
        user_name = request.form["user_name"]
        set_user(user_name)
        return redirect(url_for("show_image"))

    user_name = get_user()

    return render_template("main.html", current_user=user_name)


@app.route("/image", methods=["GET", "POST"])
@app.route("/image:<int:id>", methods=["GET", "POST"])
def show_image(id=None):
    if get_user() is None:
        return redirect(url_for("main"))

    if request.method == "POST":
        # parse form
        image_name = request.form["image_name"]
        metadata = {}
        for key in request.form:
            if key.startswith("label_"):
                dictkey = key[6:]
                metadata[dictkey] = str(request.form[key])
        # Find missing checkboxes
        for label in g.labels:
            if label["type"] == "checkbox":
                if "label_{}".format(label["name"]) not in request.form:
                    metadata[label["name"]] = "off"
        set_metadata(metadata, image_name)

    images = get_image_list()
    if id == None:
        id = get_current_image(images)
    else:
        id = max(0, min(len(images) - 1, int(id)))
    labels = get_metadata(images[id])
    id_minus = max(0, min(len(images) - 1, int(id - 1)))
    id_plus = max(0, min(len(images) - 1, int(id + 1)))
    return render_template(
        "show_image.html",
        id=id,
        count=len(images),
        image=images[id],
        image_name=os.path.basename(images[id]),
        image_plus=images[id_plus],
        labels=labels,
        id_minus=id_minus,
        id_plus=id_plus,
    )