basf2.cc

/**************************************************************************
 * basf2 (Belle II Analysis Software Framework)                           *
 * Author: The Belle II Collaboration                                     *
 *                                                                        *
 * See git log for contributors and copyright holders.                    *
 * This file is licensed under LGPL-3.0, see LICENSE.md.                  *
 **************************************************************************/
 
/*
 * There are two ways to work with the framework. Either
 * by executing "basf2" and providing a python steering
 * file as an argument or by using the framework within
 * python itself.
 *
 * This file implements the main executable "basf2".
 */
 
#include <Python.h> //Has to be the first include (restriction due to python)
 
#include <framework/core/Environment.h>
#include <framework/core/DataFlowVisualization.h>
#include <framework/core/MetadataService.h>
#include <framework/core/RandomNumbers.h>
#include <framework/logging/Logger.h>
#include <framework/logging/LogConfig.h>
#include <framework/logging/LogSystem.h>
#include <framework/utilities/FileSystem.h>
 
 
#include <boost/program_options.hpp>
#include <boost/algorithm/string/predicate.hpp> //for iequals()
 
#include <cstdlib>
#include <iostream>
#include <string>
#include <vector>
#include <fstream>
#include <locale>
#include <codecvt>
#include <filesystem>
 
#ifdef HAS_CALLGRIND
#include <valgrind/valgrind.h>
#endif
 
using namespace std;
using namespace Belle2;
 
namespace prog = boost::program_options;
 
namespace {
 
  void checkPythonStatus(PyConfig& config, PyStatus& status)
  {
    if (PyStatus_Exception(status)) {
      PyConfig_Clear(&config);
      Py_ExitStatusException(status);
    }
  }
}
 
int main(int argc, char* argv[])
{
  //Initialize metadata service
  MetadataService::Instance();
 
  //Check for Belle2 environment variables (during environment initialisation)
  Environment::Instance();
 
  //Get the lib path (checked for NULL in Environment)
  const char* belle2SubDir = getenv("BELLE2_SUBDIR");
  std::filesystem::path libPath = "lib";
  libPath /= belle2SubDir;
 
  string runModuleIOVisualization(""); //nothing done if empty
  vector<string> arguments;
  string pythonFile;
 
  try {
    //---------------------------------------------------
    //          Handle command line options
    //---------------------------------------------------
 
    prog::options_description generic("Generic options (to be used instead of steering file)");
    generic.add_options()
    ("help,h", "Print this help")
    ("version,v", "Print long and verbose version string")
    ("version-short", "Print short version string")
    ("info", "Print information about basf2")
    ("license", "Print the short version of the basf2 license")
    ("modules,m", prog::value<string>()->implicit_value(""),
     "Print a list of all available modules (can be limited to a given package), or give detailed information on a specific module given as an argument (case sensitive).")
    ;
 
    prog::options_description config("Configuration");
    config.add_options()
    ("steering", prog::value<string>(), "The python steering file to run.")
    ("arg", prog::value<vector<string> >(&arguments), "Additional arguments to be passed to the steering file")
    ("log_level,l", prog::value<string>(),
     "Set global log level (one of DEBUG, INFO, RESULT, WARNING, or ERROR). Takes precedence over set_log_level() in steering file.")
    ("package_log_level", prog::value<vector<string> >(),
     "Set package log level. Can be specified multiple times to use more than one package. (Examples: 'klm:INFO or cdc:DEBUG:10') ")
    ("module_log_level", prog::value<vector<string> >(),
     "Set module log level. Can be specified multiple times to use more than one package. (Examples: 'EventInfoSetter:INFO or CDCDigitizer:DEBUG:10') ")
    ("random-seed", prog::value<string>(),
     "Set the default initial seed for the random number generator. "
     "This does not take precedence over calls to set_random_seed() in the steering file, but just changes the default. "
     "If no seed is set via either of these mechanisms, the initial seed will be taken from the system's entropy pool.")
    ("debug_level,d", prog::value<unsigned int>(), "Set default debug level. Also sets the log level to DEBUG.")
    ("events,n", prog::value<unsigned int>(), "Override number of events for EventInfoSetter; otherwise set maximum number of events.")
    ("run", prog::value<int>(), "Override run for EventInfoSetter, must be used with -n and --experiment")
    ("experiment", prog::value<int>(), "Override experiment for EventInfoSetter, must be used with -n and --run")
    ("skip-events", prog::value<unsigned int>(),
     "Override skipNEvents for EventInfoSetter and RootInput. Skips this many events before starting.")
    ("input,i", prog::value<vector<string> >(),
     "Override name of input file for (Seq)RootInput. Can be specified multiple times to use more than one file. For RootInput, wildcards (as in *.root or [1-3].root) can be used, but need to be escaped with \\  or by quoting the argument to avoid expansion by the shell.")
    ("sequence,S", prog::value<vector<string> >(),
     "Override the number sequence (e.g. 23:42,101) defining the entries (starting from 0) which are processed by RootInput."
     "Must be specified exactly once for each file to be opened."
     "This means one sequence per input file AFTER wildcard expansion."
     "The first event has the number 0.")
    ("output,o", prog::value<string>(),
     "Override name of output file for (Seq)RootOutput. In case multiple modules are present in the path, only the first will be affected.")
    ("processes,p", prog::value<int>(), "Override number of worker processes (>=1 enables, 0 disables parallel processing)");
 
    prog::options_description advanced("Advanced Options");
    advanced.add_options()
    ("module-io", prog::value<string>(),
     "Create diagram of inputs and outputs for a single module, saved as ModuleName.dot. To create a PostScript file, use e.g. 'dot ModuleName.dot -Tps -o out.ps'.")
    ("visualize-dataflow", "Generate data flow diagram (dataflow.dot) for the executed steering file.")
    ("stats",
     "Enable collection of statistics during event processing (fills table called via 'print(statistics)). Useful for debugging, but adds extra processing time.")
    ("dry-run",
     "Read steering file, but do not start any event processing when process(path) is called. Prints information on input/output files that would be used during normal execution.")
    ("dump-path", prog::value<string>(),
     "Read steering file, but do not actually start any event processing. The module path the steering file would execute is instead pickled (serialized) into the given file.")
    ("execute-path", prog::value<string>(),
     "Do not read any provided steering file, instead execute the pickled (serialized) path from the given file.")
    ("zmq",
     "Use ZMQ for multiprocessing instead of a RingBuffer. This has many implications and should only be used by experts.")
    ("job-information", prog::value<string>(),
     "Create json file with metadata of output files and basf2 execution status.")
    ("realm", prog::value<string>(),
     "Set the realm of the basf2 execution (online or production).")
    ("secondary-input", prog::value<vector<string>>(),
     "Override name of input file for the secondary RootInput module used for the event embedding. Can be specified multiple times to use more than one file. Wildcards (as in *.root or [1-3].root) can be used, but need to be escaped with \\  or by quoting the argument to avoid expansion by the shell.")
#ifdef HAS_CALLGRIND
    ("profile", prog::value<string>(),
     "Name of a module to profile using callgrind. If more than one module of that name is registered only the first one will be profiled.")
#endif
    ;
 
    prog::options_description cmdlineOptions;
    cmdlineOptions.add(generic).add(config).add(advanced);
 
    prog::positional_options_description posOptDesc;
    posOptDesc.add("steering", 1);
    posOptDesc.add("arg", -1);
 
    prog::variables_map varMap;
    prog::store(prog::command_line_parser(argc, argv).
                options(cmdlineOptions).positional(posOptDesc).run(), varMap);
    prog::notify(varMap);
 
    //Check for non-steering file options
    if (varMap.count("help")) {
      cout << "Usage: " << argv[0] << " [OPTIONS] [STEERING_FILE] [-- [STEERING_FILE_OPTIONS]]\n";
      cout << cmdlineOptions << endl;
      return 0;
    } else if (varMap.count("version")) {
      pythonFile = "basf2/version.py";
    } else if (varMap.count("version-short")) {
      pythonFile = "basf2/version_short.py";
    } else if (varMap.count("info")) {
      pythonFile = "basf2_cli/print_info.py";
    } else if (varMap.count("license")) {
      pythonFile = "basf2_cli/print_license.py";
    } else if (varMap.count("modules")) {
      string modArgs = varMap["modules"].as<string>();
      if (!modArgs.empty()) {
        arguments.insert(arguments.begin(), modArgs);
      }
      // recent boost program_options will not consume extra tokens for
      // implicit options. In this case the module/package name gets consumed
      // in the steering file so we just use that.
      if (varMap.count("steering")) {
        arguments.insert(arguments.begin(), varMap["steering"].as<string>());
      }
      pythonFile = "basf2_cli/modules.py";
    } else if (varMap.count("module-io")) {
      runModuleIOVisualization = varMap["module-io"].as<string>();
      pythonFile = "basf2/core.py"; //make module maps available, visualization will happen later
    } else if (varMap.count("execute-path")) {
      Environment::Instance().setPicklePath(varMap["execute-path"].as<string>());
      pythonFile = "basf2_cli/execute_pickled_path.py";
    } else if (varMap.count("steering")) {
      // steering file not misused as module name, so print it's name :D
      pythonFile = varMap["steering"].as<string>();
    } else {
      // launch an interactive python session.
      pythonFile = "interactive.py";
    }
 
    if (!pythonFile.empty()) {
      //Search in local or central lib/ if this isn't a direct path
      if (!std::filesystem::exists(pythonFile)) {
        std::string libFile = FileSystem::findFile((libPath / pythonFile).string(), true);
        if (!libFile.empty())
          pythonFile = libFile;
      }
      if (varMap.count("steering") and not varMap.count("modules")) {
        B2INFO("Steering file: " << pythonFile);
      }
    }
 
    // -p
    // Do now so that we can override if profiling is requested
    if (varMap.count("processes")) {
      int nprocesses = varMap["processes"].as<int>();
      if (nprocesses < 0) {
        B2FATAL("Invalid number of processes!");
      }
      Environment::Instance().setNumberProcessesOverride(nprocesses);
    }
 
    // --zmq
    if (varMap.count("zmq")) {
      Environment::Instance().setUseZMQ(true);
    }
 
 
#ifdef HAS_CALLGRIND
    if (varMap.count("profile")) {
      string profileModule = varMap["profile"].as<string>();
      //We want to profile a module so check if we are running under valgrind
      if (!RUNNING_ON_VALGRIND) {
        //Apparently not. Ok,  let's call ourself using valgrind
        cout << "Profiling requested, restarting using callgrind" << endl;
 
        //Sadly calling processes in C++ is very annoying as we have to
        //build a command line.
        vector<char*> cmd;
        //First we add all valgrind arguments.
        const vector<string> valgrind_argv {
          "valgrind", "--tool=callgrind", "--instr-atstart=no", "--trace-children=no",
          "--callgrind-out-file=callgrind." + profileModule + ".%p",
        };
        //As execvp wants non-const char* pointers we have to copy the string contents.
        cmd.reserve(valgrind_argv.size());
        for (const auto& arg : valgrind_argv) { cmd.push_back(strdup(arg.c_str())); }
        //And now we add our own arguments, including the program name.
        for (int i = 0; i < argc; ++i)  { cmd.push_back(argv[i]); }
        //Finally, execvp wants a nullptr as last argument
        cmd.push_back(nullptr);
        //And call this thing. Execvp will not return if successful as the
        //current process will be replaced so we do not need to care about what
        //happens if successful
        if (execvp(cmd[0], cmd.data()) == -1) {
          int errsv = errno;
          perror("Problem calling valgrind");
          return errsv;
        }
      }
      //Ok, running under valgrind, set module name we want to profile in
      //environment.
      Environment::Instance().setProfileModuleName(profileModule);
      //and make sure there is no multiprocessing when profiling
      Environment::Instance().setNumberProcessesOverride(0);
    }
#endif
 
    // -n
    if (varMap.count("events")) {
      unsigned int nevents = varMap["events"].as<unsigned int>();
      if (nevents == 0 or nevents == std::numeric_limits<unsigned int>::max()) {
        B2FATAL("Invalid number of events (valid range: 1.." << std::numeric_limits<unsigned int>::max() - 1 << ")!");
      }
      Environment::Instance().setNumberEventsOverride(nevents);
    }
    // --run & --experiment
    if (varMap.count("experiment") or varMap.count("run")) {
      if (!varMap.count("events"))
        B2FATAL("--experiment and --run must be used with --events/-n!");
      if (!(varMap.count("run") and varMap.count("experiment")))
        B2FATAL("Both --experiment and --run must be specified!");
 
      int run = varMap["run"].as<int>();
      int experiment = varMap["experiment"].as<int>();
      B2ASSERT("run must be >= 0!", run >= 0);
      B2ASSERT("experiment must be >= 0!", experiment >= 0);
      Environment::Instance().setRunExperimentOverride(run, experiment);
    }
 
    // --skip-events
    if (varMap.count("skip-events")) {
      unsigned int skipevents = varMap["skip-events"].as<unsigned int>();
      Environment::Instance().setSkipEventsOverride(skipevents);
    }
 
    // -i
    if (varMap.count("input")) {
      const auto& names = varMap["input"].as<vector<string>>();
      Environment::Instance().setInputFilesOverride(names);
    }
 
    // -S
    if (varMap.count("sequence")) {
      const auto& sequences = varMap["sequence"].as<vector<string>>();
      Environment::Instance().setEntrySequencesOverride(sequences);
    }
 
    // -o
    if (varMap.count("output")) {
      std::string name = varMap["output"].as<string>();
      Environment::Instance().setOutputFileOverride(name);
    }
 
    // -l
    if (varMap.count("log_level")) {
      std::string levelParam = varMap["log_level"].as<string>();
      int level = -1;
      for (int i = LogConfig::c_Debug; i < LogConfig::c_Fatal; i++) {
        std::string thisLevel = LogConfig::logLevelToString((LogConfig::ELogLevel)i);
        if (boost::iequals(levelParam, thisLevel)) { //case-insensitive
          level = i;
          break;
        }
      }
      if (level < 0) {
        B2FATAL("Invalid log level! Needs to be one of DEBUG, INFO, RESULT, WARNING, or ERROR.");
      }
 
      //set log level
      LogSystem::Instance().getLogConfig()->setLogLevel((LogConfig::ELogLevel)level);
      //and make sure it takes precedence over anything in the steering file
      Environment::Instance().setLogLevelOverride(level);
    }
 
    // --package_log_level
    if (varMap.count("package_log_level")) {
      const auto& packLogList = varMap["package_log_level"].as<vector<string>>();
      const std::string delimiter = ":";
      for (const std::string& packLog : packLogList) {
        if (packLog.find(delimiter) == std::string::npos) {
          B2FATAL("In --package_log_level input " << packLog << ", no colon detected. ");
          break;
        }
        /* string parsing for packageName:LOGLEVEL or packageName:DEBUG:LEVEL*/
        auto packageName = packLog.substr(0, packLog.find(delimiter));
        std::string logName = packLog.substr(packLog.find(delimiter) + delimiter.length(), packLog.length());
        int debugLevel = -1;
        if ((logName.find("DEBUG") != std::string::npos) && logName.length() > 5) {
          try {
            debugLevel = std::stoi(logName.substr(logName.find(delimiter) + delimiter.length(), logName.length()));
          } catch (std::exception& e) {
            B2WARNING("In --package_log_level, issue parsing debugLevel. Still setting log level to DEBUG.");
          }
          logName = "DEBUG";
        }
 
        int level = -1;
        /* determine log level for package */
        for (int i = LogConfig::c_Debug; i < LogConfig::c_Fatal; i++) {
          std::string thisLevel = LogConfig::logLevelToString((LogConfig::ELogLevel)i);
          if (boost::iequals(logName, thisLevel)) { //case-insensitive
            level = i;
            break;
          }
        }
        if (level < 0) {
          B2FATAL("Invalid log level! Needs to be one of DEBUG, INFO, RESULT, WARNING, or ERROR.");
        }
        /* set package log level*/
        if ((logName == "DEBUG") && (debugLevel >= 0)) {
          LogSystem::Instance().getPackageLogConfig(packageName).setDebugLevel(debugLevel);
        }
        LogSystem::Instance().getPackageLogConfig(packageName).setLogLevel((LogConfig::ELogLevel)level);
 
      }
    }
 
    // --module_log_level
    if (varMap.count("module_log_level")) {
      const auto& moduleLogList = varMap["module_log_level"].as<vector<string>>();
      const std::string delimiter = ":";
      for (const std::string& moduleLog : moduleLogList) {
        if (moduleLog.find(delimiter) == std::string::npos) {
          B2FATAL("In --module_log_level input " << moduleLog << ", no colon detected. ");
          break;
        }
        /* string parsing for packageName:LOGLEVEL or packageName:DEBUG:LEVEL*/
        auto moduleName = moduleLog.substr(0, moduleLog.find(delimiter));
        std::string moduleLogName = moduleLog.substr(moduleLog.find(delimiter) + delimiter.length(), moduleLog.length());
        int moduleDebugLevel = -1;
        if ((moduleLogName.find("DEBUG") != std::string::npos) && moduleLogName.length() > 5) {
          try {
            moduleDebugLevel = std::stoi(moduleLogName.substr(moduleLogName.find(delimiter) + delimiter.length(), moduleLogName.length()));
          } catch (std::exception& e) {
            B2WARNING("In --module_log_level, issue parsing debugLevel. Still setting log level to DEBUG.");
          }
          moduleLogName = "DEBUG";
        }
 
        int module_level = -1;
        /* determine log level for module */
        for (int i = LogConfig::c_Debug; i < LogConfig::c_Fatal; i++) {
          std::string moduleThisLevel = LogConfig::logLevelToString((LogConfig::ELogLevel)i);
          if (boost::iequals(moduleLogName, moduleThisLevel)) { //case-insensitive
            module_level = i;
            break;
          }
        }
        if (module_level < 0) {
          B2FATAL("Invalid log level! Needs to be one of DEBUG, INFO, RESULT, WARNING, or ERROR.");
        }
        /* set package log level*/
        if ((moduleLogName == "DEBUG") && (moduleDebugLevel >= 0)) {
          LogSystem::Instance().getModuleLogConfig(moduleName).setDebugLevel(moduleDebugLevel);
        }
        LogSystem::Instance().getModuleLogConfig(moduleName).setLogLevel((LogConfig::ELogLevel)module_level);
 
      }
    }
 
    // -d
    if (varMap.count("debug_level")) {
      unsigned int level = varMap["debug_level"].as<unsigned int>();
      LogSystem::Instance().getLogConfig()->setDebugLevel(level);
      LogSystem::Instance().getLogConfig()->setLogLevel(LogConfig::c_Debug);
    }
 
    if (varMap.count("visualize-dataflow")) {
      Environment::Instance().setVisualizeDataFlow(true);
      if (Environment::Instance().getNumberProcesses() > 0) {
        B2WARNING("--visualize-dataflow cannot be used with parallel processing, no graphs will be saved!");
      }
    }
 
    if (varMap.count("stats")) {
      Environment::Instance().setStats(true);
    }
 
    if (varMap.count("dry-run")) {
      Environment::Instance().setDryRun(true);
    }
 
    if (varMap.count("dump-path")) {
      Environment::Instance().setPicklePath(varMap["dump-path"].as<string>());
    }
 
    if (varMap.count("random-seed")) {
      RandomNumbers::initialize(varMap["random-seed"].as<string>());
    }
 
    if (varMap.count("job-information")) {
      string jobInfoFile = varMap["job-information"].as<string>();
      MetadataService::Instance().setJsonFileName(jobInfoFile);
      B2INFO("Job information file: " << jobInfoFile);
    }
 
    if (varMap.count("realm")) {
      std::string realmParam = varMap["realm"].as<string>();
      int realm = -1;
      for (int i = LogConfig::c_Online; i <= LogConfig::c_Production; i++) {
        std::string thisRealm = LogConfig::logRealmToString((LogConfig::ELogRealm)i);
        if (boost::iequals(realmParam, thisRealm)) { //case-insensitive
          realm = i;
          break;
        }
      }
      if (realm < 0) {
        B2FATAL("Invalid realm! Needs to be one of online or production.");
      }
      Environment::Instance().setRealm((LogConfig::ELogRealm)realm);
    }
 
    if (varMap.count("secondary-input")) {
      const auto& names = varMap["secondary-input"].as<vector<string>>();
      Environment::Instance().setSecondaryInputFilesOverride(names);
    }
 
  } catch (exception& e) {
    cerr << "error: " << e.what() << endl;
    return 1;
  } catch (...) {
    cerr << "Exception of unknown type!" << endl;
    return 1;
  }
 
  //---------------------------------------------------
  //  If the python file is set, execute it
  //---------------------------------------------------
  PyStatus status;
  PyConfig config;
  PyConfig_InitPythonConfig(&config);
  config.install_signal_handlers = 0;
  config.safe_path = 0;
 
  std::wstring_convert<std::codecvt_utf8<wchar_t>> converter;
 
  std::vector<wstring> pyArgvString(arguments.size() + 2);
 
 
  pyArgvString[0] = L"python3"; //set the executable
  pyArgvString[1] = converter.from_bytes(pythonFile);
  for (size_t i = 0; i < arguments.size(); i++) {
    pyArgvString[i + 2] = converter.from_bytes(arguments[i]);
  }
  std::vector<const wchar_t*> pyArgvArray(pyArgvString.size());
  for (size_t i = 0; i < pyArgvString.size(); ++i) {
    pyArgvArray[i] = pyArgvString[i].c_str();
  }
 
 
  //Pass python filename and additional arguments to python
  status = PyConfig_SetArgv(&config, pyArgvArray.size(), const_cast<wchar_t**>(pyArgvArray.data()));
  checkPythonStatus(config, status);
 
  status = Py_InitializeFromConfig(&config);
  checkPythonStatus(config, status);
 
  auto fullPath = std::filesystem::absolute(std::filesystem::path(pythonFile));
 
  if ((std::filesystem::is_directory(fullPath)) || !(std::filesystem::exists(fullPath))) {
    B2FATAL("The given filename and/or path is not valid: " + pythonFile);
  }
 
  std::ifstream file(fullPath.string().c_str());
  std::stringstream buffer;
  buffer << file.rdbuf();
  Environment::Instance().setSteering(buffer.str());
  int pyReturnValue = Py_RunMain();
 
  //Finish Python interpreter
  PyConfig_Clear(&config);
  Py_Finalize();
 
  //basf2.py was loaded, now do module I/O visualization
  if (!runModuleIOVisualization.empty()) {
    DataFlowVisualization::executeModuleAndCreateIOPlot(runModuleIOVisualization);
  }
 
  //--dry-run: print gathered information
  if (Environment::Instance().getDryRun()) {
    Environment::Instance().printJobInformation();
  }
 
  //Report completion in json metadata
  MetadataService::Instance().addBasf2Status("finished successfully");
  MetadataService::Instance().finishBasf2();
 
  return pyReturnValue;
}