kit

kit_skip.sh (2208B)

---

 # test/lib/kit_skip.sh — unified skip detection for the corpus harness.
 #
 # Sourced (POSIX sh). Three independent skip sources the corpus runners all
 # reimplemented; each returns 0 and echoes a reason when it fires, else 1.
 
 # kit_skip_sidecar DIR BASE [ARCH] [LANE]
 #   Looks, in priority order, for sidecar files next to a case:
 #     DIR/BASE.skip            — skip the whole case on every arch/lane
 #     DIR/BASE.<ARCH>.skip     — skip on this arch (when ARCH given)
 #     DIR/BASE.<LANE>.skip     — skip just this lane (when LANE given; covers
 #                                .cbackend.skip via LANE=cbackend, .wasm.skip
 #                                via LANE=wasm, toy's .link.skip via LANE=link)
 #   Echoes the first line of the matching sidecar as the reason.
 kit_skip_sidecar() {
   kit_sk_dir=$1; kit_sk_base=$2; kit_sk_arch=${3:-}; kit_sk_lane=${4:-}
   for kit_sk_f in \
       "$kit_sk_dir/$kit_sk_base.skip" \
       ${kit_sk_arch:+"$kit_sk_dir/$kit_sk_base.$kit_sk_arch.skip"} \
       ${kit_sk_lane:+"$kit_sk_dir/$kit_sk_base.$kit_sk_lane.skip"}; do
     if [ -e "$kit_sk_f" ]; then
       head -n1 "$kit_sk_f" 2>/dev/null
       return 0
     fi
   done
   return 1
 }
 
 # kit_skip_diag ERRFILE REGEX
 #   Phased-rollout detector: if ERRFILE contains a line matching the extended
 #   regex REGEX (a backend's "not yet implemented" diagnostic), echo the
 #   matched text as the reason and return 0. Each backend passes its own regex
 #   (e.g. 'interp: .*not supported', 'C target: .*not (implemented|yet supported)',
 #   'wasm.*not yet implemented'), keeping the panic format local to its lane.
 kit_skip_diag() {
   [ -f "$1" ] || return 1
   kit_sd_hit=$(grep -oE "$2" "$1" 2>/dev/null | head -n1 || true)
   [ -n "$kit_sd_hit" ] || return 1
   printf '%s' "$kit_sd_hit"
   return 0
 }
 
 # kit_tuple_applicable TUPLE TARGETS_FILE
 #   Returns 0 (applicable) if TARGETS_FILE is absent/empty, or lists TUPLE
 #   (whitespace-separated <arch>-<obj> tuples). Returns 1 (not applicable ->
 #   caller emits SKIP_NA) when the file exists and does NOT list TUPLE.
 kit_tuple_applicable() {
   [ -s "$2" ] || return 0
   for kit_ta_t in $(cat "$2"); do
     [ "$kit_ta_t" = "$1" ] && return 0
   done
   return 1
 }