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, SETTINGS_IMPL * settings);
  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, SETTINGS_IMPL * settings)
  93 #else
  94 int StartScriptExecuter(char *, int msgKey, int * msgID, SETTINGS_IMPL * settings)
  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         delete settings;
 136 #if defined(LINUX) || defined(DARWIN)
 137         Executer(*msgID, pid, procName);
 138 #else
 139         Executer(*msgID, pid);
 140 #endif
 141         return 1;
 142
 143     default:
 144         if (executers.empty()) {
 145 #if defined(LINUX) || defined(DARWIN)
 146             Executer(*msgID, pid, NULL);
 147 #else
 148             Executer(*msgID, pid);
 149 #endif
 150         }
 151         executers.insert(pid);
 152     }
 153 return 0;
 154 }
 155 //-----------------------------------------------------------------------------
 156 #ifndef NO_DAEMON
 157 int ForkAndWait(const std::string & confDir)
 158 #else
 159 int ForkAndWait(const std::string &)
 160 #endif
 161 {
 162 #ifndef NO_DAEMON
 163 pid_t pid = fork();
 164 std::string startFile = confDir + START_FILE;
 165 unlink(startFile.c_str());
 166
 167 switch (pid)
 168     {
 169     case -1:
 170         return -1;
 171         break;
 172
 173     case 0:
 174         close(1);
 175         close(2);
 176         setsid();
 177         break;
 178
 179     default:
 180         struct timespec ts = {0, 200000000};
 181         for (int i = 0; i < 120 * 5; i++)
 182             {
 183             if (access(startFile.c_str(), F_OK) == 0)
 184                 {
 185                 unlink(startFile.c_str());
 186                 exit(0);
 187                 }
 188
 189             nanosleep(&ts, NULL);
 190             }
 191         unlink(startFile.c_str());
 192         exit(1);
 193         break;
 194     }
 195 #endif
 196 return 0;
 197 }
 198 //-----------------------------------------------------------------------------
 199 void KillExecuters()
 200 {
 201 std::set<pid_t>::iterator pid(executers.begin());
 202 while (pid != executers.end())
 203     {
 204     printfd(__FILE__, "KillExecuters pid=%d\n", *pid);
 205     kill(*pid, SIGUSR1);
 206     ++pid;
 207     }
 208 }
 209 //-----------------------------------------------------------------------------
 210 } // namespace anonymous
 211 //-----------------------------------------------------------------------------
 212 int main(int argc, char * argv[])
 213 {
 214 int msgID = -11;
 215
 216 GetStgLogger().SetLogFileName("/var/log/stargazer.log");
 217
 218 if (getuid())
 219     {
 220     printf("You must be root. Exit.\n");
 221     return 1;
 222     }
 223
 224 SETTINGS_IMPL settings(argc == 2 ? argv[1] : "");
 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, &settings);
 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             traffCnt.Reload();
 343             manager.reload();
 344             break;
 345         case SIGTERM:
 346             running = false;
 347             break;
 348         case SIGINT:
 349             running = false;
 350             break;
 351         case SIGPIPE:
 352             WriteServLog("Broken pipe!");
 353             break;
 354         case SIGCHLD:
 355             executers.erase(waitpid(-1, &status, WNOHANG));
 356             if (executers.empty())
 357                 running = false;
 358             break;
 359         default:
 360             WriteServLog("Ignore signal %d", sig);
 361             break;
 362         }
 363     }
 364
 365 WriteServLog("+++++++++++++++++++++++++++++++++++++++++++++");
 366
 367 if (loop.Stop())
 368     WriteServLog("Event loop not stopped.");
 369
 370 if (!traffCnt.Stop())
 371     WriteServLog("Traffcounter: Stop successfull.");
 372
 373 if (!users.Stop())
 374     WriteServLog("Users: Stop successfull.");
 375
 376 sleep(1);
 377 int res = msgctl(msgID, IPC_RMID, NULL);
 378 if (res)
 379     WriteServLog("Queue was not removed. id=%d", msgID);
 380 else
 381     WriteServLog("Queue removed successfully.");
 382
 383 KillExecuters();
 384
 385 StopStgTimer();
 386 WriteServLog("StgTimer: Stop successfull.");
 387
 388 WriteServLog("Stg stopped successfully.");
 389 WriteServLog("---------------------------------------------");
 390
 391 return 0;
 392 }
 393 //-----------------------------------------------------------------------------