Dmitry V. Levin
fff2f319f9
* sched.c: New file. * Makefile.am (strace_SOURCES): Add it. * process.c: Move sys_sched_getscheduler, sys_sched_setscheduler, sys_sched_getparam, sys_sched_setparam, sys_sched_get_priority_min, sys_sched_rr_get_interval, and related code to sched.c.
85 lines
1.6 KiB
C
85 lines
1.6 KiB
C
#include "defs.h"
|
|
|
|
#include <sched.h>
|
|
|
|
#include "xlat/schedulers.h"
|
|
|
|
int
|
|
sys_sched_getscheduler(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
tprintf("%d", (int) tcp->u_arg[0]);
|
|
} else if (!syserror(tcp)) {
|
|
tcp->auxstr = xlookup(schedulers, tcp->u_rval);
|
|
if (tcp->auxstr != NULL)
|
|
return RVAL_STR;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
sys_sched_setscheduler(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
struct sched_param p;
|
|
tprintf("%d, ", (int) tcp->u_arg[0]);
|
|
printxval(schedulers, tcp->u_arg[1], "SCHED_???");
|
|
if (umove(tcp, tcp->u_arg[2], &p) < 0)
|
|
tprintf(", %#lx", tcp->u_arg[2]);
|
|
else
|
|
tprintf(", { %d }", p.sched_priority);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
sys_sched_getparam(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
tprintf("%d, ", (int) tcp->u_arg[0]);
|
|
} else {
|
|
struct sched_param p;
|
|
if (umove(tcp, tcp->u_arg[1], &p) < 0)
|
|
tprintf("%#lx", tcp->u_arg[1]);
|
|
else
|
|
tprintf("{ %d }", p.sched_priority);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
sys_sched_setparam(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
struct sched_param p;
|
|
if (umove(tcp, tcp->u_arg[1], &p) < 0)
|
|
tprintf("%d, %#lx", (int) tcp->u_arg[0], tcp->u_arg[1]);
|
|
else
|
|
tprintf("%d, { %d }", (int) tcp->u_arg[0], p.sched_priority);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
sys_sched_get_priority_min(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
printxval(schedulers, tcp->u_arg[0], "SCHED_???");
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
sys_sched_rr_get_interval(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
tprintf("%ld, ", (long) (pid_t) tcp->u_arg[0]);
|
|
} else {
|
|
if (syserror(tcp))
|
|
tprintf("%#lx", tcp->u_arg[1]);
|
|
else
|
|
print_timespec(tcp, tcp->u_arg[1]);
|
|
}
|
|
return 0;
|
|
}
|