accessing COM from C# with an IStream** parameter

[Ralf]

Hallo,

I'm trying to call a COM function from C#.
The function has a parameter from the type array of IStream* (IStream**).
The COM component (out-proc-server (.exe)) has the following code:

(C++)

STDMETHODIMP CIntf::SendFile s(int noOfStreams, IUnknown** dataStreams)
{
for(int i = 0; i < noOfStreams; i++)
{
if(*(dataStream s + i))
{
IStream* iStream;
hr = (*(dataStreams + i))->QueryInterface (IID_IStream,
(void**)&iStrea m);
... ...
}
}
}

I can't change the code of the COM component.
If I'm calling the function from C# I get an E_NOINTERFACE error from
QueryInterface in the COM component.
Does anyone has an idea about the problem in my C# code?

I asked the same in the german newsgroup, but I got no answer. I hope you
are better here.

Best reguards
Ralf Beckers

(C#)

public void SendFiles(strin g file)
{

FileStream fs = new FileStream(file , FileMode.Open);
StreamReader sr = new StreamReader(fs , Encoding.Defaul t);
string trc = sr.ReadToEnd();
sr.Close();
fs.Close();

byte[] data = Encoding.Defaul t.GetBytes(trc) ;

IStorage storage;
ComTypes.IStrea m stream;

int err = StgCreateDocfil e(null,
STGM.CREATE | STGM.READWRITE | STGM.TRANSACTED |
STGM.SHARE_EXCL USIVE | STGM.DELETEONRE LEASE,
0, out storage);

storage.CreateS tream("TRTFiles .trt", (uint)(STGM.REA DWRITE |
STGM.SHARE_EXCL USIVE), 0,0, out stream);
stream.Write(da ta, data.Length, IntPtr.Zero);
stream.Commit(( int)STGC.OVERWR ITE);

storage.Commit( (int)STGC.OVERW RITE);
IntPtr ptr = Marshal.GetIUnk nownForObject(s tream);
IntPtr[] arr = { ptr };
IntPtr buffer = Marshal.AllocCo TaskMem( Marshal.SizeOf( typeof(IntPtr ))
* arr.Length );
Marshal.Copy(ar r, 0, buffer, arr.Length );

object obj = buffer;
this.intf.SendF iles(1, ref obj);
Marshal.FreeCoT askMem((IntPtr) buffer);
}
[DllImport("ole3 2.dll")]
static extern int StgCreateDocfil e([MarshalAs(Unman agedType.LPWStr )]string
pwcsName, STGM grfMode, uint reserved, out IStorage ppstgOpen);

[Flags]
public enum CSMFlags : short
{
NONE = 0,
EVENT_EN = 0x0100,
POLLED_EVENTS = 0x0001
}
[Flags]
public enum CSMFilterType : byte
{
ENABLE_MSG = 0x00,
BLOCK_MSG = 0x01,
NO_FILTER = 0x02
}
[Flags]
internal enum STGC : int
{
DEFAULT = 0,
OVERWRITE = 1,
ONLYIFCURRENT = 2,
DANGEROUSLYCOMM ITMERELYTODISKC ACHE = 4,
CONSOLIDATE = 8
}
[Flags]
internal enum STGM : int
{
DIRECT = 0x00000000,
TRANSACTED = 0x00010000,
SIMPLE = 0x08000000,
READ = 0x00000000,
WRITE = 0x00000001,
READWRITE = 0x00000002,
SHARE_DENY_NONE = 0x00000040,
SHARE_DENY_READ = 0x00000030,
SHARE_DENY_WRIT E= 0x00000020,
SHARE_EXCLUSIVE = 0x00000010,
PRIORITY = 0x00040000,
DELETEONRELEASE = 0x04000000,
NOSCRATCH = 0x00100000,
CREATE = 0x00001000,
CONVERT = 0x00020000,
FAILIFTHERE = 0x00000000,
NOSNAPSHOT = 0x00200000,
DIRECT_SWMR = 0x00400000
}

[ComImport]
[Guid("0000000b-0000-0000-C000-000000000046")]
[InterfaceType(C omInterfaceType .InterfaceIsIUn known)]
interface IStorage
{
void CreateStream(
/* [string][in] */ string pwcsName,
/* [in] */ uint grfMode,
/* [in] */ uint reserved1,
/* [in] */ uint reserved2,
/* [out] */ out ComTypes.IStrea m ppstm);
void OpenStream(
/* [string][in] */ string pwcsName,
/* [unique][in] */ IntPtr reserved1,
/* [in] */ uint grfMode,
/* [in] */ uint reserved2,
/* [out] */ out ComTypes.IStrea m ppstm);
void CreateStorage(
/* [string][in] */ string pwcsName,
/* [in] */ uint grfMode,
/* [in] */ uint reserved1,
/* [in] */ uint reserved2,
/* [out] */ out IStorage ppstg);
void OpenStorage(
/* [string][unique][in] */ string pwcsName,
/* [unique][in] */ IStorage pstgPriority,
/* [in] */ uint grfMode,
/* [unique][in] */ IntPtr snbExclude,
/* [in] */ uint reserved,
/* [out] */ out IStorage ppstg);
void CopyTo(
/* [in] */ uint ciidExclude,
/* [size_is][unique][in] */ Guid rgiidExclude, // should this be an array?
/* [unique][in] */ IntPtr snbExclude,
/* [unique][in] */ IStorage pstgDest);
void MoveElementTo(
/* [string][in] */ string pwcsName,
/* [unique][in] */ IStorage pstgDest,
/* [string][in] */ string pwcsNewName,
/* [in] */ uint grfFlags);
void Commit(
/* [in] */ uint grfCommitFlags) ;
void Revert();
void EnumElements(
/* [in] */ uint reserved1,
/* [size_is][unique][in] */ IntPtr reserved2,
/* [in] */ uint reserved3,
/* [out] */ out IEnumSTATSTG ppenum);
void DestroyElement(
/* [string][in] */ string pwcsName);
void RenameElement(
/* [string][in] */ string pwcsOldName,
/* [string][in] */ string pwcsNewName);
void SetElementTimes (
/* [string][unique][in] */ string pwcsName,
/* [unique][in] */ ComTypes.FILETI ME pctime,
/* [unique][in] */ ComTypes.FILETI ME patime,
/* [unique][in] */ ComTypes.FILETI ME pmtime);
void SetClass(
/* [in] */ Guid clsid);
void SetStateBits(
/* [in] */ uint grfStateBits,
/* [in] */ uint grfMask);
void Stat(
/* [out] */ out ComTypes.STATST G pstatstg,
/* [in] */ uint grfStatFlag);
}

[ComImport]
[Guid("0000000d-0000-0000-C000-000000000046")]
[InterfaceType(C omInterfaceType .InterfaceIsIUn known)]
public interface IEnumSTATSTG
{
// The user needs to allocate an STATSTG array whose size is celt.
[PreserveSig]
uint
Next(
uint celt,
[MarshalAs(Unman agedType.LPArra y), Out]
ComTypes.STATST G[] rgelt,
out uint pceltFetched
);
void Skip(uint celt);
void Reset();
[return:MarshalA s(UnmanagedType .Interface)]
IEnumSTATSTG Clone();
}

[Walter Wang [MSFT]]

Hi Ralf,

Based on my understanding, you are trying to pass an array of interface
pointers to a COM component, right?

To pass array in COM, you need SAFEARRAY.

Here's some key steps:

1) In your IDL:

[id(3), helpstring("met hod SendFiles2")] HRESULT SendFiles2([in,out]
SAFEARRAY(IUnkn own*)* m);

2) Here's some example code on how to retrieve the element in a SAFEARRAY
with index 0:

STDMETHODIMP CSimpleObject:: SendFiles2(SAFE ARRAY ** m)
{
IUnknown* punk;
long elementNumber = 0;
HRESULT hr = S_OK;
hr = SafeArrayGetEle ment(*m, &elementNumb er, &punk);
if (SUCCEEDED(hr)) {
IStream* pstream;
hr = punk->QueryInterface (IID_IStream, (void**)&pstrea m);
}
...

3) In C#, after you re-adding the reference, you should see this method now
has signature (ref Array). To call this method:

Array T = Array.CreateIns tance(typeof(IS tream), 1);
T.SetValue(stre am, 0);
intf.SendFiles2 (ref T);
Hope this helps.

Regards,
Walter Wang (wa****@online. microsoft.com, remove 'online.')
Microsoft Online Community Support

=============== =============== =============== =====
When responding to posts, please "Reply to Group" via your newsreader so
that others may learn and benefit from your issue.
=============== =============== =============== =====

This posting is provided "AS IS" with no warranties, and confers no rights.

[Ralf]

Hi Walter,

thanx for your answer.
But as I wrote in my question, I can't change anything at the interface of
the C++ COM component.
I need a way to use the existing interface without any modifications.

The interface is described in the IDL file as:

[
object,
uuid(A0926B7C-D57F-4F5E-9115-8F6ADB890DC1),
dual,
helpstring("IIn tf Interface"),
pointer_default (unique)
]
interface IIntf : IDispatch
{
[id(21), helpstring("met hod SendFiles")]
HRESULT SendFiles(
[in] INT num,
[in, ref, size_is(num)] IUnknown** arr);

and my DevStudio generates:
using System;
using System.Runtime. InteropServices ;

[ClassInterface( 0)]
[TypeLibType(2)]
[Guid("A0926B7C-D57F-4F5E-9115-8F6ADB890DC1")]
public class CIntfClass :IIntf , CIntf
{
public CIntfClass ();
[DispId(1)]
public virtual void SendFiles(int num, ref object arr);
}

Regards
Ralf
""Walter Wang [MSFT]"" <wa****@online. microsoft.comsc hrieb im Newsbeitrag
news:mP******** ******@TK2MSFTN GHUB02.phx.gbl. ..

Hi Ralf,

Based on my understanding, you are trying to pass an array of interface
pointers to a COM component, right?

To pass array in COM, you need SAFEARRAY.

Here's some key steps:

1) In your IDL:

[id(3), helpstring("met hod SendFiles2")] HRESULT SendFiles2([in,out]
SAFEARRAY(IUnkn own*)* m);

2) Here's some example code on how to retrieve the element in a SAFEARRAY
with index 0:

STDMETHODIMP CSimpleObject:: SendFiles2(SAFE ARRAY ** m)
{
IUnknown* punk;
long elementNumber = 0;
HRESULT hr = S_OK;
hr = SafeArrayGetEle ment(*m, &elementNumb er, &punk);
if (SUCCEEDED(hr)) {
IStream* pstream;
hr = punk->QueryInterface (IID_IStream, (void**)&pstrea m);
}
..

3) In C#, after you re-adding the reference, you should see this method
now
has signature (ref Array). To call this method:

Array T = Array.CreateIns tance(typeof(IS tream), 1);
T.SetValue(stre am, 0);
intf.SendFiles2 (ref T);
Hope this helps.

Regards,
Walter Wang (wa****@online. microsoft.com, remove 'online.')
Microsoft Online Community Support

=============== =============== =============== =====
When responding to posts, please "Reply to Group" via your newsreader so
that others may learn and benefit from your issue.
=============== =============== =============== =====

This posting is provided "AS IS" with no warranties, and confers no
rights.

[Walter Wang [MSFT]]

Hi Ralf,

I'm not sure if we could do that from .NET side but I will do some further
research.

Regards,
Walter Wang (wa****@online. microsoft.com, remove 'online.')
Microsoft Online Community Support

=============== =============== =============== =====
When responding to posts, please "Reply to Group" via your newsreader so
that others may learn and benefit from your issue.
=============== =============== =============== =====

This posting is provided "AS IS" with no warranties, and confers no rights.

[Walter Wang [MSFT]]

Hi Ralf,

I'm writing to check the status of this post. Please feel free to let me
know if there's anything else I can help. Thanks.
Regards,
Walter Wang (wa****@online. microsoft.com, remove 'online.')
Microsoft Online Community Support

=============== =============== =============== =====
When responding to posts, please "Reply to Group" via your newsreader so
that others may learn and benefit from your issue.
=============== =============== =============== =====

This posting is provided "AS IS" with no warranties, and confers no rights.