magic.t: android: bypass two $0 tests and add one blead
authorAlexandre (Midnite) Jousset <mid@gtmp.org>
Wed, 20 Aug 2014 19:24:21 +0000 (21:24 +0200)
committerBrian Fraser <fraserbn@gmail.com>
Wed, 20 Aug 2014 20:00:24 +0000 (22:00 +0200)
"ps" on Android has different syntaxes depending on the tool used.
It can be toolbox or busybox. Bypass the "ps" tests and enable
the /proc/$$/cmdline one.

AUTHORS
t/op/magic.t

index 934c50c..b9038dc 100644 (file)
--- a/AUTHORS
+++ b/AUTHORS
@@ -48,6 +48,7 @@ Albert Chin-A-Young           <china@thewrittenword.com>
 Albert Dvornik                 <bert@alum.mit.edu>
 Alberto Simões                        <ambs@cpan.org>
 Alessandro Forghieri           <alf@orion.it>
+Alexandre (Midnite) Jousset            <mid@gtmp.org>
 Alexander Alekseev             <alex@alemate.ru>
 Alexander Hartmaier            <abraxxa@cpan.org>
 Alexander Voronov              <alexander-voronov@yandex.ru>
index 015d41b..afc99c5 100644 (file)
@@ -407,7 +407,7 @@ EOP
 # argv[0] assignment and by calling prctl()
 {
   SKIP: {
-    skip "We don't have prctl() here", 2 unless $Config{d_prctl_set_name};
+    skip "We don't have prctl() here, or we're on Android", 2 unless $Config{d_prctl_set_name} && $^O ne 'android';
 
     # We don't really need these tests. prctl() is tested in the
     # Kernel, but test it anyway for our sanity. If something doesn't
@@ -755,13 +755,14 @@ SKIP: {
 
     SKIP: {
            skip("\$0 check only on Linux and FreeBSD", 2)
-               unless $^O =~ /^(linux|freebsd)$/
+               unless $^O =~ /^(linux|android|freebsd)$/
                    && open CMDLINE, "/proc/$$/cmdline";
 
            chomp(my $line = scalar <CMDLINE>);
            my $me = (split /\0/, $line)[0];
            is $me, $0, 'altering $0 is effective (testing with /proc/)';
            close CMDLINE;
+            skip("\$0 check with 'ps' only on Linux (but not Android) and FreeBSD", 1) if $^O eq 'android';
             # perlbug #22811
             my $mydollarzero = sub {
               my($arg) = shift;