1
#include <libpsio/psio.h>
2
#include <libpsio/psio.hpp>
14
std::string fullkwd(const char* kwdgrp, const char* kwd, int unit) {
19
std::ostringstream oss;
23
const std::string sep(":");
25
std::string fkwd = sep + kwdgrp + sep + "FILES"+ sep + unitname + sep + kwd;
26
// convert to upper case
27
std::transform(fkwd.begin(), fkwd.end(), fkwd.begin(), static_cast<int(*)(int)>(toupper));
32
void PSIO::filecfg_kwd(const char* kwdgrp, const char* kwd, int unit,
34
std::string fkwd = fullkwd(kwdgrp, kwd, unit);
35
files_keywords_[fkwd] = kwdval;
38
const std::string&PSIO::filecfg_kwd(const char* kwdgrp, const char* kwd,
40
static std::string nullstr;
42
const std::string fkwd = fullkwd(kwdgrp, kwd, unit);
43
KWDMap::const_iterator kwd_loc = files_keywords_.find(fkwd);
44
if (kwd_loc != files_keywords_.end())
45
return kwd_loc->second;
52
int psio_set_filescfg_kwd(const char* kwdgrp, const char* kwd, int unit,
54
_default_psio_lib_->filecfg_kwd(kwdgrp, kwd, unit, kwdval);
58
const char* psio_get_filescfg_kwd(const char* kwdgrp, const char* kwd,
60
return _default_psio_lib_->filecfg_kwd(kwdgrp,kwd,unit).c_str();