glebfm/strace
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

fcntl.c: implement decoding for all known operations

Browse Source 
* xlat/f_owner_types.in: New file.
* xlat/f_seals.in: Likewise.
* fcntl.c: Include "xlat/f_owner_types.h" and "xlat/f_seals.h".
(print_f_owner_ex): New function.
(SYS_FUNC(fcntl)): Use it.
Handle F_SETPIPE_SZ, F_GETPIPE_SZ, F_OFD_SETLKW,
F_OFD_SETLK, F_SETOWN_EX, F_ADD_SEALS, F_SETSIG,
F_OFD_GETLK, F_GETOWN_EX, F_GET_SEALS, F_GETSIG.
This commit is contained in:
Дмитрий Левин 2015-10-09 21:08:43 +00:00
parent 46129c998a
commit c7c5270966
3 changed files with 60 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

58
fcntl.c
View File

@ -31,6 +31,8 @@
#include "defs.h"
#include "flock.h"
#include "xlat/f_owner_types.h"
#include "xlat/f_seals.h"
#include "xlat/fcntlcmds.h"
#include "xlat/fdflags.h"
#include "xlat/lockfcmds.h"
@ -106,6 +108,19 @@ printflock(struct tcb *tcp, long addr, int getlk)
tprints("}");
}
static void
print_f_owner_ex(struct tcb *tcp, const long addr)
{
struct { int type, pid; } owner;
if (umove_or_printaddr(tcp, addr, &owner))
return;
tprints("{type=");
printxval(f_owner_types, owner.type, "F_OWNER_???");
tprintf(", pid=%d}", owner.pid);
}
SYS_FUNC(fcntl)
{
if (entering(tcp)) {
@ -118,6 +133,7 @@ SYS_FUNC(fcntl)
printflags(fdflags, tcp->u_arg[2], "FD_???");
break;
case F_SETOWN:
case F_SETPIPE_SZ:
tprintf(", %ld", tcp->u_arg[2]);
break;
case F_DUPFD:
@ -128,14 +144,22 @@ SYS_FUNC(fcntl)
tprints(", ");
tprint_open_modes(tcp->u_arg[2]);
break;
case F_SETLK: case F_SETLKW:
case F_SETLK:
case F_SETLKW:
tprints(", ");
printflock(tcp, tcp->u_arg[2], 0);
break;
case F_SETLK64: case F_SETLKW64:
case F_SETLK64:
case F_SETLKW64:
case F_OFD_SETLK:
case F_OFD_SETLKW:
tprints(", ");
printflock64(tcp, tcp->u_arg[2], 0);
break;
case F_SETOWN_EX:
tprints(", ");
print_f_owner_ex(tcp, tcp->u_arg[2]);
break;
case F_NOTIFY:
tprints(", ");
printflags(notifyflags, tcp->u_arg[2], "DN_???");
@ -144,7 +168,16 @@ SYS_FUNC(fcntl)
tprints(", ");
printxval(lockfcmds, tcp->u_arg[2], "F_???");
break;
case F_ADD_SEALS:
tprints(", ");
printflags(f_seals, tcp->u_arg[2], "F_SEAL_???");
break;
case F_SETSIG:
tprints(", ");
tprints(signame(tcp->u_arg[2]));
break;
case F_GETOWN:
case F_GETPIPE_SZ:
break;
default:
return 0;
@ -156,25 +189,40 @@ SYS_FUNC(fcntl)
if (syserror(tcp) || tcp->u_rval == 0)
return 0;
tcp->auxstr = sprintflags("flags ", fdflags, tcp->u_rval);
return RVAL_HEX|RVAL_STR;
return RVAL_HEX | RVAL_STR;
case F_GETFL:
if (syserror(tcp))
return 0;
tcp->auxstr = sprint_open_modes(tcp->u_rval);
return RVAL_HEX|RVAL_STR;
return RVAL_HEX | RVAL_STR;
case F_GETLK:
tprints(", ");
printflock(tcp, tcp->u_arg[2], 1);
break;
case F_GETLK64:
case F_OFD_GETLK:
tprints(", ");
printflock64(tcp, tcp->u_arg[2], 1);
break;
case F_GETOWN_EX:
tprints(", ");
print_f_owner_ex(tcp, tcp->u_arg[2]);
break;
case F_GETLEASE:
if (syserror(tcp))
return 0;
tcp->auxstr = xlookup(lockfcmds, tcp->u_rval);
return RVAL_HEX|RVAL_STR;
return RVAL_HEX | RVAL_STR;
case F_GET_SEALS:
if (syserror(tcp) || tcp->u_rval == 0)
return 0;
tcp->auxstr = sprintflags("seals ", f_seals, tcp->u_rval);
return RVAL_HEX | RVAL_STR;
case F_GETSIG:
if (syserror(tcp) || tcp->u_rval == 0)
return 0;
tcp->auxstr = signame(tcp->u_rval);
return RVAL_STR;
default:
tprintf(", %#lx", tcp->u_arg[2]);
break;

3
xlat/f_owner_types.in Normal file
View File

@ -0,0 +1,3 @@
F_OWNER_TID 0
F_OWNER_PID 1
F_OWNER_PGRP 2

4
xlat/f_seals.in Normal file
View File

@ -0,0 +1,4 @@
F_SEAL_SEAL 1
F_SEAL_SHRINK 2
F_SEAL_GROW 4
F_SEAL_WRITE 8