projects/stargazer/plugins/other/snmp/snmp.cpp

   1 #include <sys/types.h>
   2 #include <sys/socket.h>
   3 #include <arpa/inet.h>
   4
   5 #include <cstring>
   6 #include <cerrno>
   7 #include <ctime>
   8 #include <csignal>
   9
  10 #include <vector>
  11 #include <algorithm>
  12
  13 #include "asn1/OpenPDU.h"
  14 #include "asn1/ClosePDU.h"
  15 #include "asn1/RReqPDU.h"
  16 #include "asn1/OBJECT_IDENTIFIER.h"
  17 #include "asn1/ber_decoder.h"
  18 #include "asn1/der_encoder.h"
  19
  20 #include "snmp.h"
  21 #include "stg/common.h"
  22
  23 bool WaitPackets(int sd);
  24
  25 class SNMP_AGENT_CREATOR
  26 {
  27 private:
  28     SNMP_AGENT * snmpAgent;
  29
  30 public:
  31     SNMP_AGENT_CREATOR()
  32         : snmpAgent(new SNMP_AGENT())
  33         {
  34         };
  35     ~SNMP_AGENT_CREATOR()
  36         {
  37         printfd(__FILE__, "SNMP_AGENT_CREATOR::~SNMP_AGENT_CREATOR()\n");
  38         delete snmpAgent;
  39         };
  40
  41     SNMP_AGENT * GetPlugin()
  42         {
  43         return snmpAgent;
  44         };
  45 };
  46
  47 SNMP_AGENT_CREATOR sac;
  48
  49 PLUGIN * GetPlugin()
  50 {
  51 return sac.GetPlugin();
  52 }
  53
  54 int SendOpenPDU(int fd)
  55 {
  56 const char * description = "Stg SNMP Agent";
  57 int oid[] = {1, 3, 6, 1, 4, 1, 9363, 1, 5, 2, 1, 1};
  58 asn_enc_rval_t error;
  59 OpenPDU_t msg;
  60
  61 memset(&msg, 0, sizeof(msg));
  62
  63 msg.present = OpenPDU_PR_simple;
  64 asn_long2INTEGER(&msg.choice.simple.version, SimpleOpen__version_version_1);
  65 OBJECT_IDENTIFIER_set_arcs(&msg.choice.simple.identity,
  66                            oid,
  67                            sizeof(oid[0]),
  68                            7);
  69 OCTET_STRING_fromString(&msg.choice.simple.description,
  70                      description);
  71 OCTET_STRING_fromString(&msg.choice.simple.password,
  72                      "");
  73
  74 char buffer[1024];
  75 error = der_encode_to_buffer(&asn_DEF_OpenPDU, &msg, buffer, sizeof(buffer));
  76
  77 if (error.encoded == -1)
  78     {
  79     printfd(__FILE__, "Could not encode OpenPDU (at %s)\n",
  80             error.failed_type ? error.failed_type->name : "unknown");
  81     return -1;
  82     }
  83 else
  84     {
  85     write(fd, buffer, error.encoded);
  86     printfd(__FILE__, "OpenPDU encoded successfully to %d bytes\n", error.encoded);
  87     }
  88 return 0;
  89 }
  90
  91 int SendClosePDU(int fd)
  92 {
  93 ClosePDU_t msg;
  94
  95 memset(&msg, 0, sizeof(msg));
  96
  97 asn_long2INTEGER(&msg, ClosePDU_goingDown);
  98
  99 char buffer[1024];
 100 asn_enc_rval_t error;
 101 error = der_encode_to_buffer(&asn_DEF_ClosePDU, &msg, buffer, sizeof(buffer));
 102
 103 if (error.encoded == -1)
 104     {
 105     printfd(__FILE__, "Could not encode ClosePDU (at %s)\n",
 106             error.failed_type ? error.failed_type->name : "unknown");
 107     return -1;
 108     }
 109 else
 110     {
 111     write(fd, buffer, error.encoded);
 112     printfd(__FILE__, "ClosePDU encoded successfully\n");
 113     }
 114 return 0;
 115 }
 116
 117 int SendRReqPDU(int fd)
 118 {
 119 int oid[] = {1, 3, 6, 1, 4, 1, 9363, 1};
 120 asn_enc_rval_t error;
 121 RReqPDU_t msg;
 122
 123 memset(&msg, 0, sizeof(msg));
 124
 125 msg.priority = 0;
 126 asn_long2INTEGER(&msg.operation, RReqPDU__operation_readOnly);
 127 OBJECT_IDENTIFIER_set_arcs(&msg.subtree,
 128                            oid,
 129                            sizeof(oid[0]),
 130                            8);
 131
 132 char buffer[1024];
 133 error = der_encode_to_buffer(&asn_DEF_RReqPDU, &msg, buffer, sizeof(buffer));
 134
 135 if (error.encoded == -1)
 136     {
 137     printfd(__FILE__, "Could not encode RReqPDU (at %s)\n",
 138             error.failed_type ? error.failed_type->name : "unknown");
 139     return -1;
 140     }
 141 else
 142     {
 143     write(fd, buffer, error.encoded);
 144     printfd(__FILE__, "RReqPDU encoded successfully to %d bytes\n", error.encoded);
 145     }
 146 return 0;
 147 }
 148
 149 SMUX_PDUs_t * RecvSMUXPDUs(int fd)
 150 {
 151 char buffer[1024];
 152 SMUX_PDUs_t * pdus = NULL;
 153
 154 memset(buffer, 0, sizeof(buffer));
 155
 156 size_t length = read(fd, buffer, sizeof(buffer));
 157 if (length < 1)
 158     return NULL;
 159 asn_dec_rval_t error;
 160 error = ber_decode(0, &asn_DEF_SMUX_PDUs, (void **)&pdus, buffer, length);
 161 if(error.code != RC_OK)
 162     {
 163     printfd(__FILE__, "Failed to decode PDUs at byte %ld\n",
 164             (long)error.consumed);
 165     return NULL;
 166     }
 167 return pdus;
 168 }
 169
 170 int ParseIntInRange(const std::string & str,
 171                     int min,
 172                     int max,
 173                     int * val)
 174 {
 175 if (str2x(str.c_str(), *val))
 176     {
 177     return -1;
 178     }
 179 if (*val < min || *val > max)
 180     {
 181     return -1;
 182     }
 183 return 0;
 184 }
 185
 186 SNMP_AGENT_SETTINGS::SNMP_AGENT_SETTINGS()
 187     : ip(0),
 188       port(0)
 189 {}
 190
 191 int SNMP_AGENT_SETTINGS::ParseSettings(const MODULE_SETTINGS & s)
 192 {
 193 PARAM_VALUE pv;
 194 std::vector<PARAM_VALUE>::const_iterator pvi;
 195 int p;
 196 ///////////////////////////
 197 pv.param = "Port";
 198 pvi = std::find(s.moduleParams.begin(), s.moduleParams.end(), pv);
 199 if (pvi == s.moduleParams.end())
 200     {
 201     errorStr = "Parameter \'Port\' not found.";
 202     printfd(__FILE__, "Parameter 'Port' not found\n");
 203     return -1;
 204     }
 205 if (ParseIntInRange(pvi->value[0], 2, 65535, &p))
 206     {
 207     errorStr = "Cannot parse parameter \'Port\': " + errorStr;
 208     printfd(__FILE__, "Cannot parse parameter 'Port'\n");
 209     return -1;
 210     }
 211 port = p;
 212
 213 pv.param = "Password";
 214 pvi = std::find(s.moduleParams.begin(), s.moduleParams.end(), pv);
 215 if (pvi == s.moduleParams.end())
 216     {
 217     errorStr = "Parameter \'Password\' not found.";
 218     printfd(__FILE__, "Parameter 'Password' not found\n");
 219     password = "";
 220     }
 221 else
 222     {
 223     password = pvi->value[0];
 224     }
 225
 226 pv.param = "Server";
 227 pvi = std::find(s.moduleParams.begin(), s.moduleParams.end(), pv);
 228 if (pvi == s.moduleParams.end())
 229     {
 230     errorStr = "Parameter \'Server\' not found.";
 231     printfd(__FILE__, "Parameter 'Server' not found\n");
 232     return -1;
 233     }
 234 ip = inet_strington(pvi->value[0]);
 235
 236 return 0;
 237 }
 238
 239 SNMP_AGENT::SNMP_AGENT()
 240     : PLUGIN(),
 241       running(false),
 242       stopped(true),
 243       sock(-1)
 244 {
 245 pthread_mutex_init(&mutex, NULL);
 246
 247 handlers[SMUX_PDUs_PR_close] = &SNMP_AGENT::CloseHandler;
 248 handlers[SMUX_PDUs_PR_registerResponse] = &SNMP_AGENT::RegisterResponseHandler;
 249 handlers[SMUX_PDUs_PR_pdus] = &SNMP_AGENT::PDUsHandler;
 250 handlers[SMUX_PDUs_PR_commitOrRollback] = &SNMP_AGENT::CommitOrRollbackHandler;
 251 }
 252
 253 SNMP_AGENT::~SNMP_AGENT()
 254 {
 255 printfd(__FILE__, "SNMP_AGENT::~SNMP_AGENT()\n");
 256 pthread_mutex_destroy(&mutex);
 257 }
 258
 259 int SNMP_AGENT::ParseSettings()
 260 {
 261 return snmpAgentSettings.ParseSettings(settings);
 262 }
 263
 264 int SNMP_AGENT::Start()
 265 {
 266 if (PrepareNet())
 267     return -1;
 268
 269 if (!running)
 270     {
 271     if (pthread_create(&thread, NULL, Runner, this))
 272         {
 273         errorStr = "Cannot create thread.";
 274         printfd(__FILE__, "Cannot create thread\n");
 275         return -1;
 276         }
 277     }
 278
 279 return 0;
 280 }
 281
 282 int SNMP_AGENT::Stop()
 283 {
 284 printfd(__FILE__, "SNMP_AGENT::Stop() - Before\n");
 285 running = false;
 286
 287 if (!stopped)
 288     {
 289     //5 seconds to thread stops itself
 290     for (int i = 0; i < 25 && !stopped; i++)
 291         {
 292         struct timespec ts = {0, 200000000};
 293         nanosleep(&ts, NULL);
 294         }
 295
 296     //after 5 seconds waiting thread still running. now killing it
 297     if (!stopped)
 298         {
 299         printfd(__FILE__, "SNMP_AGENT::Stop() - failed to stop thread, killing it\n");
 300         if (pthread_kill(thread, SIGINT))
 301             {
 302             errorStr = "Cannot kill thread.";
 303             printfd(__FILE__, "SNMP_AGENT::Stop() - Cannot kill thread\n");
 304             return -1;
 305             }
 306         printfd(__FILE__, "SNMP_AGENT::Stop() -  killed Run\n");
 307         }
 308     }
 309
 310 pthread_join(thread, NULL);
 311
 312 close(sock);
 313
 314 printfd(__FILE__, "SNMP_AGENT::Stop() - After\n");
 315 return 0;
 316 }
 317
 318 void * SNMP_AGENT::Runner(void * d)
 319 {
 320 SNMP_AGENT * snmpAgent = static_cast<SNMP_AGENT *>(d);
 321
 322 snmpAgent->Run();
 323
 324 return NULL;
 325 }
 326
 327 void SNMP_AGENT::Run()
 328 {
 329 SendOpenPDU(sock);
 330 SendRReqPDU(sock);
 331 running = true;
 332 stopped = false;
 333 printfd(__FILE__, "SNMP_AGENT::Run() - Before\n");
 334 while(running)
 335     {
 336     if (WaitPackets(sock))
 337         {
 338         SMUX_PDUs_t * pdus = RecvSMUXPDUs(sock);
 339         if (pdus)
 340             DispatchPDUs(pdus);
 341         }
 342     if (!running)
 343         break;
 344     }
 345 printfd(__FILE__, "SNMP_AGENT::Run() - After\n");
 346 SendClosePDU(sock);
 347 stopped = true;
 348 }
 349
 350 bool SNMP_AGENT::PrepareNet()
 351 {
 352 sock = socket(AF_INET, SOCK_STREAM, 0);
 353
 354 if (sock < 0)
 355     {
 356     errorStr = "Cannot create socket.";
 357     printfd(__FILE__, "Cannot create socket\n");
 358     return true;
 359     }
 360
 361 struct sockaddr_in addr;
 362
 363 addr.sin_family = AF_INET;
 364 addr.sin_port = htons(snmpAgentSettings.GetPort());
 365 addr.sin_addr.s_addr = snmpAgentSettings.GetIP();
 366
 367 if (connect(sock, reinterpret_cast<struct sockaddr *>(&addr), sizeof(addr)))
 368     {
 369     errorStr = "Cannot connect.";
 370     printfd(__FILE__, "Cannot connect. Message: '%s'\n", strerror(errno));
 371     return true;
 372     }
 373
 374 return false;
 375 }
 376
 377 bool WaitPackets(int sd)
 378 {
 379 fd_set rfds;
 380 FD_ZERO(&rfds);
 381 FD_SET(sd, &rfds);
 382
 383 struct timeval tv;
 384 tv.tv_sec = 0;
 385 tv.tv_usec = 500000;
 386
 387 int res = select(sd + 1, &rfds, NULL, NULL, &tv);
 388 if (res == -1) // Error
 389     {
 390     if (errno != EINTR)
 391         {
 392         printfd(__FILE__, "Error on select: '%s'\n", strerror(errno));
 393         }
 394     return false;
 395     }
 396
 397 if (res == 0) // Timeout
 398     {
 399     return false;
 400     }
 401
 402 return true;
 403 }
 404
 405 bool SNMP_AGENT::DispatchPDUs(const SMUX_PDUs_t * pdus)
 406 {
 407 std::map<SMUX_PDUs_PR, SNMPPacketHandler>::iterator it;
 408 it = handlers.find(pdus->present);
 409 if (it != handlers.end())
 410     {
 411     return (this->*(it->second))(pdus);
 412     }
 413 else
 414     {
 415     switch (pdus->present)
 416         {
 417         case SMUX_PDUs_PR_NOTHING:
 418             printfd(__FILE__, "PDUs: nothing\n");
 419             break;
 420         case SMUX_PDUs_PR_open:
 421             printfd(__FILE__, "PDUs: open\n");
 422             break;
 423         case SMUX_PDUs_PR_registerRequest:
 424             printfd(__FILE__, "PDUs: registerRequest\n");
 425             break;
 426         default:
 427             printfd(__FILE__, "PDUs: undefined\n");
 428         }
 429     asn_fprint(stderr, &asn_DEF_SMUX_PDUs, pdus);
 430     }
 431 return false;
 432 }
 433
 434 bool SNMP_AGENT::CloseHandler(const SMUX_PDUs_t * pdus)
 435 {
 436 printfd(__FILE__, "SNMP_AGENT::CloseHandler()\n");
 437 asn_fprint(stderr, &asn_DEF_SMUX_PDUs, pdus);
 438 return false;
 439 }
 440
 441 bool SNMP_AGENT::RegisterResponseHandler(const SMUX_PDUs_t * pdus)
 442 {
 443 printfd(__FILE__, "SNMP_AGENT::RegisterResponseHandler()\n");
 444 asn_fprint(stderr, &asn_DEF_SMUX_PDUs, pdus);
 445 return false;
 446 }
 447
 448 bool SNMP_AGENT::PDUsHandler(const SMUX_PDUs_t * pdus)
 449 {
 450 printfd(__FILE__, "SNMP_AGENT::PDUsHandler()\n");
 451 asn_fprint(stderr, &asn_DEF_SMUX_PDUs, pdus);
 452 return false;
 453 }
 454
 455 bool SNMP_AGENT::CommitOrRollbackHandler(const SMUX_PDUs_t * pdus)
 456 {
 457 printfd(__FILE__, "SNMP_AGENT::CommitOrRollbackHandler()\n");
 458 asn_fprint(stderr, &asn_DEF_SMUX_PDUs, pdus);
 459 return false;
 460 }