]> Creatis software - gdcm.git/blobdiff - src/gdcmFile.cxx
ENH: Untangle the transfer syntax from the Document. The Document can only read a...
[gdcm.git] / src / gdcmFile.cxx
index a586dc7dc935aa1bd34481b27ff84984c052cde7..11ec7fe6e6071545ed107b4987909d2549d382e9 100644 (file)
-// gdcmFile.cxx
+  /*=========================================================================
+                                                                                
+  Program:   gdcm
+  Module:    $RCSfile: gdcmFile.cxx,v $
+  Language:  C++
+  Date:      $Date: 2005/01/11 16:44:43 $
+  Version:   $Revision: 1.190 $
+                                                                                
+  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 "gdcmFile.h"
+#include "gdcmGlobal.h"
+#include "gdcmTS.h"
+#include "gdcmDocument.h"
+#include "gdcmDebug.h"
+#include "gdcmUtil.h"
+#include "gdcmBinEntry.h"
+#include "gdcmHeader.h"
+#include "gdcmPixelReadConvert.h"
+#include "gdcmPixelWriteConvert.h"
+#include "gdcmDocEntryArchive.h"
+
+#include <fstream>
+
+namespace gdcm 
+{
+typedef std::pair<TagDocEntryHT::iterator,TagDocEntryHT::iterator> IterHT;
+
+//-------------------------------------------------------------------------
+// Constructor / Destructor
+/**
+ * \brief Constructor dedicated to deal with the *pixels* area of a ACR/DICOMV3
+ *        file (Header only deals with the ... header)
+ *        Opens (in read only and when possible) an existing file and checks
+ *        for DICOM compliance. Returns NULL on failure.
+ *        It will be up to the user to load the pixels into memory
+ *        (see GetImageData, GetImageDataRaw)
+ * \note  the in-memory representation of all available tags found in
+ *        the DICOM header is post-poned to first header information access.
+ *        This avoid a double parsing of public part of the header when
+ *        one sets an a posteriori shadow dictionary (efficiency can be
+ *        seen as a side effect).   
+ */
+File::File( )
+{
+   HeaderInternal = new Header( );
+   SelfHeader = true;
+   Initialise();
+}
 
-static void _Swap(void* im, int swap, int lgr, int nb);
+/**
+ * \brief Constructor dedicated to deal with the *pixels* area of a ACR/DICOMV3
+ *        file (Header only deals with the ... header)
+ *        Opens (in read only and when possible) an existing file and checks
+ *        for DICOM compliance. Returns NULL on failure.
+ *        It will be up to the user to load the pixels into memory
+ *        (see GetImageData, GetImageDataRaw)
+ * \note  the in-memory representation of all available tags found in
+ *        the DICOM header is post-poned to first header information access.
+ *        This avoid a double parsing of public part of the header when
+ *        user sets an a posteriori shadow dictionary (efficiency can be
+ *        seen as a side effect).   
+ * @param header already built Header
+ */
+File::File(Header *header)
+{
+   HeaderInternal = header;
+   SelfHeader = false;
+   Initialise();
+}
 
-/////////////////////////////////////////////////////////////////
 /**
- * \ingroup   gdcmFile
- * \brief Constructor dedicated to writing a new DICOMV3 part10 compliant
- *        file (see SetFileName, SetDcmTag and Write)
+ * \brief Constructor dedicated to deal with the *pixels* area of a ACR/DICOMV3
+ *        file (Header only deals with the ... header)
  *        Opens (in read only and when possible) an existing file and checks
  *        for DICOM compliance. Returns NULL on failure.
- * \Note  the in-memory representation of all available tags found in
+ *        It will be up to the user to load the pixels into memory
+ *        (see GetImageData, GetImageDataRaw)
+ * \note  the in-memory representation of all available tags found in
  *        the DICOM header is post-poned to first header information access.
  *        This avoid a double parsing of public part of the header when
  *        one sets an a posteriori shadow dictionary (efficiency can be
  *        seen as a side effect).   
- *
  * @param filename file to be opened for parsing
- *
- * @return     
  */
-gdcmFile::gdcmFile(string & filename) 
-       :gdcmHeader(filename.c_str())   
+File::File(std::string const & filename )
 {
+   HeaderInternal = new Header( filename );
+   SelfHeader = true;
+   Initialise();
 }
 
+/**
+ * \brief canonical destructor
+ * \note  If the Header was created by the File constructor,
+ *        it is destroyed by the File
+ */
+File::~File()
+{ 
+   if( PixelReadConverter )
+   {
+      delete PixelReadConverter;
+   }
+   if( PixelWriteConverter )
+   {
+      delete PixelWriteConverter;
+   }
+   if( Archive )
+   {
+      delete Archive;
+   }
+
+   if( SelfHeader )
+   {
+      delete HeaderInternal;
+   }
+   HeaderInternal = 0;
+}
+
+//-----------------------------------------------------------------------------
+// Print
+void File::Print(std::ostream &os)
+{
+   HeaderInternal->SetPrintLevel(PrintLevel);
+   HeaderInternal->Print(os);
+
+   PixelReadConverter->SetPrintLevel(PrintLevel);
+   PixelReadConverter->Print(os);
+}
 
-/////////////////////////////////////////////////////////////////
-// FIXME JPR: comments in English please !
+//-----------------------------------------------------------------------------
+// Public
 /**
- * \ingroup   gdcmFile
- * \brief     Renvoie la longueur A ALLOUER pour recevoir les pixels de l'image
- * \           ou DES images dans le cas d'un multiframe
- * \           ATTENTION : il ne s'agit PAS de la longueur du groupe des Pixels        
- * \           (dans le cas d'images compressees, elle n'a pas de sens).
- *
- * @param void Rien en entree
- *
- * @return     longueur a allouer 
+ * \brief   Get the size of the image data
+ * 
+ *          If the image can be RGB (with a lut or by default), the size 
+ *          corresponds to the RGB image
+ * @return  The image size
  */
+size_t File::GetImageDataSize()
+{
+   if ( PixelWriteConverter->GetUserData() )
+   {
+      return PixelWriteConverter->GetUserDataSize();
+   }
+
+   return PixelReadConverter->GetRGBSize();
+}
 
-size_t gdcmFile::GetImageDataSize(void) {
-       int nbLignes, nbCol, nbFrames, nb;
-       string str_nbFrames, str_nb;
-       // Nombre de Lignes     
-       nbLignes=atoi(gdcmHeader::GetPubElValByNumber(0x0028,0x0010).c_str());
-       // Nombre de Colonnes   
-       nbCol   =atoi(gdcmHeader::GetPubElValByNumber(0x0028,0x0011).c_str());
-
-       // Nombre de Frames     
-       str_nbFrames=gdcmHeader::GetPubElValByNumber(0x0028,0x0008);
-       
-       if (str_nbFrames == "gdcm::Unfound" ) {
-               nbFrames = 1;
-       } else {
-               nbFrames = atoi(str_nbFrames.c_str() );
-       }
-       
-       // Nombre de Bits Alloues pour le stockage d'un Pixel   
-       str_nb=gdcmHeader::GetPubElValByNumber(0x0028,0x0100);
-
-       if (str_nb == "gdcm::Unfound" ) {
-               nb = 16;
-       } else {
-               nb = atoi(str_nb.c_str() );
-       }
-
-       size_t lgrTotale = nbFrames*nbLignes*nbCol*(nb/8);
-       return (lgrTotale);
-
-}
-
-/////////////////////////////////////////////////////////////////
 /**
- * \ingroup   gdcmFile
- * \brief amene en mémoire les Pixels d'une image NON COMPRESSEE
- * \Aucun test n'est fait pour le moment sur le caractere compresse ou non de l'image
- *
- * @param rien
- *
- * @return     Pointeur sur la zone mémoire contenant les Pixels lus
+ * \brief   Get the size of the image data
+ * 
+ *          If the image can be RGB by transformation in a LUT, this
+ *          transformation isn't considered
+ * @return  The raw image size
  */
+size_t File::GetImageDataRawSize()
+{
+   if ( PixelWriteConverter->GetUserData() )
+   {
+      return PixelWriteConverter->GetUserDataSize();
+   }
+
+   return PixelReadConverter->GetRawSize();
+}
 
-/*
-void * gdcmFile::GetImageData (void) {
-       
-       char* _Pixels;
-
-       int  nb, nbu, highBit, signe;
-       string str_nbFrames, str_nb, str_nbu, str_highBit, str_signe;
-       
-       unsigned short int mask = 0xffff;
-
-       // Nombre de Bits Alloues pour le stockage d'un Pixel   
-       str_nb=gdcmHeader::GetPubElValByNumber(0x0028,0x0100);
-
-       if (str_nb == "gdcm::Unfound" ) {
-               nb = 16;
-       } else {
-               nb = atoi(str_nb.c_str() );
-       }
-                       
-       // Nombre de Bits Utilises      
-       str_nbu=GetPubElValByNumber(0x0028,0x0101);
-
-       if (str_nbu == "gdcm::Unfound" ) {
-               nbu = nb;
-       } else {
-               nbu = atoi(str_nbu.c_str() );
-       }       
-       
-       // Position du Bit de Poids Fort        
-       str_highBit=GetPubElValByNumber(0x0028,0x0102);
-
-       if (str_highBit == "gdcm::Unfound" ) {
-               highBit = nb - 1;
-       } else {
-               highBit = atoi(str_highBit.c_str() );
-       }
-               
-       // Signe des Pixels 0 : Unsigned
-       str_signe=GetPubElValByNumber(0x0028,0x0103);
-
-       if (str_signe == "gdcm::Unfound" ) {
-               signe = 1;
-       } else {
-               signe = atoi(str_signe.c_str() );
-       }
-       
-       // Longueur en Octets des Pixels a lire
-       size_t _lgrTotale = GetImageDataSize();
-       
-       //Pixels = (char *) g_malloc(_lgrTotale);
-       _Pixels = (char *) malloc(_lgrTotale);
-       
-       GetPixels(lgrTotale, _Pixels);
-
-       // On remet les Octets dans le bon ordre si besoin est
-       if (nb != 8) {
-               int _sw = GetSwapCode();
-
-               _Swap (_Pixels, _sw, _lgrTotale, nb);
-       }
-       
-       // On remet les Bits des Octets dans le bon ordre si besoin est
-       //
-       // ATTENTION :  Jamais confronté a des pixels stockes sur 32 bits 
-       //                      avec moins de 32 bits utilises
-       //                      et dont le bit de poids fort ne serait pas la ou on l'attend ...
-       //                      --> ne marchera pas dans ce cas 
-       if (nbu!=nb){
-               mask = mask >> (nb-nbu);
-               int l=(int)_lgrTotale/(nb/8);
-               unsigned short *deb = (unsigned short *)_Pixels;
-               for(int i=0;i<l;i++) {
-                               *deb = (*deb >> (nbu-highBit-1)) & mask;
-                               deb ++;
-               }
-       }       
-       // On l'affecte à un champ du dcmFile
-       
-       Pixels = _Pixels;
-       lgrTotale = _lgrTotale;
-       
-       // et on le retourne
-       // ca fait double emploi, il faudra nettoyer ça
-       
-       return (_Pixels);               
-}
-
-*/
-
-/////////////////////////////////////////////////////////////////
 /**
- * \ingroup   gdcmFile
- * \brief amene en mémoire les Pixels d'une image NON COMPRESSEE
- * \Aucun test n'est fait pour le moment sur le caractere compresse ou non de l'image
- *
- * @param rien
+ * \brief   - Allocates necessary memory, 
+ *          - Reads the pixels from disk (uncompress if necessary),
+ *          - Transforms YBR pixels, if any, into RGB pixels
+ *          - Transforms 3 planes R, G, B, if any, into a single RGB Plane
+ *          - Transforms single Grey plane + 3 Palettes into a RGB Plane
+ *          - Copies the pixel data (image[s]/volume[s]) to newly allocated zone.
+ * @return  Pointer to newly allocated pixel data.
+ *          NULL if alloc fails 
+ */
+uint8_t *File::GetImageData()
+{
+   if ( PixelWriteConverter->GetUserData() )
+   {
+      return PixelWriteConverter->GetUserData();
+   }
+
+   if ( ! GetRaw() )
+   {
+      // If the decompression failed nothing can be done.
+      return 0;
+   }
+
+   if ( HeaderInternal->HasLUT() && PixelReadConverter->BuildRGBImage() )
+   {
+      return PixelReadConverter->GetRGB();
+   }
+   else
+   {
+      // When no LUT or LUT conversion fails, return the Raw
+      return PixelReadConverter->GetRaw();
+   }
+}
+
+/**
+ * \brief   Allocates necessary memory, 
+ *          Transforms YBR pixels (if any) into RGB pixels
+ *          Transforms 3 planes R, G, B  (if any) into a single RGB Plane
+ *          Copies the pixel data (image[s]/volume[s]) to newly allocated zone. 
+ *          DOES NOT transform Grey plane + 3 Palettes into a RGB Plane
+ * @return  Pointer to newly allocated pixel data.
+ * \        NULL if alloc fails 
+ */
+uint8_t *File::GetImageDataRaw ()
+{
+   return GetRaw();
+}
+
+/**
+ * \brief
+ *          Read the pixels from disk (uncompress if necessary),
+ *          Transforms YBR pixels, if any, into RGB pixels
+ *          Transforms 3 planes R, G, B, if any, into a single RGB Plane
+ *          Transforms single Grey plane + 3 Palettes into a RGB Plane   
+ *          Copies at most MaxSize bytes of pixel data to caller allocated
+ *          memory space.
+ * \warning This function allows people that want to build a volume
+ *          from an image stack *not to* have, first to get the image pixels, 
+ *          and then move them to the volume area.
+ *          It's absolutely useless for any VTK user since vtk chooses 
+ *          to invert the lines of an image, that is the last line comes first
+ *          (for some axis related reasons?). Hence he will have 
+ *          to load the image line by line, starting from the end.
+ *          VTK users have to call GetImageData
+ *     
+ * @param   destination Address (in caller's memory space) at which the
+ *          pixel data should be copied
+ * @param   maxSize Maximum number of bytes to be copied. When MaxSize
+ *          is not sufficient to hold the pixel data the copy is not
+ *          executed (i.e. no partial copy).
+ * @return  On success, the number of bytes actually copied. Zero on
+ *          failure e.g. MaxSize is lower than necessary.
+ */
+size_t File::GetImageDataIntoVector (void *destination, size_t maxSize)
+{
+   if ( ! GetRaw() )
+   {
+      // If the decompression failed nothing can be done.
+      return 0;
+   }
+
+   if ( HeaderInternal->HasLUT() && PixelReadConverter->BuildRGBImage() )
+   {
+      if ( PixelReadConverter->GetRGBSize() > maxSize )
+      {
+         gdcmVerboseMacro( "Pixel data bigger than caller's expected MaxSize");
+         return 0;
+      }
+      memcpy( destination,
+              (void*)PixelReadConverter->GetRGB(),
+              PixelReadConverter->GetRGBSize() );
+      return PixelReadConverter->GetRGBSize();
+   }
+
+   // Either no LUT conversion necessary or LUT conversion failed
+   if ( PixelReadConverter->GetRawSize() > maxSize )
+   {
+      gdcmVerboseMacro( "Pixel data bigger than caller's expected MaxSize");
+      return 0;
+   }
+   memcpy( destination,
+           (void*)PixelReadConverter->GetRaw(),
+           PixelReadConverter->GetRawSize() );
+   return PixelReadConverter->GetRawSize();
+}
+
+/**
+ * \brief   Points the internal pointer to the callers inData
+ *          image representation, BUT WITHOUT COPYING THE DATA.
+ *          'image' Pixels are presented as C-like 2D arrays : line per line.
+ *          'volume'Pixels are presented as C-like 3D arrays : plane per plane 
+ * \warning Since the pixels are not copied, it is the caller's responsability
+ *          not to deallocate it's data before gdcm uses them (e.g. with
+ *          the Write() method.
+ * @param inData user supplied pixel area
+ * @param expectedSize total image size, in Bytes
  *
- * @return     Pointeur sur la zone mémoire contenant les Pixels lus
+ * @return boolean
+ */
+void File::SetImageData(uint8_t *inData, size_t expectedSize)
+{
+   SetUserData(inData,expectedSize);
+}
+
+/**
+ * \brief   Set the image datas defined by the user
+ * \warning When writting the file, this datas are get as default datas to write
+ */
+void File::SetUserData(uint8_t *data, size_t expectedSize)
+{
+   PixelWriteConverter->SetUserData(data,expectedSize);
+}
+
+/**
+ * \brief   Get the image datas defined by the user
+ * \warning When writting the file, this datas are get as default data to write
+ */
+uint8_t *File::GetUserData()
+{
+   return PixelWriteConverter->GetUserData();
+}
+
+/**
+ * \brief   Get the image data size defined by the user
+ * \warning When writting the file, this datas are get as default data to write
  */
+size_t File::GetUserDataSize()
+{
+   return PixelWriteConverter->GetUserDataSize();
+}
 
-void * gdcmFile::GetImageData (void) {
-       char * _Pixels;
-       // Longueur en Octets des Pixels a lire
-       size_t taille = GetImageDataSize();// ne faudrait-il pas la stocker?
-       _Pixels = (char *) malloc(taille);      
-       GetImageDataIntoVector(_Pixels, taille);
-       
-               // On l'affecte à un champ du dcmFile   
-       Pixels =    _Pixels;
-       lgrTotale = taille;
-       
-       // et on le retourne
-       // ca fait double emploi, il faudra nettoyer ça
-       
-       return(_Pixels);
+/**
+ * \brief   Get the image datas from the file.
+ *          If a LUT is found, the data are expanded to be RGB
+ */
+uint8_t *File::GetRGBData()
+{
+   return PixelReadConverter->GetRGB();
 }
 
+/**
+ * \brief   Get the image data size from the file.
+ *          If a LUT is found, the data are expanded to be RGB
+ */
+size_t File::GetRGBDataSize()
+{
+   return PixelReadConverter->GetRGBSize();
+}
 
+/**
+ * \brief   Get the image datas from the file.
+ *          If a LUT is found, the datas are not expanded !
+ */
+uint8_t *File::GetRawData()
+{
+   return PixelReadConverter->GetRaw();
+}
 
-/////////////////////////////////////////////////////////////////
 /**
- * \ingroup   gdcmFile
- * \brief amene en mémoire dans une zone précisee par l'utilisateur
- * \les Pixels d'une image NON COMPRESSEE
- * \Aucun test n'est fait pour le moment sur le caractere compresse ou non de l'image
- *
- * @param 
- *
- * @return     
+ * \brief   Get the image data size from the file.
+ *          If a LUT is found, the data are not expanded !
+ */
+size_t File::GetRawDataSize()
+{
+   return PixelReadConverter->GetRawSize();
+}
+
+/**
+ * \brief Writes on disk A SINGLE Dicom file
+ *        NO test is performed on  processor "Endiannity".
+ *        It's up to the user to call his Reader properly
+ * @param fileName name of the file to be created
+ *                 (any already existing file is over written)
+ * @return false if write fails
+ */
+
+bool File::WriteRawData(std::string const &fileName)
+{
+  std::ofstream fp1(fileName.c_str(), std::ios::out | std::ios::binary );
+   if (!fp1)
+   {
+      gdcmVerboseMacro( "Fail to open (write) file:" << fileName.c_str());
+      return false;
+   }
+
+   if( PixelWriteConverter->GetUserData() )
+   {
+      fp1.write( (char*)PixelWriteConverter->GetUserData(), 
+                 PixelWriteConverter->GetUserDataSize() );
+   }
+   else if ( PixelReadConverter->GetRGB() )
+   {
+      fp1.write( (char*)PixelReadConverter->GetRGB(), 
+                 PixelReadConverter->GetRGBSize());
+   }
+   else if ( PixelReadConverter->GetRaw() )
+   {
+      fp1.write( (char*)PixelReadConverter->GetRaw(), 
+                 PixelReadConverter->GetRawSize());
+   }
+   else
+   {
+      gdcmErrorMacro( "Nothing written." );
+   }
+
+   fp1.close();
+
+   return true;
+}
+
+/**
+ * \brief Writes on disk A SINGLE Dicom file, 
+ *        using the Implicit Value Representation convention
+ *        NO test is performed on  processor "Endiannity".
+ * @param fileName name of the file to be created
+ *                 (any already existing file is overwritten)
+ * @return false if write fails
+ */
+
+bool File::WriteDcmImplVR (std::string const &fileName)
+{
+   SetWriteTypeToDcmImplVR();
+   return Write(fileName);
+}
+
+/**
+* \brief Writes on disk A SINGLE Dicom file, 
+ *        using the Explicit Value Representation convention
+ *        NO test is performed on  processor "Endiannity". 
+ * @param fileName name of the file to be created
+ *                 (any already existing file is overwritten)
+ * @return false if write fails
+ */
+
+bool File::WriteDcmExplVR (std::string const &fileName)
+{
+   SetWriteTypeToDcmExplVR();
+   return Write(fileName);
+}
+
+/**
+ * \brief Writes on disk A SINGLE Dicom file, 
+ *        using the ACR-NEMA convention
+ *        NO test is performed on  processor "Endiannity".
+ *        (a l'attention des logiciels cliniques 
+ *        qui ne prennent en entrée QUE des images ACR ...
+ * \warning if a DICOM_V3 header is supplied,
+ *         groups < 0x0008 and shadow groups are ignored
+ * \warning NO TEST is performed on processor "Endiannity".
+ * @param fileName name of the file to be created
+ *                 (any already existing file is overwritten)
+ * @return false if write fails
  */
 
-int gdcmFile::GetImageDataIntoVector (void* destination, size_t MaxSize) {
-
-// Question :
-//     dans quel cas la Maxize sert-elle a quelque chose?
-//     que fait-on si la taille de l'image est + gde    que Maxize?
-//     que fait-on si la taille de l'image est + petite que Maxize?
-
-       
-       void * Pixels = destination;  // pour garder le code identique avec GetImageData
-
-       int nb, nbu, highBit, signe;
-       string str_nbFrames, str_nb, str_nbu, str_highBit, str_signe;
-       
-       unsigned short int mask = 0xffff;
-       
-       // Longueur en Octets des Pixels a lire
-       size_t _lgrTotale = GetImageDataSize(); // ne faudrait-il pas la stocker?
-       
-       // si lgrTotale < MaxSize ==> Gros pb 
-       // -> on résoud à la goret
-       
-       if ( _lgrTotale < MaxSize ) MaxSize = _lgrTotale;
-       
-       GetPixels(MaxSize, destination);
-                       
-       // Nombre de Bits Alloues pour le stockage d'un Pixel   
-       str_nb=gdcmHeader::GetPubElValByNumber(0x0028,0x0100);
-
-       if (str_nb == "gdcm::Unfound" ) {
-               nb = 16;
-       } else {
-               nb = atoi(str_nb.c_str() );
-       }
-       
-       // Nombre de Bits Utilises      
-       str_nbu=GetPubElValByNumber(0x0028,0x0101);
-
-       if (str_nbu == "gdcm::Unfound" ) {
-               nbu = nb;
-       } else {
-               nbu = atoi(str_nbu.c_str() );
-       }       
-       
-       // Position du Bit de Poids Fort        
-       str_highBit=GetPubElValByNumber(0x0028,0x0102);
-
-       if (str_highBit == "gdcm::Unfound" ) {
-               highBit = nb - 1;
-       } else {
-               highBit = atoi(str_highBit.c_str() );
-       }
-               
-       // Signe des Pixels 
-       str_signe=GetPubElValByNumber(0x0028,0x0103);
-
-       if (str_signe == "gdcm::Unfound" ) {
-               signe = 1;
-       } else {
-               signe = atoi(str_signe.c_str() );
-       }
-
-       // On remet les Octets dans le bon ordre si besoin est
-       if (nb != 8) {
-               int _sw = GetSwapCode();
-
-               _Swap (destination, _sw, _lgrTotale, nb);
-       }
-       
-       // On remet les Bits des Octets dans le bon ordre si besoin est
-       //
-       // ATTENTION :  Jamais confronté a des pixels stockes sur 32 bits 
-       //                      avec moins de 32 bits utilises
-       //                      et dont le bit de poids fort ne serait pas la ou on l'attend ...
-       //                      --> ne marchera pas dans ce cas 
-       if (nbu!=nb){
-               mask = mask >> (nb-nbu);
-               int l=(int)MaxSize/(nb/8);
-               unsigned short *deb = (unsigned short *)Pixels;
-               for(int i=0;i<l;i++) {
-                               *deb = (*deb >> (nbu-highBit-1)) & mask;
-                               deb ++;
-               }
-       }
-                       
-       // VOIR s'il ne faudrait pas l'affecter à un champ du dcmHeader
-       
-       return 1; 
-}
-
-
-//
-// Je laisse le code integral, au cas ça puisse etre reutilise ailleurs
-//
-
-static void _Swap(void* im, int swap, int lgr, int nb) {                     
-guint32 s32;
-guint16 fort,faible;
-int i;
-
-if(nb == 16)
-    
-       switch(swap) {
-               case 0:
-               case 12:
-               case 1234:
-                       break;
-               
-               case 21:
-               case 3412:
-               case 2143:
-               case 4321:
-
-                       for(i=0;i<lgr;i++)
-                               ((unsigned short int*)im)[i]= ((((unsigned short int*)im)[i])>>8)
-                                               | ((((unsigned short int*)im)[i])<<8);
-                       break;
-                       
-               default:
-                       printf("valeur de SWAP (16 bits) non autorisee : %d\n", swap);
-       } 
-if( nb == 32 )
-
-       switch (swap) {
-               case 0:
-               case 1234:
-                        break;
-
-               case 4321:
-                        for(i=0;i<lgr;i++) {
-                               faible=  ((unsigned long int*)im)[i]&0x0000ffff;    /* 4321 */
-                                       fort  =((unsigned long int*)im)[i]>>16;
-                               fort=  (fort>>8)   | (fort<<8);
-                               faible=(faible>>8) | (faible<<8);
-                               s32=faible;
-                               ((unsigned long int*)im)[i]=(s32<<16)|fort;
-                               }
-                       break;
-
-               case 2143:
-                       for(i=0;i<lgr;i++) {
-                                       faible=  ((unsigned long int*)im)[i]&0x0000ffff;    /* 2143 */
-                                       fort=((unsigned long int*)im)[i]>>16;
-                                       fort=  (fort>>8)   | (fort<<8);
-                                       faible=(faible>>8) | (faible<<8);
-                                       s32=fort; 
-                                       ((unsigned long int*)im)[i]=(s32<<16)|faible;
-                       }
-                       break;
+bool File::WriteAcr (std::string const &fileName)
+{
+   SetWriteTypeToAcr();
+   return Write(fileName);
+}
+
+/**
+ * \brief Writes on disk A SINGLE Dicom file, 
+ * @param fileName name of the file to be created
+ *                 (any already existing file is overwritten)
+ * @return false if write fails
+ */
+bool File::Write(std::string const &fileName)
+{
+   switch(WriteType)
+   {
+      case ImplicitVR:
+         SetWriteFileTypeToImplicitVR();
+         break;
+      case ExplicitVR:
+         SetWriteFileTypeToExplicitVR();
+         break;
+      case ACR:
+      case ACR_LIBIDO:
+         SetWriteFileTypeToACR();
+         break;
+      default:
+         SetWriteFileTypeToExplicitVR();
+   }
+
+   // --------------------------------------------------------------
+   // Special Patch to allow gdcm to re-write ACR-LibIDO formated images
+   //
+   // if recognition code tells us we dealt with a LibIDO image
+   // we reproduce on disk the switch between lineNumber and columnNumber
+   // just before writting ...
+   /// \todo the best trick would be *change* the recognition code
+   ///       but pb expected if user deals with, e.g. COMPLEX images
+   if( WriteType == ACR_LIBIDO )
+   {
+      SetWriteToLibido();
+   }
+   else
+   {
+      SetWriteToNoLibido();
+   }
+   // ----------------- End of Special Patch ----------------
   
-               case 3412:
-                       for(i=0;i<lgr;i++) {
-                               faible=  ((unsigned long int*)im)[i]&0x0000ffff;    /* 3412 */
-                                       fort=((unsigned long int*)im)[i]>>16;                  
-                                       s32=faible; 
-                                       ((unsigned long int*)im)[i]=(s32<<16)|fort;
-                       }                 
-                       break; 
-                               
-               default:
-                       printf("valeur de SWAP (32 bits) non autorisee : %d\n", swap);
-       } 
-return;
-}
-
-/////////////////////////////////////////////////////////////////
+   switch(WriteMode)
+   {
+      case WMODE_RAW :
+         SetWriteToRaw();
+         break;
+      case WMODE_RGB :
+         SetWriteToRGB();
+         break;
+   }
+
+   bool check = CheckWriteIntegrity();
+   if(check)
+   {
+      check = HeaderInternal->Write(fileName,WriteType);
+   }
+
+   RestoreWrite();
+   RestoreWriteFileType();
+
+   // --------------------------------------------------------------
+   // Special Patch to allow gdcm to re-write ACR-LibIDO formated images
+   // 
+   // ...and we restore the Header to be Dicom Compliant again 
+   // just after writting
+   RestoreWriteOfLibido();
+   // ----------------- End of Special Patch ----------------
+
+   return check;
+}
+
 /**
- * \ingroup   gdcmFile
- * \brief Ecrit sur disque les pixels d'UNE image
- * \Aucun test n'est fait sur l'"Endiannerie" du processeur.
- * \Ca sera à l'utilisateur d'appeler son Reader correctement
- * \ (Equivalent a IdImaWriteRawFile) 
- *
- * @param 
- *
- * @return     
+ * \brief   Accesses an existing DocEntry (i.e. a Dicom Element)
+ *          through it's (group, element) and modifies it's content with
+ *          the given value.
+ * @param   content new value (string) to substitute with
+ * @param   group     group number of the Dicom Element to modify
+ * @param   elem element number of the Dicom Element to modify
  */
+bool File::SetEntry(std::string const &content,
+                    uint16_t group, uint16_t elem)
+{ 
+   return HeaderInternal->SetEntry(content,group,elem);
+}
 
-int gdcmFile::WriteRawData (string nomFichier) {
 
-       FILE * fp1;
-       fp1 = fopen(nomFichier.c_str(),"wb");
-       if (fp1 == NULL) {
-               printf("Echec ouverture (ecriture) Fichier [%s] \n",nomFichier.c_str());
-               return (0);
-       } 
-       
-       fwrite (Pixels,lgrTotale, 1, fp1);
-       fclose (fp1);
-       return(1);
+/**
+ * \brief   Accesses an existing DocEntry (i.e. a Dicom Element)
+ *          through it's (group, element) and modifies it's content with
+ *          the given value.
+ * @param   content new value (void*  -> uint8_t*) to substitute with
+ * @param   lgth new value length
+ * @param   group     group number of the Dicom Element to modify
+ * @param   elem element number of the Dicom Element to modify
+ */
+bool File::SetEntry(uint8_t *content, int lgth,
+                    uint16_t group, uint16_t elem)
+{
+   return HeaderInternal->SetEntry(content,lgth,group,elem);
 }
 
+/**
+ * \brief   Modifies the value of a given Doc Entry (Dicom Element)
+ *          when it exists. Create it with the given value when unexistant.
+ * @param   content (string) Value to be set
+ * @param   group   Group number of the Entry 
+ * @param   elem  Element number of the Entry
+ * \return  pointer to the modified/created Header Entry (NULL when creation
+ *          failed).
+ */ 
+bool File::ReplaceOrCreate(std::string const &content,
+                           uint16_t group, uint16_t elem)
+{
+   return HeaderInternal->ReplaceOrCreate(content,group,elem) != NULL;
+}
 
+/*
+ * \brief   Modifies the value of a given Header Entry (Dicom Element)
+ *          when it exists. Create it with the given value when unexistant.
+ *          A copy of the binArea is made to be kept in the Document.
+ * @param   binArea (binary) value to be set
+ * @param   group   Group number of the Entry 
+ * @param   elem  Element number of the Entry
+ * \return  pointer to the modified/created Header Entry (NULL when creation
+ *          failed).
+ */
+bool File::ReplaceOrCreate(uint8_t *binArea, int lgth,
+                           uint16_t group, uint16_t elem)
+{
+   return HeaderInternal->ReplaceOrCreate(binArea,lgth,group,elem) != NULL;
+}
 
-/////////////////////////////////////////////////////////////////
 /**
- * \ingroup   gdcmFile
- * \brief Ecrit sur disque UNE image Dicom
- * \Aucun test n'est fait sur l'"Endiannerie" du processeur.
- * \Ca fonctionnera correctement (?) sur processeur Intel
- * \ (Equivalent a IdDcmWrite) 
- *
- * @param 
- *
- * @return     
+ * \brief Access to the underlying \ref PixelReadConverter RGBA LUT
  */
+uint8_t* File::GetLutRGBA()
+{
+   return PixelReadConverter->GetLutRGBA();
+}
+
+//-----------------------------------------------------------------------------
+// Protected
 
-int gdcmFile::WriteDcm (string nomFichier) {
-
-// ATTENTION : fonction non terminée (commitée a titre de precaution)
-
-       FILE * fp1;
-       char* filePreamble;
-       fp1 = fopen(nomFichier.c_str(),"wb");
-       if (fp1 == NULL) {
-               printf("Echec ouverture (ecriture) Fichier [%s] \n",nomFichier.c_str());
-               return (0);
-       } 
-       
-       //      Ecriture Dicom File Preamble
-       filePreamble=(char*)calloc(128,1);
-       fwrite(filePreamble,128,1,fp1);
-       fwrite("DICM",4,1,fp1);
-
-       // un accesseur de + est obligatoire ???
-       // pourtant le gdcmElValSet contenu dans le gdcmHeader 
-       // ne devrait pas être visible par l'utilisateur final (?)
-       
-       GetPubElVals().Write(fp1);
-               
-       fwrite(Pixels, lgrTotale, 1, fp1);
-
-       fclose (fp1);
-       return(1);
-}
-       
-/////////////////////////////////////////////////////////////////
 /**
- * \ingroup   gdcmFile
- * \brief Ecrit sur disque UNE image ACR-NEMA 
- * \ (a l'attention des logiciels cliniques 
- * \ qui ne prennent en entrée QUE des images ACR ...
- * \ si un header DICOM est fourni en entree,
- * \ les groupes < 0x0008 et les groupes impairs sont ignores)
- * \ Aucun test n'est fait sur l'"Endiannerie" du processeur.
- * \ Ca fonctionnera correctement (?) sur processeur Intel
- * \ (Equivalent a IdDcmWrite) 
- *
- * @param 
+ * \brief Check the write integrity
  *
- * @return     
+ * The tests made are :
+ *  - verify the size of the image to write with the possible write
+ *    when the user set an image data
+ * @return true if the check successfulls
  */
+bool File::CheckWriteIntegrity()
+{
+   if(PixelWriteConverter->GetUserData())
+   {
+      int numberBitsAllocated = HeaderInternal->GetBitsAllocated();
+      if ( numberBitsAllocated == 0 || numberBitsAllocated == 12 )
+      {
+         numberBitsAllocated = 16;
+      }
+
+      size_t decSize = HeaderInternal->GetXSize()
+                    * HeaderInternal->GetYSize() 
+                    * HeaderInternal->GetZSize()
+                    * ( numberBitsAllocated / 8 )
+                    * HeaderInternal->GetSamplesPerPixel();
+      size_t rgbSize = decSize;
+      if( HeaderInternal->HasLUT() )
+         rgbSize = decSize * 3;
+
+      switch(WriteMode)
+      {
+         case WMODE_RAW :
+            if( decSize!=PixelWriteConverter->GetUserDataSize() )
+            {
+               gdcmVerboseMacro( "Data size is incorrect (Raw)" << decSize 
+                    << " / " << PixelWriteConverter->GetUserDataSize() );
+               return false;
+            }
+            break;
+         case WMODE_RGB :
+            if( rgbSize!=PixelWriteConverter->GetUserDataSize() )
+            {
+               gdcmVerboseMacro( "Data size is incorrect (RGB)" << decSize
+                   << " / " << PixelWriteConverter->GetUserDataSize() );
+               return false;
+            }
+            break;
+      }
+   }
+   
+   return true;
+}
 
-int gdcmFile::WriteAcr (string nomFichier) {
+void File::SetWriteToRaw()
+{
+   if( HeaderInternal->GetNumberOfScalarComponents() == 3 
+    && !HeaderInternal->HasLUT())
+   {
+      SetWriteToRGB();
+   } 
+   else
+   {
+      ValEntry *photInt = CopyValEntry(0x0028,0x0004);
+      if(HeaderInternal->HasLUT())
+      {
+         photInt->SetValue("PALETTE COLOR ");
+      }
+      else
+      {
+         photInt->SetValue("MONOCHROME1 ");
+      }
+
+      PixelWriteConverter->SetReadData(PixelReadConverter->GetRaw(),
+                                       PixelReadConverter->GetRawSize());
+
+      BinEntry *pixel = 
+         CopyBinEntry(GetHeader()->GetGrPixel(),GetHeader()->GetNumPixel());
+      pixel->SetValue(GDCM_BINLOADED);
+      pixel->SetBinArea(PixelWriteConverter->GetData(),false);
+      pixel->SetLength(PixelWriteConverter->GetDataSize());
+
+      Archive->Push(photInt);
+      Archive->Push(pixel);
+   }
+}
+
+void File::SetWriteToRGB()
+{
+   if(HeaderInternal->GetNumberOfScalarComponents()==3)
+   {
+      PixelReadConverter->BuildRGBImage();
+      
+      ValEntry *spp = CopyValEntry(0x0028,0x0002);
+      spp->SetValue("3 ");
+
+      ValEntry *planConfig = CopyValEntry(0x0028,0x0006);
+      planConfig->SetValue("0 ");
+
+      ValEntry *photInt = CopyValEntry(0x0028,0x0004);
+      photInt->SetValue("RGB ");
+
+      if(PixelReadConverter->GetRGB())
+      {
+         PixelWriteConverter->SetReadData(PixelReadConverter->GetRGB(),
+                                          PixelReadConverter->GetRGBSize());
+      }
+      else // Raw data
+      {
+         PixelWriteConverter->SetReadData(PixelReadConverter->GetRaw(),
+                                          PixelReadConverter->GetRawSize());
+      }
+
+      BinEntry *pixel = 
+         CopyBinEntry(GetHeader()->GetGrPixel(),GetHeader()->GetNumPixel());
+      pixel->SetValue(GDCM_BINLOADED);
+      pixel->SetBinArea(PixelWriteConverter->GetData(),false);
+      pixel->SetLength(PixelWriteConverter->GetDataSize());
+
+      Archive->Push(spp);
+      Archive->Push(planConfig);
+      Archive->Push(photInt);
+      Archive->Push(pixel);
+
+      // Remove any LUT
+      Archive->Push(0x0028,0x1101);
+      Archive->Push(0x0028,0x1102);
+      Archive->Push(0x0028,0x1103);
+      Archive->Push(0x0028,0x1201);
+      Archive->Push(0x0028,0x1202);
+      Archive->Push(0x0028,0x1203);
+
+      // For old ACR-NEMA
+      // Thus, we have a RGB image and the bits allocated = 24 and 
+      // samples per pixels = 1 (in the read file)
+      if(HeaderInternal->GetBitsAllocated()==24) 
+      {
+         ValEntry *bitsAlloc = CopyValEntry(0x0028,0x0100);
+         bitsAlloc->SetValue("8 ");
+
+         ValEntry *bitsStored = CopyValEntry(0x0028,0x0101);
+         bitsStored->SetValue("8 ");
+
+         ValEntry *highBit = CopyValEntry(0x0028,0x0102);
+         highBit->SetValue("7 ");
+
+         Archive->Push(bitsAlloc);
+         Archive->Push(bitsStored);
+         Archive->Push(highBit);
+      }
+   }
+   else
+   {
+      SetWriteToRaw();
+   }
+}
+
+void File::RestoreWrite()
+{
+   Archive->Restore(0x0028,0x0002);
+   Archive->Restore(0x0028,0x0004);
+   Archive->Restore(0x0028,0x0006);
+   Archive->Restore(GetHeader()->GetGrPixel(),GetHeader()->GetNumPixel());
+
+   // For old ACR-NEMA (24 bits problem)
+   Archive->Restore(0x0028,0x0100);
+   Archive->Restore(0x0028,0x0101);
+   Archive->Restore(0x0028,0x0102);
+
+   // For the LUT
+   Archive->Restore(0x0028,0x1101);
+   Archive->Restore(0x0028,0x1102);
+   Archive->Restore(0x0028,0x1103);
+   Archive->Restore(0x0028,0x1201);
+   Archive->Restore(0x0028,0x1202);
+   Archive->Restore(0x0028,0x1203);
+}
+
+void File::SetWriteFileTypeToACR()
+{
+   Archive->Push(0x0002,0x0010);
+}
+
+void File::SetWriteFileTypeToExplicitVR()
+{
+   std::string ts = Util::DicomString( 
+      Global::GetTS()->GetSpecialTransferSyntax(TS::ExplicitVRLittleEndian) );
+
+   ValEntry *tss = CopyValEntry(0x0002,0x0010);
+   tss->SetValue(ts);
+
+   Archive->Push(tss);
+}
+
+void File::SetWriteFileTypeToImplicitVR()
+{
+   std::string ts = Util::DicomString(
+      Global::GetTS()->GetSpecialTransferSyntax(TS::ImplicitVRLittleEndian) );
+
+   ValEntry *tss = CopyValEntry(0x0002,0x0010);
+   tss->SetValue(ts);
+
+   Archive->Push(tss);
+}
+
+void File::RestoreWriteFileType()
+{
+   Archive->Restore(0x0002,0x0010);
+}
 
-// ATTENTION : fonction non terminée (commitée a titre de precaution)
+void File::SetWriteToLibido()
+{
+   ValEntry *oldRow = dynamic_cast<ValEntry *>
+                (HeaderInternal->GetDocEntry(0x0028, 0x0010));
+   ValEntry *oldCol = dynamic_cast<ValEntry *>
+                (HeaderInternal->GetDocEntry(0x0028, 0x0011));
+   
+   if( oldRow && oldCol )
+   {
+      std::string rows, columns; 
+
+      ValEntry *newRow=new ValEntry(oldRow->GetDictEntry());
+      ValEntry *newCol=new ValEntry(oldCol->GetDictEntry());
+
+      newRow->Copy(oldCol);
+      newCol->Copy(oldRow);
+
+      newRow->SetValue(oldCol->GetValue());
+      newCol->SetValue(oldRow->GetValue());
+
+      Archive->Push(newRow);
+      Archive->Push(newCol);
+   }
+
+   ValEntry *libidoCode = CopyValEntry(0x0008,0x0010);
+   libidoCode->SetValue("ACRNEMA_LIBIDO_1.1");
+   Archive->Push(libidoCode);
+}
+
+void File::SetWriteToNoLibido()
+{
+   ValEntry *recCode = dynamic_cast<ValEntry *>
+                (HeaderInternal->GetDocEntry(0x0008,0x0010));
+   if( recCode )
+   {
+      if( recCode->GetValue() == "ACRNEMA_LIBIDO_1.1" )
+      {
+         ValEntry *libidoCode = CopyValEntry(0x0008,0x0010);
+         libidoCode->SetValue("");
+         Archive->Push(libidoCode);
+      }
+   }
+}
 
-       FILE * fp1;
-       fp1 = fopen(nomFichier.c_str(),"wb");
-       if (fp1 == NULL) {
-               printf("Echec ouverture (ecriture) Fichier [%s] \n",nomFichier.c_str());
-               return (0);
-       } 
+void File::RestoreWriteOfLibido()
+{
+   Archive->Restore(0x0028,0x0010);
+   Archive->Restore(0x0028,0x0011);
+   Archive->Restore(0x0008,0x0010);
+}
 
-       // un accesseur de + est obligatoire ???
-       // pourtant le gdcmElValSet contenu dans le gdcmHeader 
-       // ne devrait pas être visible par l'utilisateur final (?)
-       
-       GetPubElVals().WriteAcr(fp1);
-               
-       fwrite(Pixels, lgrTotale, 1, fp1);
+ValEntry *File::CopyValEntry(uint16_t group,uint16_t elem)
+{
+   DocEntry *oldE = HeaderInternal->GetDocEntry(group, elem);
+   ValEntry *newE;
+
+   if(oldE)
+   {
+      newE = new ValEntry(oldE->GetDictEntry());
+      newE->Copy(oldE);
+   }
+   else
+   {
+      newE = GetHeader()->NewValEntry(group,elem);
+   }
+
+   return newE;
+}
 
-       fclose (fp1);
-       return(1);
+BinEntry *File::CopyBinEntry(uint16_t group,uint16_t elem)
+{
+   DocEntry *oldE = HeaderInternal->GetDocEntry(group, elem);
+   BinEntry *newE;
+
+   if(oldE)
+   {
+      newE = new BinEntry(oldE->GetDictEntry());
+      newE->Copy(oldE);
+   }
+   else
+   {
+      newE = GetHeader()->NewBinEntry(group,elem);
+   }
+
+   return newE;
 }
+
+//-----------------------------------------------------------------------------
+// Protected
+/**
+ * \brief Factorization for various forms of constructors.
+ */
+void File::Initialise()
+{
+   WriteMode = WMODE_RAW;
+   WriteType = ExplicitVR;
+
+   PixelReadConverter = new PixelReadConvert;
+   PixelWriteConverter = new PixelWriteConvert;
+   Archive = new DocEntryArchive( HeaderInternal );
+
+   if ( HeaderInternal->IsReadable() )
+   {
+      PixelReadConverter->GrabInformationsFromHeader( HeaderInternal );
+   }
+}
+
+uint8_t *File::GetRaw()
+{
+   uint8_t *raw = PixelReadConverter->GetRaw();
+   if ( ! raw )
+   {
+      // The Raw image migth not be loaded yet:
+      std::ifstream *fp = HeaderInternal->OpenFile();
+      PixelReadConverter->ReadAndDecompressPixelData( fp );
+      if(fp) 
+         HeaderInternal->CloseFile();
+
+      raw = PixelReadConverter->GetRaw();
+      if ( ! raw )
+      {
+         gdcmVerboseMacro( "Read/decompress of pixel data apparently went wrong.");
+         return 0;
+      }
+   }
+
+   return raw;
+}
+
+//-----------------------------------------------------------------------------
+// Private
+
+//-----------------------------------------------------------------------------
+} // end namespace gdcm
+