[rt.cpan.org #99461] Win32::NetAdmin::LocalGroupIsMember crashes 64-bit Perl

Mon Oct 13 11:50:10 2014: Request 99461 was acted upon.
Transaction: Ticket created by [email protected]
       Queue: Win32-NetAdmin
     Subject: Win32::NetAdmin::LocalGroupIsMember crashes 64-bit Perl
   Broken in: (no value)
    Severity: (no value)
       Owner: Nobody
  Requestors: [email protected]
      Status: new
 Ticket <URL: https://rt.cpan.org/Ticket/Display.html?id=99461 >


This is in Version 0.12 of Win32::NetAdmin.

Calling LocalGroupIsMember('','Administrators',"$ENV{USERDOMAIN}\\$ENV{USERNAME}") crashes Perl when the current user is a domain login.
There is about a one second delay, then a GUI dialog is presented "Perl Command Line Interpreter has stopped working" ... "Close the program".
If run using the Perl Debugger, the debugger dies with this:
Signal SEGV at c:/Perl64/lib/perl5db.pl line 8499.
        DB::diesignal("SEGV") called at test_Win32NetAdmin_test.perl line 16
        eval {...} called at test_Win32NetAdmin_test.perl line 16

This only occurs with 64-bit Perl.  I have discovered that the problem started with ActivePerl 5.18.2 (or 5.18.x) and Strawberry Perl 5.14.3.
ActivePerl 5.16.3 and earlier and Strawberry Perl 5.14.2 and earlier do not experience this issue.
All versions were tested with Win32::NetAdmin 0.12.

LocalGroupIsMember sometimes also crashes when using SERVER\\USERNAME or just USERNAME, but always crashes with DOMAIN\\USERNAME when USERNAME is a domain login.





[cid:[email protected]]

Bruce Reed | Lead Software Engineer - Systems
office/mobile: 989 430 2897 | urgent: [email protected]<mailto:[email protected]> | [email protected]<mailto:[email protected]> | http://www.infor.com