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.
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.
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
18 * Author : Boris Mikhailenko <stg34@stargazer.dp.ua>
19 * Author : Maxim Mamontov <faust@stargazer.dp.ua>
24 $Date: 2010/04/16 12:30:37 $
35 #include "stg/common.h"
36 #include "stg/locker.h"
37 #include "stg/user_property.h"
39 #include "ur_functor.h"
40 #include "send_functor.h"
42 extern volatile const time_t stgTime;
44 #define RS_MAX_ROUTERS (100)
46 //-----------------------------------------------------------------------------
47 //-----------------------------------------------------------------------------
48 //-----------------------------------------------------------------------------
56 : rs(new REMOTE_SCRIPT())
64 REMOTE_SCRIPT * GetPlugin()
69 //-----------------------------------------------------------------------------
70 //-----------------------------------------------------------------------------
71 //-----------------------------------------------------------------------------
73 //-----------------------------------------------------------------------------
74 //-----------------------------------------------------------------------------
75 //-----------------------------------------------------------------------------
78 return rsc.GetPlugin();
80 //-----------------------------------------------------------------------------
81 //-----------------------------------------------------------------------------
82 //-----------------------------------------------------------------------------
89 //-----------------------------------------------------------------------------
90 RS_USER::RS_USER(const std::vector<uint32_t> & r, USER_PTR it)
97 //-----------------------------------------------------------------------------
98 RS_SETTINGS::RS_SETTINGS()
103 //-----------------------------------------------------------------------------
104 int RS_SETTINGS::ParseSettings(const MODULE_SETTINGS & s)
108 vector<PARAM_VALUE>::const_iterator pvi;
110 ///////////////////////////
112 pvi = find(s.moduleParams.begin(), s.moduleParams.end(), pv);
113 if (pvi == s.moduleParams.end())
115 errorStr = "Parameter \'Port\' not found.";
116 printfd(__FILE__, "Parameter 'Port' not found\n");
119 if (ParseIntInRange(pvi->value[0], 2, 65535, &p))
121 errorStr = "Cannot parse parameter \'Port\': " + errorStr;
122 printfd(__FILE__, "Cannot parse parameter 'Port'\n");
126 ///////////////////////////
127 pv.param = "SendPeriod";
128 pvi = find(s.moduleParams.begin(), s.moduleParams.end(), pv);
129 if (pvi == s.moduleParams.end())
131 errorStr = "Parameter \'SendPeriod\' not found.";
132 printfd(__FILE__, "Parameter 'SendPeriod' not found\n");
136 if (ParseIntInRange(pvi->value[0], 5, 600, &sendPeriod))
138 errorStr = "Cannot parse parameter \'SendPeriod\': " + errorStr;
139 printfd(__FILE__, "Cannot parse parameter 'SendPeriod'\n");
142 ///////////////////////////
143 pv.param = "UserParams";
144 pvi = find(s.moduleParams.begin(), s.moduleParams.end(), pv);
145 if (pvi == s.moduleParams.end())
147 errorStr = "Parameter \'UserParams\' not found.";
148 printfd(__FILE__, "Parameter 'UserParams' not found\n");
151 userParams = pvi->value;
152 ///////////////////////////
153 pv.param = "Password";
154 pvi = find(s.moduleParams.begin(), s.moduleParams.end(), pv);
155 if (pvi == s.moduleParams.end())
157 errorStr = "Parameter \'Password\' not found.";
158 printfd(__FILE__, "Parameter 'Password' not found\n");
161 password = pvi->value[0];
162 ///////////////////////////
163 pv.param = "SubnetFile";
164 pvi = find(s.moduleParams.begin(), s.moduleParams.end(), pv);
165 if (pvi == s.moduleParams.end())
167 errorStr = "Parameter \'SubnetFile\' not found.";
168 printfd(__FILE__, "Parameter 'SubnetFile' not found\n");
171 subnetFile = pvi->value[0];
173 NRMapParser nrMapParser;
175 if (nrMapParser.ReadFile(subnetFile))
177 errorStr = nrMapParser.GetErrorStr();
181 netRouters = nrMapParser.GetMap();
183 if (netRouters.empty())
185 errorStr = "Parameter(s) \'Subnet*\' not found.";
186 printfd(__FILE__, "Parameter(s) 'Subnet*' not found\n");
192 //-----------------------------------------------------------------------------
193 //-----------------------------------------------------------------------------
194 //-----------------------------------------------------------------------------
195 REMOTE_SCRIPT::REMOTE_SCRIPT()
202 onAddUserNotifier(*this),
203 onDelUserNotifier(*this)
205 pthread_mutex_init(&mutex, NULL);
207 //-----------------------------------------------------------------------------
208 REMOTE_SCRIPT::~REMOTE_SCRIPT()
210 pthread_mutex_destroy(&mutex);
212 //-----------------------------------------------------------------------------
213 void * REMOTE_SCRIPT::Run(void * d)
215 REMOTE_SCRIPT * rs = static_cast<REMOTE_SCRIPT *>(d);
217 rs->isRunning = true;
225 rs->isRunning = false;
228 //-----------------------------------------------------------------------------
229 int REMOTE_SCRIPT::ParseSettings()
231 int ret = rsSettings.ParseSettings(settings);
233 errorStr = rsSettings.GetStrError();
235 sendPeriod = rsSettings.GetSendPeriod();
236 halfPeriod = sendPeriod / 2;
240 //-----------------------------------------------------------------------------
241 int REMOTE_SCRIPT::Start()
243 netRouters = rsSettings.GetSubnetsMap();
245 InitEncrypt(&ctx, rsSettings.GetPassword());
247 //onAddUserNotifier.SetRemoteScript(this);
248 //onDelUserNotifier.SetRemoteScript(this);
250 users->AddNotifierUserAdd(&onAddUserNotifier);
251 users->AddNotifierUserDel(&onDelUserNotifier);
267 if (pthread_create(&thread, NULL, Run, this))
269 errorStr = "Cannot create thread.";
270 printfd(__FILE__, "Cannot create thread\n");
278 //-----------------------------------------------------------------------------
279 int REMOTE_SCRIPT::Stop()
287 authorizedUsers.begin(),
288 authorizedUsers.end(),
289 DisconnectUser(*this)
296 //5 seconds to thread stops itself
297 for (int i = 0; i < 25 && isRunning; i++)
302 //after 5 seconds waiting thread still running. now killing it
305 if (pthread_kill(thread, SIGINT))
307 errorStr = "Cannot kill thread.";
308 printfd(__FILE__, "Cannot kill thread\n");
311 printfd(__FILE__, "REMOTE_SCRIPT killed Run\n");
315 users->DelNotifierUserDel(&onDelUserNotifier);
316 users->DelNotifierUserAdd(&onAddUserNotifier);
320 //-----------------------------------------------------------------------------
321 int REMOTE_SCRIPT::Reload()
323 NRMapParser nrMapParser;
325 if (nrMapParser.ReadFile(rsSettings.GetMapFileName()))
327 errorStr = nrMapParser.GetErrorStr();
332 STG_LOCKER lock(&mutex, __FILE__, __LINE__);
334 printfd(__FILE__, "REMOTE_SCRIPT::Reload()\n");
336 netRouters = nrMapParser.GetMap();
339 std::for_each(authorizedUsers.begin(),
340 authorizedUsers.end(),
341 UpdateRouter(*this));
345 //-----------------------------------------------------------------------------
346 bool REMOTE_SCRIPT::PrepareNet()
348 sock = socket(AF_INET, SOCK_DGRAM, 0);
352 errorStr = "Cannot create socket.";
353 printfd(__FILE__, "Cannot create socket\n");
359 //-----------------------------------------------------------------------------
360 bool REMOTE_SCRIPT::FinalizeNet()
365 //-----------------------------------------------------------------------------
366 void REMOTE_SCRIPT::PeriodicSend()
368 STG_LOCKER lock(&mutex, __FILE__, __LINE__);
370 map<uint32_t, RS_USER>::iterator it(authorizedUsers.begin());
371 while (it != authorizedUsers.end())
373 if (difftime(stgTime, it->second.lastSentTime) - (rand() % halfPeriod) > sendPeriod)
374 //if (stgTime - it->second.lastSentTime > sendPeriod)
376 Send(it->first, it->second);
381 //-----------------------------------------------------------------------------
382 bool REMOTE_SCRIPT::PreparePacket(char * buf, size_t bufSize, uint32_t ip, RS_USER & rsu, bool forceDisconnect) const
384 RS_PACKET_HEADER packetHead;
386 memset(packetHead.padding, 0, sizeof(packetHead.padding));
387 strcpy((char*)packetHead.magic, RS_ID);
388 packetHead.protoVer[0] = '0';
389 packetHead.protoVer[1] = '2';
392 packetHead.packetType = RS_DISCONNECT_PACKET;
396 if (rsu.shortPacketsCount % MAX_SHORT_PCKT == 0)
399 packetHead.packetType = rsu.user->IsInetable() ? RS_CONNECT_PACKET : RS_DISCONNECT_PACKET;
404 packetHead.packetType = rsu.user->IsInetable() ? RS_ALIVE_PACKET : RS_DISCONNECT_PACKET;
407 rsu.shortPacketsCount++;
408 rsu.lastSentTime = stgTime;
410 packetHead.ip = htonl(ip);
411 packetHead.id = htonl(rsu.user->GetID());
412 strncpy((char*)packetHead.login, rsu.user->GetLogin().c_str(), RS_LOGIN_LEN);
413 packetHead.login[RS_LOGIN_LEN - 1] = 0;
415 memcpy(buf, &packetHead, sizeof(packetHead));
417 if (packetHead.packetType == RS_ALIVE_PACKET)
422 RS_PACKET_TAIL packetTail;
424 memset(packetTail.padding, 0, sizeof(packetTail.padding));
425 strcpy((char*)packetTail.magic, RS_ID);
426 vector<string>::const_iterator it;
428 for(it = rsSettings.GetUserParams().begin();
429 it != rsSettings.GetUserParams().end();
432 std::string parameter(GetUserParam(rsu.user, *it));
433 if (params.length() + parameter.length() > RS_PARAMS_LEN - 1)
435 params += parameter + " ";
437 strncpy((char *)packetTail.params, params.c_str(), RS_PARAMS_LEN);
438 packetTail.params[RS_PARAMS_LEN - 1] = 0;
440 assert(sizeof(packetHead) + sizeof(packetTail) <= bufSize && "Insufficient buffer space");
442 Encrypt(&ctx, buf + sizeof(packetHead), (char *)&packetTail, sizeof(packetTail) / 8);
446 //-----------------------------------------------------------------------------
447 bool REMOTE_SCRIPT::Send(uint32_t ip, RS_USER & rsu, bool forceDisconnect) const
449 char buffer[RS_MAX_PACKET_LEN];
451 memset(buffer, 0, sizeof(buffer));
453 if (PreparePacket(buffer, sizeof(buffer), ip, rsu, forceDisconnect))
455 printfd(__FILE__, "REMOTE_SCRIPT::Send() - Invalid packet length!\n");
462 PacketSender(sock, buffer, sizeof(buffer), htons(rsSettings.GetPort()))
467 //-----------------------------------------------------------------------------
468 bool REMOTE_SCRIPT::SendDirect(uint32_t ip, RS_USER & rsu, uint32_t routerIP, bool forceDisconnect) const
470 char buffer[RS_MAX_PACKET_LEN];
472 if (PreparePacket(buffer, sizeof(buffer), ip, rsu, forceDisconnect))
474 printfd(__FILE__, "REMOTE_SCRIPT::SendDirect() - Invalid packet length!\n");
478 struct sockaddr_in sendAddr;
480 sendAddr.sin_family = AF_INET;
481 sendAddr.sin_port = htons(rsSettings.GetPort());
482 sendAddr.sin_addr.s_addr = routerIP;
484 int res = sendto(sock, buffer, sizeof(buffer), 0, (struct sockaddr *)&sendAddr, sizeof(sendAddr));
486 return (res != sizeof(buffer));
488 //-----------------------------------------------------------------------------
489 bool REMOTE_SCRIPT::GetUsers()
493 int h = users->OpenSearch();
496 errorStr = "users->OpenSearch() error.";
497 printfd(__FILE__, "OpenSearch() error\n");
501 while (!users->SearchNext(h, &u))
506 users->CloseSearch(h);
509 //-----------------------------------------------------------------------------
510 void REMOTE_SCRIPT::ChangedIP(USER_PTR u, uint32_t oldIP, uint32_t newIP)
513 * When ip changes process looks like:
519 RS_USER rsu(IP2Routers(newIP), u);
522 STG_LOCKER lock(&mutex, __FILE__, __LINE__);
523 authorizedUsers[newIP] = rsu;
527 STG_LOCKER lock(&mutex, __FILE__, __LINE__);
528 const map<uint32_t, RS_USER>::iterator it(
529 authorizedUsers.find(oldIP)
531 if (it != authorizedUsers.end())
533 Send(oldIP, it->second, true);
534 authorizedUsers.erase(it);
538 //-----------------------------------------------------------------------------
539 std::vector<uint32_t> REMOTE_SCRIPT::IP2Routers(uint32_t ip)
541 STG_LOCKER lock(&mutex, __FILE__, __LINE__);
542 for (size_t i = 0; i < netRouters.size(); ++i)
544 if ((ip & netRouters[i].subnetMask) == (netRouters[i].subnetIP & netRouters[i].subnetMask))
546 return netRouters[i].routers;
549 return std::vector<uint32_t>();
551 //-----------------------------------------------------------------------------
552 string REMOTE_SCRIPT::GetUserParam(USER_PTR u, const string & paramName) const
555 if (strcasecmp(paramName.c_str(), "cash") == 0)
556 strprintf(&value, "%f", u->GetProperty().cash.Get());
558 if (strcasecmp(paramName.c_str(), "freeMb") == 0)
559 strprintf(&value, "%f", u->GetProperty().freeMb.Get());
561 if (strcasecmp(paramName.c_str(), "passive") == 0)
562 strprintf(&value, "%d", u->GetProperty().passive.Get());
564 if (strcasecmp(paramName.c_str(), "disabled") == 0)
565 strprintf(&value, "%d", u->GetProperty().disabled.Get());
567 if (strcasecmp(paramName.c_str(), "alwaysOnline") == 0)
568 strprintf(&value, "%d", u->GetProperty().alwaysOnline.Get());
570 if (strcasecmp(paramName.c_str(), "tariffName") == 0 ||
571 strcasecmp(paramName.c_str(), "tariff") == 0)
572 value = "\"" + u->GetProperty().tariffName.Get() + "\"";
574 if (strcasecmp(paramName.c_str(), "nextTariff") == 0)
575 value = "\"" + u->GetProperty().nextTariff.Get() + "\"";
577 if (strcasecmp(paramName.c_str(), "address") == 0)
578 value = "\"" + u->GetProperty().address.Get() + "\"";
580 if (strcasecmp(paramName.c_str(), "note") == 0)
581 value = "\"" + u->GetProperty().note.Get() + "\"";
583 if (strcasecmp(paramName.c_str(), "group") == 0)
584 value = "\"" + u->GetProperty().group.Get() + "\"";
586 if (strcasecmp(paramName.c_str(), "email") == 0)
587 value = "\"" + u->GetProperty().email.Get() + "\"";
589 if (strcasecmp(paramName.c_str(), "realName") == 0)
590 value = "\"" + u->GetProperty().realName.Get() + "\"";
592 if (strcasecmp(paramName.c_str(), "credit") == 0)
593 strprintf(&value, "%f", u->GetProperty().credit.Get());
595 if (strcasecmp(paramName.c_str(), "userdata0") == 0)
596 value = "\"" + u->GetProperty().userdata0.Get() + "\"";
598 if (strcasecmp(paramName.c_str(), "userdata1") == 0)
599 value = "\"" + u->GetProperty().userdata1.Get() + "\"";
601 if (strcasecmp(paramName.c_str(), "userdata2") == 0)
602 value = "\"" + u->GetProperty().userdata2.Get() + "\"";
604 if (strcasecmp(paramName.c_str(), "userdata3") == 0)
605 value = "\"" + u->GetProperty().userdata3.Get() + "\"";
607 if (strcasecmp(paramName.c_str(), "userdata4") == 0)
608 value = "\"" + u->GetProperty().userdata4.Get() + "\"";
610 if (strcasecmp(paramName.c_str(), "userdata5") == 0)
611 value = "\"" + u->GetProperty().userdata5.Get() + "\"";
613 if (strcasecmp(paramName.c_str(), "userdata6") == 0)
614 value = "\"" + u->GetProperty().userdata6.Get() + "\"";
616 if (strcasecmp(paramName.c_str(), "userdata7") == 0)
617 value = "\"" + u->GetProperty().userdata7.Get() + "\"";
619 if (strcasecmp(paramName.c_str(), "userdata8") == 0)
620 value = "\"" + u->GetProperty().userdata8.Get() + "\"";
622 if (strcasecmp(paramName.c_str(), "userdata9") == 0)
623 value = "\"" + u->GetProperty().userdata9.Get() + "\"";
625 if (strcasecmp(paramName.c_str(), "enabledDirs") == 0)
626 value = u->GetEnabledDirs();
628 printfd(__FILE__, "Unknown value name: %s\n", paramName.c_str());
631 //-----------------------------------------------------------------------------
632 void REMOTE_SCRIPT::SetUserNotifier(USER_PTR u)
634 RS_CHG_AFTER_NOTIFIER<uint32_t> afterChgIPNotifier(*this, u);
636 afterChgIPNotifierList.push_front(afterChgIPNotifier);
638 u->AddCurrIPAfterNotifier(&(*afterChgIPNotifierList.begin()));
640 //-----------------------------------------------------------------------------
641 void REMOTE_SCRIPT::UnSetUserNotifier(USER_PTR u)
643 list<RS_CHG_AFTER_NOTIFIER<uint32_t> >::iterator ipAIter;
644 std::list<list<RS_CHG_AFTER_NOTIFIER<uint32_t> >::iterator> toErase;
646 for (ipAIter = afterChgIPNotifierList.begin(); ipAIter != afterChgIPNotifierList.end(); ++ipAIter)
648 if (ipAIter->GetUser() == u)
650 u->DelCurrIPAfterNotifier(&(*ipAIter));
651 toErase.push_back(ipAIter);
655 std::list<list<RS_CHG_AFTER_NOTIFIER<uint32_t> >::iterator>::iterator eIter;
657 for (eIter = toErase.begin(); eIter != toErase.end(); ++eIter)
659 afterChgIPNotifierList.erase(*eIter);
662 //-----------------------------------------------------------------------------
663 template <typename varParamType>
664 void RS_CHG_AFTER_NOTIFIER<varParamType>::Notify(const varParamType & oldValue, const varParamType & newValue)
666 rs.ChangedIP(user, oldValue, newValue);
668 //-----------------------------------------------------------------------------
669 void REMOTE_SCRIPT::InitEncrypt(BLOWFISH_CTX * ctx, const string & password) const
671 unsigned char keyL[PASSWD_LEN]; // Пароль для шифровки
672 memset(keyL, 0, PASSWD_LEN);
673 strncpy((char *)keyL, password.c_str(), PASSWD_LEN);
674 Blowfish_Init(ctx, keyL, PASSWD_LEN);
676 //-----------------------------------------------------------------------------
677 void REMOTE_SCRIPT::Encrypt(BLOWFISH_CTX * ctx, char * dst, const char * src, size_t len8) const
680 memcpy(dst, src, len8 * 8);
681 for (size_t i = 0; i < len8; ++i)
682 Blowfish_Encrypt(ctx, (uint32_t *)(dst + i * 8), (uint32_t *)(dst + i * 8 + 4));
684 //-----------------------------------------------------------------------------