mirror of https://github.com/hak5/openwrt.git
scripts: fix remote-gdb script to cope with _eabi suffix in uClibc version
SVN-Revision: 34118lede-17.01
parent
3a81f75d72
commit
26263535fe
|
@ -14,7 +14,7 @@ if( opendir SD, "$Bin/../staging_dir" )
|
||||||
{
|
{
|
||||||
my ( $tid, $arch, $libc, @arches );
|
my ( $tid, $arch, $libc, @arches );
|
||||||
|
|
||||||
if( $ARGV[1] =~ m!\btarget-(.+?)_([^_]+libc[^_/]+)\b!i )
|
if( $ARGV[1] =~ m!\btarget-(.+?)_([^_]+libc[^/]+)\b!i )
|
||||||
{
|
{
|
||||||
print("Using target $1 ($2)\n");
|
print("Using target $1 ($2)\n");
|
||||||
($arch, $libc) = ($1, $2);
|
($arch, $libc) = ($1, $2);
|
||||||
|
@ -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-(.+?)_([^_]+libc[^_]+)/i )
|
if( -d "$Bin/../staging_dir/$e" && $e =~ /^target-(.+?)_([^_]+libc.+)/i )
|
||||||
{
|
{
|
||||||
push @arches, [ $1, $2 ];
|
push @arches, [ $1, $2 ];
|
||||||
printf(" %2d) %s (%s)\n", @arches + 0, $1, $2);
|
printf(" %2d) %s (%s)\n", @arches + 0, $1, $2);
|
||||||
|
|
Loading…
Reference in New Issue