Re: [patch]: testsuite: run bash instead of sh when using brace expansion
Christian Groessler <[email protected]>
| Newsgroups | gmane.comp.gdb.patches,gmane.comp.gdb.devel |
|---|---|
| Message-ID | <[email protected]> |
On 05/16/13 01:24, Sergio Durigan Junior wrote: > Next time, please make sure to send patches to > [email protected]. Also I don't see you on gdb/MAINTAINERS, > do you have copyright assignment for GDB? This patch is simple enough > to go in without a copyright assignment, but if you intend to send > more patches please let me know (in off) and I can get you started on > the process. I think I have an assignment for gdb, but I'm not 100 percent sure. I've moved recently and don't find my papers at the moment. Could someone verify please that the assignment is in place? >> * gdb.dwarf2/dw2-dir-file-name.exp: Use bash instead of sh, since >> brace expansion is not available in sh. > ^^^^^^^^ > You're using spaces instead of a TAB here. That was the result of copy-n-paste into the mail. > I am not sure what others think, but instead of depending on bash (which > may not be available on all platforms), I'd rather rewrite those > commands to avoid brace expansions at all, thus making them compatible > with sh. I am not a maintainer however, so you'd better wait for one > until you do that. How about the following patch? My tcl fu is not that strong, so I explicitly wrote out the expanded strings instead of computing them. The shell command line could get quite long with this change, depending how deep the build directory is located in the hierarchy. I could invoke the shell for each path separately, but this would be slower. Any opinions? regards, chris 2013-05-17 Christian Groessler <[email protected]> * gdb.dwarf2/dw2-dir-file-name.exp: Don't use brace expansion, since it's not supported in all shells. Write out the expanded names directly.
diffs
(text/plain, 2.5 KB)
Index: gdb.dwarf2/dw2-dir-file-name.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.dwarf2/dw2-dir-file-name.exp,v
retrieving revision 1.4
diff -u -p -r1.4 dw2-dir-file-name.exp
--- gdb.dwarf2/dw2-dir-file-name.exp 15 Mar 2013 01:41:28 -0000 1.4
+++ gdb.dwarf2/dw2-dir-file-name.exp 16 May 2013 14:50:18 -0000
@@ -322,10 +322,64 @@ if { [gdb_compile "${asmsrcfile} ${srcdi
return -1
}
-remote_exec host "sh -c \"rm -f ${srcabsdir}{/rdir,}{/xdir,}{/compdir,}{/ldir,}{/fdir,}/${srctmpfile}\""
-remote_exec host "sh -c \"rmdir ${srcabsdir}{/rdir,}{/xdir,}{/compdir,}{/ldir,}{/fdir,}\""
-remote_exec host "sh -c \"mkdir ${srcabsdir}{,/rdir}{,/xdir}{,/compdir}{,/ldir}{,/fdir}\""
-remote_exec host "sh -c \"for d in ${srcabsdir}{,/rdir}{,/xdir}{,/compdir}{,/ldir}{,/fdir};do cp ${srcdir}/${subdir}/${srcfile} \\\$d/${srctmpfile}; done\""
+set dirs { \
+ "" \
+ "/fdir" \
+ "/ldir" \
+ "/ldir/fdir" \
+ "/compdir" \
+ "/compdir/fdir" \
+ "/compdir/ldir" \
+ "/compdir/ldir/fdir" \
+ "/xdir" \
+ "/xdir/fdir" \
+ "/xdir/ldir" \
+ "/xdir/ldir/fdir" \
+ "/xdir/compdir" \
+ "/xdir/compdir/fdir" \
+ "/xdir/compdir/ldir" \
+ "/xdir/compdir/ldir/fdir" \
+ "/rdir" \
+ "/rdir/fdir" \
+ "/rdir/ldir" \
+ "/rdir/ldir/fdir" \
+ "/rdir/compdir" \
+ "/rdir/compdir/fdir" \
+ "/rdir/compdir/ldir" \
+ "/rdir/compdir/ldir/fdir" \
+ "/rdir/xdir" \
+ "/rdir/xdir/fdir" \
+ "/rdir/xdir/ldir" \
+ "/rdir/xdir/ldir/fdir" \
+ "/rdir/xdir/compdir" \
+ "/rdir/xdir/compdir/fdir" \
+ "/rdir/xdir/compdir/ldir" \
+}
+
+proc reverse {lst} {
+ set retlst {}
+ for {set i [expr "[llength $lst] - 1"]} {$i >= 0} {set i [expr "$i - 1"]} {
+ lappend retlst [lindex $lst $i]
+ }
+ return $retlst
+}
+
+proc pathexpand {prefix dirlst suffix} {
+ set retlst {}
+ for {set i 0} {$i < [llength $dirlst]} {incr i} {
+ lappend retlst "$prefix[lindex $dirlst $i]$suffix"
+ }
+ return $retlst
+}
+
+set filelist [pathexpand $srcabsdir $dirs "/$srctmpfile"]
+set dircreatelist [pathexpand $srcabsdir $dirs ""]
+set dirremovelist [pathexpand $srcabsdir [reverse $dirs] ""]
+
+remote_exec host "sh -c \"rm -f $filelist\""
+remote_exec host "sh -c \"rmdir $dirremovelist\""
+remote_exec host "sh -c \"mkdir $dircreatelist\""
+remote_exec host "sh -c \"for d in $dircreatelist; do cp ${srcdir}/${subdir}/${srcfile} \\\$d/${srctmpfile}; done\""
clean_restart ${testfile}