X-Git-Url: https://git.creatis.insa-lyon.fr/pubgit/?a=blobdiff_plain;f=kernel%2Fsrc%2FbbtkFactory.cxx;h=bc21a292287b96f3cdc776d07d76c3e4dcb812c4;hb=80db068a0e88b475ca866c0e5a9ae82a7bda7f90;hp=82bf038f842dfe7ae2c1ed2eec16dd1cc9d94982;hpb=c2a4b1893412e50a3d9abff221938a2d16c4a7cb;p=bbtk.git

diff --git a/kernel/src/bbtkFactory.cxx b/kernel/src/bbtkFactory.cxx
index 82bf038..bc21a29 100644
--- a/kernel/src/bbtkFactory.cxx
+++ b/kernel/src/bbtkFactory.cxx
@@ -4,8 +4,8 @@ Program:   bbtk
 Module:    $RCSfile: bbtkFactory.cxx,v $
 Language:  C++
 
-Date:      $Date: 2008/04/09 11:16:57 $
-Version:   $Revision: 1.32 $
+Date:      $Date: 2008/07/01 07:58:28 $
+Version:   $Revision: 1.37 $
                                                                                 
 
 Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
@@ -40,14 +40,20 @@ PURPOSE.  See the above copyright notices for more information.
 
 namespace bbtk
 {
-  typedef Package* (*PackageAccessor)();
-  typedef void (*PackageDeleteFunction)();
 
+  //===================================================================
+  /// Default ctor
+  Factory::Pointer Factory::New()
+  {
+    bbtkDebugMessage("Kernel",9,"Factory::New()"<<std::endl);
+    return MakePointer(new Factory());
+  }
+  //===================================================================
 
   //===================================================================
   /// Default ctor
   Factory::Factory()
-    : mExecuter(0)
+    : mExecuter()
   {
     bbtkDebugMessage("Kernel",7,"Factory::Factory()"<<std::endl);
   }
@@ -64,18 +70,6 @@ namespace bbtk
   //===================================================================
 
 
-  //===================================================================
-  void Factory::CloseAllPackages()
-  {
-    bbtkDebugMessageInc("Kernel",7,"Factory::CloseAllPackages()"<<std::endl);
-    while (mPackageMap.begin() != mPackageMap.end())
-      {
-        PackageMapType::iterator i = mPackageMap.begin();
-        ClosePackage(i);
-      }
-    bbtkDebugDecTab("Kernel",7);
-  }
-  //===================================================================
 
   //===================================================================
   void Factory::Reset()
@@ -93,144 +87,26 @@ namespace bbtk
                               std::string path)
   {
     
-#if defined(__GNUC__)
-    
-    void *handler;
-    handler = dlopen(libname.c_str(),
-		     BBTK_RTLD_TIME | BBTK_RTLD_SCOPE );
-    if (!handler)
-      {
-        // The following is *NOT* a debug time message :
-        // It's a user intended message.
-        // Please don't remove it.
-	bbtkError("Could not open shared library [" <<libname<<"] : "
-		  <<dlerror() << std::endl);
-	
-	return false; // try next path
-      }
-    
-    // The following is *NOT* a debug time message :
-    // It's a user intended message.
-    // Please don't remove it.
-    bbtkMessage("Output",2,"   -->[" <<libname<<"] found" << std::endl);
-    
-    // Loads the Package accessor
-    
-    std::string getpackname(pkgname);
-    getpackname += "GetPackage";
-    void *getpack = dlsym(handler, getpackname.c_str());
-    if (!getpack)
-      {
-	dlclose(handler);
-	bbtkError("Shared library ["<<libname<<"] is not a valid bbtk package."
-		  <<" Symbol ["<<getpackname<<"] :"<<dlerror());
-      }
-    
-    // Verifies that the Package delete function is present
-    std::string delfname(pkgname);
-    delfname += "DeletePackage";
-    void *delf = dlsym(handler, delfname.c_str());
-    if (!delf)
-      {
-	dlclose(handler);
-	bbtkError("Shared library ["<<libname<<"] is not a valid bbtk package."
-		  <<" Symbol ["<<delfname<<"] :"<<dlerror());
-      }
-    
-#elif defined(_WIN32)
-    
-    HINSTANCE handler;
-    
-    SetErrorMode(0);
-    handler = LoadLibrary(libname.c_str());
-    if (!handler)
-      {
-	// The following is *NOT* a debug time message :
-	// It's a user intended message.
-	// Please don't remove it.
-	bbtkError("Error loading library [" <<libname<<"]" << std::endl);
-	return false;// Problem with the found library
-      }
-    
-    bbtkMessage("Output",2,"   --->[" <<libname<<"] found" << std::endl);
-    
-    // Loads the Package accessor
-    
-    std::string getpackname(pkgname);
-    getpackname += "GetPackage";
-    void *getpack = GetProcAddress(handler, getpackname.c_str());
-    if (!getpack)
-      {
-	FreeLibrary(handler);
-	bbtkError("[1] Could not load package \""<<pkgname
-		  <<"\" : "<<getpackname<<" symbol not found (is it a bbtk package lib ?)");
-	// look how to get the error message on win
-	//<<dlerror());
-      }
-    // Verifies that the Package delete function is present
-    std::string delfname(pkgname);
-    delfname += "DeletePackage";
-    void *delf = GetProcAddress(handler, delfname.c_str());
-    if (!delf)
-      {
-	FreeLibrary(handler);
-	bbtkError("[2] Could not load package \""<<pkgname
-		  <<"\" : "<<delfname<<" symbol not found (is it a bbtk package lib ?)");
-	// look how to get the error message on win
-	//<<dlerror());
-      }
-#else
-    bbtkError("neither __GNUC__ nor _WIN32 ?!? How did you compile ?");
-#endif
-    
-    // Stores the package
-    PackageInfoType pack;
-    pack.mDynamicLibraryHandler = handler;
-    // Invokes the accessor to the PackageUnit pointer
-    pack.mPackage = ((PackageAccessor)getpack)();
-    
-    // Test bbtk build version ok
-    if ( pack.mPackage->GetBBTKVersion() != bbtk::GetVersion() )
+    Package::Pointer p = Package::CreateFromDynamicLibrary(libname,
+							   pkgname,
+							   path);
+    if (p!=0)
       {
-	std::string v(pack.mPackage->GetBBTKVersion());
-	UnLoadPackage(pkgname);
-	bbtkError("Cannot load package ["<<libname<<"]. "
-		  <<"Package build with bbtk version "
-		  << v
-		  << " whereas application build with version "
-		  << bbtk::GetVersion());
+	//===================================================================
+	bbtkMessage("Output",2,p->GetName()<<" "
+		    <<p->GetVersion()
+		    <<" "
+		    <<p->GetAuthor() << " Category(s) :"
+		    <<p->GetCategory()
+		    <<std::endl);
+	bbtkMessage("Output",2,p->GetDescription()<<std::endl);
+	//===================================================================
+	p->AddFactory(GetThisPointer<Factory>());
+	mPackageMap[pkgname] = p;
+	return true;
       }
-
-    pack.mPackage->AddFactory(this);
-    mPackageMap[pkgname] = pack;
+    return false;
     
-    std::string separator =
-      ConfigurationFile::GetInstance().Get_file_separator ();
-    //BBTK_STRINGIFY_SYMBOL(BBTK_DOC_REL_PATH)
-    std::string docreldoc = 
-      separator + "bbdoc" + separator + pkgname + separator + "index.html";
-    std::string reldoc = 
-      ".." + separator + ".." + docreldoc;
-    std::string doc = path + separator + ".." + separator
-      + BBTK_STRINGIFY_SYMBOL(BBTK_DOC_REL_PATH)
-      + docreldoc;
-    
-    pack.mPackage->SetDocURL(doc);
-    pack.mPackage->SetDocRelativeURL(reldoc);
-    
-    //===================================================================
-    bbtkMessage("Output",2,pack.mPackage->GetName()<<" "
-		<<pack.mPackage->GetVersion()
-		<<" (bbtk "
-		<<pack.mPackage->GetBBTKVersion()<<") "
-		<<pack.mPackage->GetAuthor() << " Category(s) :"
-		<<pack.mPackage->GetCategory()
-		<<std::endl);
-    bbtkMessage("Output",2,pack.mPackage->GetDescription()<<std::endl);
-    //===================================================================
-    
-    bbtkDebugDecTab("Kernel",7);
-    return true;
   }
   
   //===================================================================
@@ -261,7 +137,7 @@ namespace bbtk
   // lastname : string before the last / (if any), or user supplied name
 
     bbtkDebugMessageInc("Kernel",7,"Factory::LoadPackage(\""<<name<<"\")"<<std::endl);
-    bbtkMessage("Debug",1,"Factory::LoadPackage(\""<<name<<"\")"<<std::endl);
+    bbtkMessage("debug",1,"Factory::LoadPackage(\""<<name<<"\")"<<std::endl);
 
     std::vector<std::string> package_paths;
     std::string libname;  // full path library name
@@ -270,8 +146,8 @@ namespace bbtk
     std::string upath;
     pkgname = Utilities::ExtractPackageName(name,upath);
 
-    bbtkMessage("Debug",1,"Package name ["<<pkgname<<"]"<<std::endl);
-    bbtkMessage("Debug",1,"Package path ["<<upath<<"]"<<std::endl);
+    bbtkMessage("debug",1,"Package name ["<<pkgname<<"]"<<std::endl);
+    bbtkMessage("debug",1,"Package path ["<<upath<<"]"<<std::endl);
 
     // no loading package if already loaded
     PackageMapType::iterator iUnload;
@@ -355,7 +231,7 @@ namespace bbtk
 
         libname = Utilities::MakeLibnameFromPath(path, pkgname);
 
-        bbtkMessage("Debug",2,"-> Trying to load [" << libname << "]" <<std::endl);
+        bbtkMessage("debug",2,"-> Trying to load [" << libname << "]" <<std::endl);
 
       // Check if library exists           
         if ( !Utilities::FileExists(libname) )
@@ -374,7 +250,7 @@ namespace bbtk
         ok = DoLoadPackage( libname, pkgname, path);
         if (ok)
         {
-           bbtkMessage("Debug",2,"   OK"<<std::endl);
+           bbtkMessage("debug",2,"   OK"<<std::endl);
            break; // a package was found; we stop iterating
         }
     } //------------------ // end for ( package_paths.begin();i!=package_paths.end() )
@@ -430,6 +306,19 @@ namespace bbtk
   //===================================================================
 
 
+  //===================================================================
+  void Factory::CloseAllPackages()
+  {
+    bbtkDebugMessageInc("Kernel",7,"Factory::CloseAllPackages()"<<std::endl);
+    while (mPackageMap.begin() != mPackageMap.end())
+      {
+        PackageMapType::iterator i = mPackageMap.begin();
+        ClosePackage(i);
+      }
+    bbtkDebugDecTab("Kernel",7);
+  }
+  //===================================================================
+
   //===================================================================
   /// \brief Close the package referenced by the iterator 
  ///
@@ -445,67 +334,18 @@ namespace bbtk
  void Factory::ClosePackage(PackageMapType::iterator& i) 
   {   
      bbtkDebugMessageInc("Kernel",7,"Factory::ClosePackage(\""
-                         <<i->second.mPackage->GetName()
+                         <<i->second->GetName()
                         <<"\")"<<std::endl);
 
      
      // Removes this from the set of factories which use the package
-     i->second.mPackage->RemoveFactory(this);
-     
-     // If no more factory which use it 
-     if (i->second.mPackage->GetFactorySet().empty())
-       {
-	 // If it is a dynamically loaded package	
-	 if (i->second.mDynamicLibraryHandler) 
-	   {
-	     
-	     
-	     // Loads the Package delete function
-	     
-	     std::string delfname(i->second.mPackage->GetName());
-	     delfname += "DeletePackage";
-#if defined(__GNUC__)     
-	     void *delf = dlsym(i->second.mDynamicLibraryHandler, delfname.c_str());
-	     if (!delf)
-	       {
-		 bbtkError("could not close package \""
-			   <<i->second.mPackage->GetName()
-			   <<"\" :"<<dlerror());
-	       }    
-#elif defined(_WIN32)
-	     void *delf = GetProcAddress(i->second.mDynamicLibraryHandler, 
-					 delfname.c_str());
-	     if (!delf)
-	       {  
-		 bbtkError("could not close package \""
-			   <<i->second.mPackage->GetName()
-			   <<"\" : "<<delfname
-			   <<" symbol not found (how did you open it ???");
-		 //<<"\" :"<<dlerror());
-	       }    
-#endif     
-	     
-	     // deletes the package
-	     ((PackageDeleteFunction)delf)();
-	     
-	     // closes the dl handler
-#if defined(__GNUC__)  
-	     dlclose(i->second.mDynamicLibraryHandler);  
-#elif defined(_WIN32)
-	     
-	     FreeLibrary(i->second.mDynamicLibraryHandler);
-#endif
-	   }
-
-	 else 
-	   {  
-	     // If it is a manually inserted package : delete it normally
-	     delete i->second.mPackage;
-	   }
-       }
-     
-     // in any cases remove the entry in the map
+     i->second->RemoveFactory(GetThisPointer<Factory>());
+     Package::WeakPointer p = i->second;
+     // remove the entry in the map
      mPackageMap.erase(i);
+     // Release the package if not already destroyed
+     if (p.lock()) Package::Release(p);
+
 
      bbtkDebugDecTab("Kernel",7);
   }
@@ -524,7 +364,7 @@ namespace bbtk
     {
       bbtkMessage("Help",1, i->first << std::endl);
       if (details) {
-         i->second.mPackage->PrintBlackBoxes(false,adaptors);
+         i->second->PrintBlackBoxes(false,adaptors);
       }
     }
 
@@ -544,22 +384,22 @@ namespace bbtk
       {
       bbtkMessage("Help",1, "Package "<<i->first<<" ");
       
-      if (i->second.mPackage->GetVersion().length()>0)
-        bbtkMessageCont("Help",1,"v" <<i->second.mPackage->GetVersion());
+      if (i->second->GetVersion().length()>0)
+        bbtkMessageCont("Help",1,"v" <<i->second->GetVersion());
         
-      if (i->second.mPackage->GetAuthor().length()>0)
-        bbtkMessageCont("Help",1,"- "<<i->second.mPackage->GetAuthor());
+      if (i->second->GetAuthor().length()>0)
+        bbtkMessageCont("Help",1,"- "<<i->second->GetAuthor());
         
-      if (i->second.mPackage->GetCategory().length()>0)
-        bbtkMessageCont("Help",1,"- "<<i->second.mPackage->GetCategory());        
+      if (i->second->GetCategory().length()>0)
+        bbtkMessageCont("Help",1,"- "<<i->second->GetCategory());        
         
       bbtkMessageCont("Help",1,std::endl);
       bbtkIncTab("Help",1);
-      bbtkMessage("Help",1,i->second.mPackage->GetDescription()<<std::endl);
-      if (i->second.mPackage->GetNumberOfBlackBoxes()>0) 
+      bbtkMessage("Help",1,i->second->GetDescription()<<std::endl);
+      if (i->second->GetNumberOfBlackBoxes()>0) 
         {
           bbtkMessage("Help",1, "Black boxes : "<<std::endl);
-          i->second.mPackage->PrintBlackBoxes(true,adaptors);
+          i->second->PrintBlackBoxes(true,adaptors);
         }
       else 
         {
@@ -591,10 +431,10 @@ namespace bbtk
     PackageMapType::const_iterator i;
     for (i = mPackageMap.begin(); i!=mPackageMap.end(); ++i )
       {
-      if (i->second.mPackage->ContainsBlackBox(name)) 
+      if (i->second->ContainsBlackBox(name)) 
         {
-          i->second.mPackage->HelpBlackBox(name,full);
-	      package = i->second.mPackage->GetName();
+          i->second->HelpBlackBox(name,full);
+	      package = i->second->GetName();
           found = true;
         }
       }
@@ -611,16 +451,13 @@ namespace bbtk
 
   //=================================================================== 
   /// Inserts a package in the factory
-  void Factory::InsertPackage( Package* p )
+  void Factory::InsertPackage( Package::Pointer p )
   {
     bbtkDebugMessageInc("Kernel",9,"Factory::InsertPackage(\""<<
                         p->GetName()<<"\")"<<std::endl);
 
-    p->AddFactory(this);
-    PackageInfoType pack;
-    pack.mDynamicLibraryHandler = 0;
-    pack.mPackage = p;
-    mPackageMap[p->GetName()] = pack;
+    p->AddFactory(GetThisPointer<Factory>());
+    mPackageMap[p->GetName()] = p;
 
     bbtkDebugDecTab("Kernel",9);
   }
@@ -628,7 +465,7 @@ namespace bbtk
   
   //=================================================================== 
   /// Removes a package from the factory (and deletes it)
-  void Factory::RemovePackage( Package* p )
+  void Factory::RemovePackage( Package::Pointer p )
   {
     bbtkDebugMessageInc("Kernel",9,"Factory::RemovePackage(\""<<
                         p->GetName()<<"\")"<<std::endl);
@@ -636,7 +473,7 @@ namespace bbtk
     PackageMapType::iterator i;
     for (i = mPackageMap.begin(); i!=mPackageMap.end(); ++i )
       {
-         if (i->second.mPackage == p) break;
+         if (i->second == p) break;
       };
     
     if (i!=mPackageMap.end())
@@ -656,17 +493,17 @@ namespace bbtk
 
   //===================================================================
   /// Creates an instance of a black box of type <type> with name <name>
-  BlackBox* Factory::NewBlackBox(const std::string& type, 
+  BlackBox::Pointer Factory::NewBlackBox(const std::string& type, 
                                  const std::string& name) const
   {
     bbtkDebugMessageInc("Kernel",7,"Factory::NewBlackBox(\""
                         <<type<<"\",\""<<name<<"\")"<<std::endl);
 
-    BlackBox* b = 0; 
+    BlackBox::Pointer b; 
     PackageMapType::const_iterator i;
     for (i = mPackageMap.begin(); i!=mPackageMap.end(); ++i )
       {
-      b = i->second.mPackage->NewBlackBox(type,name);
+      b = i->second->NewBlackBox(type,name);
       if (b) break; 
       }
     if (!b) 
@@ -681,7 +518,7 @@ namespace bbtk
 
   //===================================================================
   /// Creates an instance of a black box of type <type> with name <name>
-  BlackBox* Factory::NewAdaptor(const DataInfo& typein,
+  BlackBox::Pointer Factory::NewAdaptor(const DataInfo& typein,
 				const DataInfo& typeout,
 				const std::string& name) const
   {
@@ -691,11 +528,11 @@ namespace bbtk
                         <<name<<"\")"<<bbtkendl);
 
 
-    BlackBox* b = 0; 
+    BlackBox::Pointer b; 
     PackageMapType::const_iterator i;
     for (i = mPackageMap.begin(); i!=mPackageMap.end(); ++i )
       {
-      b = i->second.mPackage->NewAdaptor(typein,typeout,name);
+      b = i->second->NewAdaptor(typein,typeout,name);
       if (b) break; 
       }
     if (!b) 
@@ -712,7 +549,7 @@ namespace bbtk
 
   //===================================================================
   /// Creates an instance of a black box of type <type> with name <name>
-  BlackBox* Factory::NewWidgetAdaptor(const DataInfo& typein,
+  BlackBox::Pointer Factory::NewWidgetAdaptor(const DataInfo& typein,
 				      const DataInfo& typeout,
 				      const std::string& name) const
   {
@@ -722,11 +559,11 @@ namespace bbtk
                         <<name<<"\")"<<bbtkendl);
 
 
-    BlackBox* b = 0; 
+    BlackBox::Pointer b; 
     PackageMapType::const_iterator i;
     for (i = mPackageMap.begin(); i!=mPackageMap.end(); ++i )
       {
-	b = i->second.mPackage->NewWidgetAdaptor(typein,
+	b = i->second->NewWidgetAdaptor(typein,
 						 typeout,
 						 name);
       if (b) break; 
@@ -756,7 +593,7 @@ namespace bbtk
     PackageMapType::const_iterator i;
     for (i = mPackageMap.begin(); i!=mPackageMap.end(); ++i )
       {
-	b = i->second.mPackage->FindAdaptor(typein,
+	b = i->second->FindAdaptor(typein,
 					    typeout,
 					    adaptor);
 	if (b) break; 
@@ -788,7 +625,7 @@ namespace bbtk
     PackageMapType::const_iterator i;
     for (i = mPackageMap.begin(); i!=mPackageMap.end(); ++i )
       {
-	b = i->second.mPackage->FindWidgetAdaptor(typein,
+	b = i->second->FindWidgetAdaptor(typein,
 						  typeout,
 						  adaptor);
 	if (b) break; 
@@ -814,7 +651,7 @@ namespace bbtk
     PackageMapType::const_iterator i;
     for (i = mPackageMap.begin(); i!=mPackageMap.end(); ++i )
       {
-	b = i->second.mPackage->FindWidgetAdaptor(typein,
+	b = i->second->FindWidgetAdaptor(typein,
 						  typeout,
 						  widget);
 	if (b) break; 
@@ -828,17 +665,17 @@ namespace bbtk
 	for (i = mPackageMap.begin(); i!=mPackageMap.end(); ++i )
 	  {
 	    Package::AdaptorMapType::const_iterator j;
-	    for (j=i->second.mPackage->GetAdaptorMap().begin();
-		 j!=i->second.mPackage->GetAdaptorMap().end();
+	    for (j=i->second->GetAdaptorMap().begin();
+		 j!=i->second->GetAdaptorMap().end();
 		 ++j)
 	      {
 		if ( ( j->first.mKind ==  
-		       BlackBoxDescriptor::DEFAULT_WIDGET_ADAPTOR) &&
+		       BlackBoxDescriptor::DEFAULT_GUI) &&
 		     //(j->first.mTypeIn == typein) &&
 		     (j->first.mTypeOut.GetNature() == typeout.GetNature() ) 
 		     )
 		  {
-		    widget = j->second->GetTypeName();
+		    widget = j->second.lock()->GetTypeName();
 		    bbtkMessage("Kernel",5,
 				"===> Found first part : "<<widget
 				<< " "<<j->first.mTypeIn<<"->"
@@ -870,24 +707,25 @@ namespace bbtk
 
   //===================================================================
   /// Creates an instance of a connection
-  Connection* Factory::NewConnection(BlackBox* from,
-                                     const std::string& output,
-                                     BlackBox* to,
-                                     const std::string& input) const
+  Connection::Pointer Factory::NewConnection(BlackBox::Pointer from,
+					     const std::string& output,
+					     BlackBox::Pointer to,
+					     const std::string& input) const
   {
     bbtkDebugMessage("Kernel",7,"Factory::NewConnection(\""
                       <<from->bbGetName()<<"\",\""<<output<<"\",\""
                       <<to->bbGetName()<<"\",\""<<input
                       <<"\")"<<std::endl);
     
-    return new Connection(from,output,to,input,this);
+    return Connection::New(from,output,to,input,
+			   GetThisPointer<Factory>());
   }
   //===================================================================
 
 
 
   //===================================================================
-  const Package* Factory::GetPackage(const std::string& name) const
+  Package::Pointer Factory::GetPackage(const std::string& name) const
   {
     bbtkDebugMessageInc("Kernel",9,"Factory::GetPackage(\""<<name<<"\")"
                          <<std::endl);
@@ -896,7 +734,7 @@ namespace bbtk
     if ( i != mPackageMap.end() ) 
     {
       bbtkDebugDecTab("Kernel",9); 
-      return i->second.mPackage;
+      return i->second;
     }
     else 
     {
@@ -908,39 +746,18 @@ namespace bbtk
   }
   //===================================================================
   
-  //===================================================================
-  Package* Factory::GetPackage(const std::string& name) 
-  {
-    bbtkDebugMessageInc("Kernel",9,"Factory::GetPackage(\""<<name<<"\")"
-                         <<std::endl);
-
-    PackageMapType::const_iterator i = mPackageMap.find(name);
-    if ( i != mPackageMap.end() ) 
-    {
-      bbtkDebugDecTab("Kernel",9); 
-      return i->second.mPackage;
-    }
-    else 
-    {
-       bbtkDebugDecTab("Kernel",9);
-       bbtkError("package \""<<name<<"\" unknown");
-    }
-    
-    bbtkDebugDecTab("Kernel",9);  
-  }
-  //===================================================================
 
   //===================================================================
   void Factory::CheckPackages() const
   {
-    bbtkMessage("Debug",1,"****** Checking Factory "<<(void*)this
+    bbtkMessage("debug",1,"****** Checking Factory "<<(void*)this
 		 <<std::endl);
     PackageMapType::const_iterator i;
     for (i = mPackageMap.begin(); i!=mPackageMap.end(); ++i )
       {
-	i->second.mPackage->CheckBoxes();
+	i->second->CheckBoxes();
       }
-    bbtkMessage("Debug",1,"****** Checking Factory "<<(void*)this
+    bbtkMessage("debug",1,"****** Checking Factory "<<(void*)this
 		<<" ... OK"<<std::endl);
   }
   //===================================================================
@@ -979,7 +796,7 @@ namespace bbtk
    PackageMapType::const_iterator i;
    for (i = mPackageMap.begin(); i!=mPackageMap.end(); ++i )
    {
-      if (i->second.mPackage->ContainsBlackBox(name)) 
+      if (i->second->ContainsBlackBox(name)) 
       {
          std::string separator = ConfigurationFile::GetInstance().Get_file_separator ();
 
@@ -998,11 +815,11 @@ namespace bbtk
         ff=fopen(filename2.c_str(),"w");
 
         fprintf(ff,"<html><head><title>TMP</title> <script type=\"text/javascript\"> <!--\n");
-        fprintf(ff,"  window.location=\"%s#%s\";\n" , i->second.mPackage->GetDocURL().c_str(),name.c_str() );
+        fprintf(ff,"  window.location=\"%s#%s\";\n" , i->second->GetDocURL().c_str(),name.c_str() );
         fprintf(ff,"//--></script></head><body></body></html>\n");
 
 
-        //fprintf(ff, "<a  href=\"%s#%s\">Link</a>\n", i->second.mPackage->GetDocURL().c_str(),name.c_str() );
+        //fprintf(ff, "<a  href=\"%s#%s\">Link</a>\n", i->second->GetDocURL().c_str(),name.c_str() );
         fclose(ff);
         system( command.c_str() );      
         found = true;
@@ -1028,13 +845,14 @@ namespace bbtk
     
     std::string title;
 
-    typedef std::map<std::string, std::vector<BlackBoxDescriptor*> > IndexType;
+    typedef std::map<std::string, 
+      std::vector<BlackBoxDescriptor::Pointer> > IndexType;
     IndexType index;
     // Builds the index map
     PackageMapType::const_iterator i;
     for (i = mPackageMap.begin(); i!=mPackageMap.end(); ++i )
       {
-	Package* pack = i->second.mPackage;
+	Package::Pointer pack = i->second;
 	if (pack->GetName()=="user") continue;
 	Package::BlackBoxMapType::const_iterator j;
 	for (j = pack->GetBlackBoxMap().begin(); 
@@ -1090,7 +908,7 @@ namespace bbtk
 		  }
 		else 
 		  {
-		    std::vector<BlackBoxDescriptor*> v;
+		    std::vector<BlackBoxDescriptor::Pointer> v;
 		    v.push_back(j->second);
 		    index[*k] = v;
 		  }
@@ -1169,7 +987,7 @@ namespace bbtk
 
 	s << "<p><TABLE cellspacing=0  cellpadding=3>\n";
 
-	std::vector<BlackBoxDescriptor*>::iterator di;
+	std::vector<BlackBoxDescriptor::Pointer>::iterator di;
 	for (di=ii->second.begin();di!=ii->second.end();++di)
 	  {
 	    std::string pack = (*di)->GetPackage()->GetName();
@@ -1198,7 +1016,7 @@ namespace bbtk
     ptm = gmtime ( &rawtime );
 
     s << "<p><hr>\n";
-    s << "Automatically generated by <b>bbi</b> on "
+    s << "Automatically generated by <b>bbtk</b> on "
       << ptm->tm_mday << "/" << ptm->tm_mon << "/" << ptm->tm_year+1900 
       << " - " << ptm->tm_hour << ":" << ptm->tm_min << " GMT\n";
     s << "</body></html>\n"; 
@@ -1209,6 +1027,50 @@ namespace bbtk
     bbtkDebugDecTab("Kernel",9);
   }
 
+ //==========================================================================
+  std::string Factory::GetObjectName() const
+  {
+    return std::string("Factory");
+  }
+  //==========================================================================
+  
+  //==========================================================================
+  std::string  Factory::GetObjectInfo() const 
+  {
+    std::stringstream i;
+    return i.str();
+  }
+  //==========================================================================
+
+  //==========================================================================
+size_t  Factory::GetObjectSize() const 
+{
+  size_t s = Superclass::GetObjectSize();
+  s += Factory::GetObjectInternalSize();
+  return s;
+  }
+  //==========================================================================
+  //==========================================================================
+size_t  Factory::GetObjectInternalSize() const 
+{
+  size_t s = sizeof(Factory);
+  return s;
+  }
+  //==========================================================================
+  //==========================================================================
+  size_t  Factory::GetObjectRecursiveSize() const 
+  {
+    size_t s = Superclass::GetObjectRecursiveSize();
+    s += Factory::GetObjectInternalSize();
+
+    PackageMapType::const_iterator i;
+    for (i = mPackageMap.begin(); i!=mPackageMap.end(); ++i )
+    {
+      s += i->second->GetObjectRecursiveSize();
+    }
+    return s;
+  }
+  //==========================================================================
 
 }