1999-12-23 17:20:14 +03:00
/*
* Copyright ( c ) 1991 , 1992 Paul Kranenburg < pk @ cs . few . eur . nl >
* Copyright ( c ) 1993 Branko Lankester < branko @ hacktic . nl >
* Copyright ( c ) 1993 , 1994 , 1995 , 1996 Rick Sladkey < jrs @ world . std . com >
* Copyright ( c ) 1996 - 1999 Wichert Akkerman < wichert @ cistron . nl >
* All rights reserved .
*
* Redistribution and use in source and binary forms , with or without
* modification , are permitted provided that the following conditions
* are met :
* 1. Redistributions of source code must retain the above copyright
* notice , this list of conditions and the following disclaimer .
* 2. Redistributions in binary form must reproduce the above copyright
* notice , this list of conditions and the following disclaimer in the
* documentation and / or other materials provided with the distribution .
* 3. The name of the author may not be used to endorse or promote products
* derived from this software without specific prior written permission .
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ` ` AS IS ' ' AND ANY EXPRESS OR
* IMPLIED WARRANTIES , INCLUDING , BUT NOT LIMITED TO , THE IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED .
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT , INDIRECT ,
* INCIDENTAL , SPECIAL , EXEMPLARY , OR CONSEQUENTIAL DAMAGES ( INCLUDING , BUT
* NOT LIMITED TO , PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES ; LOSS OF USE ,
* DATA , OR PROFITS ; OR BUSINESS INTERRUPTION ) HOWEVER CAUSED AND ON ANY
* THEORY OF LIABILITY , WHETHER IN CONTRACT , STRICT LIABILITY , OR TORT
* ( INCLUDING NEGLIGENCE OR OTHERWISE ) ARISING IN ANY WAY OUT OF THE USE OF
* THIS SOFTWARE , EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE .
*
* $ Id $
*/
1999-02-19 03:21:36 +03:00
# include "defs.h"
1999-05-09 04:29:58 +04:00
1999-02-19 03:21:36 +03:00
# include <fcntl.h>
# include <sys/stat.h>
# include <sys/time.h>
# include <sys/wait.h>
# include <sys/resource.h>
# include <sys/utsname.h>
# include <sys/user.h>
# include <sys/syscall.h>
# include <signal.h>
2001-10-10 03:47:38 +04:00
/* Bits of module.flags. */
# define MOD_UNINITIALIZED 0
# define MOD_RUNNING 1
# define MOD_DELETED 2
# define MOD_AUTOCLEAN 4
2011-06-07 14:13:24 +04:00
# define MOD_VISITED 8
2001-10-10 03:47:38 +04:00
# define MOD_USED_ONCE 16
# define MOD_JUST_FREED 32
# define MOD_INITIALIZING 64
/* Values for query_module's which. */
# define QM_MODULES 1
# define QM_DEPS 2
# define QM_REFS 3
# define QM_SYMBOLS 4
# define QM_INFO 5
struct module_symbol
{
unsigned long value ;
const char * name ;
} ;
struct module_info
{
unsigned long addr ;
unsigned long size ;
unsigned long flags ;
long usecount ;
} ;
1999-02-19 03:21:36 +03:00
2004-09-04 07:39:20 +04:00
static const struct xlat which [ ] = {
1999-11-28 00:58:20 +03:00
{ 0 , " 0 " } ,
1999-02-19 03:21:36 +03:00
{ QM_MODULES , " QM_MODULES " } ,
1999-11-28 00:58:20 +03:00
{ QM_DEPS , " QM_DEPS " } ,
{ QM_REFS , " QM_REFS " } ,
1999-02-19 03:21:36 +03:00
{ QM_SYMBOLS , " QM_SYMBOLS " } ,
1999-11-28 00:58:20 +03:00
{ QM_INFO , " QM_INFO " } ,
{ 0 , NULL } ,
} ;
2004-09-04 07:39:20 +04:00
static const struct xlat modflags [ ] = {
1999-11-28 00:58:20 +03:00
{ MOD_UNINITIALIZED , " MOD_UNINITIALIZED " } ,
{ MOD_RUNNING , " MOD_RUNNING " } ,
{ MOD_DELETED , " MOD_DELETED " } ,
{ MOD_AUTOCLEAN , " MOD_AUTOCLEAN " } ,
{ MOD_VISITED , " MOD_VISITED " } ,
{ MOD_USED_ONCE , " MOD_USED_ONCE " } ,
{ MOD_JUST_FREED , " MOD_JUST_FREED " } ,
1999-02-19 03:21:36 +03:00
{ 0 , NULL } ,
} ;
int
2009-11-03 17:38:44 +03:00
sys_query_module ( struct tcb * tcp )
1999-02-19 03:21:36 +03:00
{
2009-11-03 17:38:44 +03:00
if ( entering ( tcp ) ) {
1999-02-19 03:21:36 +03:00
printstr ( tcp , tcp - > u_arg [ 0 ] , - 1 ) ;
2011-09-01 12:00:28 +04:00
tprints ( " , " ) ;
1999-11-28 00:58:20 +03:00
printxval ( which , tcp - > u_arg [ 1 ] , " QM_??? " ) ;
2011-09-01 12:00:28 +04:00
tprints ( " , " ) ;
2009-11-03 17:38:44 +03:00
} else {
size_t ret ;
if ( ! verbose ( tcp ) | | syserror ( tcp ) | |
umove ( tcp , tcp - > u_arg [ 4 ] , & ret ) < 0 ) {
tprintf ( " %#lx, %lu, %#lx " , tcp - > u_arg [ 2 ] ,
tcp - > u_arg [ 3 ] , tcp - > u_arg [ 4 ] ) ;
1999-11-28 00:58:20 +03:00
} else if ( tcp - > u_arg [ 1 ] = = QM_INFO ) {
struct module_info mi ;
2009-11-03 17:38:44 +03:00
if ( umove ( tcp , tcp - > u_arg [ 2 ] , & mi ) < 0 ) {
tprintf ( " %#lx, " , tcp - > u_arg [ 2 ] ) ;
} else {
tprintf ( " {address=%#lx, size=%lu, flags= " ,
mi . addr , mi . size ) ;
printflags ( modflags , mi . flags , " MOD_??? " ) ;
tprintf ( " , usecount=%lu}, " , mi . usecount ) ;
}
tprintf ( " %Zu " , ret ) ;
1999-11-28 00:58:20 +03:00
} else if ( ( tcp - > u_arg [ 1 ] = = QM_MODULES ) | |
2009-07-08 15:21:17 +04:00
( tcp - > u_arg [ 1 ] = = QM_DEPS ) | |
( tcp - > u_arg [ 1 ] = = QM_REFS ) ) {
2011-09-01 12:00:28 +04:00
tprints ( " { " ) ;
1999-11-28 04:56:12 +03:00
if ( ! abbrev ( tcp ) ) {
2009-11-03 17:38:44 +03:00
char * data = malloc ( tcp - > u_arg [ 3 ] ) ;
1999-11-28 04:56:12 +03:00
char * mod = data ;
size_t idx ;
2009-11-03 17:38:44 +03:00
if ( ! data ) {
2005-06-01 22:55:42 +04:00
fprintf ( stderr , " out of memory \n " ) ;
2000-04-11 02:22:31 +04:00
tprintf ( " /* %Zu entries */ " , ret ) ;
} else {
2009-11-03 17:38:44 +03:00
if ( umoven ( tcp , tcp - > u_arg [ 2 ] ,
tcp - > u_arg [ 3 ] , data ) < 0 ) {
tprintf ( " /* %Zu entries */ " , ret ) ;
} else {
2011-06-07 14:13:24 +04:00
for ( idx = 0 ; idx < ret ; idx + + ) {
2009-11-03 17:38:44 +03:00
tprintf ( " %s%s " ,
( idx ? " , " : " " ) ,
mod ) ;
mod + = strlen ( mod ) + 1 ;
}
2000-04-11 02:22:31 +04:00
}
free ( data ) ;
1999-11-28 04:56:12 +03:00
}
2004-09-04 07:39:20 +04:00
} else
2000-02-04 00:58:30 +03:00
tprintf ( " /* %Zu entries */ " , ret ) ;
tprintf ( " }, %Zu " , ret ) ;
1999-11-28 00:58:20 +03:00
} else if ( tcp - > u_arg [ 1 ] = = QM_SYMBOLS ) {
2011-09-01 12:00:28 +04:00
tprints ( " { " ) ;
1999-11-28 04:56:12 +03:00
if ( ! abbrev ( tcp ) ) {
2009-11-03 17:38:44 +03:00
char * data = malloc ( tcp - > u_arg [ 3 ] ) ;
1999-11-28 04:56:12 +03:00
struct module_symbol * sym = ( struct module_symbol * ) data ;
size_t idx ;
2009-11-03 17:38:44 +03:00
if ( ! data ) {
2005-06-01 22:55:42 +04:00
fprintf ( stderr , " out of memory \n " ) ;
2000-04-11 02:22:31 +04:00
tprintf ( " /* %Zu entries */ " , ret ) ;
} else {
2009-11-03 17:38:44 +03:00
if ( umoven ( tcp , tcp - > u_arg [ 2 ] ,
tcp - > u_arg [ 3 ] , data ) < 0 ) {
tprintf ( " /* %Zu entries */ " , ret ) ;
} else {
2011-06-07 14:13:24 +04:00
for ( idx = 0 ; idx < ret ; idx + + ) {
2009-11-03 17:38:44 +03:00
tprintf ( " %s{name=%s, value=%lu} " ,
( idx ? " " : " " ) ,
data + ( long ) sym - > name ,
sym - > value ) ;
sym + + ;
}
2000-04-11 02:22:31 +04:00
}
free ( data ) ;
1999-11-28 04:56:12 +03:00
}
} else
2000-02-04 00:58:30 +03:00
tprintf ( " /* %Zu entries */ " , ret ) ;
tprintf ( " }, %Zd " , ret ) ;
1999-11-28 00:58:20 +03:00
} else {
printstr ( tcp , tcp - > u_arg [ 2 ] , tcp - > u_arg [ 3 ] ) ;
tprintf ( " , %#lx " , tcp - > u_arg [ 4 ] ) ;
}
1999-02-19 03:21:36 +03:00
}
return 0 ;
}
1999-10-11 02:40:07 +04:00
int
2011-05-30 16:00:14 +04:00
sys_create_module ( struct tcb * tcp )
1999-10-11 02:40:07 +04:00
{
if ( entering ( tcp ) ) {
printpath ( tcp , tcp - > u_arg [ 0 ] ) ;
tprintf ( " , %lu " , tcp - > u_arg [ 1 ] ) ;
}
return RVAL_HEX ;
}
1999-11-01 22:53:31 +03:00
int
2011-05-30 16:00:14 +04:00
sys_init_module ( struct tcb * tcp )
1999-11-01 22:53:31 +03:00
{
if ( entering ( tcp ) ) {
2005-08-03 15:27:30 +04:00
tprintf ( " %#lx, " , tcp - > u_arg [ 0 ] ) ;
tprintf ( " %lu, " , tcp - > u_arg [ 1 ] ) ;
printstr ( tcp , tcp - > u_arg [ 2 ] , - 1 ) ;
1999-11-01 22:53:31 +03:00
}
return 0 ;
}