move clang-format-xs into utils

.github/workflows/clangformat/clang-format-xs

@@ -1,117 +0,0 @@
-#!/bin/bash
-
-set -eu
-
-srcdir=$(dirname "$(readlink -f "$0")")
-test -z "$srcdir" && srcdir=.
-
-CLANG_FORMAT=${CLANG_FORMAT:-clang-format}
-options=()
-files=()
-lines=()
-inplace=0;xml=0;
-filename=tmp.1.c
-offsets=
-off_opts=()
-opts=$(getopt -n clang-format-xs -s bash -a -o in -l Werror,assume-filename:,cursor:,dry-run,dump-config,fallback-style:,ferror-limit:,help,length:,lines:,offset:,output-replacement-xmls,sort-includes,style:,verbose,version -- "$@")
-if [ $? -ne 0 ]; then exit 1; fi
-eval set -- "$opts"; unset opts
-while :; do
-    case "$1" in
-	--offset)
-	    offsets="$offsets${offsets:+ }$2"
-	    off_opts+=("$1" "$2")
-	    shift 2
-	    continue
-	    ;;
-	--length)
-	    offsets="$offsets:$2"
-	    off_opts+=("$1" "$2")
-	    shift 2
-	    continue
-	    ;;
-	--assume-filename)
-	    filename="$2"
-	    options+=("$1" "$2")
-	    shift 2
-	    continue
-	    ;;
-	--lines)
-	    lines+=("$2")
-	    options+=("$1" "$2")
-	    shift 2
-	    continue
-	    ;;
-	--output-replacements-xml)
-	    xml=1
-	    shift
-	    continue
-	    ;;
-	-i)
-	    inplace=1
-	    shift
-	    continue
-	    ;;
-	--)
-	    shift
-	    break
-	    ;;
-	*)
-	    options+=("$1")
-	    shift
-	    continue
-	    ;;
-    esac
-done
-files=("$@")
-
-export IN_LINES="${lines[*]}"
-export OFFSETS="$offsets"
-
-options_o=("${options[@]}")
-if [[ $inplace = 1 ]]; then
-    options_o=("-i" "${options[@]}")
-fi
-if [[ $xml = 1 ]]; then
-    options_o=("-output-replacements-xml" "${options[@]}")
-fi
-options_o+=("${off_opts[@]}")
-
-do_xs() {
-    perl "$srcdir"/format-xs-1.pl "$1" > "$1".1.c
-    $CLANG_FORMAT -i "${options[@]}" -- "$1".1.c
-    if [[ $xml = 1 ]]; then
-	perl "$srcdir"/format-xs-2.pl "$1".1.c > "$1".1.xs
-	perl "$srcdir"/format-xs-xml.pl <(diff -U0 <(od -An -tu1 -w1 -v "$1") <(od -An -tu1 -w1 -v "$1".1.xs))
-	rm "$1".1.xs
-    elif [[ $inplace = 1 ]]; then
-	perl "$srcdir"/format-xs-2.pl "$1".1.c > "$1"
-    else
-	perl "$srcdir"/format-xs-2.pl "$1".1.c
-    fi
-    rm "$1".1.c
-}
-
-if [[ ${#files[@]} -eq 0 ]]; then
-    case "$filename" in
-	    *.xs)
-		cat > "$filename".1.xs
-		do_xs "$filename".1.xs
-		rm "$filename".1.xs
-		;;
-	    *)
-		$CLANG_FORMAT "${options_o[@]}"
-		;;
-    esac
-else
-    for file in "${files[@]}"; do
-	case "$file" in
-	    *.xs)
-		do_xs "$file"
-		;;
-	    *)
-		$CLANG_FORMAT "${options_o[@]}" -- "$file"
-		;;
-	esac
-    done
-fi