sedscripts/has_kv.sh at main · rdbhvr-001/sedscripts · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
#!/bin/bash

########################################################################
# has_kv
#
# Check whether a key exists AND has a value in a config file.
#
# Usage:
#   has_kv [flags] <key> <sep> <file>
#
# Flags:
#   --strict
#       Equivalent to:
#         --ignore-comments
#         --ignore-spaces
#         --ignore-quotes
#         --ignore-semicolon
#       Treats empty / quoted-empty / semicolon-only values as missing.
#
#   --ignore-comments     Ignore inline comments (# or ;)
#   --ignore-spaces       Trim leading/trailing whitespace in value
#   --ignore-quotes       Strip surrounding single or double quotes
#   --ignore-semicolon    Strip trailing semicolon
#
# Default behavior:
#   - Ignores full-line comments
#   - DOES NOT modify value
#   - A value is considered present if it exists after separator
#
# Exit status:
#   0  → key exists AND has a value
#   1  → key missing OR value empty
#
# Examples:
#   has_kv animations = picom.conf
#   has_kv --strict animations = picom.conf
#
########################################################################
has_kv() {
  ignore_comments=0
  ignore_spaces=0
  ignore_quotes=0
  ignore_semicolon=0

  # --- parse flags ---
  while [ "${1#--}" != "$1" ]; do
    case "$1" in
      --ignore-comments)  ignore_comments=1 ;;
      --ignore-spaces)    ignore_spaces=1 ;;
      --ignore-quotes)    ignore_quotes=1 ;;
      --ignore-semicolon) ignore_semicolon=1 ;;
      --strict)
        ignore_comments=1
        ignore_spaces=1
        ignore_quotes=1
        ignore_semicolon=1
        ;;
      *)
        echo "has_kv: unknown flag $1" >&2
        return 1
        ;;
    esac
    shift
  done

  key="$1"
  sep="$2"
  file="$3"

  [ -f "$file" ] || return 1

  awk \
    -v key="$key" \
    -v sep="$sep" \
    -v ic="$ignore_comments" \
    -v is="$ignore_spaces" \
    -v iq="$ignore_quotes" \
    -v isc="$ignore_semicolon" '
    BEGIN { found = 0 }

    # skip empty or full-line comments
    /^[[:space:]]*($|#|;)/ { next }

    {
      split($0, parts, sep)
      k = parts[1]
      gsub(/^[[:space:]]+|[[:space:]]+$/, "", k)

      if (k != key)
        next

      # extract value (everything after first sep)
      v = substr($0, index($0, sep) + length(sep))

      if (ic) {
        sub(/[[:space:]]*[#;].*$/, "", v)
      }

      if (is) {
        gsub(/^[[:space:]]+|[[:space:]]+$/, "", v)
      }

      if (isc) {
        sub(/[[:space:]]*;[[:space:]]*$/, "", v)
      }

      if (iq) {
        if (v ~ /^".*"$/ || v ~ /^'\''.*'\''$/)
          v = substr(v, 2, length(v) - 2)
      }

      if (length(v) > 0) {
        found = 1
      }

      exit
    }

    END { exit found ? 0 : 1 }
  ' "$file"
}

# has_kv "$@"