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