Singleton sur plusieurs DLL

Version imprimable

25/04/2006, 16h29
10_GOTO_10

Singleton sur plusieurs DLL

J'ai quelques données que je veux unique dans mon programme. Bon, pas de problème, je fais un singleton. Ca marche très bien... dans l'application principale.
Parce que les DLL rattachées au programme ont leur propre segment de données. Donc une autre instance de mon singleton. J'ai donc un singleton multiple (vous me suivez ?). Pas top.
Y a-t-il une façon de faire pour contourner ce problème ?
25/04/2006, 16h39
Matthieu Brucher

Le singleton doit être présent, compilé, que dans une seule unité de compilation. Pour ce cas-ci, le mettre dans un DLL est peut-être la solution.
25/04/2006, 20h16
10_GOTO_10

Le singleton ne doit être présent que dans une seule unité de compilation, on est d'accord. Par contre, la classe englobante (celle contenant la classe statique) peut être instanciée n'importe où dans l'appli (c'est à dire dans l'appli principale ou bien dans une des dll). Qui dit instanciation dit inclusion du .h, donc fatalement déclaration implicite d'une autre instance du singleton.
25/04/2006, 20h30
Matthieu Brucher

Non, normalement le singleton n'est pas dans un fichier d'en-tête, il est déclaré static à un seul endroit, dans un fichier .cpp
26/04/2006, 10h49
10_GOTO_10

Si je déclare le singleton dans le cpp (de la dll, par exemple), ça me fait un "Unresolved external" quand je compile l'application principale. Et réciproquement si je le met dans le cpp de l'appli.
26/04/2006, 11h01
Matthieu Brucher

Ca veut dire que tu ne l'exportes pas alors que tu devrais.
Si tu as 2 fois le fichier compilé dans ton projet, c'est normal que tu aies des multiples singletons. Il faut que ce singleton soit visible par tout le monde.

Si, il est bien exporté.
Pour être clair: voilà les sources:

ProjetDll:

Unit1.cpp

Code:

1
2
3
4
5
6
#include <windows.h>
#pragma argsused
int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void* lpReserved)
{
  return 1;
}

Unit2.cpp

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
//---------------------------------------------------------------------------
#pragma hdrstop
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
int _export MonSingleton::Data;
extern "C" int _export GetData() {
  MonSingleton Instance;
  return Instance.Data;
}
extern "C" void _export SetData(int Data) {
  MonSingleton Instance;
  Instance.Data = Data;
}

Unit2.h

Code:

1
2
3
4
5
6
7
8
9
10
#ifndef Unit2H
#define Unit2H
class MonSingleton {
public:
  static int Data;
};
extern "C" int _export GetData();
extern "C" void _export SetData(int Data);
//---------------------------------------------------------------------------
#endif

Projet:

Unit3.cpp

Code:

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
30
31
32
33
34
35
#include <vcl.h>
#pragma hdrstop
#include "Unit3.h"
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
  : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::GetDataDllClick(TObject *Sender)
{
  Edit1->Text = GetData();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::SetDataDllClick(TObject *Sender)
{
  SetData(Edit1->Text.ToInt());
}
//---------------------------------------------------------------------------
void __fastcall TForm1::GetDataSingletonClick(TObject *Sender)
{
  MonSingleton Instance;
  Edit1->Text = Instance.Data;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::SetDataSingletonClick(TObject *Sender)
{
  MonSingleton Instance;
  Instance.Data = Edit1->Text.ToInt();
}

Unit3.h

Code:

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
#ifndef Unit3H
#define Unit3H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // Composants gérés par l'EDI
  TEdit *Edit1;
  TButton *GetDataDll;
  TButton *SetDataDll;
  TButton *GetDataSingleton;
  TButton *SetDataSingleton;
  void __fastcall GetDataDllClick(TObject *Sender);
  void __fastcall SetDataDllClick(TObject *Sender);
  void __fastcall GetDataSingletonClick(TObject *Sender);
  void __fastcall SetDataSingletonClick(TObject *Sender);
private: // Déclarations de l'utilisateur
public:  // Déclarations de l'utilisateur
  __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

L'erreur:

Citation:

[Lieur Erreur] Unresolved external 'MonSingleton::Data' referenced from C:\TESTSINGLETON\UNIT3.OBJ

26/04/2006, 11h46
Matthieu Brucher

Déjà, tu n'as besoin du

Code:

MonSingleton Instance;

Appelle directement la variable statique, elle est là pour ça.

En même temps, c'est pas vraiment un singleton, mais passons ;)

L'erreur est simple, tu n'as aucun endroit où tu indiques où est stocké Data. Donc tu dois faire un :

Code:

int MonSingleton::Data;

dans un fichier .cpp.
26/04/2006, 12h05
10_GOTO_10

Citation:

Envoyé par Miles

Déjà, tu n'as besoin du

Code:

MonSingleton Instance;

Appelle directement la variable statique, elle est là pour ça.

Heu... Ben si, c'est le principe du singleton, non ?

Citation:

Envoyé par Miles

En même temps, c'est pas vraiment un singleton, mais passons ;)

Bien sûr, j'ai simplifié à l'extrême le code

Citation:

Envoyé par Miles

L'erreur est simple, tu n'as aucun endroit où tu indiques où est stocké Data. Donc tu dois faire un :

Code:

int MonSingleton::Data;

dans un fichier .cpp.

8O 8O 8O 8O 8O Ligne 6 de Unit2.cpp:

Code:

int _export MonSingleton::Data;
26/04/2006, 12h42
Matthieu Brucher

Citation:

Envoyé par 10_GOTO_10

Heu... Ben si, c'est le principe du singleton, non ?

Non, pas vraiment. Le singleton, c'est une instance unique d'une classe. Là, c'est simplement une variable statique qu'on peut appeler par MonSingleton::Data directement... Pas besoin d'encapsuler dans une classe pour ça. C'est la classe qui devrait être unique s'il fallait un singleton, mais c'est sans doute pas nécessaire.

Citation:

8O 8O 8O 8O 8O Ligne 6 de Unit2.cpp:

Code:

int _export MonSingleton::Data;

Oups, désolé :aie: pas fait gaffe :)
C'est quoi _export ?

Citation:

Envoyé par Miles

Non, pas vraiment. Le singleton, c'est une instance unique d'une classe. Là, c'est simplement une variable statique qu'on peut appeler par MonSingleton::Data directement... Pas besoin d'encapsuler dans une classe pour ça. C'est la classe qui devrait être unique s'il fallait un singleton, mais c'est sans doute pas nécessaire.

Oui, tu as raison. Partons sur un singleton homologué avec pedigree, celui de wikipedia. Ca donne donc ceci:

Unit2.h

Code:

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
#ifndef Unit2H
#define Unit2H
 
template<typename T> class Singleton
{
  public:
    static T& Instance()
    {
        static T theSingleInstance; // suppose que T a un constructeur par défaut
        return theSingleInstance;
    }
};
 
class MonSingleton : public Singleton<MonSingleton>
{
    //...définir ici le reste de l'interface
public:
    // C'est ce que je fais
    int Data;
};
 
extern "C" int _export GetData();
extern "C" void _export SetData(int Data);
//---------------------------------------------------------------------------
#endif

Unit2.cpp

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
#pragma hdrstop
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
 
extern "C" int _export GetData() {
  MonSingleton Instance;
  return Instance.Instance().Data;
}
 
extern "C" void _export SetData(int Data) {
  MonSingleton Instance;
  Instance.Instance().Data = Data;
}

Unit3.h: pas modifié

Unit3.cpp:

Code:

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
30
31
32
33
34
35
36
37
38
39
40
41
#include <vcl.h>
#pragma hdrstop
#include "Unit3.h"
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
 
__fastcall TForm1::TForm1(TComponent* Owner)
  : TForm(Owner)
{
}
//---------------------------------------------------------------------
------
 
void __fastcall TForm1::GetDataDllClick(TObject *Sender)
{
  Edit1->Text = GetData();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::SetDataDllClick(TObject *Sender)
{
  SetData(Edit1->Text.ToInt());
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::GetDataSingletonClick(TObject *Sender)
{
  MonSingleton Instance;
  Edit1->Text = Instance.Instance().Data;
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::SetDataSingletonClick(TObject *Sender)
{
  MonSingleton Instance;
  Instance.Instance().Data = Edit1->Text.ToInt();
}

Qui ne marche toujours pas (ça se compile, mais j'ai un singleton multiple).

26/04/2006, 14h56
Matthieu Brucher

Bon, comme toujours, ton singleton est faux, pour y accéder tu dois faire comme ça :

Code:

MonSingleton::Instance()

Si tu crées un MonSingleton, tu ne peux avoir de singleton, puisque tu peux les créer comme tu veux.

Tu donnes quoi comme header aux autres fichiers cpp de tes autres programmes ?
26/04/2006, 15h21
10_GOTO_10

Citation:

Envoyé par Miles

Bon, comme toujours, ton singleton est faux, pour y accéder tu dois faire comme ça :

Code:

MonSingleton::Instance()

Citation:

Envoyé par Mon compilo

[C++ Erreur] Unit2.cpp(10): E2108 Utilisation impropre de typedef 'MonSingleton'
[C++ Erreur] Unit2.cpp(14): E2108 Utilisation impropre de typedef 'MonSingleton'

Pourrais-tu expliciter ?

Citation:

Envoyé par Miles

Si tu crées un MonSingleton, tu ne peux avoir de singleton, puisque tu peux les créer comme tu veux.

Arrête moi si je dis une bêtise, mais le principe du singleton, c'est quand même d'accéder à une classe unique à partir d'instances multiples de la classe "enveloppante", non ? Sinon, il n'y aurait aucun avantage par rapport à une variable globale.

Citation:

Envoyé par Miles

Tu donnes quoi comme header aux autres fichiers cpp de tes autres programmes ?

Je n'ai pas d'autres programmes. Pour ce test, je n'ai que le projet ProjetDll qui comprend Unit1.cpp et Unit2.cpp, et l'application principale Projet qui comprend Unit3.cpp (lequel inclue Unit2.h), et ProjetDll.lib pour les exports.
26/04/2006, 15h45
Matthieu Brucher

Oui, tu dis une bêtise :)
Le singleton, c'est une seule instance d'une classe et impossibilité d'en créer une autre. L'avantage par rapport à une variable globale est multiple, je te laisse explorer ce tutoriel ;) http://smeric.developpez.com/java/uml/singleton/
C'est du Java, mais le principe reste identique.

C'est bizarre le coup des typedef, surtout que tu n'as l'air d'en avoir dans ton code...

Le doublon du singleton, c'est sans doute dû à ton en-tête Unit2.hpp en trop :|
26/04/2006, 16h03
10_GOTO_10

Citation:

Envoyé par Miles

Le singleton, c'est une seule instance d'une classe et impossibilité d'en créer une autre.

Citation:

Envoyé par Miles

Si tu crées un MonSingleton, tu ne peux avoir de singleton, puisque tu peux les créer comme tu veux.

C'est contradictoire, tout ça. Si le singleton interdit de créer une autre instance, j'aurais pas dû pouvoir en créer "comme je veux".

Citation:

Envoyé par Miles

L'avantage par rapport à une variable globale est multiple, je te laisse explorer ce tutoriel

Je n'en doute pas. Oui, j'ai déjà lu ce tutoriel (j'ai commencé par ça avant de poster, comme tout foromeur qui se respecte).

Citation:

Envoyé par Miles

Le doublon du singleton, c'est sans doute dû à ton en-tête Unit2.hpp en trop

En trop ? Il faut bien la déclarer quelque part, cette classe singleton ?

Bon, j'ai l'impression que ce post tourne en rond, voire dérive en troll, ce que je ne voudrais pas. Y a-t-il quelque part un exemple de singleton (de variable globale, ou de n'importe quoi qui soit unique) entre deux dll, ou entre un programme et une dll ? Tous les exemples que j'ai vu sur google se contentent de la définition (en général toujours la même, celle que j'ai utilisée).
26/04/2006, 19h00
Matthieu Brucher

Citation:

Envoyé par 10_GOTO_10

C'est contradictoire, tout ça. Si le singleton interdit de créer une autre instance, j'aurais pas dû pouvoir en créer "comme je veux".

Eh oui, c'est pour ça que ce n'est pas un singleton, ce que tu as fait.

Citation:

Je n'en doute pas. Oui, j'ai déjà lu ce tutoriel (j'ai commencé par ça avant de poster, comme tout foromeur qui se respecte).

:)

Citation:

En trop ? Il faut bien la déclarer quelque part, cette classe singleton ?

Bon, j'ai l'impression que ce post tourne en rond, voire dérive en troll, ce que je ne voudrais pas. Y a-t-il quelque part un exemple de singleton (de variable globale, ou de n'importe quoi qui soit unique) entre deux dll, ou entre un programme et une dll ? Tous les exemples que j'ai vu sur google se contentent de la définition (en général toujours la même, celle que j'ai utilisée).

Comment constates-tu la présence de 2 singletons ?
26/04/2006, 19h32
10_GOTO_10
Citation:

Envoyé par Miles

Comment constates-tu la présence de 2 singletons ?

C'est simple, dans l'appli principale j'ai une boîte d'édition et quatre boutons. Deux boutons SetData et deux boutons GetData (voir Unit3.cpp). L'un des deux boutons appelle directement le singleton, l'autre appelle une fonction de la dll qui appelle ce même (enfin, j'aimerais bien) singleton.
1. Je met "1" dans l'edit et je clique sur SetDataSingleton
2. Je met "2" dans l'edit et je clique sur SetDataDll
3. Je clique sur GetDataSingleton => ça me remet "1" dans l'edit
4. Je clique sur GetDataDll => ça me remet "2" dans l'edit
L'étape 3 prouve que le singleton marche à l'intérieur d'une même entité (même si j'ai deux instances différentes dans les méthodes GetData et SetData). L'étape 4 met en évidence qu'il y a deux singletons, celui accessible du programme principal, et celui accessible depuis la dll.
27/04/2006, 08h26
Matthieu Brucher

Tu pourrais juste redonner ton code mis à jour ? Il n'y a pas l'air d'y avoir quelque part la déclaration de ta variable statique, donc si tu pouvais le remettre pour qu'on y voit un peu plus clair ;)

Pas de Problème.

1) Donc, un projet dll normal, monothread, c++ qui s'appelle ProjetDll et qui contient Unit1.cpp et Unit2.cpp (donc, par inclusion Unit2.h):

Unit1.cpp:

Code:

1
2
3
4
5
6
7
#include <windows.h>
 
#pragma argsused
int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void* lpReserved)
{
  return 1;
}

Unit2.cpp:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
#pragma hdrstop
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
 
extern "C" int _export GetData() {
  MonSingleton InstanceLocale;
  return InstanceLocale.Instance().Data;
}
 
extern "C" void _export SetData(int Data) {
  MonSingleton InstanceLocale;
  InstanceLocale.Instance().Data = Data;
}

Unit2.h:

Code:

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
#ifndef Unit2H
#define Unit2H
 
template<typename T> class Singleton
{
  public:
    static T& Instance()
    {
        static T theSingleInstance; // suppose que T a un constructeur par défaut
        return theSingleInstance;
    }
};
 
class MonSingleton : public Singleton<MonSingleton>
{
    //...définir ici le reste de l'interface
public:
    // C'est ce que je fais
    int Data;
};
 
extern "C" int _export GetData();
extern "C" void _export SetData(int Data);
//---------------------------------------------------------------------------
#endif

Ensuite, un projet window classique avec une fenêtre, quatre boutons et une boîte d'édition, nommé Projet, contenant Unit3.cpp (et, par inclusion, Unit2.h et Unit3.h):

Unit3.cpp:

Code:

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
30
31
32
33
34
35
36
37
38
39
40
41
#include <vcl.h>
#pragma hdrstop
#include "Unit3.h"
#include "Unit2.h"
//---------------------------------------------------------------------------
 
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
 
__fastcall TForm1::TForm1(TComponent* Owner)
  : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::GetDataDllClick(TObject *Sender)
{
  Edit1->Text = GetData();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::SetDataDllClick(TObject *Sender)
{
  SetData(Edit1->Text.ToInt());
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::GetDataSingletonClick(TObject *Sender)
{
  MonSingleton InstanceLocale;
  Edit1->Text = InstanceLocale.Instance().Data;
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::SetDataSingletonClick(TObject *Sender)
{
  MonSingleton InstanceLocale;
  InstanceLocale.Instance().Data = Edit1->Text.ToInt();
}

Unit3.h:

Code:

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
30
#ifndef Unit3H
#define Unit3H
 
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
//---------------------------------------------------------------------------
 
class TForm1 : public TForm
{
__published: // Composants gérés par l'EDI
  TEdit *Edit1;
  TButton *GetDataDll;
  TButton *SetDataDll;
  TButton *GetDataSingleton;
  TButton *SetDataSingleton;
  void __fastcall GetDataDllClick(TObject *Sender);
  void __fastcall SetDataDllClick(TObject *Sender);
  void __fastcall GetDataSingletonClick(TObject *Sender);
  void __fastcall SetDataSingletonClick(TObject *Sender);
private: // Déclarations de l'utilisateur
public:  // Déclarations de l'utilisateur
  __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

Pour compiler sous Borland, voilà aussi le dfm:

Unit3.dfm

Code:

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
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
object Form1: TForm1
  Left = 223
  Top = 165
  Width = 326
  Height = 117
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Edit1: TEdit
    Left = 12
    Top = 18
    Width = 55
    Height = 21
    TabOrder = 0
  end
  object GetDataDll: TButton
    Left = 84
    Top = 18
    Width = 109
    Height = 22
    Caption = 'Get data / dll'
    TabOrder = 1
    OnClick = GetDataDllClick
  end
  object SetDataDll: TButton
    Left = 84
    Top = 51
    Width = 109
    Height = 22
    Caption = 'Set data / dll'
    TabOrder = 2
    OnClick = SetDataDllClick
  end
  object GetDataSingleton: TButton
    Left = 204
    Top = 18
    Width = 109
    Height = 22
    Caption = 'Get data / singleton'
    TabOrder = 3
    OnClick = GetDataSingletonClick
  end
  object SetDataSingleton: TButton
    Left = 204
    Top = 51
    Width = 109
    Height = 22
    Caption = 'Set data / singleton'
    TabOrder = 4
    OnClick = SetDataSingletonClick
  end
end

Et c'est ce code qui a le comportement de mon précédent post.

27/04/2006, 11h02
Matthieu Brucher

OK, c'est ce que je pensais. La raison provient sans doute de l'inline du singleton dans unit2.hpp.
Vire la classe template en mettant ce qu'il faut dans ta classe, mais ne mets le corps de la fonction que dans unit2.cpp. Tu vois ce que je veux dire ? Ca pourra peut-être marcher.
27/04/2006, 11h29
10_GOTO_10

Citation:

Envoyé par Miles

OK, c'est ce que je pensais. La raison provient sans doute de l'inline du singleton dans unit2.hpp.

Le singleton en lui-même, il n'y a pas de raisons qu'il ne marche pas. J'ai fait un copié-collé exact d'ici: http://fr.wikipedia.org/wiki/Singlet...de_conception)).

Citation:

Envoyé par Miles

Vire la classe template en mettant ce qu'il faut dans ta classe, mais ne mets le corps de la fonction que dans unit2.cpp. Tu vois ce que je veux dire ?

Tout à fait, c'est ce qu'il y avait dans ma première version (voir plus haut), et qui avait exactement le même comportement.

Citation:

Envoyé par Miles

Ca pourra peut-être marcher.

Ca marche ou ça marche pas ? Parce que sans vouloir te vexer, et en te remerciant encore du temps que tu m'accordes, je n'ai pas l'impression que tu maitrises mieux le sujet que moi. Essayer des trucs au hasard en pensant que "ça pourra peut-être marcher", ça fait trois jours que je le fais, sans résultat.
27/04/2006, 11h41
Matthieu Brucher
OK, on va y aller avec du code directement. N'oublie pas que ce qu'il y a sur Wikipedia, c'est pour un singleton dans le cas général, il n'est pas précisé qi ça marchait dans le cas que tu as.
Dans Unit2.cpp :
Code:

1 2 3 4 5 6 7 8 9 10 11 class MonSingleton { private: MonSingleton(); //...définir ici le reste de l'interface public: static T& Instance(); // C'est ce que je fais int Data; };
Dans Unit2.cpp
Code:

1 2 3 4 5 6 MonSingleton::Instance() { static MonSingleton aMoi; return aMoi; }
C'est pas la même chose que ce que tu avais. Essaie une fois.

Je ne peux jamais dire si ça va marcher, ce que je propose, je n'ai pas le temps d'essayer les solutions pour toi, mais je donne ce que je ferai en premier lieu pour arranger ce problème si je le rencontrai. C'est parfois judicieux, pafois pas.
27/04/2006, 12h10
10_GOTO_10

Après correction des erreurs de syntaxe mineures:

Code:

static T& Instance();

remplacé par

Code:

static MonSingleton& Instance();

et

Code:

MonSingleton::Instance()

remplacé par

Code:

MonSingleton& MonSingleton::Instance()

J'obtiens:

Citation:

[Lieur Erreur] Unresolved external 'MonSingleton::Instance()' referenced from D:\TEST_32\TESTSINGLETON\UNIT3.OBJ

En compilant Projet. Evidemment, puisque cette méthode est définie dans Unit2.cpp qui n'est pas dans Projet.
27/04/2006, 13h51
Matthieu Brucher

Tu fais pas l'édition des liens avec le fichier .lib ???
27/04/2006, 14h37
10_GOTO_10

Si, mais le .lib ne contient pas la méthode Instance. Il ne contient que ceci:

Citation:

@@Unit2@Finalize
@@Unit2@Initialize
GetData
SetData
__CPPdebugHook
27/04/2006, 16h02
Matthieu Brucher

Ah oui, c'est ma faute, j'ai oublié le _export devant la méthode Instance() :aie::aie::aie:

:yaisse: C'est fantastique, ça marche.

Ah oui, pour le prochain qui va se prendre la tête avec ça, voilà le code définitif:

Unit2.cpp:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
#pragma hdrstop
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
 
extern "C" int _export GetData() {
  return MonSingleton::Instance().Data;
}
 
extern "C" void _export SetData(int Data) {
  MonSingleton::Instance().Data = Data;
}
 
MonSingleton::MonSingleton()
{
}
 
MonSingleton& _export MonSingleton::Instance()
{
    static MonSingleton aMoi;
    return aMoi;
}

Unit2.h:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
#ifndef Unit2H
#define Unit2H
 
class MonSingleton
{
private:
    MonSingleton();
    //...définir ici le reste de l'interface
public:
    static MonSingleton& _export Instance();
    // C'est ce que je fais
    int Data;
};
 
extern "C" int _export GetData();
extern "C" void _export SetData(int Data);
 
//---------------------------------------------------------------------------
#endif

Unit3.cpp:

Code:

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
30
31
32
33
34
35
36
37
38
39
#include <vcl.h>
#pragma hdrstop
#include "Unit3.h"
#include "Unit2.h"
//---------------------------------------------------------------------------
 
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
 
__fastcall TForm1::TForm1(TComponent* Owner)
  : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::GetDataDllClick(TObject *Sender)
{
  Edit1->Text = GetData();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::SetDataDllClick(TObject *Sender)
{
  SetData(Edit1->Text.ToInt());
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::GetDataSingletonClick(TObject *Sender)
{
  Edit1->Text = MonSingleton::Instance().Data;
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::SetDataSingletonClick(TObject *Sender)
{
  MonSingleton::Instance().Data = Edit1->Text.ToInt();
}

Unit3.h:

Code:

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
#ifndef Unit3H
#define Unit3H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // Composants gérés par l'EDI
  TEdit *Edit1;
  TButton *GetDataDll;
  TButton *SetDataDll;
  TButton *GetDataSingleton;
  TButton *SetDataSingleton;
  void __fastcall GetDataDllClick(TObject *Sender);
  void __fastcall SetDataDllClick(TObject *Sender);
  void __fastcall GetDataSingletonClick(TObject *Sender);
  void __fastcall SetDataSingletonClick(TObject *Sender);
private: // Déclarations de l'utilisateur
public:  // Déclarations de l'utilisateur
  __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

Merci, pardon si j'ai à un moment douté, et :resolu:

27/04/2006, 18h53
Matthieu Brucher

Pas de pb, on est là pour chercher :)

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
//xx.h
class Singleton {
 
public:
    Singleton& getInstance();
    // public interface
private: //ou protected
    Singleton();
    static Singleton* _instance;
    //autre données
};
 
 
xx.cpp
Singleton* Singleton::_instance = 0;
 
Singleton& Singleton::getInstance(){
   if(_instance==0)  // lazy initialization
      _instance = new Singleton;
   return _instance;
}

Note : jamais le constructeur ne doit être public !

Citation:

Code:

1
2
3
4
5
MonSingleton& _export MonSingleton::Instance()
{
    static MonSingleton aMoi;
    return aMoi;
}

Ceci n'est pas du C++, mais du C. static doit être réservé aux données statiques.

28/04/2006, 11h14
Matthieu Brucher

Dit ça à Meyers, Alexandrescu et les autres.
static, c'est du C++ aussi. On a le droit de le mettre ici.