Function extract_hcl_string_val

internal/cbm/extract_unified.c:879–898

── HCL infrastructure binding extraction ─────────────────────────── * Scan HCL block nodes (resource, dynamic) for attribute pairs * where one is a source key (topic, queue_name) and another is a * target key (uri, push_endpoint). Handles nested blocks like * push_config { push_endpoint = "..." }. */ Extract a string value from an HCL attribute value node. The tree-sitter-hcl grammar wraps t

// → string_lit → template_literal).  Descend through the expression/literal_value
// wrappers to reach the actual string token before reading it.
static char *extract_hcl_string_val(CBMArena *a, TSNode val_node, const char *source) {
    enum { HCL_MAX_UNWRAP = 5 };
    for (int depth = 0; depth < HCL_MAX_UNWRAP; depth++) {
        const char *vk = ts_node_type(val_node);
        if (strcmp(vk, "expression") == 0 || strcmp(vk, "literal_value") == 0) {
            if (ts_node_named_child_count(val_node) == 0) {
                return NULL;
            }
            val_node = ts_node_named_child(val_node, 0);
            continue;
        }
        if (strcmp(vk, "quoted_template") == 0 || strcmp(vk, "template_literal") == 0 ||
            strcmp(vk, "string_lit") == 0) {
            char *val = cbm_node_text(a, val_node, source);
            return strip_yaml_quotes(a, val);
        }
        return NULL;
    }
    return NULL;
}

// The tree-sitter-hcl grammar nests a block's attributes/sub-blocks inside a
// `body` child rather than directly under the block. Return that body node so