projects/stargazer/plugins/configuration/sgconfig/rsconf.cpp

   1 /*
   2  *    This program is free software; you can redistribute it and/or modify
   3  *    it under the terms of the GNU General Public License as published by
   4  *    the Free Software Foundation; either version 2 of the License, or
   5  *    (at your option) any later version.
   6  *
   7  *    This program is distributed in the hope that it will be useful,
   8  *    but WITHOUT ANY WARRANTY; without even the implied warranty of
   9  *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  10  *    GNU General Public License for more details.
  11  *
  12  *    You should have received a copy of the GNU General Public License
  13  *    along with this program; if not, write to the Free Software
  14  *    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  15  */
  16
  17 /*******************************************************************
  18 *
  19 *    DESCRIPTION: æÁÊÌ Ó ÏÓÎÏ×ÎÙÍÉ ÆÕÎËÃÉÑÍÉ ÄÌÑ ÓÅÔÅ×ÏÇÏ ÏÂÍÅÎÁ ÄÁÎÎÙÍÉ
  20 *    Ó ÍÅÎÅÄÖÅÒÏÍ ËÌÉÅÎÔÏ×. ðÒÉÅÍ, ÐÅÒÅÄÁÞÁ É ÛÉÆÒÏ×ÁÎÉÅ ÓÏÏÂÝÅÎÉÊ.
  21 *
  22 *    AUTHOR: Boris Mikhailenko <stg34@stargazer.dp.ua>
  23 *
  24 *    $Revision: 1.24 $
  25 *    $Date: 2010/10/04 20:24:54 $
  26 *
  27 *******************************************************************/
  28
  29 #include <unistd.h> // close
  30
  31 #include <cerrno>
  32 #include <csignal>
  33 #include <cstdio> // snprintf
  34
  35 #include "stg/blowfish.h"
  36 #include "configproto.h"
  37
  38 #ifndef ENODATA
  39 // FreeBSD 4.* - suxx
  40 #define ENODATA -1
  41 #endif
  42
  43 enum CONF_STATE
  44     {
  45     confHdr,
  46     confLogin,
  47     confLoginCipher,
  48     confData
  49     };
  50
  51 enum
  52     {
  53     ans_ok = 0,
  54     ans_err
  55     };
  56
  57 //-----------------------------------------------------------------------------
  58 int CONFIGPROTO::Prepare()
  59 {
  60 int res;
  61 struct sockaddr_in listenAddr;
  62
  63 sigset_t sigmask, oldmask;
  64 sigemptyset(&sigmask);
  65 sigaddset(&sigmask, SIGINT);
  66 sigaddset(&sigmask, SIGTERM);
  67 sigaddset(&sigmask, SIGUSR1);
  68 sigaddset(&sigmask, SIGHUP);
  69 pthread_sigmask(SIG_BLOCK, &sigmask, &oldmask);
  70
  71 listenSocket = socket(PF_INET, SOCK_STREAM, 0);
  72
  73 if (listenSocket < 0)
  74     {
  75     errorStr = "Create NET_CONFIGURATOR socket failed.";
  76     logger("Cannot create a socket: %s", strerror(errno));
  77     return -1;
  78     }
  79
  80 listenAddr.sin_family = PF_INET;
  81 listenAddr.sin_port = htons(port);
  82 listenAddr.sin_addr.s_addr = inet_addr("0.0.0.0");
  83
  84 int lng = 1;
  85
  86 if (0 != setsockopt(listenSocket, SOL_SOCKET, SO_REUSEADDR, &lng, 4))
  87     {
  88     errorStr = "Setsockopt failed. " + std::string(strerror(errno));
  89     logger("setsockopt error: %s", strerror(errno));
  90     return -1;
  91     }
  92
  93 res = bind(listenSocket, (struct sockaddr*)&listenAddr, sizeof(listenAddr));
  94
  95 if (res == -1)
  96     {
  97     errorStr = "Bind admin socket failed";
  98     logger("Cannot bind the socket: %s", strerror(errno));
  99     return -1;
 100     }
 101
 102 res = listen(listenSocket, 0);
 103 if (res == -1)
 104     {
 105     errorStr = "Listen admin socket failed";
 106     logger("Cannot listen the socket: %s", strerror(errno));
 107     return -1;
 108     }
 109
 110 errorStr = "";
 111 nonstop = true;
 112 return 0;
 113 }
 114 //-----------------------------------------------------------------------------
 115 int CONFIGPROTO::Stop()
 116 {
 117 nonstop = false;
 118 close(listenSocket);
 119 //TODO: Idiotism
 120 int                 sock;
 121 struct sockaddr_in  addr;
 122 socklen_t           addrLen;
 123 addr.sin_family = PF_INET;
 124 addr.sin_port = htons(port);
 125 addr.sin_addr.s_addr = inet_addr("127.0.0.1");
 126
 127 addrLen = sizeof(addr);
 128 sock = socket(PF_INET, SOCK_STREAM, 0);
 129 connect(sock, (sockaddr*)&addr, addrLen);
 130 close(sock);
 131 //Idiotism end
 132 return 0;
 133 }
 134 //-----------------------------------------------------------------------------
 135 void CONFIGPROTO::Run()
 136 {
 137 state = confHdr;
 138
 139 while (nonstop)
 140     {
 141     state = confHdr;
 142     struct sockaddr_in outerAddr;
 143     socklen_t outerAddrLen(sizeof(outerAddr));
 144     int outerSocket = accept(listenSocket,
 145                              (struct sockaddr*)(&outerAddr),
 146                              &outerAddrLen);
 147
 148     if (!nonstop)
 149         {
 150         break;
 151         }
 152
 153     if (outerSocket < 0)
 154         {
 155         logger("accept error: %s", strerror(errno));
 156         printfd(__FILE__, "accept failed\n");
 157         continue;
 158         }
 159
 160     adminIP = *(unsigned int*)&(outerAddr.sin_addr);
 161
 162     if (state == confHdr)
 163         {
 164         if (RecvHdr(outerSocket) < 0)
 165             {
 166             close(outerSocket);
 167             continue;
 168             }
 169         if (state == confLogin)
 170             {
 171             if (SendHdrAnswer(outerSocket, ans_ok) < 0)
 172                 {
 173                 close(outerSocket);
 174                 continue;
 175                 }
 176             if (RecvLogin(outerSocket) < 0)
 177                 {
 178                 close(outerSocket);
 179                 continue;
 180                 }
 181             if (state == confLoginCipher)
 182                 {
 183                 if (SendLoginAnswer(outerSocket) < 0)
 184                     {
 185                     close(outerSocket);
 186                     continue;
 187                     }
 188                 if (RecvLoginS(outerSocket) < 0)
 189                     {
 190                     close(outerSocket);
 191                     continue;
 192                     }
 193                 if (state == confData)
 194                     {
 195                     if (SendLoginSAnswer(outerSocket, ans_ok) < 0)
 196                         {
 197                         close(outerSocket);
 198                         continue;
 199                         }
 200                     if (RecvData(outerSocket) < 0)
 201                         {
 202                         close(outerSocket);
 203                         continue;
 204                         }
 205                     state = confHdr;
 206                     }
 207                 else
 208                     {
 209                     if (SendLoginSAnswer(outerSocket, ans_err) < 0)
 210                         {
 211                         close(outerSocket);
 212                         continue;
 213                         }
 214                     WriteLogAccessFailed(adminIP);
 215                     }
 216                 }
 217             else
 218                 {
 219                 WriteLogAccessFailed(adminIP);
 220                 }
 221             }
 222         else
 223             {
 224             WriteLogAccessFailed(adminIP);
 225             if (SendHdrAnswer(outerSocket, ans_err) < 0)
 226                 {
 227                 close(outerSocket);
 228                 continue;
 229                 }
 230             }
 231         }
 232     else
 233         {
 234         WriteLogAccessFailed(adminIP);
 235         }
 236     printfd(__FILE__, "Successfull connection from %s\n", inet_ntostring(outerAddr.sin_addr.s_addr).c_str());
 237     close(outerSocket);
 238     }
 239 }
 240 //-----------------------------------------------------------------------------
 241 int CONFIGPROTO::RecvHdr(int sock)
 242 {
 243 char buf[sizeof(STG_HEADER)];
 244 memset(buf, 0, sizeof(STG_HEADER));
 245 size_t stgHdrLen = sizeof(STG_HEADER) - 1; // Without 0-char
 246 size_t pos = 0;
 247 while (pos < stgHdrLen)
 248     {
 249     if (!WaitPackets(sock))
 250         {
 251         state = confHdr;
 252         SendError("Bad request");
 253         return -1;
 254         }
 255     ssize_t ret = recv(sock, &buf[pos], static_cast<int>(stgHdrLen) - static_cast<int>(pos), 0);
 256     if (ret <= 0)
 257         {
 258         if (ret < 0)
 259             logger("recv error: %s", strerror(errno));
 260         state = confHdr;
 261         return -1;
 262         }
 263     pos += ret;
 264     }
 265
 266 if (0 == strncmp(buf, STG_HEADER, strlen(STG_HEADER)))
 267     {
 268     state = confLogin;
 269     return 0;
 270     }
 271 else
 272     {
 273     SendError("Bad request");
 274     }
 275
 276 state = confHdr;
 277 return -1;
 278 }
 279 //-----------------------------------------------------------------------------
 280 int CONFIGPROTO::SendHdrAnswer(int sock, int err)
 281 {
 282 if (err)
 283     {
 284     if (send(sock, ERR_HEADER, sizeof(ERR_HEADER) - 1, 0) < 0)
 285         {
 286         logger("send error: %s", strerror(errno));
 287         return -1;
 288         }
 289     }
 290 else
 291     {
 292     if (send(sock, OK_HEADER, sizeof(OK_HEADER) - 1, 0) < 0)
 293         {
 294         logger("send error: %s", strerror(errno));
 295         return -1;
 296         }
 297     }
 298
 299 return 0;
 300 }
 301 //-----------------------------------------------------------------------------
 302 int CONFIGPROTO::RecvLogin(int sock)
 303 {
 304 char login[ADM_LOGIN_LEN + 1];
 305
 306 memset(login, 0, ADM_LOGIN_LEN + 1);
 307
 308 size_t pos = 0;
 309 while (pos < ADM_LOGIN_LEN) {
 310     if (!WaitPackets(sock))
 311         {
 312         state = confHdr;
 313         return ENODATA;
 314         }
 315
 316     ssize_t ret = recv(sock, &login[pos], ADM_LOGIN_LEN - static_cast<int>(pos), 0);
 317
 318     if (ret <= 0)
 319         {
 320         // Error in network
 321         logger("recv error: %s", strerror(errno));
 322         state = confHdr;
 323         return ENODATA;
 324         }
 325
 326     pos += ret;
 327 }
 328
 329 if (admins->Find(login, &currAdmin))
 330     {
 331     // Admin not found
 332     state = confHdr;
 333     return ENODATA;
 334     }
 335
 336 currAdmin->SetIP(adminIP);
 337 adminLogin = login;
 338 state = confLoginCipher;
 339 return 0;
 340 }
 341 //-----------------------------------------------------------------------------
 342 int CONFIGPROTO::SendLoginAnswer(int sock)
 343 {
 344 if (send(sock, OK_LOGIN, sizeof(OK_LOGIN) - 1, 0) < 0)
 345     {
 346     logger("Send OK_LOGIN error in SendLoginAnswer.");
 347     return -1;
 348     }
 349 return 0;
 350 }
 351 //-----------------------------------------------------------------------------
 352 int CONFIGPROTO::RecvLoginS(int sock)
 353 {
 354 char loginS[ADM_LOGIN_LEN + 1];
 355 memset(loginS, 0, ADM_LOGIN_LEN + 1);
 356
 357 size_t pos = 0;
 358 while (pos < ADM_LOGIN_LEN)
 359     {
 360     if (!WaitPackets(sock))
 361         {
 362         state = confHdr;
 363         return ENODATA;
 364         }
 365
 366     ssize_t ret = recv(sock, &loginS[pos], ADM_LOGIN_LEN - static_cast<int>(pos), 0);
 367
 368     if (ret <= 0)
 369         {
 370         // Network error
 371         printfd(__FILE__, "recv error: '%s'\n", strerror(errno));
 372         logger("recv error: %s", strerror(errno));
 373         state = confHdr;
 374         return ENODATA;
 375         }
 376
 377     pos += ret;
 378     }
 379
 380 if (currAdmin->GetLogin().empty())
 381     {
 382     state = confHdr;
 383     return ENODATA;
 384     }
 385
 386 BLOWFISH_CTX ctx;
 387 EnDecodeInit(currAdmin->GetPassword().c_str(), ADM_PASSWD_LEN, &ctx);
 388
 389 char login[ADM_LOGIN_LEN + 1];
 390 for (size_t i = 0; i < ADM_LOGIN_LEN / 8; i++)
 391     {
 392     DecodeString(login + i * 8, loginS + i * 8, &ctx);
 393     }
 394
 395 if (currAdmin == admins->GetNoAdmin())
 396     {
 397     // If there are no admins registered in the system - give access with any password
 398     state = confData;
 399     return 0;
 400     }
 401
 402 if (strncmp(currAdmin->GetLogin().c_str(), login, ADM_LOGIN_LEN) != 0)
 403     {
 404     state = confHdr;
 405     return ENODATA;
 406     }
 407
 408 state = confData;
 409 adminPassword = currAdmin->GetPassword();
 410 return 0;
 411 }
 412 //-----------------------------------------------------------------------------
 413 int CONFIGPROTO::SendLoginSAnswer(int sock, int err)
 414 {
 415 if (err)
 416     {
 417     if (send(sock, ERR_LOGINS, sizeof(ERR_LOGINS) - 1, 0) < 0)
 418         {
 419         logger("send error: %s", strerror(errno));
 420         return -1;
 421         }
 422     }
 423 else
 424     {
 425     if (send(sock, OK_LOGINS, sizeof(OK_LOGINS) - 1, 0) < 0)
 426         {
 427         logger("send error: %s", strerror(errno));
 428         return -1;
 429         }
 430     }
 431 return 0;
 432 }
 433 //-----------------------------------------------------------------------------
 434 int CONFIGPROTO::RecvData(int sock)
 435 {
 436 requestList.clear();
 437 BLOWFISH_CTX ctx;
 438
 439 EnDecodeInit(currAdmin->GetPassword().c_str(), ADM_PASSWD_LEN, &ctx);
 440
 441 while (1)
 442     {
 443     bool done = false;
 444     char bufferS[8];
 445     size_t pos = 0;
 446     while (pos < sizeof(bufferS))
 447         {
 448         if (!WaitPackets(sock))
 449             {
 450             done = true;
 451             break;
 452             }
 453
 454         ssize_t ret = recv(sock, &bufferS[pos], sizeof(bufferS) - static_cast<int>(pos), 0);
 455         if (ret < 0)
 456             {
 457             // Network error
 458             logger("recv error: %s", strerror(errno));
 459             printfd(__FILE__, "recv error: '%s'\n", strerror(errno));
 460             return -1;
 461             }
 462
 463         if (ret == 0)
 464             {
 465             done = true;
 466             break;
 467             }
 468
 469         pos += ret;
 470         }
 471
 472     char buffer[8];
 473     buffer[7] = 0;
 474
 475     DecodeString(buffer, bufferS, &ctx);
 476     requestList.push_back(std::string(buffer, pos));
 477
 478     if (done || memchr(buffer, 0, pos) != NULL)
 479         {
 480         // End of data
 481         if (ParseCommand())
 482             {
 483             SendError("Bad command");
 484             }
 485         return SendDataAnswer(sock);
 486         }
 487     }
 488 //return 0;
 489 }
 490 //-----------------------------------------------------------------------------
 491 int CONFIGPROTO::SendDataAnswer(int sock)
 492 {
 493 std::list<std::string>::iterator li;
 494 li = answerList.begin();
 495
 496 BLOWFISH_CTX ctx;
 497
 498 char buff[8];
 499 char buffS[8];
 500 int n = 0;
 501 int k = 0;
 502
 503 EnDecodeInit(adminPassword.c_str(), ADM_PASSWD_LEN, &ctx);
 504
 505 while (li != answerList.end())
 506     {
 507     while ((*li).c_str()[k])
 508         {
 509         buff[n % 8] = (*li).c_str()[k];
 510         n++;
 511         k++;
 512
 513         if (n % 8 == 0)
 514             {
 515             EncodeString(buffS, buff, &ctx);
 516             int ret = static_cast<int>(send(sock, buffS, 8, 0));
 517             if (ret < 0)
 518                 {
 519                 return -1;
 520                 }
 521             }
 522         }
 523     k = 0;// new node
 524     ++li;
 525     }
 526
 527 if (answerList.empty()) {
 528     return 0;
 529 }
 530
 531 buff[n % 8] = 0;
 532 EncodeString(buffS, buff, &ctx);
 533
 534 answerList.clear();
 535
 536 return static_cast<int>(send(sock, buffS, 8, 0));
 537 }
 538 //-----------------------------------------------------------------------------
 539 void CONFIGPROTO::SendError(const char * text)
 540 {
 541 char s[255];
 542 answerList.clear();
 543 snprintf(s, 255, "<Error value=\"%s\"/>", text);
 544 answerList.push_back(s);
 545 }
 546 //-----------------------------------------------------------------------------
 547 void CONFIGPROTO::WriteLogAccessFailed(uint32_t ip)
 548 {
 549 logger("Admin's connection failed. IP %s", inet_ntostring(ip).c_str());
 550 }
 551 //-----------------------------------------------------------------------------