Salome HOME
This commit was generated by cvs2git to track changes on a CVS vendor
[modules/kernel.git] / src / Utils / OpUtil.cxx
1 //  SALOME Utils : general SALOME's definitions and tools
2 //
3 //  Copyright (C) 2003  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 //  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS 
5 // 
6 //  This library is free software; you can redistribute it and/or 
7 //  modify it under the terms of the GNU Lesser General Public 
8 //  License as published by the Free Software Foundation; either 
9 //  version 2.1 of the License. 
10 // 
11 //  This library is distributed in the hope that it will be useful, 
12 //  but WITHOUT ANY WARRANTY; without even the implied warranty of 
13 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU 
14 //  Lesser General Public License for more details. 
15 // 
16 //  You should have received a copy of the GNU Lesser General Public 
17 //  License along with this library; if not, write to the Free Software 
18 //  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA 
19 // 
20 //  See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org 
21 //
22 //
23 //
24 //  File   : OpUtil.cxx
25 //  Module : SALOME
26
27 #include "utilities.h" 
28 #include "OpUtil.hxx"
29 #include <unistd.h>
30 #include <errno.h>
31 #include <string.h>
32 using namespace std;
33
34 int gethostname(char *name, size_t len);
35
36 string GetHostname()
37 {
38   int ls = 100, r = 0;
39   char *s;
40
41   while (ls < 10000) {
42     ls *= 2;
43     s = new char[ls];
44     r = gethostname(s, ls-1);
45     switch (r) 
46       {
47       case 0:
48           break;
49       default:
50 #ifdef EINVAL
51       case EINVAL:
52 #endif
53 #ifdef ENAMETOOLONG
54       case ENAMETOOLONG:
55 #endif
56         delete [] s;
57         continue;
58       }
59   }
60
61   if (r != 0) {
62     s = new char[50];
63     strcpy(s, "localhost");
64   }
65
66   // remove all after '.'
67   char *aDot = (strchr(s,'.'));
68   if (aDot) aDot[0] = '\0';
69
70   string p = s;
71   delete [] s;
72   return p;
73 }
74