projects
/
openwrt
/
staging
/
mkresin.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
d806e68
)
remote-gdb: - fix parsing of arch-libc tuples - automatically add sysroot to executab...
author
Jo-Philipp Wich
<jow@openwrt.org>
Tue, 12 Oct 2010 01:15:55 +0000
(
01:15
+0000)
committer
Jo-Philipp Wich
<jow@openwrt.org>
Tue, 12 Oct 2010 01:15:55 +0000
(
01:15
+0000)
SVN-Revision: 23406
scripts/remote-gdb
patch
|
blob
|
history
diff --git
a/scripts/remote-gdb
b/scripts/remote-gdb
index 60efb9703fc8d4239da3611d6a2e5ded2d5cd6d1..95529fc84c4992563843162f9a12eccb8aa50887 100755
(executable)
--- a/
scripts/remote-gdb
+++ b/
scripts/remote-gdb
@@
-26,7
+26,7
@@
if( opendir SD, "$Bin/../staging_dir" )
while( defined( my $e = readdir SD ) )
{
while( defined( my $e = readdir SD ) )
{
- if( -d "$Bin/../staging_dir/$e" && $e =~ /^target-(
[^_]+)_([^_]+)/
)
+ if( -d "$Bin/../staging_dir/$e" && $e =~ /^target-(
.+?)_([^_]+libc[^_]+)/i
)
{
push @arches, [ $1, $2 ];
printf(" %2d) %s (%s)\n", @arches + 0, $1, $2);
{
push @arches, [ $1, $2 ];
printf(" %2d) %s (%s)\n", @arches + 0, $1, $2);
@@
-52,7
+52,7
@@
if( opendir SD, "$Bin/../staging_dir" )
closedir SD;
# Find gdb
closedir SD;
# Find gdb
- my ($gdb) = glob("$Bin/../
build_dir/toolchain-${arch}_*_${libc}/gdb-*/gdb/
gdb");
+ my ($gdb) = glob("$Bin/../
staging_dir/toolchain-${arch}_*_${libc}/bin/*-
gdb");
if( defined($gdb) && -x $gdb )
{
if( defined($gdb) && -x $gdb )
{
@@
-64,7
+64,8
@@
if( opendir SD, "$Bin/../staging_dir" )
print $fh "set sysroot $sysroot\n" if $sysroot;
print $fh "target remote $ARGV[0]\n";
print $fh "set sysroot $sysroot\n" if $sysroot;
print $fh "target remote $ARGV[0]\n";
- system($gdb, '-x', $fp, $ARGV[1]);
+ my $file = -f "$sysroot/$ARGV[1]" ? "$sysroot/$ARGV[1]" : $ARGV[1];
+ system($gdb, '-x', $fp, $file);
close($fh);
unlink($fp);
close($fh);
unlink($fp);