Hi,

I have a DLL written in C++ and need to access some of its functions from
within a Perl program. I try using Win32::API but find it difficult to pass
parameters correctly. Below is a piece of an .h file with description of a
function (ITEncryptS) I need to call. Would anyone be able to tell how do I
pass/return parameters to/from it?

union TCryptKey
{
    struct
    {
        unsigned char RCryptKey[8];
        unsigned char LCryptKey[8];
    };
    unsigned char CryptKey[16];
};

struct SITEncDecData
{
 void *input;
 long InLength;
    void *output;
 long *OutLength;
    TCryptKey* key;
};

extern "C" __declspec( dllexport )
 int __cdecl ITEncryptS(  SITEncDecData *ITEncryptData );


I know how to pack() things, but how do I pass values which would correspond
to pointers (*input, etc.)?

Thanks in advance.

Denys Kotseba


_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users

Reply via email to