STM32F4-Base/test/host/prot_set/prot_set_test.c

/*
 * 模块名称：保护定值模型（P1）主机侧单元测试
 * 模块功能：在 PC 上对 App/algo/prot_set.c 做离线验证。
 *
 * 被测对象：真实源文件（#include 原样纳入）。纯逻辑，无需桩。
 *
 * 覆盖点（docs/算法/继电保护功能复现规划.md §5.2 / §3.4 L5-1）：
 *   TC-PS-001 init：默认值装载、越界位图 0、selfcheck 通过、未闭锁
 *   TC-PS-002 set：范围内写入生效；越界拒写且原值不动
 *   TC-PS-003 校验和封存语义：set 后未 seal → selfcheck 失败并闭锁；
 *             seal → 通过并解锁（L5-1 核心闭环）
 *   TC-PS-004 load_raw：合法整表装载并封存；含越界项 → 整表不装载 +
 *             bad_mask 指认越界项（定值一致性：宁可全旧不可半新）
 *   TC-PS-005 Q10 往返精度（±1 LSB）
 *   TC-PS-006 元数据表自检：min<=max、投退项 0..1、非零通讯地址不重复
 *   TC-PS-007 越界编号守卫（get/set）
 *
 * 通过：全部 TC PASS（main 返回 0）。
 * 创建日期：2026-10-11
 */
#include <stdint.h>
#include <stdio.h>

static int s_total = 0, s_passed = 0, s_failed = 0;

#define CHECK(cond, name) do { \
    s_total++; \
    if (cond) { s_passed++; printf("  [PASS] %s\n", name); } \
    else      { s_failed++; printf("  [FAIL] %s  (line %d)\n", name, __LINE__); } \
} while (0)

#include "prot_set.c"

/* TC-PS-001 */
static void tc_init(void) {
    prot_set_init();
    CHECK(prot_set_bad_mask() == 0u, "TC-PS-001 init: no bad items");
    CHECK(prot_set_selfcheck() == 0, "TC-PS-001 init: selfcheck pass");
    CHECK(prot_set_locked() == 0u, "TC-PS-001 init: not locked");
    CHECK(prot_set_get_f(PS_OC1_CUR) > 9.99f && prot_set_get_f(PS_OC1_CUR) < 10.01f,
          "TC-PS-001 default OC1 current = 10.0 A");
    CHECK(prot_set_get_ctl(PS_OC3_TRIP) == 0u,
          "TC-PS-001 default OC3 = alarm (trip off)");
}

/* TC-PS-002 */
static void tc_set_range(void) {
    prot_set_init();
    CHECK(prot_set_set(PS_OC2_CUR, PROT_SET_Q10(7.5)) == 0,
          "TC-PS-002 in-range set accepted");
    CHECK(prot_set_get_f(PS_OC2_CUR) > 7.49f && prot_set_get_f(PS_OC2_CUR) < 7.51f,
          "TC-PS-002 value readable after set");
    CHECK(prot_set_set(PS_OC2_CUR, PROT_SET_Q10(101.0)) == -1,
          "TC-PS-002 over-max set rejected");
    CHECK(prot_set_get_f(PS_OC2_CUR) > 7.49f && prot_set_get_f(PS_OC2_CUR) < 7.51f,
          "TC-PS-002 rejected set leaves value unchanged");
    CHECK(prot_set_set(PS_OC1_EN, PROT_SET_Q10(2)) == -1,
          "TC-PS-002 ctl item rejects value 2");
}

/* TC-PS-003 */
static void tc_seal_selfcheck(void) {
    prot_set_init();
    CHECK(prot_set_set(PS_OC1_CUR, PROT_SET_Q10(8.0)) == 0, "TC-PS-003 set ok");
    CHECK(prot_set_selfcheck() == -1,
          "TC-PS-003 set-without-seal => selfcheck FAIL (tamper detect)");
    CHECK(prot_set_locked() == 1u, "TC-PS-003 selfcheck failure latches lock");
    prot_set_seal();
    CHECK(prot_set_selfcheck() == 0, "TC-PS-003 seal => selfcheck pass");
    CHECK(prot_set_locked() == 0u, "TC-PS-003 seal clears lock");
}

/* TC-PS-004 */
static void tc_load_raw(void) {
    int32_t tbl[PS_ID_COUNT];
    uint32_t i;

    prot_set_init();
    for (i = 0u; i < (uint32_t)PS_ID_COUNT; i++) {
        tbl[i] = prot_set_get((prot_set_id_t)i);
    }
    tbl[PS_OL_CUR] = PROT_SET_Q10(1.5);
    CHECK(prot_set_load_raw(tbl) == 0, "TC-PS-004 valid table loads");
    CHECK(prot_set_get_f(PS_OL_CUR) > 1.49f && prot_set_get_f(PS_OL_CUR) < 1.51f,
          "TC-PS-004 loaded value visible");
    CHECK(prot_set_selfcheck() == 0, "TC-PS-004 load_raw auto-seals");

    tbl[PS_OC3_DLY] = PROT_SET_Q10(60001.0);      /* 越上限 */
    tbl[PS_OL_CUR]  = PROT_SET_Q10(2.5);          /* 合法改动 */
    CHECK(prot_set_load_raw(tbl) == -1, "TC-PS-004 bad table rejected");
    CHECK(prot_set_bad_mask() == (1uL << PS_OC3_DLY),
          "TC-PS-004 bad_mask points at the offending item");
    CHECK(prot_set_get_f(PS_OL_CUR) > 1.49f && prot_set_get_f(PS_OL_CUR) < 1.51f,
          "TC-PS-004 rejected load keeps OLD table (all-or-nothing)");
    CHECK(prot_set_load_raw(0) == -1, "TC-PS-004 NULL table rejected");
}

/* TC-PS-005 */
static void tc_q10_roundtrip(void) {
    float v = 12.345f;
    int32_t q;

    prot_set_init();
    q = PROT_SET_Q10(v);
    CHECK(prot_set_set(PS_OC1_CUR, q) == 0, "TC-PS-005 set ok");
    {
        float back = prot_set_get_f(PS_OC1_CUR);
        float err = back - v;
        if (err < 0.0f) { err = -err; }
        CHECK(err < 0.001f, "TC-PS-005 Q10 roundtrip error < 1 LSB");
    }
}

/* TC-PS-006 */
static void tc_meta_sanity(void) {
    uint32_t i, j;
    int ok_range = 1, ok_ctl = 1, ok_addr = 1;

    for (i = 0u; i < (uint32_t)PS_ID_COUNT; i++) {
        const prot_set_meta_t *m = &g_prot_set_meta[i];
        if (m->min > m->max) { ok_range = 0; }
        if ((m->def < m->min) || (m->def > m->max)) { ok_range = 0; }
        if ((m->is_ctl != 0u) &&
            ((m->min != 0) || (m->max != PROT_SET_Q10(1)))) { ok_ctl = 0; }
        if (m->comm_addr == 0u) { continue; }
        for (j = i + 1u; j < (uint32_t)PS_ID_COUNT; j++) {
            if (g_prot_set_meta[j].comm_addr == m->comm_addr) { ok_addr = 0; }
        }
    }
    CHECK(ok_range, "TC-PS-006 meta: min<=def<=max for all items");
    CHECK(ok_ctl, "TC-PS-006 meta: ctl items are 0..1");
    CHECK(ok_addr, "TC-PS-006 meta: comm addresses unique");
    CHECK((uint32_t)PS_ID_COUNT <= 32u, "TC-PS-006 item count fits bad_mask bitmap");
}

/* TC-PS-007 */
static void tc_id_guard(void) {
    prot_set_init();
    CHECK(prot_set_get(PS_ID_COUNT) == 0, "TC-PS-007 get out-of-range id -> 0");
    CHECK(prot_set_set(PS_ID_COUNT, 0) == -1, "TC-PS-007 set out-of-range id -> -1");
}

int main(void) {
    printf("=== Prot Set Tests ===\n");
    tc_init();
    tc_set_range();
    tc_seal_selfcheck();
    tc_load_raw();
    tc_q10_roundtrip();
    tc_meta_sanity();
    tc_id_guard();

    printf("\n=== Prot Set Tests: %d/%d PASSED (failed=%d) ===\n",
           s_passed, s_total, s_failed);
    return (s_failed == 0) ? 0 : 1;
}