]> Creatis software - gdcm.git/blobdiff - src/gdcmSQItem.cxx
* Remove memory leaks on the DicomDir
[gdcm.git] / src / gdcmSQItem.cxx
index ce080c6072c2dc2538d6669691b2ee9cd50ee196..62e506771508224ce7ddb841603af16380b2a3f4 100644 (file)
-// gdcmSQItem.cxx
-//-----------------------------------------------------------------------------
-//
+/*=========================================================================
+  
+  Program:   gdcm
+  Module:    $RCSfile: gdcmSQItem.cxx,v $
+  Language:  C++
+  Date:      $Date: 2004/12/03 17:13:18 $
+  Version:   $Revision: 1.39 $
+  
+  Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
+  l'Image). All rights reserved. See Doc/License.txt or
+  http://www.creatis.insa-lyon.fr/Public/Gdcm/License.html for details.
+  
+     This software is distributed WITHOUT ANY WARRANTY; without even
+     the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+     PURPOSE.  See the above copyright notices for more information.
+  
+=========================================================================*/
+
 #include "gdcmSQItem.h"
+#include "gdcmSeqEntry.h"
+#include "gdcmValEntry.h"
+#include "gdcmBinEntry.h"
 #include "gdcmGlobal.h"
 #include "gdcmUtil.h"
-#include "gdcmValEntry.h"
-
+#include "gdcmDebug.h"
+#include <fstream>
 
+namespace gdcm 
+{
 //-----------------------------------------------------------------------------
 // Constructor / Destructor
 /**
- * \ingroup gdcmSQItem
- * \brief   Constructor from a given gdcmSQItem
+ * \ingroup SQItem
+ * \brief   Constructor from a given SQItem
  */
-gdcmSQItem::gdcmSQItem(int depthLevel ) 
-          : gdcmDocEntrySet(depthLevel) {
-   SQDepthLevel = depthLevel +1;
+SQItem::SQItem(int depthLevel ) 
+          : DocEntrySet( )
+{
+   SQDepthLevel = depthLevel;
 }
 
 /**
  * \brief   Canonical destructor.
  */
-gdcmSQItem::~gdcmSQItem() 
+SQItem::~SQItem() 
 {
-   for(ListDocEntry::iterator cc = docEntries.begin();
-       cc != docEntries.end();
-       ++cc)
+   for(ListDocEntry::iterator cc = DocEntries.begin();
+                             cc != DocEntries.end();
+                             ++cc)
    {
       delete *cc;
    }
+   DocEntries.clear();
 }
 
-
 //-----------------------------------------------------------------------------
 // Print
 /*
- * \ingroup gdcmSQItem
  * \brief   canonical Printer
  */
- void gdcmSQItem::Print(std::ostream & os) {
+ void SQItem::Print(std::ostream& os)
+ {
+   os << "S ";
    std::ostringstream s;
 
-   if (SQDepthLevel>0) {
-      for (int i=0;i<SQDepthLevel;i++)
+   if (SQDepthLevel > 0)
+   {
+      for (int i = 0; i < SQDepthLevel; ++i)
+      {
          s << "   | " ;
+      }
    }
-   for (ListDocEntry::iterator i = docEntries.begin();  
-        i != docEntries.end();
-        ++i)
+   //std::cout << s.str() << " --- SQItem number " << SQItemNumber  << std::endl;
+   for (ListDocEntry::iterator i  = DocEntries.begin();
+                               i != DocEntries.end();
+                             ++i)
    {
-       os << s.str();
-      //(*i)->SetPrintLevel(printLevel); //self->GetPrintLevel() ?
-      (*i)->SetPrintLevel(2);
-      (*i)->Print(os);   
+      DocEntry* Entry = *i;
+      bool PrintEndLine = true;
+
+      os << s.str();
+      Entry->SetPrintLevel(2);
+      Entry->Print(os); 
+      if ( SeqEntry* seqEntry = dynamic_cast<SeqEntry*>(Entry) )
+      {
+         (void)seqEntry;  //not used
+         PrintEndLine = false;
+      }
+      if (PrintEndLine)
+      {
+         os << std::endl;
+      }
    } 
 }
 
+/*
+ * \ingroup SQItem
+ * \brief   canonical Writer
+ */
+void SQItem::WriteContent(std::ofstream* fp, FileType filetype)
+{
+   int j;
+   uint16_t item[4] = { 0xfffe, 0xe000, 0xffff, 0xffff };
+   uint16_t itemt[4]= { 0xfffe, 0xe00d, 0xffff, 0xffff };
+
+    //we force the writting of an 'Item' Start Element
+    // because we want to write the Item as a 'no Length' item
+   for(j=0;j<4;++j)
+   {
+      binary_write( *fp, item[j]);  // fffe e000 ffff ffff 
+   }
+     
+   for (ListDocEntry::iterator it = DocEntries.begin();  
+                              it != DocEntries.end();
+                             ++it)
+   {   
+      // we skip delimitors (start and end one) because 
+      // we force them as 'no length'
+      if ( (*it)->GetGroup() == 0xfffe )
+      {
+         continue;
+      }
+
+      // Fix in order to make some MR PHILIPS images e-film readable
+      // see gdcmData/gdcm-MR-PHILIPS-16-Multi-Seq.dcm:
+      // we just *always* ignore spurious fffe|0000 tag ! 
+      if ( (*it)->GetGroup() == 0xfffe && (*it)->GetElement() == 0x0000 )
+      {
+         break; // FIXME : continue; ?!?
+      }
+
+      (*it)->WriteContent(fp, filetype);
+   }
+      
+    //we force the writting of an 'Item Delimitation' item
+    // because we wrote the Item as a 'no Length' item
+   for(j=0;j<4;++j)
+   {
+      binary_write( *fp, itemt[j]);  // fffe e000 ffff ffff 
+   }
+}
+
 //-----------------------------------------------------------------------------
 // Public
-
-bool gdcmSQItem::AddEntry(gdcmDocEntry *entry) {
-   docEntries.push_back(entry);
+/**
+ * \brief   adds any Entry (Dicom Element) to the Sequence Item
+ */
+bool SQItem::AddEntry(DocEntry* entry)
+{
+   DocEntries.push_back(entry);
    //TODO : check if it worked
    return true;
 }   
 
-
 /**
  * \brief   Sets Entry (Dicom Element) value of an element,
  *          specified by it's tag (Group, Number) 
@@ -74,130 +161,197 @@ bool gdcmSQItem::AddEntry(gdcmDocEntry *entry) {
  * \warning we suppose, right now, the element belongs to a Public Group
  *          (NOT a shadow one)       
  * @param   val string value to set
- * @param   group Group of the searched tag.
- * @param   element Element of the searched tag.
+ * @param   group Group number of the searched tag.
+ * @param   element Element number of the searched tag.
  * @return  true if element was found or created successfully
  */
- bool gdcmSQItem::SetEntryByNumber(std::string val,guint16 group, 
-                                                  guint16 element) {
 
-   for(ListDocEntry::iterator i=docEntries.begin();i!=docEntries.end();++i) { 
+bool SQItem::SetEntryByNumber(std::string const & val, uint16_t group, 
+                              uint16_t element)
+{
+   for(ListDocEntry::iterator i = DocEntries.begin(); 
+                              i != DocEntries.end(); 
+                            ++i)
+   { 
       if ( (*i)->GetGroup() == 0xfffe && (*i)->GetElement() == 0xe000 ) 
+      {
          continue;
-      if ( group   < (*i)->GetGroup() || 
-           (group == (*i)->GetGroup() && element < (*i)->GetElement()) ){
-        // instead of ReplaceOrCreateByNumber 
-        // that is a method of gdcmDocument :-( 
-         gdcmDocEntry *Entry;
-         TagKey key = gdcmDictEntry::TranslateToKey(group, element);
-         if ( ! ptagHT->count(key)) {
-          // we assume a Public Dictionnary *is* loaded
-           gdcmDict *PubDict         = gdcmGlobal::GetDicts()->GetDefaultPubDict();
-           // if the invoked (group,elem) doesn't exist inside the Dictionary
-          // we create a VirtualDictEntry
-           gdcmDictEntry *DictEntry  = PubDict->GetDictEntryByNumber(group, element);
-          if (DictEntry == NULL) {
-             DictEntry=gdcmGlobal::GetDicts()->NewVirtualDictEntry(group,element,"UN","??","??");
-          } 
-           // we assume the constructor didn't fail
-           Entry = new gdcmDocEntry(DictEntry);
-          /// \todo
-          /// ----
-          /// better we don't assume too much !
-          /// gdcmSQItem is now used to describe any DICOMDIR related object
-          ///
-         } else {
-            Entry = ptagHT->find(key)->second;
+      }
+
+      if (  ( group   < (*i)->GetGroup() )
+          ||( group == (*i)->GetGroup() && element < (*i)->GetElement()) )
+      {
+         // instead of ReplaceOrCreateByNumber 
+         // that is a method of Document :-( 
+         ValEntry* entry = 0;
+         TagKey key = DictEntry::TranslateToKey(group, element);
+
+         if ( ! PtagHT->count(key))
+         {
+            // we assume a Public Dictionnary *is* loaded
+            Dict *pubDict = Global::GetDicts()->GetDefaultPubDict();
+            // if the invoked (group,elem) doesn't exist inside the Dictionary
+            // we create a VirtualDictEntry
+            DictEntry *dictEntry = pubDict->GetDictEntryByNumber(group, element);
+            if (dictEntry == NULL)
+            {
+               dictEntry = 
+                  Global::GetDicts()->NewVirtualDictEntry(group, element,
+                                                          "UN", "??", "??");
+            } 
+            // we assume the constructor didn't fail
+            entry = new ValEntry(dictEntry);
+            /// \todo
+            /// ----
+            /// better we don't assume too much !
+            /// SQItem is now used to describe any DICOMDIR related object
+         }
+         else
+         {
+            DocEntry* foundEntry = PtagHT->find(key)->second;
+            entry = dynamic_cast<ValEntry*>(foundEntry);
+            if (!entry)
+            {
+               dbg.Verbose(0, "SQItem::SetEntryByNumber: docEntries"
+                              " contains non ValEntry occurences");
+            }
+         }
+         if (entry)
+         {
+            entry->SetValue(val); 
+         }
+         entry->SetLength(val.length());
+         DocEntries.insert(i,entry);
+
+         return true;
+      }   
+      if (group == (*i)->GetGroup() && element == (*i)->GetElement() )
+      {
+         if ( ValEntry* entry = dynamic_cast<ValEntry*>(*i) )
+         {
+            entry->SetValue(val);
          }
-         ((gdcmValEntry*)Entry)->SetValue(val); 
-         Entry->SetLength(val.length());
-         docEntries.insert(i,Entry); 
-        return true;
-      }           
-      if (group == (*i)->GetGroup() && element == (*i)->GetElement() ) {
-         ((gdcmValEntry*)(*i))->SetValue(val);         
          (*i)->SetLength(val.length()); 
          return true;    
-      }   
-   }                                               
-}                                
-//-----------------------------------------------------------------------------
-// Protected
-
-//-----------------------------------------------------------------------------
-// Private
-
-// end-user intended : the guy *wants* to create his own SeQuence ?!?
-gdcmDocEntry *gdcmSQItem::NewDocEntryByNumber(guint16 group,
-                                              guint16 element) {
-// TODO                                  
-   gdcmDocEntry *a;
-   std::cout << " gdcmSQItem::NewDocEntryByNumber : TODO" <<std::endl; 
-   return a;                             
+      }
+   }
+   return false;
 }
 
-gdcmDocEntry *gdcmSQItem::NewDocEntryByName  (std::string Name) {
-// TODO                                  
-   gdcmDocEntry *a;
-   std::cout << " gdcmSQItem::NewDocEntryByName : TODO" <<std::endl; 
-   return a;                                     
+/**
+ * \brief   Clear the hash table from given entry AND delete the entry.
+ * @param   entryToRemove Entry to remove AND delete.
+ * \warning Some problems when using under Windows... prefer the use of
+ *          Initialize / GetNext methods
+ */
+bool SQItem::RemoveEntry( DocEntry* entryToRemove)
+{
+   for(ListDocEntry::iterator it = DocEntries.begin();
+       it != DocEntries.end();
+       ++it)
+   {
+      if( *it == entryToRemove)
+      {
+         DocEntries.erase(it);
+         dbg.Verbose(0, "SQItem::RemoveEntry: one element erased.");
+         delete entryToRemove;
+         return true;
+      }
+   }
+                                                                                
+   dbg.Verbose(0, "SQItem::RemoveEntry: value not present ");
+   return false ;
 }
-
-/*
- * \ingroup gdcmSQItem
- * \brief   Gets a Dicom Element inside a SQ Item Entry, by name
- * @return
+                                                                                
+/**
+ * \brief   Clear the hash table from given entry BUT keep the entry.
+ * @param   entryToRemove Entry to remove.
  */
- gdcmDocEntry *gdcmSQItem::GetDocEntryByName(std::string name) {
-   gdcmDict *PubDict=gdcmGlobal::GetDicts()->GetDefaultPubDict();
-   gdcmDictEntry *dictEntry = (*PubDict).GetDictEntryByName(name);
-   if( dictEntry == NULL)
-      return NULL;
-   return GetDocEntryByNumber(dictEntry->GetGroup(),dictEntry->GetElement());      
+bool SQItem::RemoveEntryNoDestroy(DocEntry* entryToRemove)
+{
+   for(ListDocEntry::iterator it = DocEntries.begin();
+       it != DocEntries.end();
+       ++it)
+   {
+      if( *it == entryToRemove)
+      {
+         DocEntries.erase(it);
+         dbg.Verbose(0, "SQItem::RemoveEntry: one element erased.");
+         return true;
+      }
+   }
+                                                                                
+   dbg.Verbose(0, "SQItem::RemoveEntry: value not present ");
+   return false ;
+}
+                                                                                
+/**
+ * \brief   Initialise the visit of the chained list
+ */
+void SQItem::Initialize()
+{
+   ItDocEntries = DocEntries.begin();
+}
+                                                                                
+/**
+ * \brief   Get the next entry whil visiting the chained list
+ * \return  The next DocEntry if found, otherwhise NULL
+ */
+DocEntry *SQItem::GetNextEntry()
+{
+   if (ItDocEntries != DocEntries.end())
+   {
+      DocEntry *tmp = *ItDocEntries;
+      ++ItDocEntries;
+                                                                                
+      return(tmp);
+   }
+   else
+   {
+      return(NULL);
+   }
 }
 
-/*
- * \ingroup gdcmSQItem
+//-----------------------------------------------------------------------------
+// Protected
+/**
  * \brief   Gets a Dicom Element inside a SQ Item Entry, by number
  * @return
  */
-gdcmDocEntry *gdcmSQItem::GetDocEntryByNumber(guint16 group, guint16 element) {                                     
-   for(ListDocEntry::iterator i=docEntries.begin();i!=docEntries.end();++i) {
-      if ( (*i)->GetGroup()==group && (*i)->GetElement()==element)
-         return (*i);
-   }   
-   return NULL;                                          
+DocEntry* SQItem::GetDocEntryByNumber(uint16_t group, uint16_t element)
+{
+   for(ListDocEntry::iterator i = DocEntries.begin();
+                              i != DocEntries.end(); ++i)
+   {
+      if ( (*i)->GetGroup() == group && (*i)->GetElement() == element )
+      {
+         return *i;
+      }
+   }
+   return 0;
 }
 
-/*
- * \ingroup gdcmSQItem
+/**
  * \brief   Get the value of a Dicom Element inside a SQ Item Entry, by number
  * @return
  */ 
 
-std::string gdcmSQItem::GetEntryByNumber(guint16 group, guint16 element) { 
-   for(ListDocEntry::iterator i=docEntries.begin();i!=docEntries.end();++i) {
-      if ( (*i)->GetGroup()==group && (*i)->GetElement()==element) {
-         return ((gdcmValEntry *)(*i))->GetValue();
+std::string SQItem::GetEntryByNumber(uint16_t group, uint16_t element)
+{
+   for(ListDocEntry::iterator i = DocEntries.begin();
+                              i != DocEntries.end(); ++i)
+   {
+      if ( (*i)->GetGroup() == group && (*i)->GetElement() == element)
+      {
+         return ((ValEntry *)(*i))->GetValue();   //FIXME
       }
-   }   
+   }
    return GDCM_UNFOUND;
 }
+//-----------------------------------------------------------------------------
+// Private
 
-/**
- * \ingroup gdcmSQItem
- * \brief   Get the value of a Dicom Element inside a SQ Item Entry, by name
- * @param   name : name of the searched element.
- * @return
- */ 
-
-std::string gdcmSQItem::GetEntryByName(TagName name)  {
-   gdcmDict *PubDict=gdcmGlobal::GetDicts()->GetDefaultPubDict();
-   gdcmDictEntry *dictEntry = (*PubDict).GetDictEntryByName(name); 
-
-   if( dictEntry == NULL)
-      return GDCM_UNFOUND;
-   return GetEntryByNumber(dictEntry->GetGroup(),dictEntry->GetElement()); 
-}
 
 //-----------------------------------------------------------------------------
+
+} // end namespace gdcm