src/OSD/OSD_Host.cxx

   1 // Copyright (c) 1998-1999 Matra Datavision
   2 // Copyright (c) 1999-2014 OPEN CASCADE SAS
   3 //
   4 // This file is part of Open CASCADE Technology software library.
   5 //
   6 // This library is free software; you can redistribute it and/or modify it under
   7 // the terms of the GNU Lesser General Public License version 2.1 as published
   8 // by the Free Software Foundation, with special exception defined in the file
   9 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
  10 // distribution for complete text of the license and disclaimer of any warranty.
  11 //
  12 // Alternatively, this file may be used under the terms of Open CASCADE
  13 // commercial license or contractual agreement.
  14
  15 #ifndef _WIN32
  16
  17 #include <OSD_Host.hxx>
  18 #include <OSD_OSDError.hxx>
  19 #include <OSD_WhoAmI.hxx>
  20 #include <Standard_ConstructionError.hxx>
  21 #include <Standard_NullObject.hxx>
  22 #include <TCollection_AsciiString.hxx>
  23
  24 const OSD_WhoAmI Iam = OSD_WHost;
  25
  26 #include <errno.h>
  27
  28 #include <sys/utsname.h> // For 'uname'
  29 #include <netdb.h>       // This is for 'gethostbyname'
  30 #include <unistd.h>
  31 #include <stdio.h>
  32
  33 #if defined(__osf__) || defined(DECOSF1)
  34 #include <sys/types.h>
  35 #include <sys/sysinfo.h>  // For 'getsysinfo'
  36 #include <sys/socket.h>   // To get ethernet address
  37 #include <sys/ioctl.h>
  38 #include <net/if.h>
  39 extern "C" {
  40   int gethostname(char* address, int len);
  41 }
  42 #endif
  43
  44 extern "C" {int sysinfo(int, char *, long);}
  45
  46
  47 // =========================================================================
  48
  49 OSD_Host::OSD_Host(){}
  50
  51 // =========================================================================
  52
  53 TCollection_AsciiString OSD_Host::SystemVersion(){
  54 struct utsname info;
  55 TCollection_AsciiString result;
  56
  57  uname (&info);
  58  result  = info.sysname;
  59  result += " ";
  60  result += info.release;
  61  return(result);
  62 }
  63
  64 // =========================================================================
  65
  66 OSD_SysType OSD_Host::SystemId()const{
  67 struct utsname info;
  68
  69  uname (&info);
  70
  71  if (!strcmp(info.sysname,"SunOS"))          return (OSD_UnixBSD);
  72  if (!strcmp(info.sysname,"ULTRIX"))         return (OSD_UnixBSD);
  73  if (!strcmp(info.sysname,"FreeBSD"))        return (OSD_UnixBSD);
  74  if (!strncmp(info.sysname,"Linux",5))       return (OSD_LinuxREDHAT);
  75  if (!strncmp(info.sysname,"IRIX", 4))       return (OSD_UnixSystemV);
  76  if (!strncmp(info.sysname,"OSF", 3))        return (OSD_OSF);
  77  if (!strcmp(info.sysname,"AIX"))            return (OSD_Aix);
  78  if (!strcmp(info.sysname,"UNIX_System_V"))  return (OSD_UnixSystemV);
  79  if (!strcmp(info.sysname,"VMS_POSIX"))      return (OSD_VMS);
  80  if (!strcmp(info.sysname,"Darwin"))         return (OSD_MacOs);
  81  return (OSD_Unknown);
  82 }
  83
  84 // =========================================================================
  85
  86 TCollection_AsciiString OSD_Host::HostName(){
  87 TCollection_AsciiString result;
  88 char value[65];
  89 int status;
  90
  91 status = gethostname(value, 64);
  92 if (status == -1) myError.SetValue(errno, Iam, "Host Name");
  93
  94  result = value;
  95  return(result);
  96 }
  97
  98
  99 // =========================================================================
 100
 101
 102 Standard_Integer OSD_Host::AvailableMemory(){
 103  Standard_Integer result;
 104
 105 #if defined(__osf__) || defined(DECOSF1)
 106  char buffer[16];
 107  ////     result = getsysinfo(GSI_PHYSMEM,buffer, 16,0,NULL);
 108  if (result != -1)
 109   result *= 1024;
 110 #else
 111  result = 0;
 112  //@@ A faire
 113 #endif
 114  return (result);
 115 }
 116
 117 // =========================================================================
 118
 119 TCollection_AsciiString OSD_Host::InternetAddress(){
 120  struct hostent internet_address;
 121  int a,b,c,d;
 122  char buffer[16];
 123  TCollection_AsciiString result,host;
 124
 125  host = HostName();
 126  memcpy(&internet_address,
 127         gethostbyname(host.ToCString()),
 128         sizeof(struct hostent));
 129
 130  // Gets each bytes into integers
 131  a = (unsigned char)internet_address.h_addr_list[0][0];
 132  b = (unsigned char)internet_address.h_addr_list[0][1];
 133  c = (unsigned char)internet_address.h_addr_list[0][2];
 134  d = (unsigned char)internet_address.h_addr_list[0][3];
 135  sprintf(buffer,"%d.%d.%d.%d",a,b,c,d);
 136  result = buffer;
 137  return(result);
 138 }
 139
 140 // =========================================================================
 141 OSD_OEMType OSD_Host::MachineType(){
 142 struct utsname info;
 143
 144  uname (&info);
 145
 146  if (!strcmp(info.sysname,"SunOS"))         return (OSD_SUN);
 147  if (!strcmp(info.sysname,"ULTRIX"))        return (OSD_DEC);
 148  if (!strncmp(info.sysname,"IRIX",4))       return (OSD_SGI);
 149  if (!strcmp(info.sysname,"HP-UX"))         return (OSD_HP);
 150  if (!strcmp(info.sysname,"UNIX_System_V")) return (OSD_NEC);
 151  if (!strcmp(info.sysname,"VMS_POSIX"))     return (OSD_VAX);
 152  if (!strncmp(info.sysname,"OSF",3))        return (OSD_DEC);
 153  if (!strncmp(info.sysname,"Linux",5))      return (OSD_LIN);
 154  if (!strcmp(info.sysname,"FreeBSD"))       return (OSD_LIN);
 155  if (!strncmp(info.sysname,"AIX",3))        return (OSD_AIX);
 156  if (!strcmp(info.sysname,"Darwin"))        return (OSD_MAC);
 157  return (OSD_Unavailable);
 158
 159 }
 160
 161 void OSD_Host::Reset(){
 162  myError.Reset();
 163 }
 164
 165 Standard_Boolean OSD_Host::Failed()const{
 166  return( myError.Failed());
 167 }
 168
 169 void OSD_Host::Perror() {
 170  myError.Perror();
 171 }
 172
 173
 174 Standard_Integer OSD_Host::Error()const{
 175  return( myError.Error());
 176 }
 177
 178 #else
 179
 180 //------------------------------------------------------------------------
 181 //-------------------  WNT Sources of OSD_Host ---------------------------
 182 //------------------------------------------------------------------------
 183
 184 #include <windows.h>
 185
 186 #include <OSD_Host.hxx>
 187
 188 #if defined(_MSC_VER)
 189   #pragma comment( lib, "WSOCK32.LIB" )
 190 #endif
 191
 192 void _osd_wnt_set_error ( OSD_Error&, OSD_WhoAmI, ... );
 193
 194 static BOOL                    fInit = FALSE;
 195 static TCollection_AsciiString hostName;
 196 static TCollection_AsciiString version;
 197 static TCollection_AsciiString interAddr;
 198 static Standard_Integer        memSize;
 199
 200 OSD_Host :: OSD_Host () {
 201 #ifndef OCCT_UWP
 202  DWORD              nSize;
 203  char               szHostName[MAX_COMPUTERNAME_LENGTH + 1];
 204  char*              hostAddr = 0;
 205  MEMORYSTATUS       ms;
 206  WSADATA            wd;
 207  PHOSTENT           phe;
 208  IN_ADDR            inAddr;
 209  OSVERSIONINFOW     osVerInfo;
 210
 211  if ( !fInit ) {
 212
 213   nSize                         = MAX_COMPUTERNAME_LENGTH + 1;
 214   osVerInfo.dwOSVersionInfoSize = sizeof ( OSVERSIONINFO );
 215
 216   ZeroMemory (&ms, sizeof(ms));
 217   ZeroMemory (szHostName, sizeof(char) * (MAX_COMPUTERNAME_LENGTH + 1));
 218
 219 #ifdef _MSC_VER
 220   // suppress GetVersionEx() deprecation warning
 221   #pragma warning(disable : 4996)
 222 #endif
 223   if (!GetVersionExW (&osVerInfo))
 224   {
 225     _osd_wnt_set_error (myError, OSD_WHost);
 226   }
 227   else if (!GetComputerNameA (szHostName, &nSize))
 228   {
 229     _osd_wnt_set_error (myError, OSD_WHost);
 230   }
 231   else
 232   {
 233     ms.dwLength = sizeof(MEMORYSTATUS);
 234     GlobalMemoryStatus (&ms);
 235   }  // end else
 236 #ifdef _MSC_VER
 237   #pragma warning(default : 4996)
 238 #endif
 239
 240   if (  !Failed ()  ) {
 241
 242     memSize = (Standard_Integer) ms.dwAvailPageFile;
 243
 244    if (   WSAStartup (  MAKEWORD( 1, 1 ), &wd  )   ) {
 245
 246     _osd_wnt_set_error ( myError, OSD_WHost );
 247
 248    } else if (   (  phe = gethostbyname (szHostName)  ) == NULL   ) {
 249
 250     _osd_wnt_set_error ( myError, OSD_WHost );
 251
 252    } else {
 253
 254     CopyMemory (  &inAddr, *phe -> h_addr_list, sizeof ( IN_ADDR )  );
 255     hostAddr = inet_ntoa ( inAddr );
 256
 257    }  // end else
 258
 259   }  // end if
 260
 261   if (  !Failed ()  ) {
 262
 263    hostName  = szHostName;
 264    interAddr = Standard_CString ( hostAddr );
 265    wsprintf (
 266     osVerInfo.szCSDVersion, TEXT( "Windows NT Version %d.%d" ),
 267     osVerInfo.dwMajorVersion, osVerInfo.dwMinorVersion
 268    );
 269    version = osVerInfo.szCSDVersion;
 270
 271    fInit = TRUE;
 272
 273   }  // end if
 274
 275  }  // end if
 276
 277  if ( fInit )
 278
 279   myName = hostName;
 280 #endif
 281 }  // end constructor
 282
 283 TCollection_AsciiString OSD_Host :: SystemVersion () {
 284
 285  return version;
 286
 287 }  // end OSD_Host :: SystemVersion
 288
 289 OSD_SysType OSD_Host :: SystemId () const {
 290
 291  return OSD_WindowsNT;
 292
 293 }  // end OSD_Host :: SystemId
 294
 295 TCollection_AsciiString OSD_Host :: HostName () {
 296
 297  return hostName;
 298
 299 }  // end OSD_Host :: HostName
 300
 301 Standard_Integer OSD_Host :: AvailableMemory () {
 302
 303  return memSize;
 304
 305 }  // end OSD_Host :: AvailableMemory
 306
 307 TCollection_AsciiString OSD_Host :: InternetAddress () {
 308
 309  return interAddr;
 310
 311 }  // end OSD_Host :: InternetAddress
 312
 313 OSD_OEMType OSD_Host :: MachineType () {
 314
 315  return OSD_PC;
 316
 317 }  // end OSD_Host :: MachineTYpe
 318
 319 Standard_Boolean OSD_Host :: Failed () const {
 320
 321  return myError.Failed ();
 322
 323 }  // end OSD_Host :: Failed
 324
 325 void OSD_Host :: Reset () {
 326
 327  myError.Reset ();
 328
 329 }  // end OSD_Host :: Reset
 330
 331 void OSD_Host :: Perror () {
 332
 333  myError.Perror ();
 334
 335 }  // end OSD_Host :: Perror
 336
 337 Standard_Integer OSD_Host :: Error () const {
 338
 339  return myError.Error ();
 340
 341 }  //end OSD_Host :: Error
 342
 343 #endif
 344
 345
 346
 347
 348