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         break;
 159
 160     if (outerSocket < 0)
 161         {
 162         logger("accept error: %s", strerror(errno));
 163         printfd(__FILE__, "accept failed\n");
 164         continue;
 165         }
 166
 167     adminIP = *(unsigned int*)&(outerAddr.sin_addr);
 168
 169     if (state == confHdr)
 170         {
 171         if (RecvHdr(outerSocket) < 0)
 172             {
 173             close(outerSocket);
 174             continue;
 175             }
 176         if (state == confLogin)
 177             {
 178             if (SendHdrAnswer(outerSocket, ans_ok) < 0)
 179                 {
 180                 close(outerSocket);
 181                 continue;
 182                 }
 183             if (RecvLogin(outerSocket) < 0)
 184                 {
 185                 close(outerSocket);
 186                 continue;
 187                 }
 188             if (state == confLoginCipher)
 189                 {
 190                 if (SendLoginAnswer(outerSocket) < 0)
 191                     {
 192                     close(outerSocket);
 193                     continue;
 194                     }
 195                 if (RecvLoginS(outerSocket) < 0)
 196                     {
 197                     close(outerSocket);
 198                     continue;
 199                     }
 200                 if (state == confData)
 201                     {
 202                     if (SendLoginSAnswer(outerSocket, ans_ok) < 0)
 203                         {
 204                         close(outerSocket);
 205                         continue;
 206                         }
 207                     if (RecvData(outerSocket) < 0)
 208                         {
 209                         close(outerSocket);
 210                         continue;
 211                         }
 212                     state = confHdr;
 213                     }
 214                 else
 215                     {
 216                     if (SendLoginSAnswer(outerSocket, ans_err) < 0)
 217                         {
 218                         close(outerSocket);
 219                         continue;
 220                         }
 221                     WriteLogAccessFailed(adminIP);
 222                     }
 223                 }
 224             else
 225                 {
 226                 WriteLogAccessFailed(adminIP);
 227                 }
 228             }
 229         else
 230             {
 231             WriteLogAccessFailed(adminIP);
 232             if (SendHdrAnswer(outerSocket, ans_err) < 0)
 233                 {
 234                 close(outerSocket);
 235                 continue;
 236                 }
 237             }
 238         }
 239     else
 240         {
 241         WriteLogAccessFailed(adminIP);
 242         }
 243     printfd(__FILE__, "Successfull connection from %s\n", inet_ntostring(outerAddr.sin_addr.s_addr).c_str());
 244     close(outerSocket);
 245     }
 246 }
 247 //-----------------------------------------------------------------------------
 248 int CONFIGPROTO::RecvHdr(int sock)
 249 {
 250 char buf[sizeof(STG_HEADER)];
 251 memset(buf, 0, sizeof(STG_HEADER));
 252 size_t stgHdrLen = sizeof(STG_HEADER) - 1; // Without 0-char
 253 size_t pos = 0;
 254 while (pos < stgHdrLen)
 255     {
 256     if (!WaitPackets(sock))
 257         {
 258         state = confHdr;
 259         SendError("Bad request");
 260         return -1;
 261         }
 262     ssize_t ret = recv(sock, &buf[pos], static_cast<int>(stgHdrLen) - static_cast<int>(pos), 0);
 263     if (ret <= 0)
 264         {
 265         if (ret < 0)
 266             logger("recv error: %s", strerror(errno));
 267         state = confHdr;
 268         return -1;
 269         }
 270     pos += ret;
 271     }
 272
 273 if (0 == strncmp(buf, STG_HEADER, strlen(STG_HEADER)))
 274     {
 275     state = confLogin;
 276     return 0;
 277     }
 278 else
 279     {
 280     SendError("Bad request");
 281     }
 282
 283 state = confHdr;
 284 return -1;
 285 }
 286 //-----------------------------------------------------------------------------
 287 int CONFIGPROTO::SendHdrAnswer(int sock, int err)
 288 {
 289 if (err)
 290     {
 291     if (send(sock, ERR_HEADER, sizeof(ERR_HEADER) - 1, 0) < 0)
 292         {
 293         logger("send error: %s", strerror(errno));
 294         return -1;
 295         }
 296     }
 297 else
 298     {
 299     if (send(sock, OK_HEADER, sizeof(OK_HEADER) - 1, 0) < 0)
 300         {
 301         logger("send error: %s", strerror(errno));
 302         return -1;
 303         }
 304     }
 305
 306 return 0;
 307 }
 308 //-----------------------------------------------------------------------------
 309 int CONFIGPROTO::RecvLogin(int sock)
 310 {
 311 char login[ADM_LOGIN_LEN + 1];
 312
 313 memset(login, 0, ADM_LOGIN_LEN + 1);
 314
 315 size_t pos = 0;
 316 while (pos < ADM_LOGIN_LEN) {
 317     if (!WaitPackets(sock))
 318         {
 319         state = confHdr;
 320         return ENODATA;
 321         }
 322
 323     ssize_t ret = recv(sock, &login[pos], ADM_LOGIN_LEN - static_cast<int>(pos), 0);
 324
 325     if (ret <= 0)
 326         {
 327         // Error in network
 328         logger("recv error: %s", strerror(errno));
 329         state = confHdr;
 330         return ENODATA;
 331         }
 332
 333     pos += ret;
 334 }
 335
 336 if (admins->Find(login, &currAdmin))
 337     {
 338     // Admin not found
 339     state = confHdr;
 340     return ENODATA;
 341     }
 342
 343 currAdmin->SetIP(adminIP);
 344 adminLogin = login;
 345 state = confLoginCipher;
 346 return 0;
 347 }
 348 //-----------------------------------------------------------------------------
 349 int CONFIGPROTO::SendLoginAnswer(int sock)
 350 {
 351 if (send(sock, OK_LOGIN, sizeof(OK_LOGIN) - 1, 0) < 0)
 352     {
 353     logger("Send OK_LOGIN error in SendLoginAnswer.");
 354     return -1;
 355     }
 356 return 0;
 357 }
 358 //-----------------------------------------------------------------------------
 359 int CONFIGPROTO::RecvLoginS(int sock)
 360 {
 361 char loginS[ADM_LOGIN_LEN + 1];
 362 memset(loginS, 0, ADM_LOGIN_LEN + 1);
 363
 364 size_t pos = 0;
 365 while (pos < ADM_LOGIN_LEN)
 366     {
 367     if (!WaitPackets(sock))
 368         {
 369         state = confHdr;
 370         return ENODATA;
 371         }
 372
 373     ssize_t ret = recv(sock, &loginS[pos], ADM_LOGIN_LEN - static_cast<int>(pos), 0);
 374
 375     if (ret <= 0)
 376         {
 377         // Network error
 378         printfd(__FILE__, "recv error: '%s'\n", strerror(errno));
 379         logger("recv error: %s", strerror(errno));
 380         state = confHdr;
 381         return ENODATA;
 382         }
 383
 384     pos += ret;
 385     }
 386
 387 if (currAdmin->GetLogin().empty())
 388     {
 389     state = confHdr;
 390     return ENODATA;
 391     }
 392
 393 BLOWFISH_CTX ctx;
 394 EnDecodeInit(currAdmin->GetPassword().c_str(), ADM_PASSWD_LEN, &ctx);
 395
 396 char login[ADM_LOGIN_LEN + 1];
 397 for (size_t i = 0; i < ADM_LOGIN_LEN / 8; i++)
 398     DecodeString(login + i * 8, loginS + i * 8, &ctx);
 399
 400 if (currAdmin == admins->GetNoAdmin())
 401     {
 402     // If there are no admins registered in the system - give access with any password
 403     state = confData;
 404     return 0;
 405     }
 406
 407 if (strncmp(currAdmin->GetLogin().c_str(), login, ADM_LOGIN_LEN) != 0)
 408     {
 409     state = confHdr;
 410     return ENODATA;
 411     }
 412
 413 state = confData;
 414 adminPassword = currAdmin->GetPassword();
 415 return 0;
 416 }
 417 //-----------------------------------------------------------------------------
 418 int CONFIGPROTO::SendLoginSAnswer(int sock, int err)
 419 {
 420 if (err)
 421     {
 422     if (send(sock, ERR_LOGINS, sizeof(ERR_LOGINS) - 1, 0) < 0)
 423         {
 424         logger("send error: %s", strerror(errno));
 425         return -1;
 426         }
 427     }
 428 else
 429     {
 430     if (send(sock, OK_LOGINS, sizeof(OK_LOGINS) - 1, 0) < 0)
 431         {
 432         logger("send error: %s", strerror(errno));
 433         return -1;
 434         }
 435     }
 436 return 0;
 437 }
 438 //-----------------------------------------------------------------------------
 439 int CONFIGPROTO::RecvData(int sock)
 440 {
 441 requestList.clear();
 442 BLOWFISH_CTX ctx;
 443
 444 EnDecodeInit(currAdmin->GetPassword().c_str(), ADM_PASSWD_LEN, &ctx);
 445
 446 while (1)
 447     {
 448     bool done = false;
 449     char bufferS[8];
 450     size_t pos = 0;
 451     while (pos < sizeof(bufferS))
 452         {
 453         if (!WaitPackets(sock))
 454             {
 455             done = true;
 456             break;
 457             }
 458
 459         ssize_t ret = recv(sock, &bufferS[pos], sizeof(bufferS) - static_cast<int>(pos), 0);
 460         if (ret < 0)
 461             {
 462             // Network error
 463             logger("recv error: %s", strerror(errno));
 464             printfd(__FILE__, "recv error: '%s'\n", strerror(errno));
 465             return -1;
 466             }
 467
 468         if (ret == 0)
 469             {
 470             done = true;
 471             break;
 472             }
 473
 474         pos += ret;
 475         }
 476
 477     char buffer[8];
 478     buffer[7] = 0;
 479
 480     DecodeString(buffer, bufferS, &ctx);
 481     requestList.push_back(std::string(buffer, pos));
 482
 483     if (done || memchr(buffer, 0, pos) != NULL)
 484         {
 485         // End of data
 486         if (ParseCommand())
 487             {
 488             SendError("Bad command");
 489             }
 490         return SendDataAnswer(sock);
 491         }
 492     }
 493 //return 0;
 494 }
 495 //-----------------------------------------------------------------------------
 496 int CONFIGPROTO::SendDataAnswer(int sock)
 497 {
 498 std::list<std::string>::iterator li;
 499 li = answerList.begin();
 500
 501 BLOWFISH_CTX ctx;
 502
 503 char buff[8];
 504 char buffS[8];
 505 int n = 0;
 506 int k = 0;
 507
 508 EnDecodeInit(adminPassword.c_str(), ADM_PASSWD_LEN, &ctx);
 509
 510 while (li != answerList.end())
 511     {
 512     while ((*li).c_str()[k])
 513         {
 514         buff[n % 8] = (*li).c_str()[k];
 515         n++;
 516         k++;
 517
 518         if (n % 8 == 0)
 519             {
 520             EncodeString(buffS, buff, &ctx);
 521             if (send(sock, buffS, 8, 0) < 0)
 522                 return -1;
 523             }
 524         }
 525     k = 0;// new node
 526     ++li;
 527     }
 528
 529 if (answerList.empty()) {
 530     return 0;
 531 }
 532
 533 buff[n % 8] = 0;
 534 EncodeString(buffS, buff, &ctx);
 535
 536 answerList.clear();
 537
 538 return static_cast<int>(send(sock, buffS, 8, 0));
 539 }
 540 //-----------------------------------------------------------------------------
 541 void CONFIGPROTO::SendError(const char * text)
 542 {
 543 char s[255];
 544 answerList.clear();
 545 snprintf(s, 255, "<Error value=\"%s\"/>", text);
 546 answerList.push_back(s);
 547 }
 548 //-----------------------------------------------------------------------------
 549 void CONFIGPROTO::WriteLogAccessFailed(uint32_t ip)
 550 {
 551 logger("Admin's connection failed. IP %s", inet_ntostring(ip).c_str());
 552 }
 553 //-----------------------------------------------------------------------------