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