procfs_regs.c revision 1.12.2.2 1 1.12.2.2 nathanw /* $NetBSD: procfs_regs.c,v 1.12.2.2 2001/11/14 19:17:12 nathanw Exp $ */
2 1.8 cgd
3 1.1 cgd /*
4 1.1 cgd * Copyright (c) 1993 Jan-Simon Pendry
5 1.6 mycroft * Copyright (c) 1993
6 1.6 mycroft * The Regents of the University of California. All rights reserved.
7 1.1 cgd *
8 1.1 cgd * This code is derived from software contributed to Berkeley by
9 1.1 cgd * Jan-Simon Pendry.
10 1.1 cgd *
11 1.1 cgd * Redistribution and use in source and binary forms, with or without
12 1.1 cgd * modification, are permitted provided that the following conditions
13 1.1 cgd * are met:
14 1.1 cgd * 1. Redistributions of source code must retain the above copyright
15 1.1 cgd * notice, this list of conditions and the following disclaimer.
16 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
17 1.1 cgd * notice, this list of conditions and the following disclaimer in the
18 1.1 cgd * documentation and/or other materials provided with the distribution.
19 1.1 cgd * 3. All advertising materials mentioning features or use of this software
20 1.1 cgd * must display the following acknowledgement:
21 1.1 cgd * This product includes software developed by the University of
22 1.1 cgd * California, Berkeley and its contributors.
23 1.1 cgd * 4. Neither the name of the University nor the names of its contributors
24 1.1 cgd * may be used to endorse or promote products derived from this software
25 1.1 cgd * without specific prior written permission.
26 1.1 cgd *
27 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
28 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
29 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
30 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
31 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
32 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
33 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
34 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
35 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
36 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
37 1.1 cgd * SUCH DAMAGE.
38 1.1 cgd *
39 1.8 cgd * @(#)procfs_regs.c 8.4 (Berkeley) 6/15/94
40 1.1 cgd */
41 1.12.2.2 nathanw
42 1.12.2.2 nathanw #include <sys/cdefs.h>
43 1.12.2.2 nathanw __KERNEL_RCSID(0, "$NetBSD: procfs_regs.c,v 1.12.2.2 2001/11/14 19:17:12 nathanw Exp $");
44 1.1 cgd
45 1.1 cgd #include <sys/param.h>
46 1.1 cgd #include <sys/systm.h>
47 1.1 cgd #include <sys/time.h>
48 1.1 cgd #include <sys/kernel.h>
49 1.12.2.1 nathanw #include <sys/lwp.h>
50 1.1 cgd #include <sys/proc.h>
51 1.1 cgd #include <sys/vnode.h>
52 1.2 cgd #include <sys/ptrace.h>
53 1.1 cgd #include <machine/reg.h>
54 1.1 cgd #include <miscfs/procfs/procfs.h>
55 1.1 cgd
56 1.6 mycroft int
57 1.12.2.1 nathanw procfs_doregs(curp, l, pfs, uio)
58 1.11 thorpej struct proc *curp; /* tracer */
59 1.12.2.1 nathanw struct lwp *l; /* traced */
60 1.1 cgd struct pfsnode *pfs;
61 1.1 cgd struct uio *uio;
62 1.1 cgd {
63 1.3 cgd #if defined(PT_GETREGS) || defined(PT_SETREGS)
64 1.1 cgd int error;
65 1.1 cgd struct reg r;
66 1.1 cgd char *kv;
67 1.1 cgd int kl;
68 1.10 thorpej
69 1.12.2.1 nathanw if ((error = procfs_checkioperm(curp, l->l_proc)) != 0)
70 1.10 thorpej return (EPERM);
71 1.1 cgd
72 1.1 cgd kl = sizeof(r);
73 1.1 cgd kv = (char *) &r;
74 1.1 cgd
75 1.1 cgd kv += uio->uio_offset;
76 1.1 cgd kl -= uio->uio_offset;
77 1.1 cgd if (kl > uio->uio_resid)
78 1.1 cgd kl = uio->uio_resid;
79 1.1 cgd
80 1.12.2.1 nathanw PHOLD(l);
81 1.9 mycroft
82 1.1 cgd if (kl < 0)
83 1.1 cgd error = EINVAL;
84 1.1 cgd else
85 1.12.2.1 nathanw error = process_read_regs(l, &r);
86 1.1 cgd if (error == 0)
87 1.1 cgd error = uiomove(kv, kl, uio);
88 1.1 cgd if (error == 0 && uio->uio_rw == UIO_WRITE) {
89 1.12.2.1 nathanw if (l->l_stat != LSSTOP)
90 1.1 cgd error = EBUSY;
91 1.1 cgd else
92 1.12.2.1 nathanw error = process_write_regs(l, &r);
93 1.1 cgd }
94 1.9 mycroft
95 1.12.2.1 nathanw PRELE(l);
96 1.1 cgd
97 1.1 cgd uio->uio_offset = 0;
98 1.1 cgd return (error);
99 1.3 cgd #else
100 1.6 mycroft return (EINVAL);
101 1.3 cgd #endif
102 1.3 cgd }
103 1.3 cgd
104 1.4 cgd int
105 1.12.2.1 nathanw procfs_validregs(l, mp)
106 1.12.2.1 nathanw struct lwp *l;
107 1.12 fvdl struct mount *mp;
108 1.3 cgd {
109 1.3 cgd
110 1.6 mycroft #if defined(PT_SETREGS) || defined(PT_GETREGS)
111 1.12.2.1 nathanw return ((l->l_proc->p_flag & P_SYSTEM) == 0);
112 1.4 cgd #else
113 1.4 cgd return (0);
114 1.3 cgd #endif
115 1.1 cgd }
116