From 18421b7e54fcf9cb256e5528a2ebee4b41bfd1b4 Mon Sep 17 00:00:00 2001
From: Andrew Borodin <aborodin@vmail.ru>
Date: Sat, 9 Sep 2023 19:16:46 +0300
Subject: [PATCH] Ticket #4502: mc.ext.ini: escape backslashes.

An unescaped backslash \ is treated as invalid escape sequences in
glib-2.77.3 and glib-2.79:
https://gitlab.gnome.org/GNOME/glib/-/issues/3094)

Signed-off-by: Andrew Borodin <aborodin@vmail.ru>
---
 misc/mc.ext.ini.in | 110 +++++++++++++++++++++++----------------------
 1 file changed, 57 insertions(+), 53 deletions(-)

diff --git a/misc/mc.ext.ini.in b/misc/mc.ext.ini.in
index f3c1717a3..74691b0d9 100644
--- a/misc/mc.ext.ini.in
+++ b/misc/mc.ext.ini.in
@@ -57,8 +57,12 @@
 #            the literal | and | has a special meaning (or), and () have a special meaning
 #            and \( \) stand for literal ( ).
 #
+#            An unescaped backslash \ is handled as invalid escape sequences in glib = 2.77.3 and
+#            glib >= 2.79 (https://gitlab.gnome.org/GNOME/glib/-/issues/3094), therefore backslash
+#            must be escaped.
+#
 #            Example:
-#                Regex=\.t(ar\.lzma|lz)$
+#                Regex=\\.t(ar\\.lzma|lz)$
 #            matches *.tar.lzma or *.tlz.
 #
 #        RegexIgnoreCase [true|false]
@@ -188,7 +192,7 @@ Version=4.0
 
 ### GIT Repo ###
 [gitfs changeset]
-Regex=^\[git\]
+Regex=^\\[git\\]
 Open=%cd %p/changesetfs://
 View=%cd %p/patchsetfs://
 
@@ -200,7 +204,7 @@ View=%cd %p/patchsetfs://
 
 # .tgz, .tpz, .tar.gz, .tar.z, .tar.Z
 [tar.gzip]
-Regex=\.t([gp]?z|ar\.g?[zZ])$
+Regex=\\.t([gp]?z|ar\\.g?[zZ])$
 Include=tar.gz
 
 [ipk]
@@ -217,13 +221,13 @@ Shell=.tar.bz
 View=%view{ascii} @EXTHELPERSDIR@/archive.sh view tar.bzip
 
 [tar.bzip2]
-Regex=\.t(ar\.bz2|bz2?|b2)$
+Regex=\\.t(ar\\.bz2|bz2?|b2)$
 Open=%cd %p/utar://
 View=%view{ascii} @EXTHELPERSDIR@/archive.sh view tar.bzip2
 
 # .tar.lzma, .tlz
 [tar.lzma]
-Regex=\.t(ar\.lzma|lz)$
+Regex=\\.t(ar\\.lzma|lz)$
 Open=%cd %p/utar://
 View=%view{ascii} @EXTHELPERSDIR@/archive.sh view tar.lzma
 
@@ -234,19 +238,19 @@ View=%view{ascii} @EXTHELPERSDIR@/archive.sh view tar.lz
 
 # .tar.lz4, .tlz4
 [tar.lz4]
-Regex=\.t(ar\.lz4|lz4)$
+Regex=\\.t(ar\\.lz4|lz4)$
 Open=%cd %p/utar://
 View=%view{ascii} @EXTHELPERSDIR@/archive.sh view tar.lz4
 
 # .tar.xz, .txz
 [tar.xz]
-Regex=\.t(ar\.xz|xz)$
+Regex=\\.t(ar\\.xz|xz)$
 Open=%cd %p/utar://
 View=%view{ascii} @EXTHELPERSDIR@/archive.sh view tar.xz
 
 # .tar.zst, .tzst
 [tar.zst]
-Regex=\.t(ar\.zst|zst)$
+Regex=\\.t(ar\\.zst|zst)$
 Open=%cd %p/utar://
 View=%view{ascii} @EXTHELPERSDIR@/archive.sh view tar.zst
 
@@ -258,7 +262,7 @@ View=%view{ascii} @EXTHELPERSDIR@/archive.sh view tar.F
 
 # .qpr/.qpk - QNX Neutrino package installer files
 [tar.qpr]
-Regex=\.qp[rk]$
+Regex=\\.qp[rk]$
 Open=%cd %p/utar://
 View=%view{ascii} @EXTHELPERSDIR@/archive.sh view tar.qpr
 
@@ -269,7 +273,7 @@ Open=%cd %p/utar://
 View=%view{ascii} @EXTHELPERSDIR@/archive.sh view tar
 
 [arj]
-Regex=\.a(rj|[0-9][0-9])$
+Regex=\\.a(rj|[0-9][0-9])$
 RegexIgnoreCase=true
 Open=%cd %p/uarj://
 View=%view{ascii} @EXTHELPERSDIR@/archive.sh view arj
@@ -287,7 +291,7 @@ Open=%cd %p/uha://
 View=%view{ascii} @EXTHELPERSDIR@/archive.sh view ha
 
 [rar]
-Regex=\.r(ar|[0-9][0-9])$
+Regex=\\.r(ar|[0-9][0-9])$
 RegexIgnoreCase=true
 Open=%cd %p/urar://
 View=%view{ascii} @EXTHELPERSDIR@/archive.sh view rar
@@ -335,7 +339,7 @@ ShellIgnoreCase=true
 Include=cpio
 
 [initrd]
-Regex=^(initramfs.*\.img|initrd(-.+)?\.img(-.+)?)$
+Regex=^(initramfs.*\\.img|initrd(-.+)?\\.img(-.+)?)$
 Include=cpio
 
 [7zip]
@@ -345,32 +349,32 @@ Open=%cd %p/u7z://
 View=%view{ascii} @EXTHELPERSDIR@/archive.sh view 7z
 
 [patch]
-Regex=\.(diff|patch)$
+Regex=\\.(diff|patch)$
 Open=%cd %p/patchfs://
 View=%view{ascii} @EXTHELPERSDIR@/misc.sh view cat
 
 [patch.gz]
-Regex=\.(diff|patch)\.(gz|Z)$
+Regex=\\.(diff|patch)\\.(gz|Z)$
 Open=%cd %p/patchfs://
 View=%view{ascii} @EXTHELPERSDIR@/archive.sh view gz
 
 [patch.bz2]
-Regex=\.(diff|patch)\.bz2$
+Regex=\\.(diff|patch)\\.bz2$
 Open=%cd %p/patchfs://
 View=%view{ascii} @EXTHELPERSDIR@/archive.sh view bz2
 
 [patch.xz]
-Regex=\.(diff|patch)\.xz$
+Regex=\\.(diff|patch)\\.xz$
 Open=%cd %p/patchfs://
 View=%view{ascii} @EXTHELPERSDIR@/archive.sh view xz
 
 [patch.zst]
-Regex=\.(diff|patch)\.zst$
+Regex=\\.(diff|patch)\\.zst$
 Open=%cd %p/patchfs://
 View=%view{ascii} @EXTHELPERSDIR@/archive.sh view zst
 
 [ls-lR]
-Regex=(^|\.)ls-?lR(\.gz|Z|bz2)$
+Regex=(^|\\.)ls-?lR(\\.gz|Z|bz2)$
 Open=%cd %p/lslR://
 
 [trpm]
@@ -380,7 +384,7 @@ View=%view{ascii} @EXTHELPERSDIR@/package.sh view trpm
 
 # RPM packages (SuSE uses *.spm for source packages)
 [src.rpm]
-Regex=\.(src\.rpm|spm)$
+Regex=\\.(src\\.rpm|spm)$
 Open=%cd %p/rpm://
 View=%view{ascii} @EXTHELPERSDIR@/package.sh view src.rpm
 
@@ -390,7 +394,7 @@ Open=%cd %p/rpm://
 View=%view{ascii} @EXTHELPERSDIR@/package.sh view rpm
 
 [deb]
-Regex=\.u?deb$
+Regex=\\.u?deb$
 Open=%cd %p/deb://
 View=%view{ascii} @EXTHELPERSDIR@/package.sh view deb
 
@@ -411,7 +415,7 @@ Open=%cd %p/iso9660://
 View=%view{ascii} @EXTHELPERSDIR@/misc.sh view iso9660
 
 [ar]
-Regex=\.s?a$
+Regex=\\.s?a$
 Open=%cd %p/uar://
 #Open=%view{ascii} ar tv %f
 View=%view{ascii} @EXTHELPERSDIR@/misc.sh view ar
@@ -425,12 +429,12 @@ View=%view{ascii} @EXTHELPERSDIR@/misc.sh view lib
 ### Sources ###
 
 [C/C++]
-Regex=\.(c|cc|cpp|cxx|c\+\+)$
+Regex=\\.(c|cc|cpp|cxx|c\\+\\+)$
 RegexIgnoreCase=true
 Include=editor
 
 [C/C++ header]
-Regex=\.(h|hh|hpp|hxx|h\+\+)$
+Regex=\\.(h|hh|hpp|hxx|h\\+\\+)$
 RegexIgnoreCase=true
 Include=editor
 
@@ -440,7 +444,7 @@ ShellIgnoreCase=true
 Include=editor
 
 [Assembler]
-Regex=\.(s|asm)$
+Regex=\\.(s|asm)$
 RegexIgnoreCase=true
 Include=editor
 
@@ -452,19 +456,19 @@ Include=editor
 
 # .so libraries
 [so]
-Regex=\.(so|so\.[0-9\.]*)$
+Regex=\\.(so|so\\.[0-9\\.]*)$
 View=%view{ascii} @EXTHELPERSDIR@/misc.sh view so
 
 # .dylib libraries
 [dylib]
-Regex=\.(dylib|dylib\.[0-9\.]*)$
+Regex=\\.(dylib|dylib\\.[0-9\\.]*)$
 View=%view{ascii} @EXTHELPERSDIR@/misc.sh view dylib
 
 
 ### Documentation ###
 
 #[Texinfo]
-#Regex=\.(te?xi|texinfo)$
+#Regex=\\.(te?xi|texinfo)$
 
 [info-by-shell]
 Shell=.info
@@ -497,27 +501,27 @@ View=%view{ascii,nroff} @EXTHELPERSDIR@/text.sh view nroff.ms %var{PAGER:more}
 # Manual page
 
 [man.lz]
-Regex=([^0-9]|^[^\.]*)\.([1-9][A-Za-z]*|[ln])\.lz$
+Regex=([^0-9]|^[^\\.]*)\\.([1-9][A-Za-z]*|[ln])\\.lz$
 Open=@EXTHELPERSDIR@/text.sh open man.lz %var{PAGER:more}
 View=%view{ascii,nroff} @EXTHELPERSDIR@/text.sh view man.lz %var{PAGER:more}
 
 [man.lz4]
-Regex=([^0-9]|^[^\.]*)\.([1-9][A-Za-z]*|[ln])\.lz4$
+Regex=([^0-9]|^[^\\.]*)\\.([1-9][A-Za-z]*|[ln])\\.lz4$
 Open=@EXTHELPERSDIR@/text.sh open man.lz4 %var{PAGER:more}
 View=%view{ascii,nroff} @EXTHELPERSDIR@/text.sh view man.lz4 %var{PAGER:more}
 
 [man.lzma]
-Regex=([^0-9]|^[^\.]*)\.([1-9][A-Za-z]*|[ln])\.lzma$
+Regex=([^0-9]|^[^\\.]*)\\.([1-9][A-Za-z]*|[ln])\\.lzma$
 Open=@EXTHELPERSDIR@/text.sh open man.lzma %var{PAGER:more}
 View=%view{ascii,nroff} @EXTHELPERSDIR@/text.sh view man.lzma %var{PAGER:more}
 
 [man.xz]
-Regex=([^0-9]|^[^\.]*)\.([1-9][A-Za-z]*|[ln])\.xz$
+Regex=([^0-9]|^[^\\.]*)\\.([1-9][A-Za-z]*|[ln])\\.xz$
 Open=@EXTHELPERSDIR@/text.sh open man.xz %var{PAGER:more}
 View=%view{ascii,nroff} @EXTHELPERSDIR@/text.sh view man.xz %var{PAGER:more}
 
 [man.zst]
-Regex=([^0-9]|^[^\.]*)\.([1-9][A-Za-z]*|[ln])\.zst$
+Regex=([^0-9]|^[^\\.]*)\\.([1-9][A-Za-z]*|[ln])\\.zst$
 Open=@EXTHELPERSDIR@/text.sh open man.zst %var{PAGER:more}
 View=%view{ascii,nroff} @EXTHELPERSDIR@/text.sh view man.zst %var{PAGER:more}
 
@@ -560,13 +564,13 @@ Open=@EXTHELPERSDIR@/image.sh open svg
 ### Sound files ###
 
 [sound]
-Regex=\.(wav|snd|voc|au|smp|aiff|snd|m4a|ape|aac|wv|spx|flac)$
+Regex=\\.(wav|snd|voc|au|smp|aiff|snd|m4a|ape|aac|wv|spx|flac)$
 RegexIgnoreCase=true
 Open=@EXTHELPERSDIR@/sound.sh open common
 View=%view{ascii} @EXTHELPERSDIR@/sound.sh view common
 
 [mod]
-Regex=\.(mod|s3m|xm|it|mtm|669|stm|ult|far)$
+Regex=\\.(mod|s3m|xm|it|mtm|669|stm|ult|far)$
 RegexIgnoreCase=true
 Open=@EXTHELPERSDIR@/sound.sh open mod
 
@@ -582,7 +586,7 @@ Open=@EXTHELPERSDIR@/sound.sh open mp3
 View=%view{ascii} @EXTHELPERSDIR@/sound.sh view mp3
 
 [ogg]
-Regex=\.og[gax]$
+Regex=\\.og[gax]$
 RegexIgnoreCase=true
 Open=@EXTHELPERSDIR@/sound.sh open ogg
 View=%view{ascii} @EXTHELPERSDIR@/sound.sh view ogg
@@ -594,7 +598,7 @@ Open=@EXTHELPERSDIR@/sound.sh open opus
 View=%view{ascii} @EXTHELPERSDIR@/sound.sh view opus
 
 [midi]
-Regex=\.(midi?|rmid?)$
+Regex=\\.(midi?|rmid?)$
 RegexIgnoreCase=true
 Open=@EXTHELPERSDIR@/sound.sh open midi
 
@@ -606,7 +610,7 @@ View=%view{ascii} @EXTHELPERSDIR@/sound.sh view wma
 
 # Play list
 [playlist]
-Regex=\.(m3u|pls)$
+Regex=\\.(m3u|pls)$
 RegexIgnoreCase=true
 Open=@EXTHELPERSDIR@/sound.sh open playlist
 
@@ -619,7 +623,7 @@ ShellIgnoreCase=true
 Include=video
 
 [asf]
-Regex=\.as[fx]$
+Regex=\\.as[fx]$
 RegexIgnoreCase=true
 Include=video
 
@@ -634,12 +638,12 @@ ShellIgnoreCase=true
 Include=video
 
 [mov]
-Regex=\.(mov|qt)$
+Regex=\\.(mov|qt)$
 RegexIgnoreCase=true
 Include=video
 
 [mp4]
-Regex=\.(mp4|m4v|mpe?g)$
+Regex=\\.(mp4|m4v|mpe?g)$
 RegexIgnoreCase=true
 Include=video
 
@@ -665,7 +669,7 @@ ShellIgnoreCase=true
 Include=video
 
 [fli]
-Regex=\.fl[icv]$
+Regex=\\.fl[icv]$
 RegexIgnoreCase=true
 Include=video
 
@@ -675,7 +679,7 @@ ShellIgnoreCase=true
 Include=video
 
 [realaudio]
-Regex=\.ra?m$
+Regex=\\.ra?m$
 RegexIgnoreCase=true
 Open=@EXTHELPERSDIR@/video.sh open ram
 
@@ -688,7 +692,7 @@ Include=video
 ### Documents ###
 
 [html]
-Regex=\.html?$
+Regex=\\.html?$
 RegexIgnoreCase=true
 Open=@EXTHELPERSDIR@/web.sh open html
 View=%view{ascii} @EXTHELPERSDIR@/web.sh view html
@@ -700,7 +704,7 @@ Open=@EXTHELPERSDIR@/doc.sh open ooffice
 
 # StarOffice 6 and OpenOffice.org formats
 [OpenOffice.org]
-Regex=\.(odt|fodt|ott|sxw|stw|ods|fods|ots|sxc|stc|odp|fodp|otp|sxi|sti|odg|fodg|otg|sxd|std|odb|odf|sxm|odm|sxg)$
+Regex=\\.(odt|fodt|ott|sxw|stw|ods|fods|ots|sxc|stc|odp|fodp|otp|sxi|sti|odg|fodg|otg|sxd|std|odb|odf|sxm|odm|sxg)$
 RegexIgnoreCase=true
 Open=@EXTHELPERSDIR@/doc.sh open ooffice
 View=%view{ascii} @EXTHELPERSDIR@/doc.sh view odt
@@ -722,21 +726,21 @@ Open=@EXTHELPERSDIR@/doc.sh open msdoc
 
 # Microsoft Word Document
 [msdoc-by-shell]
-Regex=\.(do[ct]|wri|docx)$
+Regex=\\.(do[ct]|wri|docx)$
 RegexIgnoreCase=true
 Open=@EXTHELPERSDIR@/doc.sh open msdoc
 View=%view{ascii} @EXTHELPERSDIR@/doc.sh view msdoc
 
 # Microsoft Excel Worksheet
 [msxls-by-shell]
-Regex=\.(xl[sw]|xlsx)$
+Regex=\\.(xl[sw]|xlsx)$
 RegexIgnoreCase=true
 Open=@EXTHELPERSDIR@/doc.sh open msxls
 View=%view{ascii} @EXTHELPERSDIR@/doc.sh view msxls
 
 # Microsoft PowerPoint Presentation
 [msppt]
-Regex=\.(pp[ts]|pptx)$
+Regex=\\.(pp[ts]|pptx)$
 RegexIgnoreCase=true
 Open=@EXTHELPERSDIR@/doc.sh open msppt
 View=%view{ascii} @EXTHELPERSDIR@/doc.sh view msppt
@@ -753,25 +757,25 @@ ShellIgnoreCase=true
 Include=editor
 
 [markdown]
-Regex=\.mk?d$
+Regex=\\.mk?d$
 RegexIgnoreCase=true
 Include=editor
 
 [djvu]
-Regex=\.djvu?$
+Regex=\\.djvu?$
 RegexIgnoreCase=true
 Open=@EXTHELPERSDIR@/doc.sh open djvu
 View=%view{ascii} @EXTHELPERSDIR@/doc.sh view djvu
 
 # Comic Books
 [cbr]
-Regex=\.cb[zr]$
+Regex=\\.cb[zr]$
 RegexIgnoreCase=true
 Open=@EXTHELPERSDIR@/doc.sh open comic
 
 # Epup, mobi, fb2
 [ebook]
-Regex=\.(epub|mobi|fb2)$
+Regex=\\.(epub|mobi|fb2)$
 RegexIgnoreCase=true
 Open=@EXTHELPERSDIR@/doc.sh open ebook
 View=%view{ascii} @EXTHELPERSDIR@/doc.sh view ebook
@@ -790,7 +794,7 @@ Open=xmkmf -a
 
 # Makefile.PL (MakeMaker)
 [Makefile.pl]
-Regex=^Makefile\.(PL|pl)$
+Regex=^Makefile\\.(PL|pl)$
 Open=%var{PERL:perl} %f
 
 [Makefile]
@@ -805,7 +809,7 @@ View=%view{ascii} @EXTHELPERSDIR@/misc.sh view dbf
 
 # REXX script
 [rexx]
-Regex=\.(rexx?|cmd)$
+Regex=\\.(rexx?|cmd)$
 Open=rexx %f %{Enter parameters};echo "Press ENTER";read y
 
 # Disk images for Commodore computers (VIC20, C64, C128)