First commit
[anna.git] / source / comm / functions.cpp
1 // ANNA - Anna is Not 'N' Anymore
2 //
3 // (c) Copyright 2005-2014 Eduardo Ramos Testillano & Francisco Ruiz Rayo
4 //
5 // https://bitbucket.org/testillano/anna
6 //
7 // Redistribution and use in source and binary forms, with or without
8 // modification, are permitted provided that the following conditions
9 // are met:
10 //
11 //     * Redistributions of source code must retain the above copyright
12 // notice, this list of conditions and the following disclaimer.
13 //     * Redistributions in binary form must reproduce the above
14 // copyright notice, this list of conditions and the following disclaimer
15 // in the documentation and/or other materials provided with the
16 // distribution.
17 //     * Neither the name of Google Inc. nor the names of its
18 // contributors may be used to endorse or promote products derived from
19 // this software without specific prior written permission.
20 //
21 // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
22 // "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
23 // LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
24 // A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
25 // OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
26 // SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
27 // LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
28 // DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
29 // THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
30 // (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
31 // OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 //
33 // Authors: eduardo.ramos.testillano@gmail.com
34 //          cisco.tierra@gmail.com
35
36
37 #include <unistd.h>
38 #include <netdb.h>
39
40 #ifndef MAXHOSTNAMELEN
41 #define MAXHOSTNAMELEN 64
42 #pragma Definiendo MAXHOSTNAMELEN
43 #endif
44
45 #include <anna/comm/functions.hpp>
46 #include <anna/comm/Application.hpp>
47 #include <anna/comm/Communicator.hpp>
48 #include <anna/comm/Service.hpp>
49 #include <anna/comm/Server.hpp>
50 #include <anna/core/tracing/Logger.hpp>
51
52 using namespace std;
53 using namespace anna;
54
55 comm::Application& comm::functions::getApp()
56 throw(RuntimeException) {
57   if(comm::Application::st_application == NULL)
58     throw RuntimeException("No Application class has been defined", ANNA_FILE_LOCATION);
59
60   if(comm::Application::st_application->supportCommunication() == false)
61     throw RuntimeException("Defined Application class has no communications support. Must inherit from anna::comm::Application or superior", ANNA_FILE_LOCATION);
62
63   return *(static_cast <comm::Application*>(comm::Application::st_application));
64 }
65
66 string comm::functions::getHostName()
67 throw(RuntimeException) {
68   char hostName [MAXHOSTNAMELEN];
69
70   if(gethostname(hostName, MAXHOSTNAMELEN) != 0)
71     throw RuntimeException("Cannot obtain the hostname", errno, ANNA_FILE_LOCATION);
72
73   return string(hostName);
74 }
75
76
77
78
79 std::string comm::functions::resolveIP(const char* hostname)
80 throw(RuntimeException) {
81   std::string result;
82   struct hostent *host;
83
84   if((host = gethostbyname(hostname)) == NULL) {
85     string msg("comm::functions::resolveIP | Host to resolve: ");
86     msg += hostname;
87     msg += " | ";
88     msg += hstrerror(h_errno);
89     throw RuntimeException(msg, ANNA_FILE_LOCATION);
90   }
91
92   if(host->h_addrtype != AF_INET) {
93     string msg("comm::functions::resolveIP | Host to resolve: ");
94     msg += hostname;
95     msg += " | Address type unsupported";
96     throw RuntimeException(msg, ANNA_FILE_LOCATION);
97   }
98
99   LOGDEBUG(
100     string msg("comm::functions::resolveIP | Host to resolve: ");
101     msg += hostname;
102
103   if(host->h_name != NULL) { msg += " | Official name: "; msg += host->h_name; }
104 if(host->h_aliases[0] != NULL) {
105   msg += " | Aliases:";
106
107   for(int i = 0; host->h_aliases[i] != NULL; i ++) { msg += " "; msg += host->h_aliases[i]; }
108   }
109   msg += " | Address type: ";
110   msg += functions::asString(host->h_addrtype);
111   msg += " | Address length: ";
112   msg += functions::asString(host->h_length);
113
114   if(host->h_addr_list[0] != NULL) {
115   msg += " | IPs:";
116
117   for(int i = 0; host->h_addr_list[i] != NULL; i ++) { msg += " "; msg += inet_ntoa(*reinterpret_cast <in_addr*>(host->h_addr_list[i])); }
118   }
119   Logger::debug(msg, ANNA_FILE_LOCATION);
120   );
121
122   if(host->h_addr_list[0] == NULL) {
123     string msg("comm::functions::resolveIP | Host to resolve: ");
124     msg += hostname;
125     msg += " | Address not resolved by the system";
126     throw RuntimeException(msg, ANNA_FILE_LOCATION);
127   }
128
129   // Assignment:
130   result = inet_ntoa(*reinterpret_cast <in_addr*>(host->h_addr_list[0]));   // inet_ntoa (const in_addr_t& address)
131   return result;
132 }
133
134
135 const char* comm::functions::codeInteger(char* result, const int n)
136 throw() {
137   int aux(htonl(n));
138   register char* w((char*) &aux);
139   *result = *w;
140   *(result + 1) = *(w + 1);
141   *(result + 2) = *(w + 2);
142   *(result + 3) = *(w + 3);
143   return result;
144 }
145
146 const char* comm::functions::codeShort(char* result, const short int n)
147 throw() {
148   short int aux(htons(n));
149   register char* w((char*) &aux);
150   *result = *w;
151   *(result + 1) = *(w + 1);
152   return result;
153 }
154
155 const char* comm::functions::codeInteger64(char* result, const Integer64 n)
156 throw() {
157   Integer64 aux(0xffffffff);
158   int n2;
159   aux <<= 32;
160   aux &= n;
161   n2 = (aux >> 32) & 0xffffffff;
162   codeInteger(result, n2);
163   n2 = n & 0xffffffff;
164   codeInteger(result + sizeof(int), n2);
165   return result;
166 }
167
168 /*static*/
169 const char* comm::functions::codeFloat(char* result, const float n)
170 throw() {
171   int ii;
172   anna_memcpy(&ii, &n, sizeof(n));
173   return functions::codeInteger(result, ii);
174 }
175
176 /*static*/
177 const char* comm::functions::codeDouble(char* result, const double n)
178 throw() {
179   Integer64 ii;
180   anna_memcpy(&ii, &n, sizeof(n));
181   return functions::codeInteger64(result, ii);
182 }
183
184 int comm::functions::decodeInteger(const char* data)
185 throw() {
186   int result;
187   register char* w((char*) &result);
188   *w  = *data;
189   *(w + 1) = *(data + 1);
190   *(w + 2) = *(data + 2);
191   *(w + 3) = *(data + 3);
192   return ntohl(result);
193 }
194
195 short int comm::functions::decodeShort(const char* data)
196 throw() {
197   short int result;
198   register char* w((char*) &result);
199   *w  = *data;
200   *(w + 1) = *(data + 1);
201   return ntohs(result);
202 }
203
204 Integer64 comm::functions::decodeInteger64(const char* data)
205 throw() {
206   Integer64 result(decodeInteger(data));
207   result <<= 32;
208   return result |= (decodeInteger(data + sizeof(int)) & 0xffffffff);
209 }
210
211 /*static*/
212 float comm::functions::decodeFloat(const char* data)
213 throw() {
214   float result;
215   int ii = functions::decodeInteger(data);
216   anna_memcpy(&result, &ii, sizeof(result));
217   return result;
218 }
219
220 /*static*/
221 double comm::functions::decodeDouble(const char* data)
222 throw() {
223   double result;
224   Integer64 ii = functions::decodeInteger64(data);
225   anna_memcpy(&result, &ii, sizeof(result));
226   return result;
227 }