<cfsetting showdebugoutput="false">
<cfsetting enablecfoutputonly="true">
<cfcontent type="application/json; charset=utf-8" reset="true">

<cfscript>
// Create or update a task category
// Input: BusinessID, TaskCategoryID (optional, for update), Name, Color
// Output: { OK: true, CATEGORY_ID: int }

function apiAbort(required struct payload) {
    writeOutput(serializeJSON(payload));
    abort;
}

function readJsonBody() {
    var raw = getHttpRequestData().content;
    if (isNull(raw)) raw = "";
    if (!len(trim(raw))) return {};
    try {
        var data = deserializeJSON(raw);
        if (isStruct(data)) return data;
    } catch (any e) {}
    return {};
}

try {
    data = readJsonBody();

    // Get BusinessID
    businessID = 0;
    httpHeaders = getHttpRequestData().headers;

    if (structKeyExists(url, "bid") && isNumeric(url.bid)) {
        businessID = int(url.bid);
    } else if (structKeyExists(data, "BusinessID") && isNumeric(data.BusinessID)) {
        businessID = int(data.BusinessID);
    } else if (structKeyExists(httpHeaders, "X-Business-ID") && isNumeric(httpHeaders["X-Business-ID"])) {
        businessID = int(httpHeaders["X-Business-ID"]);
    }

    if (businessID == 0) {
        apiAbort({ "OK": false, "ERROR": "missing_params", "MESSAGE": "BusinessID is required" });
    }

    // Get fields
    categoryID = structKeyExists(data, "TaskCategoryID") && isNumeric(data.TaskCategoryID) ? int(data.TaskCategoryID) : 0;
    categoryName = structKeyExists(data, "Name") ? trim(toString(data.Name)) : "";
    categoryColor = structKeyExists(data, "Color") ? trim(toString(data.Color)) : "##6366f1";

    if (!len(categoryName)) {
        apiAbort({ "OK": false, "ERROR": "missing_params", "MESSAGE": "Name is required" });
    }

    // Validate color format
    if (!reFindNoCase("^##[0-9A-F]{6}$", categoryColor)) {
        // Try to fix common issues
        if (reFindNoCase("^[0-9A-F]{6}$", categoryColor)) {
            categoryColor = "##" & categoryColor;
        } else if (reFindNoCase("^##[0-9A-F]{6}$", categoryColor)) {
            categoryColor = "##" & right(categoryColor, 6);
        } else {
            categoryColor = "##6366f1";
        }
    }

    if (categoryID > 0) {
        // UPDATE existing category
        qCheck = queryExecute("
            SELECT ID FROM TaskCategories
            WHERE ID = :id AND BusinessID = :businessID
        ", {
            id: { value: categoryID, cfsqltype: "cf_sql_integer" },
            businessID: { value: businessID, cfsqltype: "cf_sql_integer" }
        }, { datasource: "payfrit" });

        if (qCheck.recordCount == 0) {
            apiAbort({ "OK": false, "ERROR": "not_found", "MESSAGE": "Category not found" });
        }

        queryExecute("
            UPDATE TaskCategories SET
                Name = :name,
                Color = :color
            WHERE ID = :id
        ", {
            name: { value: categoryName, cfsqltype: "cf_sql_varchar" },
            color: { value: categoryColor, cfsqltype: "cf_sql_varchar" },
            id: { value: categoryID, cfsqltype: "cf_sql_integer" }
        }, { datasource: "payfrit" });

        apiAbort({
            "OK": true,
            "CATEGORY_ID": categoryID,
            "MESSAGE": "Category updated"
        });

    } else {
        // INSERT new category
        queryExecute("
            INSERT INTO TaskCategories (BusinessID, Name, Color)
            VALUES (:businessID, :name, :color)
        ", {
            businessID: { value: businessID, cfsqltype: "cf_sql_integer" },
            name: { value: categoryName, cfsqltype: "cf_sql_varchar" },
            color: { value: categoryColor, cfsqltype: "cf_sql_varchar" }
        }, { datasource: "payfrit" });

        qNew = queryExecute("SELECT LAST_INSERT_ID() as newID", [], { datasource: "payfrit" });

        apiAbort({
            "OK": true,
            "CATEGORY_ID": qNew.newID,
            "MESSAGE": "Category created"
        });
    }

} catch (any e) {
    apiAbort({
        "OK": false,
        "ERROR": "server_error",
        "MESSAGE": e.message
    });
}
</cfscript>
