| 12 | } |
| 13 | |
| 14 | void Initialize () |
| 15 | { |
| 16 | // Known machines: |
| 17 | // nersc.perlmutter: NERSC_HOST=perlmutter |
| 18 | // LMOD_SITE_NAME=perlmutter |
| 19 | // olcf.frontier : LMOD_SITE_NAME=OLCF |
| 20 | // LMOD_SYSTEM_NAME=frontier |
| 21 | |
| 22 | auto const* env_nersc_host = std::getenv("NERSC_HOST"); |
| 23 | auto const* env_lmod_site_name = std::getenv("LMOD_SITE_NAME"); |
| 24 | auto const* env_lmod_system_name = std::getenv("LMOD_SYSTEM_NAME"); |
| 25 | auto const* env_slurm_cluster_name = std::getenv("SLURM_CLUSTER_NAME"); |
| 26 | |
| 27 | if (env_nersc_host && env_lmod_system_name) { |
| 28 | s_name = std::string("nersc."); |
| 29 | s_name.append(env_lmod_system_name); |
| 30 | } else if (env_lmod_site_name && env_lmod_system_name) { |
| 31 | s_name = std::string(env_lmod_site_name); |
| 32 | s_name.append(".").append(env_lmod_system_name); |
| 33 | } else if (env_slurm_cluster_name) { |
| 34 | s_name = std::string(env_slurm_cluster_name); |
| 35 | } |
| 36 | |
| 37 | if ( ! s_name.empty()) { |
| 38 | s_name = amrex::toLower(std::move(s_name)); |
| 39 | } |
| 40 | |
| 41 | amrex::ExecOnFinalize(Machine::Finalize); |
| 42 | } |
| 43 | |
| 44 | void Finalize () {} |
| 45 | |