URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [branches/] [oc/] [gdb-5.0/] [gdb/] [vx-share/] [xdr_ptrace.c] - Blame information for rev 1765

Details | Compare with Previous | View Log


/* xdr_ptrace.c  - xdr routines for remote ptrace calls */
 
/*  Copyright 1984, 1985, 1986, 1987, 1988, 1989, 1992 Free Software Foundation, Inc.
 
    This code was donated by Wind River Systems, Inc. */
 
/*
modification history
--------------------
01b,25may91,maf  now uses counted bytes struct to transfer registers.
                 removed xdr_regs_ptr (), xdr_fp_status_ptr (), and
                   xdr_fpa_regs_ptr ().
01a,05jun90,llk  extracted from xdr_ptrace.h, version 01c.
*/
 
#include "defs.h"
#include "vxWorks.h"
#include <rpc/rpc.h>
#include "xdr_ptrace.h"
 
#define MAX_LEN 32000
 
/********************************************************************
*
* xdr_c_bytes -
*
* xdr routine for counted bytes
*
*/
bool_t xdr_c_bytes(xdrs,objp)
    XDR *xdrs;
    C_bytes *objp;
    {
    return(xdr_bytes(xdrs, &objp->bytes, (u_int *) &objp->len, MAX_LEN));
    } /* xdr_c_bytes */
 
/********************************************************************
*
* xdr_c_bytes_ptr -
*
* xdr routine for counted bytes branch of ptrace_info
*
*/
 
LOCAL bool_t xdr_c_bytes_ptr(xdrs,objp)
    XDR *xdrs;
    C_bytes **objp;
    {
    return(xdr_pointer(xdrs, (char **) objp, sizeof(C_bytes), xdr_c_bytes));
    } /* xdr_c_bytes_ptr */
 
/********************************************************************
*
* xdr_ptrace_info -
*
* xdr routine for discriminated union ptrace_info
*
*/
 
bool_t xdr_ptrace_info(xdrs,objp)
    XDR *xdrs;
    Ptrace_info *objp;
    {
    static struct xdr_discrim choices[] =
        {
            { (int) DATA, xdr_c_bytes_ptr },
            { __dontcare__, NULL }
        };
 
    return(xdr_union(xdrs, (enum_t *) &objp->ttype,
        (char *) &objp->more_data, choices, xdr_void));
    } /* xdr_ptrace_info */
 
/********************************************************************
*
* xdr_rptrace -
*
* xdr routine for remote ptrace data into server
*
*/
 
bool_t xdr_rptrace(xdrs,objp)
    XDR *xdrs;
    Rptrace *objp;
    {
    if (! xdr_int(xdrs, &objp->pid))
        return(FALSE);
    if (! xdr_int(xdrs, &objp->data))
        return(FALSE);
    if (! xdr_int(xdrs, &objp->addr))
        return(FALSE);
    if (! xdr_ptrace_info(xdrs, &objp->info))
        return(FALSE);
 
    return(TRUE);
    } /* xdr_rptrace */
 
/********************************************************************
*
* xdr_ptrace_return -
*
* xdr routine for remote ptrace data returned by server
*
*/
 
bool_t xdr_ptrace_return(xdrs, objp)
    XDR *xdrs;
    Ptrace_return *objp;
    {
    if (! xdr_int(xdrs, &objp->status))
        return(FALSE);
    if (! xdr_int(xdrs, &objp->errno_num))
        return(FALSE);
    if (! xdr_ptrace_info(xdrs, &objp->info))
        return(FALSE);
 
    return(TRUE);
    } /* xdr_ptrace_return */

Line No.	Rev	Author	Line
1	106	markom	`/* xdr_ptrace.c - xdr routines for remote ptrace calls */`
2
3			`/* Copyright 1984, 1985, 1986, 1987, 1988, 1989, 1992 Free Software Foundation, Inc.`
4
5			`This code was donated by Wind River Systems, Inc. */`
6
7			`/*`
8			`modification history`
9			`--------------------`
10			`01b,25may91,maf now uses counted bytes struct to transfer registers.`
11			`removed xdr_regs_ptr (), xdr_fp_status_ptr (), and`
12			`xdr_fpa_regs_ptr ().`
13			`01a,05jun90,llk extracted from xdr_ptrace.h, version 01c.`
14			`*/`
15
16			`#include "defs.h"`
17			`#include "vxWorks.h"`
18			`#include <rpc/rpc.h>`
19			`#include "xdr_ptrace.h"`
20
21			`#define MAX_LEN 32000`
22
23			`/********************************************************************`
24			`*`
25			`* xdr_c_bytes -`
26			`*`
27			`* xdr routine for counted bytes`
28			`*`
29			`*/`
30			`bool_t xdr_c_bytes(xdrs,objp)`
31			`XDR *xdrs;`
32			`C_bytes *objp;`
33			`{`
34			`return(xdr_bytes(xdrs, &objp->bytes, (u_int *) &objp->len, MAX_LEN));`
35			`} /* xdr_c_bytes */`
36
37			`/********************************************************************`
38			`*`
39			`* xdr_c_bytes_ptr -`
40			`*`
41			`* xdr routine for counted bytes branch of ptrace_info`
42			`*`
43			`*/`
44
45			`LOCAL bool_t xdr_c_bytes_ptr(xdrs,objp)`
46			`XDR *xdrs;`
47			`C_bytes **objp;`
48			`{`
49			`return(xdr_pointer(xdrs, (char **) objp, sizeof(C_bytes), xdr_c_bytes));`
50			`} /* xdr_c_bytes_ptr */`
51
52			`/********************************************************************`
53			`*`
54			`* xdr_ptrace_info -`
55			`*`
56			`* xdr routine for discriminated union ptrace_info`
57			`*`
58			`*/`
59
60			`bool_t xdr_ptrace_info(xdrs,objp)`
61			`XDR *xdrs;`
62			`Ptrace_info *objp;`
63			`{`
64			`static struct xdr_discrim choices[] =`
65			`{`
66			`{ (int) DATA, xdr_c_bytes_ptr },`
67			`{ __dontcare__, NULL }`
68			`};`
69
70			`return(xdr_union(xdrs, (enum_t *) &objp->ttype,`
71			`(char *) &objp->more_data, choices, xdr_void));`
72			`} /* xdr_ptrace_info */`
73
74			`/********************************************************************`
75			`*`
76			`* xdr_rptrace -`
77			`*`
78			`* xdr routine for remote ptrace data into server`
79			`*`
80			`*/`
81
82			`bool_t xdr_rptrace(xdrs,objp)`
83			`XDR *xdrs;`
84			`Rptrace *objp;`
85			`{`
86			`if (! xdr_int(xdrs, &objp->pid))`
87			`return(FALSE);`
88			`if (! xdr_int(xdrs, &objp->data))`
89			`return(FALSE);`
90			`if (! xdr_int(xdrs, &objp->addr))`
91			`return(FALSE);`
92			`if (! xdr_ptrace_info(xdrs, &objp->info))`
93			`return(FALSE);`
94
95			`return(TRUE);`
96			`} /* xdr_rptrace */`
97
98			`/********************************************************************`
99			`*`
100			`* xdr_ptrace_return -`
101			`*`
102			`* xdr routine for remote ptrace data returned by server`
103			`*`
104			`*/`
105
106			`bool_t xdr_ptrace_return(xdrs, objp)`
107			`XDR *xdrs;`
108			`Ptrace_return *objp;`
109			`{`
110			`if (! xdr_int(xdrs, &objp->status))`
111			`return(FALSE);`
112			`if (! xdr_int(xdrs, &objp->errno_num))`
113			`return(FALSE);`
114			`if (! xdr_ptrace_info(xdrs, &objp->info))`
115			`return(FALSE);`
116
117			`return(TRUE);`
118			`} /* xdr_ptrace_return */`

Browse

Tools

Subversion Repositories or1k

[/] [or1k/] [branches/] [oc/] [gdb-5.0/] [gdb/] [vx-share/] [xdr_ptrace.c] - Blame information for rev 1765