]> Creatis software - gdcm.git/blobdiff - src/gdcmUtil.cxx
* Test/VTKTestWriteSeq.cxx : add a VTK test to write sequences
[gdcm.git] / src / gdcmUtil.cxx
index d295c670f98bdae0437aad0bbd538d4afd213e9c..d51514cc332c2c742e8d6fda7df13571e68a6190 100644 (file)
@@ -3,8 +3,8 @@
   Program:   gdcm
   Module:    $RCSfile: gdcmUtil.cxx,v $
   Language:  C++
-  Date:      $Date: 2005/01/27 10:06:33 $
-  Version:   $Revision: 1.124 $
+  Date:      $Date: 2005/02/05 01:37:09 $
+  Version:   $Revision: 1.132 $
                                                                                 
   Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
   l'Image). All rights reserved. See Doc/License.txt or
@@ -35,7 +35,7 @@
 #include <stdio.h>   //only included in implementation file
 
 #if defined(_MSC_VER) || defined(__MINGW32__)
-   #include <winsock.h>  // for gethostname & gethostbyname
+   #include <winsock.h>  // for gethostname and gethostbyname
    #undef GetCurrentTime
 #else
 #ifndef __BORLANDC__
 
 // For GetCurrentThreadID()
 #ifdef __linux__
-#include <sys/types.h>
-#include <linux/unistd.h>
+   #include <sys/types.h>
+   #include <linux/unistd.h>
 #endif
 #ifdef __sun
-#include <thread.h>
+   #include <thread.h>
 #endif
 
 namespace gdcm 
 {
+//-------------------------------------------------------------------------
+const std::string Util::GDCM_UID = "1.2.826.0.1.3680043.2.1143";
+std::string Util::RootUID        = GDCM_UID;
+
+//-------------------------------------------------------------------------
+// Public
 /**
  * \brief Provide a better 'c++' approach for sprintf
  * For example c code is:
@@ -104,7 +110,6 @@ namespace gdcm
  * gdcm style code is
  * Format("%04x|%04x", group , elem);
  */
-
 std::string Util::Format(const char *format, ...)
 {
    char buffer[2048];
@@ -123,7 +128,7 @@ std::string Util::Format(const char *format, ...)
  */
 void Util::Tokenize (const std::string &str,
                      std::vector<std::string> &tokens,
-                     const std::stringdelimiters)
+                     const std::string &delimiters)
 {
    std::string::size_type lastPos = str.find_first_not_of(delimiters,0);
    std::string::size_type pos     = str.find_first_of    (delimiters,lastPos);
@@ -311,6 +316,48 @@ std::string Util::GetCurrentDateTime()
    return r;
 }
 
+unsigned int Util::GetCurrentThreadID()
+{
+// FIXME the implementation is far from complete
+#if defined(_MSC_VER) || defined(__BORLANDC__) || defined(__MINGW32__)
+  return (unsigned int)GetCurrentThreadId();
+#endif
+#ifdef __linux__
+   return 0;
+   // Doesn't work on fedora, but is in the man page...
+   //return (unsigned int)gettid();
+#endif
+#ifdef __sun
+   return (unsigned int)thr_self();
+#else
+   //default implementation
+   return 0;
+#endif
+}
+
+unsigned int Util::GetCurrentProcessID()
+{
+#if defined(_MSC_VER) || defined(__BORLANDC__) || defined(__MINGW32__)
+  // NOTE: There is also a _getpid()...
+  return (unsigned int)GetCurrentProcessId();
+#else
+  // get process identification, POSIX
+  return (unsigned int)getpid();
+#endif
+}
+
+/**
+ * \brief   tells us if the processor we are working with is BigEndian or not
+ */
+bool Util::IsCurrentProcessorBigEndian()
+{
+#ifdef GDCM_WORDS_BIGENDIAN
+   return true;
+#else
+   return false;
+#endif
+}
+
 /**
  * \brief Create a /DICOM/ string:
  * It should a of even length (no odd length ever)
@@ -367,41 +414,27 @@ bool Util::DicomStringEqual(const std::string &s1, const char *s2)
   return s1_even == s2_even;
 }
 
-/**
- * \brief   tells us if the processor we are working with is BigEndian or not
- */
-bool Util::IsCurrentProcessorBigEndian()
-{
-#ifdef GDCM_WORDS_BIGENDIAN
-   return true;
-#else
-   return false;
-#endif
-}
-
-
-
 #ifdef _WIN32
-typedef BOOL(WINAPI * pSnmpExtensionInit) (
-        IN DWORD dwTimeZeroReference,
-        OUT HANDLE * hPollForTrapEvent,
-        OUT AsnObjectIdentifier * supportedView);
-
-typedef BOOL(WINAPI * pSnmpExtensionTrap) (
-        OUT AsnObjectIdentifier * enterprise,
-        OUT AsnInteger * genericTrap,
-        OUT AsnInteger * specificTrap,
-        OUT AsnTimeticks * timeStamp,
-        OUT RFC1157VarBindList * variableBindings);
-
-typedef BOOL(WINAPI * pSnmpExtensionQuery) (
-        IN BYTE requestType,
-        IN OUT RFC1157VarBindList * variableBindings,
-        OUT AsnInteger * errorStatus,
-        OUT AsnInteger * errorIndex);
-
-typedef BOOL(WINAPI * pSnmpExtensionInitEx) (
-        OUT AsnObjectIdentifier * supportedView);
+   typedef BOOL(WINAPI * pSnmpExtensionInit) (
+           IN DWORD dwTimeZeroReference,
+           OUT HANDLE * hPollForTrapEvent,
+           OUT AsnObjectIdentifier * supportedView);
+
+   typedef BOOL(WINAPI * pSnmpExtensionTrap) (
+           OUT AsnObjectIdentifier * enterprise,
+           OUT AsnInteger * genericTrap,
+           OUT AsnInteger * specificTrap,
+           OUT AsnTimeticks * timeStamp,
+           OUT RFC1157VarBindList * variableBindings);
+
+   typedef BOOL(WINAPI * pSnmpExtensionQuery) (
+           IN BYTE requestType,
+           IN OUT RFC1157VarBindList * variableBindings,
+           OUT AsnInteger * errorStatus,
+           OUT AsnInteger * errorIndex);
+
+   typedef BOOL(WINAPI * pSnmpExtensionInitEx) (
+           OUT AsnObjectIdentifier * supportedView);
 #endif //_WIN32
 
 
@@ -594,13 +627,13 @@ int GetMacAddrSys ( unsigned char *addr )
 // We should investiage the use of SIZEOF_ADDR_IFREQ
 //
 #ifdef HAVE_SA_LEN
-#ifndef max
-#define max(a,b) ((a) > (b) ? (a) : (b))
-#endif
-#define ifreq_size(i) max(sizeof(struct ifreq),\
-     sizeof((i).ifr_name)+(i).ifr_addr.sa_len)
+   #ifndef max
+      #define max(a,b) ((a) > (b) ? (a) : (b))
+   #endif
+   #define ifreq_size(i) max(sizeof(struct ifreq),\
+        sizeof((i).ifr_name)+(i).ifr_addr.sa_len)
 #else
-#define ifreq_size(i) sizeof(struct ifreq)
+   #define ifreq_size(i) sizeof(struct ifreq)
 #endif // HAVE_SA_LEN
 
    if( (sd = socket(AF_INET, SOCK_DGRAM, IPPROTO_IP)) < 0 )
@@ -665,6 +698,23 @@ int GetMacAddrSys ( unsigned char *addr )
 #endif //__sun
 }
 
+/**
+ * Mini function to return the last digit from a number express in base 256
+ * pre condition data contain an array of 6 unsigned char
+ * post condition carry contain the last digit
+ */
+inline int getlastdigit(unsigned char *data)
+{
+  int extended, carry = 0;
+  for(int i=0;i<6;i++)
+    {
+    extended = (carry << 8) + data[i];
+    data[i] = extended / 10;
+    carry = extended % 10;
+    }
+  return carry;
+}
+
 /**
  * \brief Encode the mac address on a fixed lenght string of 15 characters.
  * we save space this way.
@@ -677,93 +727,32 @@ std::string Util::GetMACAddress()
    // http://groups-beta.google.com/group/comp.unix.solaris/msg/ad36929d783d63be
    // http://bdn.borland.com/article/0,1410,26040,00.html
    unsigned char addr[6];
-   uint64_t n = 0;
+
    int stat = GetMacAddrSys(addr);
    if (stat == 0)
    {
-      // Horner evaluation
-      for(int i=0; i<6; i++)
+      // We need to convert a 6 digit number from base 256 to base 10, using integer
+      // would requires a 48bits one. To avoid this we have to reimplement the div + modulo 
+      // with string only
+      bool zero = false;
+      int res;
+      std::string sres;
+      while(!zero)
       {
-         n *= 256;
-         n += addr[i];
+         res = getlastdigit(addr);
+         sres.insert(sres.begin(), '0' + res);
+         zero = (addr[0] == 0) && (addr[1] == 0) && (addr[2] == 0) && (addr[3] == 0) && (addr[4] == 0) && (addr[5] == 0);
       }
 
-      // we fit on 15 bytes maximum < 256^6.
-#if defined(_MSC_VER) || defined(__BORLANDC__)
-      return Format("%I64u", n);
-#else
-      return Format("%llu", n);
-#endif
+      return sres;
    }
    else
    {
-      gdcmVerboseMacro("Problem in finding the MAC Address");
+      gdcmWarningMacro("Problem in finding the MAC Address");
       return "";
    }
 }
 
-/**
- * \brief   Return the IP adress of the machine writting the DICOM image
- */
-std::string Util::GetIPAddress()
-{
-   // This is a rip from 
-   // http://www.codeguru.com/Cpp/I-N/internet/network/article.php/c3445/
-#ifndef HOST_NAME_MAX
-   // SUSv2 guarantees that `Host names are limited to 255 bytes'.
-   // POSIX 1003.1-2001 guarantees that `Host names (not including the
-   // terminating NUL) are limited to HOST_NAME_MAX bytes'.
-#  define HOST_NAME_MAX 255
-   // In this case we should maybe check the string was not truncated.
-   // But I don't known how to check that...
-#if defined(_MSC_VER) || defined(__BORLANDC__) || defined(__MINGW32__)
-   // with WinSock DLL we need to initialize the WinSock before using gethostname
-   WORD wVersionRequested = MAKEWORD(1,0);
-   WSADATA WSAData;
-   int err = WSAStartup(wVersionRequested,&WSAData);
-   if (err != 0)
-   {
-      // Tell the user that we could not find a usable
-      // WinSock DLL.
-      WSACleanup();
-      return "127.0.0.1";
-   }
-#endif
-  
-#endif //HOST_NAME_MAX
-
-   std::string str;
-   char szHostName[HOST_NAME_MAX+1];
-   int r = gethostname(szHostName, HOST_NAME_MAX);
-   if( r == 0 )
-   {
-      // Get host adresses
-      struct hostent *pHost = gethostbyname(szHostName);
-      for( int i = 0; pHost!= NULL && pHost->h_addr_list[i]!= NULL; i++ )
-      {
-         for( int j = 0; j<pHost->h_length; j++ )
-         {
-            if( j > 0 ) str += ".";
-            str += Util::Format("%u", 
-                (unsigned int)((unsigned char*)pHost->h_addr_list[i])[j]);
-         }
-         // str now contains one local IP address 
-#if defined(_MSC_VER) || defined(__BORLANDC__) || defined(__MINGW32__)
-   WSACleanup();
-#endif
-
-      }
-   }
-   // If an error occur r == -1
-   // Most of the time it will return 127.0.0.1...
-   return str;
-}
-
 /**
  * \brief Creates a new UID. As stipulate in the DICOM ref
  *        each time a DICOM image is create it should have 
@@ -772,19 +761,18 @@ std::string Util::GetIPAddress()
  */
 std::string Util::CreateUniqueUID(const std::string &root)
 {
-   std::string prefix = root;
+   std::string prefix;
    std::string append;
    if( root.empty() )
    {
-      // No root was specified use "GDCM" then
-      // echo "gdcm" | od -b
-      // 0000000 147 144 143 155 012
-      //prefix = "147.144.143.155"; // special easter egg
-
       // gdcm UID prefix, as supplied by http://www.medicalconnections.co.uk
-      prefix = "1.2.826.0.1.3680043.2.1143"; 
+      prefix = RootUID; 
+   }
+   else
+   {
+      prefix = root;
    }
-   // else
+
    // A root was specified use it to forge our new UID:
    append += ".";
    append += Util::GetMACAddress();
@@ -807,37 +795,20 @@ std::string Util::CreateUniqueUID(const std::string &root)
    return prefix + append;
 }
 
-unsigned int Util::GetCurrentThreadID()
+void Util::SetRootUID(const std::string &root)
 {
-// FIXME the implementation is far from complete
-#if defined(_MSC_VER) || defined(__BORLANDC__) || defined(__MINGW32__)
-  return (unsigned int)GetCurrentThreadId();
-#endif
-#ifdef __linux__
-   return 0;
-   // Doesn't work on fedora, but is in the man page...
-   //return (unsigned int)gettid();
-#endif
-#ifdef __sun
-   return (unsigned int)thr_self();
-#else
-   //default implementation
-   return 0;
-#endif
+   if( root.empty() )
+      RootUID = GDCM_UID;
+   else
+      RootUID = root;
 }
 
-unsigned int Util::GetCurrentProcessID()
+const std::string &Util::GetRootUID()
 {
-#if defined(_MSC_VER) || defined(__BORLANDC__) || defined(__MINGW32__)
-  // NOTE: There is also a _getpid()...
-  return (unsigned int)GetCurrentProcessId();
-#else
-  // get process identification, POSIX
-  return (unsigned int)getpid();
-#endif
-
+   return RootUID;
 }
 
+//-------------------------------------------------------------------------
 /**
  * \brief
  * @param os ostream to write to
@@ -858,7 +829,7 @@ std::ostream &binary_write(std::ostream &os, const uint16_t &val)
 {
 #ifdef GDCM_WORDS_BIGENDIAN
    uint16_t swap;
-   swap = ((( val << 8 ) & 0x0ff00 ) | (( val >> 8 ) & 0x00ff ) );
+   swap = ((( val << 8 ) & 0xff00 ) | (( val >> 8 ) & 0x00ff ) );
    return os.write(reinterpret_cast<const char*>(&swap), 2);
 #else
    return os.write(reinterpret_cast<const char*>(&val), 2);
@@ -902,5 +873,72 @@ std::ostream &binary_write(std::ostream &os, std::string const &val)
    return os.write(val.c_str(), val.size());
 }
 
+//-------------------------------------------------------------------------
+// Protected
+
+//-------------------------------------------------------------------------
+// Private
+/**
+ * \brief   Return the IP adress of the machine writting the DICOM image
+ */
+std::string Util::GetIPAddress()
+{
+   // This is a rip from 
+   // http://www.codeguru.com/Cpp/I-N/internet/network/article.php/c3445/
+#ifndef HOST_NAME_MAX
+   // SUSv2 guarantees that `Host names are limited to 255 bytes'.
+   // POSIX 1003.1-2001 guarantees that `Host names (not including the
+   // terminating NUL) are limited to HOST_NAME_MAX bytes'.
+#define HOST_NAME_MAX 255
+   // In this case we should maybe check the string was not truncated.
+   // But I don't known how to check that...
+#if defined(_MSC_VER) || defined(__BORLANDC__) || defined(__MINGW32__)
+   // with WinSock DLL we need to initialize the WinSock before using gethostname
+   WORD wVersionRequested = MAKEWORD(1,0);
+   WSADATA WSAData;
+   int err = WSAStartup(wVersionRequested,&WSAData);
+   if (err != 0)
+   {
+      // Tell the user that we could not find a usable
+      // WinSock DLL.
+      WSACleanup();
+      return "127.0.0.1";
+   }
+#endif
+  
+#endif //HOST_NAME_MAX
+
+   std::string str;
+   char szHostName[HOST_NAME_MAX+1];
+   int r = gethostname(szHostName, HOST_NAME_MAX);
+   if( r == 0 )
+   {
+      // Get host adresses
+      struct hostent *pHost = gethostbyname(szHostName);
+      for( int i = 0; pHost!= NULL && pHost->h_addr_list[i]!= NULL; i++ )
+      {
+         for( int j = 0; j<pHost->h_length; j++ )
+         {
+            if( j > 0 ) str += ".";
+            str += Util::Format("%u", 
+                (unsigned int)((unsigned char*)pHost->h_addr_list[i])[j]);
+         }
+         // str now contains one local IP address 
+#if defined(_MSC_VER) || defined(__BORLANDC__) || defined(__MINGW32__)
+   WSACleanup();
+#endif
+
+      }
+   }
+   // If an error occur r == -1
+   // Most of the time it will return 127.0.0.1...
+   return str;
+}
+
+//-------------------------------------------------------------------------
 } // end namespace gdcm