awk: fix regexp errors

As of awk version 5.0.0 the regexp library used switched to GNULIB.
This means that using \" is no longer escaping the quotation mark but only
matching a literal backslash followed by a quotation mark.

Another project that dealt with the same warning is here:
https://github.com/soimort/translate-shell/issues/285

Change-Id: If465b5966e448591acdae9e764c22bc2fce79f5d
Reviewed-on: https://review.haiku-os.org/c/haiku/+/8836
Reviewed-by: Adrien Destugues <[email protected]>
Tested-by: Commit checker robot <[email protected]>
Haiku-Format: Haiku-format Bot <[email protected]>
This commit is contained in:
Dave Slusher
2025-01-28 16:44:06 +00:00
committed by waddlesplash
parent c96e40d299
commit 36fac427b5
2 changed files with 11 additions and 11 deletions
+6 -6
View File
@@ -47,7 +47,7 @@ BEGIN {
# store vendor ID for possible devices afterwards
vendorid = $1
vendor = substr($0, 7)
gsub( /\"/, "&&", vendor )
gsub( /"/, "&&", vendor )
# Remove double interrogation points that may be interpreted as trigraphs
gsub( /\?\?\?/, "xxx", vendor )
@@ -61,7 +61,7 @@ BEGIN {
device = substr($0, 8)
gsub( /\\/, "&&", device )
gsub( /\"/, "&&", device )
gsub( /"/, "&&", device )
# Remove double interrogation points that may be interpreted as trigraphs
gsub( /\?\?\?/, "xxx", device )
@@ -81,7 +81,7 @@ BEGIN {
/^\t\t[[:xdigit:]][[:xdigit:]][[:xdigit:]][[:xdigit:]] / {
device = substr($0, 14)
gsub( /\"/, "\\\"", device )
gsub( /"/, "\\\"", device )
devicecount++
devices[devicecount, 1] = vendorid
@@ -96,7 +96,7 @@ BEGIN {
class = $2
classname = substr($0, 7)
gsub( /\"/, "\\\"", classname )
gsub( /"/, "\\\"", classname )
}
# match subclass, use device class data captured earlier, and output
@@ -104,7 +104,7 @@ BEGIN {
subclass = $1
subclassname = substr($0, 6)
gsub( /\"/, "\\\"", subclassname )
gsub( /"/, "\\\"", subclassname )
classcount++
classes[classcount, 1] = class
@@ -120,7 +120,7 @@ BEGIN {
proginterface = $1
proginterfacename = substr($0, 7)
gsub( /\"/, "\\\"", proginterfacename )
gsub( /"/, "\\\"", proginterfacename )
classcount++
classes[classcount, 1] = class
+5 -5
View File
@@ -49,7 +49,7 @@ BEGIN {
# store vendor ID for possible devices afterwards
vendorid = $1
vendor = substr($0, 7)
gsub( /\"/, "&&", vendor )
gsub( /"/, "&&", vendor )
# Remove double interrogation points that may be interpreted as trigraphs
gsub( /\?\?\?/, "xxx", vendor )
@@ -63,7 +63,7 @@ BEGIN {
device = substr($0, 8)
gsub( /\\/, "&&", device )
gsub( /\"/, "&&", device )
gsub( /"/, "&&", device )
# Remove double interrogation points that may be interpreted as trigraphs
gsub( /\?\?\?/, "xxx", device )
@@ -82,7 +82,7 @@ BEGIN {
class = $2
classname = substr($0, 7)
gsub( /\"/, "\\\"", classname )
gsub( /"/, "\\\"", classname )
inClassesDefinition = 1
@@ -99,7 +99,7 @@ BEGIN {
inClassesDefinition && (/^\t[[:xdigit:]][[:xdigit:]] /) {
subclass = $1
subclassname = substr($0, 6)
gsub( /\"/, "\\\"", subclassname )
gsub( /"/, "\\\"", subclassname )
classcount++
classes[classcount, 1] = class
@@ -115,7 +115,7 @@ inClassesDefinition && (/^\t\t[[:xdigit:]][[:xdigit:]] /) {
protocol = $1
protocolname = substr($0, 7)
gsub( /\"/, "\\\"", protocolname )
gsub( /"/, "\\\"", protocolname )
classcount++
classes[classcount, 1] = class