]> git.stg.codes - stg.git/blob - projects/stargazer/plugins/other/rscript/rscript.cpp
Complete replacement notifiers with subscriptions.
[stg.git] / projects / stargazer / plugins / other / rscript / rscript.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  *    Author : Maxim Mamontov <faust@stargazer.dp.ua>
20  */
21
22 #include "rscript.h"
23
24 #include "ur_functor.h"
25
26 #include "stg/common.h"
27 #include "stg/locker.h"
28 #include "stg/users.h"
29 #include "stg/user_property.h"
30 #include "stg/logger.h"
31
32 #include <algorithm>
33
34 #include <csignal>
35 #include <cassert>
36 #include <cstdlib>
37 #include <cerrno>
38 #include <cstring>
39
40 #include <sys/time.h>
41 #include <netinet/ip.h>
42
43 #define RS_DEBUG (1)
44 #define MAX_SHORT_PCKT  (3)
45
46 extern volatile time_t stgTime;
47
48 namespace RS = STG::RS;
49 using RS::REMOTE_SCRIPT;
50
51 extern "C" STG::Plugin* GetPlugin()
52 {
53     static REMOTE_SCRIPT plugin;
54     return &plugin;
55 }
56 //-----------------------------------------------------------------------------
57 //-----------------------------------------------------------------------------
58 //-----------------------------------------------------------------------------
59 RS::SETTINGS::SETTINGS()
60     : sendPeriod(0),
61       port(0)
62 {
63 }
64 //-----------------------------------------------------------------------------
65 int RS::SETTINGS::ParseSettings(const ModuleSettings & s)
66 {
67 int p;
68 ParamValue pv;
69 netRouters.clear();
70 ///////////////////////////
71 pv.param = "Port";
72 auto pvi = find(s.moduleParams.begin(), s.moduleParams.end(), pv);
73 if (pvi == s.moduleParams.end() || pvi->value.empty())
74     {
75     errorStr = "Parameter \'Port\' not found.";
76     printfd(__FILE__, "Parameter 'Port' not found\n");
77     return -1;
78     }
79 if (ParseIntInRange(pvi->value[0], 2, 65535, &p) != 0)
80     {
81     errorStr = "Cannot parse parameter \'Port\': " + errorStr;
82     printfd(__FILE__, "Cannot parse parameter 'Port'\n");
83     return -1;
84     }
85 port = static_cast<uint16_t>(p);
86 ///////////////////////////
87 pv.param = "SendPeriod";
88 pvi = find(s.moduleParams.begin(), s.moduleParams.end(), pv);
89 if (pvi == s.moduleParams.end() || pvi->value.empty())
90     {
91     errorStr = "Parameter \'SendPeriod\' not found.";
92     printfd(__FILE__, "Parameter 'SendPeriod' not found\n");
93     return -1;
94     }
95
96 if (ParseIntInRange(pvi->value[0], 5, 600, &sendPeriod) != 0)
97     {
98     errorStr = "Cannot parse parameter \'SendPeriod\': " + errorStr;
99     printfd(__FILE__, "Cannot parse parameter 'SendPeriod'\n");
100     return -1;
101     }
102 ///////////////////////////
103 pv.param = "UserParams";
104 pvi = find(s.moduleParams.begin(), s.moduleParams.end(), pv);
105 if (pvi == s.moduleParams.end() || pvi->value.empty())
106     {
107     errorStr = "Parameter \'UserParams\' not found.";
108     printfd(__FILE__, "Parameter 'UserParams' not found\n");
109     return -1;
110     }
111 userParams = pvi->value;
112 ///////////////////////////
113 pv.param = "Password";
114 pvi = find(s.moduleParams.begin(), s.moduleParams.end(), pv);
115 if (pvi == s.moduleParams.end() || pvi->value.empty())
116     {
117     errorStr = "Parameter \'Password\' not found.";
118     printfd(__FILE__, "Parameter 'Password' not found\n");
119     return -1;
120     }
121 password = pvi->value[0];
122 ///////////////////////////
123 pv.param = "SubnetFile";
124 pvi = find(s.moduleParams.begin(), s.moduleParams.end(), pv);
125 if (pvi == s.moduleParams.end() || pvi->value.empty())
126     {
127     errorStr = "Parameter \'SubnetFile\' not found.";
128     printfd(__FILE__, "Parameter 'SubnetFile' not found\n");
129     return -1;
130     }
131 subnetFile = pvi->value[0];
132
133 NRMapParser nrMapParser;
134
135 if (!nrMapParser.ReadFile(subnetFile))
136     netRouters = nrMapParser.GetMap();
137 else
138     PluginLogger::get("rscript")("mod_rscript: error opening subnets file '%s'", subnetFile.c_str());
139
140 return 0;
141 }
142 //-----------------------------------------------------------------------------
143 //-----------------------------------------------------------------------------
144 //-----------------------------------------------------------------------------
145 REMOTE_SCRIPT::REMOTE_SCRIPT()
146     : sendPeriod(15),
147       halfPeriod(8),
148       isRunning(false),
149       users(nullptr),
150       sock(0),
151       logger(PluginLogger::get("rscript"))
152 {
153 }
154 //-----------------------------------------------------------------------------
155 void REMOTE_SCRIPT::Run(std::stop_token token)
156 {
157 sigset_t signalSet;
158 sigfillset(&signalSet);
159 pthread_sigmask(SIG_BLOCK, &signalSet, nullptr);
160
161 isRunning = true;
162
163 while (!token.stop_requested())
164     {
165     PeriodicSend();
166     sleep(2);
167     }
168
169 isRunning = false;
170 }
171 //-----------------------------------------------------------------------------
172 int REMOTE_SCRIPT::ParseSettings()
173 {
174 auto ret = rsSettings.ParseSettings(settings);
175 if (ret != 0)
176     errorStr = rsSettings.GetStrError();
177
178 sendPeriod = rsSettings.GetSendPeriod();
179 halfPeriod = sendPeriod / 2;
180
181 return ret;
182 }
183 //-----------------------------------------------------------------------------
184 int REMOTE_SCRIPT::Start()
185 {
186 netRouters = rsSettings.GetSubnetsMap();
187
188 InitEncrypt(rsSettings.GetPassword());
189
190 m_onAddUserConn = users->onAdd([this](auto user){ AddUser(user); });
191 m_onDelUserConn = users->onDel([this](auto user){ DelUser(user); });
192
193 if (GetUsers())
194     return -1;
195
196 if (PrepareNet())
197     return -1;
198
199 if (!isRunning)
200     m_thread = std::jthread([this](auto token){ Run(std::move(token)); });
201
202 errorStr = "";
203 return 0;
204 }
205 //-----------------------------------------------------------------------------
206 int REMOTE_SCRIPT::Stop()
207 {
208 if (!IsRunning())
209     return 0;
210
211 m_thread.request_stop();
212
213 std::for_each(
214     authorizedUsers.begin(),
215     authorizedUsers.end(),
216     [this](auto& kv){ Send(kv.second, true); }
217 );
218
219 FinalizeNet();
220
221 if (isRunning)
222     {
223     //5 seconds to thread stops itself
224     for (int i = 0; i < 25 && isRunning; i++)
225         {
226         struct timespec ts = {0, 200000000};
227         nanosleep(&ts, nullptr);
228         }
229     }
230
231 if (isRunning)
232     {
233     logger("Cannot stop thread.");
234     m_thread.detach();
235     }
236 else
237     m_thread.join();
238
239 return 0;
240 }
241 //-----------------------------------------------------------------------------
242 int REMOTE_SCRIPT::Reload(const ModuleSettings & /*ms*/)
243 {
244 NRMapParser nrMapParser;
245
246 if (nrMapParser.ReadFile(rsSettings.GetMapFileName()))
247     {
248     errorStr = nrMapParser.GetErrorStr();
249     logger("Map file reading error: %s", errorStr.c_str());
250     return -1;
251     }
252
253     {
254     std::lock_guard lock(m_mutex);
255
256     printfd(__FILE__, "REMOTE_SCRIPT::Reload()\n");
257
258     netRouters = nrMapParser.GetMap();
259     }
260
261 std::for_each(authorizedUsers.begin(),
262               authorizedUsers.end(),
263               UpdateRouter(*this));
264
265 logger("%s reloaded successfully.", rsSettings.GetMapFileName().c_str());
266 printfd(__FILE__, "REMOTE_SCRIPT::Reload() %s reloaded successfully.\n");
267
268 return 0;
269 }
270 //-----------------------------------------------------------------------------
271 bool REMOTE_SCRIPT::PrepareNet()
272 {
273 sock = socket(AF_INET, SOCK_DGRAM, 0);
274
275 if (sock < 0)
276     {
277     errorStr = "Cannot create socket.";
278     logger("Canot create a socket: %s", strerror(errno));
279     printfd(__FILE__, "Cannot create socket\n");
280     return true;
281     }
282
283 return false;
284 }
285 //-----------------------------------------------------------------------------
286 bool REMOTE_SCRIPT::FinalizeNet()
287 {
288 close(sock);
289 return false;
290 }
291 //-----------------------------------------------------------------------------
292 void REMOTE_SCRIPT::PeriodicSend()
293 {
294 std::lock_guard lock(m_mutex);
295
296 auto it = authorizedUsers.begin();
297 while (it != authorizedUsers.end())
298     {
299     if (difftime(stgTime, it->second.lastSentTime) - (rand() % halfPeriod) > sendPeriod)
300         {
301         Send(it->second);
302         }
303     ++it;
304     }
305 }
306 //-----------------------------------------------------------------------------
307 #ifdef NDEBUG
308 bool REMOTE_SCRIPT::PreparePacket(char * buf, size_t, RS::USER & rsu, bool forceDisconnect) const
309 #else
310 bool REMOTE_SCRIPT::PreparePacket(char * buf, size_t bufSize, RS::USER & rsu, bool forceDisconnect) const
311 #endif
312 {
313 RS::PACKET_HEADER packetHead;
314
315 memset(packetHead.padding, 0, sizeof(packetHead.padding));
316 memcpy(packetHead.magic, RS_ID, sizeof(RS_ID));
317 packetHead.protoVer[0] = '0';
318 packetHead.protoVer[1] = '2';
319 if (forceDisconnect)
320     {
321     packetHead.packetType = RS_DISCONNECT_PACKET;
322     printfd(__FILE__, "RSCRIPT: force disconnect for '%s'\n", rsu.user->GetLogin().c_str());
323     }
324 else
325     {
326     if (rsu.shortPacketsCount % MAX_SHORT_PCKT == 0)
327         {
328         //SendLong
329         packetHead.packetType = rsu.user->IsInetable() ? RS_CONNECT_PACKET : RS_DISCONNECT_PACKET;
330         if (rsu.user->IsInetable())
331             printfd(__FILE__, "RSCRIPT: connect for '%s'\n", rsu.user->GetLogin().c_str());
332         else
333             printfd(__FILE__, "RSCRIPT: disconnect for '%s'\n", rsu.user->GetLogin().c_str());
334         }
335     else
336         {
337         //SendShort
338         packetHead.packetType = rsu.user->IsInetable() ? RS_ALIVE_PACKET : RS_DISCONNECT_PACKET;
339         if (rsu.user->IsInetable())
340             printfd(__FILE__, "RSCRIPT: alive for '%s'\n", rsu.user->GetLogin().c_str());
341         else
342             printfd(__FILE__, "RSCRIPT: disconnect for '%s'\n", rsu.user->GetLogin().c_str());
343         }
344     }
345 rsu.shortPacketsCount++;
346 rsu.lastSentTime = stgTime;
347
348 packetHead.ip = htonl(rsu.ip);
349 packetHead.id = htonl(rsu.user->GetID());
350 strncpy(reinterpret_cast<char*>(packetHead.login), rsu.user->GetLogin().c_str(), RS_LOGIN_LEN);
351 packetHead.login[RS_LOGIN_LEN - 1] = 0;
352
353 memcpy(buf, &packetHead, sizeof(packetHead));
354
355 if (packetHead.packetType == RS_ALIVE_PACKET)
356     {
357     return false;
358     }
359
360 RS::PACKET_TAIL packetTail;
361
362 memset(packetTail.padding, 0, sizeof(packetTail.padding));
363 memcpy(packetTail.magic, RS_ID, sizeof(RS_ID));
364 std::string params;
365 for (const auto& param : rsSettings.GetUserParams())
366     {
367     auto value = rsu.user->GetParamValue(param);
368     if (params.length() + value.length() > RS_PARAMS_LEN - 1)
369     {
370         logger("Script params string length %d exceeds the limit of %d symbols.", params.length() + value.length(), RS_PARAMS_LEN);
371         break;
372     }
373     params += value + " ";
374     }
375 strncpy(reinterpret_cast<char*>(packetTail.params), params.c_str(), RS_PARAMS_LEN);
376 packetTail.params[RS_PARAMS_LEN - 1] = 0;
377
378 assert(sizeof(packetHead) + sizeof(packetTail) <= bufSize && "Insufficient buffer space");
379
380 Encrypt(buf + sizeof(packetHead), reinterpret_cast<char *>(&packetTail), sizeof(packetTail) / 8);
381
382 return false;
383 }
384 //-----------------------------------------------------------------------------
385 bool REMOTE_SCRIPT::Send(RS::USER & rsu, bool forceDisconnect) const
386 {
387 char buffer[RS_MAX_PACKET_LEN];
388
389 memset(buffer, 0, sizeof(buffer));
390
391 if (PreparePacket(buffer, sizeof(buffer), rsu, forceDisconnect))
392     {
393     printfd(__FILE__, "REMOTE_SCRIPT::Send() - Invalid packet length!\n");
394     return true;
395     }
396
397 for (const auto& ip : rsu.routers)
398 {
399     struct sockaddr_in sendAddr;
400
401     sendAddr.sin_family = AF_INET;
402     sendAddr.sin_port = htons(rsSettings.GetPort());
403     sendAddr.sin_addr.s_addr = ip;
404
405     return sendto(sock, buffer, sizeof(buffer), 0, reinterpret_cast<struct sockaddr*>(&sendAddr), sizeof(sendAddr)) > 0;
406 }
407
408 return false;
409 }
410 //-----------------------------------------------------------------------------
411 bool REMOTE_SCRIPT::SendDirect(RS::USER & rsu, uint32_t routerIP, bool forceDisconnect) const
412 {
413 char buffer[RS_MAX_PACKET_LEN];
414
415 if (PreparePacket(buffer, sizeof(buffer), rsu, forceDisconnect))
416     {
417     printfd(__FILE__, "REMOTE_SCRIPT::SendDirect() - Invalid packet length!\n");
418     return true;
419     }
420
421 struct sockaddr_in sendAddr;
422
423 sendAddr.sin_family = AF_INET;
424 sendAddr.sin_port = htons(rsSettings.GetPort());
425 sendAddr.sin_addr.s_addr = routerIP;
426
427 ssize_t res = sendto(sock, buffer, sizeof(buffer), 0, reinterpret_cast<struct sockaddr *>(&sendAddr), sizeof(sendAddr));
428
429 if (res < 0)
430     logger("sendto error: %s", strerror(errno));
431
432 return (res != sizeof(buffer));
433 }
434 //-----------------------------------------------------------------------------
435 bool REMOTE_SCRIPT::GetUsers()
436 {
437 UserPtr u;
438
439 int h = users->OpenSearch();
440 assert(h && "USERS::OpenSearch is always correct");
441
442 while (users->SearchNext(h, &u) != 0)
443     SetUserNotifiers(u);
444
445 users->CloseSearch(h);
446 return false;
447 }
448 //-----------------------------------------------------------------------------
449 std::vector<uint32_t> REMOTE_SCRIPT::IP2Routers(uint32_t ip)
450 {
451 std::lock_guard lock(m_mutex);
452 for (auto& nr : netRouters)
453     if ((ip & nr.subnetMask) == (nr.subnetIP & nr.subnetMask))
454         return nr.routers;
455 return {};
456 }
457 //-----------------------------------------------------------------------------
458 void REMOTE_SCRIPT::SetUserNotifiers(UserPtr u)
459 {
460     m_conns.emplace_back(
461         u->GetID(),
462         u->afterCurrIPChange([this, u](auto, auto newVal){ addDelUser(u, newVal != 0); }),
463         u->afterConnectedChange([this, u](auto, auto newVal){ addDelUser(u, newVal); })
464     );
465 }
466 //-----------------------------------------------------------------------------
467 void REMOTE_SCRIPT::UnSetUserNotifiers(UserPtr u)
468 {
469     m_conns.erase(std::remove_if(m_conns.begin(), m_conns.end(),
470                   [u](const auto& c){ return std::get<0>(c) == u->GetID(); }),
471                   m_conns.end());
472
473 }
474 //-----------------------------------------------------------------------------
475 void REMOTE_SCRIPT::AddRSU(UserPtr user)
476 {
477 RS::USER rsu(IP2Routers(user->GetCurrIP()), user);
478 Send(rsu);
479
480 std::lock_guard lock(m_mutex);
481 authorizedUsers.insert(std::make_pair(user->GetCurrIP(), rsu));
482 }
483 //-----------------------------------------------------------------------------
484 void REMOTE_SCRIPT::DelRSU(UserPtr user)
485 {
486 std::lock_guard lock(m_mutex);
487 auto it = authorizedUsers.begin();
488 while (it != authorizedUsers.end())
489     {
490     if (it->second.user == user)
491         {
492         Send(it->second, true);
493         authorizedUsers.erase(it);
494         return;
495         }
496     ++it;
497     }
498 /*const auto it = authorizedUsers.find(user->GetCurrIP());
499 if (it != authorizedUsers.end())
500     {
501     Send(it->second, true);
502     authorizedUsers.erase(it);
503     }*/
504 }
505 //-----------------------------------------------------------------------------
506 void REMOTE_SCRIPT::addDelUser(UserPtr user, bool toAdd)
507 {
508     if (toAdd)
509         AddRSU(user);
510     else
511         DelRSU(user);
512 }
513 //-----------------------------------------------------------------------------
514 void REMOTE_SCRIPT::InitEncrypt(const std::string & password) const
515 {
516 unsigned char keyL[PASSWD_LEN];  // Пароль для шифровки
517 memset(keyL, 0, PASSWD_LEN);
518 strncpy(reinterpret_cast<char*>(keyL), password.c_str(), PASSWD_LEN);
519 Blowfish_Init(&ctx, keyL, PASSWD_LEN);
520 }
521 //-----------------------------------------------------------------------------
522 void REMOTE_SCRIPT::Encrypt(void * dst, const void * src, size_t len8) const
523 {
524 if (dst != src)
525     memcpy(dst, src, len8 * 8);
526 for (size_t i = 0; i < len8; ++i)
527     Blowfish_Encrypt(&ctx, static_cast<uint32_t *>(dst) + i * 2, static_cast<uint32_t *>(dst) + i * 2 + 1);
528 }
529 //-----------------------------------------------------------------------------