tools/tests/isa-module.pl
author Shian-Yow Wu <swu@mozilla.com>
Wed, 28 May 2014 22:07:02 -0700
changeset 192414 f2a2af61e05db88d9281debc71782a5fad5ca7f6
parent 1 9b2a99adc05e53cd4010de512f50118594756650
permissions -rwxr-xr-x
Bug 1010784 - Null out sync loop target to avoid assertions when reusing sync XHR. r=khuey, a=lsblakk

#!/usr/bin/perl -w

use Cwd;

$curdir = cwd();

@path_fields = split(/\//,$curdir);

$path = join ("/",@path_fields);

print "Searching in " . $path . "\n";

open (REPORT, "find $path -name \"*.so\" -print | xargs nm -Bno | egrep NSGetModule 2>&1 |" ) || die "open: $! \n";

print "Modules:\n";
while (<REPORT>) {
    $module = $_;
    $module =~ s/:.*//;
    print $module;
}
close(REPORT);

open (REPORT, "find $path -name \"*.so\" -print | xargs nm -Bno | egrep NSGetFactory 2>&1 |" ) || die "open: $! \n";

print "\nComponents:\n";
while (<REPORT>) {
    $module = $_;
    $module =~ s/:.*//;
    print $module;
}
close(REPORT);