]> git.stg.codes - stg.git/blob - projects/stargazer/plugins/configuration/sgconfig/rsconf.cpp
de91d3a213f2a08334438519aa49aa0aa8c69810
[stg.git] / 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  *    Author : Boris Mikhailenko <stg34@stargazer.dp.ua>
19  */
20
21 #include "configproto.h"
22
23 #include "parser.h"
24
25 #include "stg/admins.h"
26 #include "stg/logger.h"
27 #include "stg/common.h"
28 #include "stg/blowfish.h"
29
30 #include <cerrno>
31 #include <csignal>
32 #include <cstdio> // snprintf
33 #include <cstring> // strerror
34
35 #include <unistd.h> // close
36 #include <sys/types.h>
37 #include <sys/socket.h>
38 #include <netinet/in.h>
39 #include <arpa/inet.h>
40
41 #ifndef ENODATA
42 // FreeBSD 4.* - suxx
43 #define ENODATA -1
44 #endif
45
46 enum CONF_STATE
47     {
48     confHdr,
49     confLogin,
50     confLoginCipher,
51     confData
52     };
53
54 enum
55     {
56     ans_ok = 0,
57     ans_err
58     };
59
60 //-----------------------------------------------------------------------------
61 int CONFIGPROTO::Prepare()
62 {
63 int res;
64 struct sockaddr_in listenAddr;
65
66 sigset_t sigmask, oldmask;
67 sigemptyset(&sigmask);
68 sigaddset(&sigmask, SIGINT);
69 sigaddset(&sigmask, SIGTERM);
70 sigaddset(&sigmask, SIGUSR1);
71 sigaddset(&sigmask, SIGHUP);
72 pthread_sigmask(SIG_BLOCK, &sigmask, &oldmask);
73
74 listenSocket = socket(PF_INET, SOCK_STREAM, 0);
75
76 if (listenSocket < 0)
77     {
78     errorStr = "Create NET_CONFIGURATOR socket failed.";
79     logger("Cannot create a socket: %s", strerror(errno));
80     return -1;
81     }
82
83 listenAddr.sin_family = PF_INET;
84 listenAddr.sin_port = htons(port);
85 listenAddr.sin_addr.s_addr = inet_addr("0.0.0.0");
86
87 int lng = 1;
88
89 if (0 != setsockopt(listenSocket, SOL_SOCKET, SO_REUSEADDR, &lng, 4))
90     {
91     errorStr = "Setsockopt failed. " + std::string(strerror(errno));
92     logger("setsockopt error: %s", strerror(errno));
93     return -1;
94     }
95
96 res = bind(listenSocket, (struct sockaddr*)&listenAddr, sizeof(listenAddr));
97
98 if (res == -1)
99     {
100     errorStr = "Bind admin socket failed";
101     logger("Cannot bind the socket: %s", strerror(errno));
102     return -1;
103     }
104
105 res = listen(listenSocket, 0);
106 if (res == -1)
107     {
108     errorStr = "Listen admin socket failed";
109     logger("Cannot listen the socket: %s", strerror(errno));
110     return -1;
111     }
112
113 errorStr = "";
114 nonstop = true;
115 return 0;
116 }
117 //-----------------------------------------------------------------------------
118 int CONFIGPROTO::Stop()
119 {
120 nonstop = false;
121 close(listenSocket);
122 //TODO: Idiotism
123 int                 sock;
124 struct sockaddr_in  addr;
125 socklen_t           addrLen;
126 addr.sin_family = PF_INET;
127 addr.sin_port = htons(port);
128 addr.sin_addr.s_addr = inet_addr("127.0.0.1");
129
130 addrLen = sizeof(addr);
131 sock = socket(PF_INET, SOCK_STREAM, 0);
132 connect(sock, (sockaddr*)&addr, addrLen);
133 close(sock);
134 //Idiotism end
135 return 0;
136 }
137 //-----------------------------------------------------------------------------
138 void CONFIGPROTO::Run()
139 {
140 state = confHdr;
141
142 while (nonstop)
143     {
144     state = confHdr;
145     struct sockaddr_in outerAddr;
146     socklen_t outerAddrLen(sizeof(outerAddr));
147     int outerSocket = accept(listenSocket,
148                              (struct sockaddr*)(&outerAddr),
149                              &outerAddrLen);
150
151     if (!nonstop)
152         {
153         break;
154         }
155
156     if (outerSocket < 0)
157         {
158         logger("accept error: %s", strerror(errno));
159         printfd(__FILE__, "accept failed\n");
160         continue;
161         }
162
163     adminIP = *(unsigned int*)&(outerAddr.sin_addr);
164
165     if (state == confHdr)
166         {
167         if (RecvHdr(outerSocket) < 0)
168             {
169             close(outerSocket);
170             continue;
171             }
172         if (state == confLogin)
173             {
174             if (SendHdrAnswer(outerSocket, ans_ok) < 0)
175                 {
176                 close(outerSocket);
177                 continue;
178                 }
179             if (RecvLogin(outerSocket) < 0)
180                 {
181                 close(outerSocket);
182                 continue;
183                 }
184             if (state == confLoginCipher)
185                 {
186                 if (SendLoginAnswer(outerSocket) < 0)
187                     {
188                     close(outerSocket);
189                     continue;
190                     }
191                 if (RecvLoginS(outerSocket) < 0)
192                     {
193                     close(outerSocket);
194                     continue;
195                     }
196                 if (state == confData)
197                     {
198                     if (SendLoginSAnswer(outerSocket, ans_ok) < 0)
199                         {
200                         close(outerSocket);
201                         continue;
202                         }
203                     if (RecvData(outerSocket) < 0)
204                         {
205                         close(outerSocket);
206                         continue;
207                         }
208                     state = confHdr;
209                     }
210                 else
211                     {
212                     if (SendLoginSAnswer(outerSocket, ans_err) < 0)
213                         {
214                         close(outerSocket);
215                         continue;
216                         }
217                     WriteLogAccessFailed(adminIP);
218                     }
219                 }
220             else
221                 {
222                 WriteLogAccessFailed(adminIP);
223                 }
224             }
225         else
226             {
227             WriteLogAccessFailed(adminIP);
228             if (SendHdrAnswer(outerSocket, ans_err) < 0)
229                 {
230                 close(outerSocket);
231                 continue;
232                 }
233             }
234         }
235     else
236         {
237         WriteLogAccessFailed(adminIP);
238         }
239     printfd(__FILE__, "Successfull connection from %s\n", inet_ntostring(outerAddr.sin_addr.s_addr).c_str());
240     close(outerSocket);
241     }
242 }
243 //-----------------------------------------------------------------------------
244 int CONFIGPROTO::RecvHdr(int sock)
245 {
246 char buf[sizeof(STG_HEADER)];
247 memset(buf, 0, sizeof(STG_HEADER));
248 size_t stgHdrLen = sizeof(STG_HEADER) - 1; // Without 0-char
249 size_t pos = 0;
250 while (pos < stgHdrLen)
251     {
252     if (!WaitPackets(sock))
253         {
254         state = confHdr;
255         SendError(sock, "Bad request");
256         return -1;
257         }
258     ssize_t ret = recv(sock, &buf[pos], static_cast<int>(stgHdrLen) - static_cast<int>(pos), 0);
259     if (ret <= 0)
260         {
261         if (ret < 0)
262             logger("recv error: %s", strerror(errno));
263         state = confHdr;
264         return -1;
265         }
266     pos += ret;
267     }
268
269 if (0 == strncmp(buf, STG_HEADER, strlen(STG_HEADER)))
270     {
271     state = confLogin;
272     return 0;
273     }
274 else
275     {
276     SendError(sock, "Bad request");
277     }
278
279 state = confHdr;
280 return -1;
281 }
282 //-----------------------------------------------------------------------------
283 int CONFIGPROTO::SendHdrAnswer(int sock, int err)
284 {
285 if (err)
286     {
287     if (send(sock, ERR_HEADER, sizeof(ERR_HEADER) - 1, 0) < 0)
288         {
289         logger("send error: %s", strerror(errno));
290         return -1;
291         }
292     }
293 else
294     {
295     if (send(sock, OK_HEADER, sizeof(OK_HEADER) - 1, 0) < 0)
296         {
297         logger("send error: %s", strerror(errno));
298         return -1;
299         }
300     }
301
302 return 0;
303 }
304 //-----------------------------------------------------------------------------
305 int CONFIGPROTO::RecvLogin(int sock)
306 {
307 char login[ADM_LOGIN_LEN + 1];
308
309 memset(login, 0, ADM_LOGIN_LEN + 1);
310
311 size_t pos = 0;
312 while (pos < ADM_LOGIN_LEN) {
313     if (!WaitPackets(sock))
314         {
315         state = confHdr;
316         return ENODATA;
317         }
318
319     ssize_t ret = recv(sock, &login[pos], ADM_LOGIN_LEN - static_cast<int>(pos), 0);
320
321     if (ret <= 0)
322         {
323         // Error in network
324         logger("recv error: %s", strerror(errno));
325         state = confHdr;
326         return ENODATA;
327         }
328
329     pos += ret;
330 }
331
332 if (admins->Find(login, &currAdmin))
333     {
334     // Admin not found
335     state = confHdr;
336     return ENODATA;
337     }
338
339 currAdmin->SetIP(adminIP);
340 adminLogin = login;
341 state = confLoginCipher;
342 return 0;
343 }
344 //-----------------------------------------------------------------------------
345 int CONFIGPROTO::SendLoginAnswer(int sock)
346 {
347 if (send(sock, OK_LOGIN, sizeof(OK_LOGIN) - 1, 0) < 0)
348     {
349     logger("Send OK_LOGIN error in SendLoginAnswer.");
350     return -1;
351     }
352 return 0;
353 }
354 //-----------------------------------------------------------------------------
355 int CONFIGPROTO::RecvLoginS(int sock)
356 {
357 char loginS[ADM_LOGIN_LEN + 1];
358 memset(loginS, 0, ADM_LOGIN_LEN + 1);
359
360 size_t pos = 0;
361 while (pos < ADM_LOGIN_LEN)
362     {
363     if (!WaitPackets(sock))
364         {
365         state = confHdr;
366         return ENODATA;
367         }
368
369     ssize_t ret = recv(sock, &loginS[pos], ADM_LOGIN_LEN - static_cast<int>(pos), 0);
370
371     if (ret <= 0)
372         {
373         // Network error
374         printfd(__FILE__, "recv error: '%s'\n", strerror(errno));
375         logger("recv error: %s", strerror(errno));
376         state = confHdr;
377         return ENODATA;
378         }
379
380     pos += ret;
381     }
382
383 if (currAdmin->GetLogin().empty())
384     {
385     state = confHdr;
386     return ENODATA;
387     }
388
389 BLOWFISH_CTX ctx;
390 InitContext(currAdmin->GetPassword().c_str(), ADM_PASSWD_LEN, &ctx);
391
392 char login[ADM_LOGIN_LEN + 1];
393 for (size_t i = 0; i < ADM_LOGIN_LEN / 8; i++)
394     DecryptBlock(login + i * 8, loginS + i * 8, &ctx);
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 InitContext(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         ssize_t ret = recv(sock, &bufferS[pos], sizeof(bufferS) - static_cast<int>(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     DecryptBlock(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             return SendError(sock, "Bad command");
484         else
485             return SendDataAnswer(sock, currParser->GetAnswer());
486         }
487     }
488 //return 0;
489 }
490 //-----------------------------------------------------------------------------
491 int CONFIGPROTO::SendDataAnswer(int sock, const std::string & answer)
492 {
493 if (answer.empty())
494     return 0;
495
496 BLOWFISH_CTX ctx;
497 InitContext(adminPassword.c_str(), ADM_PASSWD_LEN, &ctx);
498
499 std::string::size_type pos = 0;
500 std::string::size_type length = answer.length();
501 while (pos < length)
502     {
503     char buffer[1024];
504     std::string::size_type chunkLength = std::min(length - pos, sizeof(buffer));
505     EncryptString(buffer, answer.c_str() + pos, chunkLength, &ctx);
506     if (send(sock, buffer, chunkLength, 0) < 0)
507         return -1;
508     pos += chunkLength;
509     }
510
511 return 1;
512 }
513 //-----------------------------------------------------------------------------
514 int CONFIGPROTO::SendError(int sock, const std::string & text)
515 {
516 return SendDataAnswer(sock, "<Error value=\"" + text + "\"/>");
517 }
518 //-----------------------------------------------------------------------------
519 void CONFIGPROTO::WriteLogAccessFailed(uint32_t ip)
520 {
521 logger("Admin's connection failed. IP %s", inet_ntostring(ip).c_str());
522 }
523 //-----------------------------------------------------------------------------