projects/stargazer/main.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 "store_loader.h"
  22 #include "plugin_mgr.h"
  23 #include "plugin_runner.h"
  24 #include "users_impl.h"
  25 #include "admins_impl.h"
  26 #include "tariffs_impl.h"
  27 #include "services_impl.h"
  28 #include "corps_impl.h"
  29 #include "traffcounter_impl.h"
  30 #include "settings_impl.h"
  31 #include "pidfile.h"
  32 #include "eventloop.h"
  33 #include "stg_timer.h"
  34
  35 #include "stg/user.h"
  36 #include "stg/common.h"
  37 #include "stg/plugin.h"
  38 #include "stg/logger.h"
  39 #include "stg/scriptexecuter.h"
  40 #include "stg/version.h"
  41
  42 #include <fstream>
  43 #include <vector>
  44 #include <set>
  45 #include <csignal>
  46 #include <cerrno>
  47 #include <cstdio>
  48 #include <cstdlib> // srandom, exit
  49
  50 #include <unistd.h>
  51 #include <sys/ipc.h>
  52 #include <sys/msg.h>
  53 #include <sys/types.h>
  54 #include <sys/wait.h>
  55 #include <sys/stat.h> // S_IRUSR
  56 #include <fcntl.h> // create
  57
  58 #ifdef DEBUG
  59     #define NO_DAEMON  (1)
  60 #endif
  61
  62 #define START_FILE "/._ST_ART_ED_"
  63
  64 namespace
  65 {
  66 std::set<pid_t> executers;
  67
  68 void StartTimer();
  69 int StartScriptExecuter(char * procName, int msgKey, int * msgID);
  70 int ForkAndWait(const std::string & confDir);
  71 void KillExecuters();
  72
  73 //-----------------------------------------------------------------------------
  74 void StartTimer()
  75 {
  76 STG_LOGGER & WriteServLog = GetStgLogger();
  77
  78 if (RunStgTimer())
  79     {
  80     WriteServLog("Cannot start timer. Fatal.");
  81     //printfd(__FILE__, "Cannot start timer. Fatal.\n");
  82     exit(1);
  83     }
  84 else
  85     {
  86     WriteServLog("Timer thread started successfully.");
  87     //printfd(__FILE__, "Timer thread started successfully.\n");
  88     }
  89 }
  90 //-----------------------------------------------------------------------------
  91 #if defined(LINUX) || defined(DARWIN)
  92 int StartScriptExecuter(char * procName, int msgKey, int * msgID)
  93 #else
  94 int StartScriptExecuter(char *, int msgKey, int * msgID)
  95 #endif
  96 {
  97 STG_LOGGER & WriteServLog = GetStgLogger();
  98
  99 if (*msgID == -11)   // If msgID == -11 - first call. Create queue
 100     {
 101     for (int i = 0; i < 2; i++)
 102         {
 103         *msgID = msgget(msgKey, IPC_CREAT | IPC_EXCL | 0600);
 104
 105         if (*msgID == -1)
 106             {
 107             *msgID = msgget(msgKey, 0);
 108             if (*msgID == -1)
 109                 {
 110                 WriteServLog("Message queue not created.");
 111                 return -1;
 112                 }
 113             else
 114                 {
 115                 msgctl(*msgID, IPC_RMID, NULL);
 116                 }
 117             }
 118         else
 119             {
 120             WriteServLog("Message queue created successfully. msgKey=%d msgID=%d", msgKey, *msgID);
 121             break;
 122             }
 123         }
 124     }
 125
 126 pid_t pid = fork();
 127
 128 switch (pid)
 129     {
 130     case -1:
 131         WriteServLog("Fork error!");
 132         return -1;
 133
 134     case 0:
 135 #if defined(LINUX) || defined(DARWIN)
 136         Executer(*msgID, pid, procName);
 137 #else
 138         Executer(*msgID, pid);
 139 #endif
 140         return 1;
 141
 142     default:
 143         if (executers.empty()) {
 144 #if defined(LINUX) || defined(DARWIN)
 145             Executer(*msgID, pid, NULL);
 146 #else
 147             Executer(*msgID, pid);
 148 #endif
 149         }
 150         executers.insert(pid);
 151     }
 152 return 0;
 153 }
 154 //-----------------------------------------------------------------------------
 155 #ifndef NO_DAEMON
 156 int ForkAndWait(const std::string & confDir)
 157 #else
 158 int ForkAndWait(const std::string &)
 159 #endif
 160 {
 161 #ifndef NO_DAEMON
 162 pid_t pid = fork();
 163 std::string startFile = confDir + START_FILE;
 164 unlink(startFile.c_str());
 165
 166 switch (pid)
 167     {
 168     case -1:
 169         return -1;
 170         break;
 171
 172     case 0:
 173         close(1);
 174         close(2);
 175         setsid();
 176         break;
 177
 178     default:
 179         struct timespec ts = {0, 200000000};
 180         for (int i = 0; i < 120 * 5; i++)
 181             {
 182             if (access(startFile.c_str(), F_OK) == 0)
 183                 {
 184                 unlink(startFile.c_str());
 185                 exit(0);
 186                 }
 187
 188             nanosleep(&ts, NULL);
 189             }
 190         unlink(startFile.c_str());
 191         exit(1);
 192         break;
 193     }
 194 #endif
 195 return 0;
 196 }
 197 //-----------------------------------------------------------------------------
 198 void KillExecuters()
 199 {
 200 std::set<pid_t>::iterator pid(executers.begin());
 201 while (pid != executers.end())
 202     {
 203     printfd(__FILE__, "KillExecuters pid=%d\n", *pid);
 204     kill(*pid, SIGUSR1);
 205     ++pid;
 206     }
 207 }
 208 //-----------------------------------------------------------------------------
 209 } // namespace anonymous
 210 //-----------------------------------------------------------------------------
 211 int main(int argc, char * argv[])
 212 {
 213 int msgID = -11;
 214
 215 GetStgLogger().SetLogFileName("/var/log/stargazer.log");
 216
 217 if (getuid())
 218     {
 219     printf("You must be root. Exit.\n");
 220     return 1;
 221     }
 222
 223 SETTINGS_IMPL settings(argc == 2 ? argv[1] : "");
 224 SETTINGS_IMPL newSettings = settings;
 225
 226 if (settings.ReadSettings())
 227     {
 228     STG_LOGGER & WriteServLog = GetStgLogger();
 229
 230     if (settings.GetLogFileName() != "")
 231         WriteServLog.SetLogFileName(settings.GetLogFileName());
 232
 233     WriteServLog("ReadSettings error. %s", settings.GetStrError().c_str());
 234     return -1;
 235     }
 236
 237 #ifndef NO_DAEMON
 238 std::string startFile(settings.GetConfDir() + START_FILE);
 239 #endif
 240
 241 if (ForkAndWait(settings.GetConfDir()) < 0)
 242     {
 243     STG_LOGGER & WriteServLog = GetStgLogger();
 244     WriteServLog("Fork error!");
 245     return -1;
 246     }
 247
 248 STG_LOGGER & WriteServLog = GetStgLogger();
 249 WriteServLog.SetLogFileName(settings.GetLogFileName());
 250 WriteServLog("Stg v. %s", SERVER_VERSION);
 251
 252 for (size_t i = 0; i < settings.GetExecutersNum(); i++)
 253     {
 254     int ret = StartScriptExecuter(argv[0], settings.GetExecMsgKey(), &msgID);
 255     if (ret < 0)
 256         {
 257         STG_LOGGER & WriteServLog = GetStgLogger();
 258         WriteServLog("Start Script Executer error!");
 259         return -1;
 260         }
 261     if (ret == 1)
 262         {
 263         // Stopping child
 264         return 0;
 265         }
 266     }
 267
 268 PIDFile pidFile(settings.GetPIDFileName());
 269
 270 sigset_t signalSet;
 271 sigfillset(&signalSet);
 272 pthread_sigmask(SIG_BLOCK, &signalSet, NULL);
 273
 274 StartTimer();
 275 WaitTimer();
 276 if (!IsStgTimerRunning())
 277     {
 278     printfd(__FILE__, "Timer thread not started in 1 sec!\n");
 279     WriteServLog("Timer thread not started in 1 sec!");
 280     return -1;
 281     }
 282
 283 EVENT_LOOP & loop(EVENT_LOOP_SINGLETON::GetInstance());
 284
 285 STORE_LOADER storeLoader(settings);
 286 if (storeLoader.Load())
 287     {
 288     printfd(__FILE__, "Storage plugin: '%s'\n", storeLoader.GetStrError().c_str());
 289     WriteServLog("Storage plugin: '%s'", storeLoader.GetStrError().c_str());
 290     return -1;
 291     }
 292
 293 if (loop.Start())
 294     {
 295     printfd(__FILE__, "Event loop not started.\n");
 296     WriteServLog("Event loop not started.");
 297     return -1;
 298     }
 299
 300 STORE & store(storeLoader.GetStore());
 301 WriteServLog("Storage plugin: %s. Loading successfull.", store.GetVersion().c_str());
 302
 303 ADMINS_IMPL admins(&store);
 304 TARIFFS_IMPL tariffs(&store);
 305 SERVICES_IMPL services(&store);
 306 CORPORATIONS_IMPL corps(&store);
 307 USERS_IMPL users(&settings, &store, &tariffs, services, admins.GetSysAdmin());
 308 TRAFFCOUNTER_IMPL traffCnt(&users, settings.GetRulesFileName());
 309 traffCnt.SetMonitorDir(settings.GetMonitorDir());
 310
 311 if (users.Start())
 312     return -1;
 313
 314 WriteServLog("Users started successfully.");
 315
 316 if (traffCnt.Start())
 317     return -1;
 318
 319 WriteServLog("Traffcounter started successfully.");
 320
 321 STG::PluginManager manager(settings, store, admins, tariffs, services, corps, users, traffCnt);
 322
 323 srandom(static_cast<unsigned int>(stgTime));
 324
 325 WriteServLog("Stg started successfully.");
 326 WriteServLog("+++++++++++++++++++++++++++++++++++++++++++++");
 327
 328 #ifndef NO_DAEMON
 329 creat(startFile.c_str(), S_IRUSR);
 330 #endif
 331
 332 bool running = true;
 333 while (running)
 334     {
 335     sigfillset(&signalSet);
 336     int sig = 0;
 337     sigwait(&signalSet, &sig);
 338     int status;
 339     switch (sig)
 340         {
 341         case SIGHUP:
 342             if (newSettings.ReadSettings())
 343                 {
 344                 STG_LOGGER & WriteServLog = GetStgLogger();
 345
 346                 if (newSettings.GetLogFileName() != "")
 347                     WriteServLog.SetLogFileName(newSettings.GetLogFileName());
 348
 349                 WriteServLog("ReadSettings error. %s", newSettings.GetStrError().c_str());
 350                 return -1;
 351                 }
 352             traffCnt.Reload();
 353             manager.reload();
 354             break;
 355         case SIGTERM:
 356             running = false;
 357             break;
 358         case SIGINT:
 359             running = false;
 360             break;
 361         case SIGPIPE:
 362             WriteServLog("Broken pipe!");
 363             break;
 364         case SIGCHLD:
 365             executers.erase(waitpid(-1, &status, WNOHANG));
 366             if (executers.empty())
 367                 running = false;
 368             break;
 369         default:
 370             WriteServLog("Ignore signal %d", sig);
 371             break;
 372         }
 373     }
 374
 375 WriteServLog("+++++++++++++++++++++++++++++++++++++++++++++");
 376
 377 if (loop.Stop())
 378     WriteServLog("Event loop not stopped.");
 379
 380 if (!traffCnt.Stop())
 381     WriteServLog("Traffcounter: Stop successfull.");
 382
 383 if (!users.Stop())
 384     WriteServLog("Users: Stop successfull.");
 385
 386 sleep(1);
 387 int res = msgctl(msgID, IPC_RMID, NULL);
 388 if (res)
 389     WriteServLog("Queue was not removed. id=%d", msgID);
 390 else
 391     WriteServLog("Queue removed successfully.");
 392
 393 KillExecuters();
 394
 395 StopStgTimer();
 396 WriteServLog("StgTimer: Stop successfull.");
 397
 398 WriteServLog("Stg stopped successfully.");
 399 WriteServLog("---------------------------------------------");
 400
 401 return 0;
 402 }
 403 //-----------------------------------------------------------------------------