/* return NULL on success, xmlrpc error struct on failure */
xmlrpc_value *
status_set(xmlrpc_env *envP, struct call_info *cip, const char *s)
{
char *fname = NULL;
int res = -1;
if (!cip)
return request_error(envP, "oracc-xmlrpc: status_get: NULL call_info", NULL);
if (!cip->session)
return request_error(envP, "oracc-xmlrpc: status_get: no session set in call_info", NULL);
fname = status_file(cip);
fprintf(stderr, "status_set: attempting to set status to %s in %s\n", s, fname);
if ((res = open(fname, O_WRONLY|O_CREAT|O_TRUNC,S_IRUSR|S_IWUSR)) < 0)
return request_error(envP, "oracc-xmlrpc: unable to write status for session %s\n%s", cip->session, strerror(errno), NULL);
if ((res = write(res, s, strlen(s))) < 0)
return request_error(envP, "oracc-xmlrpc: write of %d bytes failed for session %s\n%s", strlen(s), cip->session, strerror(errno), NULL);
return NULL;
}
/**
* Get the memory usage for the current process. The constructor will
* get the memory usage. Use the current() and peak() calls to access
* the result.
*
* This will only work on Linux, on other architectures this will
* always return 0.
*/
MemoryUsage() {
#ifdef __linux__
static const char* filename = "/proc/self/status";
std::ifstream status_file(filename);
if (status_file.is_open()) {
std::string line;
while (!status_file.eof()) {
std::getline(status_file, line);
if (line.substr(0, 6) == "VmPeak") {
m_peak = parse_number(line);
}
if (line.substr(0, 6) == "VmSize") {
m_current = parse_number(line);
}
}
}
#endif
}
/* return xmlrpc status struct on success, xmlrpc error struct on failure */
xmlrpc_value *
status_get(xmlrpc_env * envP, struct call_info *cip)
{
char *fname = NULL, *buf = NULL;
int res = -1;
struct stat st;
xmlrpc_value *s;
trace();
if (!cip)
return request_error(envP, "oracc-xmlrpc: status_get: NULL call_info", NULL);
trace();
if (!cip->session)
return request_error(envP, "oracc-xmlrpc: status_get: no session set in call_info", NULL);
trace();
fname = status_file(cip);
if ((res = stat(fname, &st)) < 0)
return request_error(envP, "oracc-xmlrpc: unable to stat status for session %s\n%s", cip->session, strerror(errno), NULL);
trace();
buf = malloc((size_t)st.st_size + 1);
if ((res = open(fname, O_RDONLY)) < 0)
return request_error(envP, "oracc-xmlrpc: unable to read status for session %s\n%s", cip->session, strerror(errno), NULL);
trace();
if ((res = read(res, buf, st.st_size)) < 0)
return request_error(envP, "oracc-xmlrpc: read of %d bytes failed for session %s\n%s", (int)st.st_size, cip->session, strerror(errno), NULL);
buf[st.st_size] = '\0';
fprintf(stderr, "status_get: read status `%s'\n", buf);
trace();
s = request_status(envP, "OK", NULL);
if (!strcmp(buf, "completed"))
method_files(envP, s);
method_status(envP, s, "%s", buf, NULL);
return s;
}