[COM] Liste de char

**mambo** · 03/07/2006, 16h22

Salut tlm,

Est ce que quelqu'un pourrait m'indiquer comment faire pour passer une liste de char entre un serveur COM et son client?

Merci d'avance.

**nico-pyright(c)** · 03/07/2006, 16h36

ca veut dire quoi ca une liste de char ?

**mambo** · 03/07/2006, 16h39

un truc de ce genre

list<char*, allocator<char*> >

serait l'idéal.

**Médinoc** · 03/07/2006, 17h09

Euh... On n'est pas supposé utiliser des BSTR en COM ?

**mambo** · 03/07/2006, 17h17

Dans ce cas, tu saurais pas comment faire pour faire passer une liste de BSTR ou du moins un tableau?

**Médinoc** · 03/07/2006, 21h05

Ben, ça dépend de ce que tu veux faire...
Personnellement, je n'ai touché à COM qu'en InprocServer, donc où pour passer des données, il suffit de passer le pointeur...

Si c'est ce que tu veux faire, ben, le mieux est d'allouer un tableau de BSTR (le type BSTR est un simple pointeur), le passer en paramètre à une fonction et le désallouer soi-même après usage...

**mambo** · 04/07/2006, 09h27

Voici la méthode que j'ai implémenté au niveau de mon serveur COM :

STDMETHODIMP Test::GetServers(/*[in]*/ BSTR NodeName,/*[out]*/ BSTR** servertable) {

//Some code
BSTR* ptable = new BSTR[255];
//.....
*servertable = ptable;
return S_OK;
}

Et voici comment je l'ai appelé au niveau de mon client:

BSTR* servertable_ = new BSTR[255];
_bstr_t nodename("localhost");
pIFTest->GetServers(nodename,&servertable_);

Mais ça ne marche pas : servertable_ ne contient qu'un seul élément alors qu'elle devrait en avoir 70.

J'ai essayé de crée ma propre structure de liste dans le fichier idl :

typedef struct tagELEMENT {
BSTR lValue;
[unique] struct tagELEMENT* pNext;
} ELEMENT;

Mais le client plante dès la déclaration d'un objet ELEMENT.

**Médinoc** · 04/07/2006, 10h03

Tu es sûr que le problème n'est pas au REMPLISSAGE du tableau ou à la détection du nombre ?

PS: Tu alloues le tableau dans le client ou dans le serveur, mais tu ne dois pas le faire dans les deux: L'un des deux tableaux est perdu...

PPS: n'oublions pas que ce qui est alloué par un module doit généralement être désalloué par le même module. Il te faudra donc soit allouer et désallouer le tableau dans le client COM, soit exporter une fonction de désallocation dans le serveur COM.

PPPS: Pour l'IDL, je ne peux pas t'aider, je ne connais pas. Moi, j'utilise de simples headers C/C++ avec la macro DECLARE_INTERFACE.

**mambo** · 04/07/2006, 10h29

J'alloue le tableau dans le client.
Je vais vérifier le remplissage, je crois ne pas l'avoir fait.

Merci.

**Médinoc** · 04/07/2006, 10h35

Envoyé par mambo

Je vais vérifier le remplissage, je crois ne pas l'avoir fait.

ALORS COMMENT SAIS-TU QUE TU AS UN SEUL ELEMENT AU LIEU DE 70 ?

**mambo** · 04/07/2006, 10h41

En fait, j'ai une liste qui contient 70 élément (de type string) que je dois mettre dans le tableau servertable.

Mais au niveau du client, je ne retrouve que le premier élément.

**Médinoc** · 04/07/2006, 11h30

Ben forcément, si t'as pas encore fait le remplissage...

**mambo** · 04/07/2006, 11h32

Mais si justement je l'ai rempli

**Médinoc** · 04/07/2006, 11h35

Dans ce cas montre-moi comment tu remplis et comment tu lis...

**mambo** · 04/07/2006, 11h43

Voilà la méthode implémentée au niveau du serveur COM :

typedef list<char*, allocator<char*> > charlist;
STDMETHODIMP Test::GetServers(/*[in]*/ BSTR NodeName,/*[out]*/ BSTR** servertable) {

charlist *ServerList = new charlist;
HRESULT hrt = GetLocalServerList(1,strCATID, 1,ServerList);

int i = 0;
list<char*, allocator<char*> > ::iterator SLit;
if (ServerList->size()> 0)
{
SLit = ServerList->begin();
string servername;
BSTR ptable[255];
int i = 0;
while (SLit!= ServerList->end())
{
servername = (*SLit);
CComBSTR tempo(servername.begin());
ptable[i] = tempo.Detach();
i++;
SLit++;
LocalFree(tempo);
}

*servertable = ptable;
}
}
return S_OK;
}

Je viens de revérifier cette méthode, le iq est là :

*servertable = ptable;

**Médinoc** · 04/07/2006, 11h47

Donc,

Tu n'alloues plus le tableau dans le serveur. C'est bien.
Tu retournes l'adresse d'une variable locale. C'est mal.
Je ne connais pas trop CComBSTR, mais je ne vois pas trop à quoi sert le LocalFree() dessus?

Bref, pour le 2, tu dois recopier le tableau au lieu de passer son adresse. À supposer que *servertable fasse toujours 255 BSTRs, tu peux passer un simple BSTR* et utiliser une boucle FOR pour remplir le tableau...

**mambo** · 04/07/2006, 12h10

Je viens de corriger la méthode au niveau du serveur, le remplissage se fait correctement. Voilà la dernière modification de la méthode au niveau du serveur COM :

typedef list<char*, allocator<char*> > charlist;
STDMETHODIMP Test::GetServers(/*[in]*/ BSTR NodeName,/*[out]*/ BSTR** servertable) {

charlist *ServerList = new charlist;
HRESULT hrt = GetLocalServerList(1,strCATID, 1,ServerList);

int i = 0;
list<char*, allocator<char*> > ::iterator SLit;
if (ServerList->size()> 0)
{
SLit = ServerList->begin();
string servername;
BSTR ptable[255];
int i = 0;
while (SLit!= ServerList->end())
{
servername = (*SLit);
CComBSTR tempo(servername.begin());
ptable[i] = tempo.Detach();
i++;
SLit++;
LocalFree(tempo);
}

for (int j=0; j < 255; j++) {
servertable[j] = &ptable[j];
//Some code....
}
}
return S_OK;
}

Mais j'ai toujours pas le bon résultat au niveau du client :

BSTR* servertable_ = new BSTR[255];
BSTR** servertable = &servertable_;

pIFTest->GetServers(nodename,servertable);

for (int i=0; i < 255; i++) {
char TABLE[255];
BSTR test = *servertable[i];
sprintf(TABLE, "%ws", test);

//Some code...
}

Qu'est ce qui est faux ici ?

Pour localfree, je sais pas vraiment qu'est ce que c'est. C'est juste un truc que j'ai essayé et que j'ai oublié là.

**Gabrielly** · 04/07/2006, 12h24

Salut,

La bande passante est faible dans la passation des types de données entre un serveur COM et son client. C'est l'un défaut de COM.
Mais du moins tu peux passer n'importe quel types de données en faisant un petit cast dans un VARIANT.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
 
 
#pragma once
 
namespace MCN
{
	template<typename T>
	class CCastingVariant
	{
	public:
		static T* CastFromVariant(VARIANT var)
		{
			if(var.vt != VT_BYREF || var.byref == NULL)
				return NULL;
			return (T*) var.byref;
		}
 
		static VARIANT CastToVariant(T* pT)
		{
			if(pT == NULL)
				return CComVariant();
 
			VARIANT var;
			var.byref = (void*) pT;
			var.vt = VT_BYREF;
			return var;
		}
	};
} // namespace MCN

C'est une de mes classes utilitaire de Mcn.dll

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
// Dans un code client
MonType monObjet;
MonserveurCOM.Function(MCN::CCastingVariant<MonType>::CastToVariant(&monObjet));

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
// Dans le code serveur du composant COM
HRESULT MonServeur::Function(VARIANT var)
{
MonType* pmonObjet = MCN::CCastingVariant<MonType>::CastFromVariant(var);
//...

**Médinoc** · 04/07/2006, 13h10

Gabrielly : Je crois bien qu'on est en Inproc pour l'instant : Si tu parles de "Bande passante", c'est pour le marshalling, non?

mambo : Le code du client ne suffit pas. Tu peux ajouter la version définitive du serveur ? (en éditant ton post par exemple)