1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License, Version 1.0 only
6 * (the "License"). You may not use this file except in compliance
7 * with the License.
8 *
9 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10 * or http://www.opensolaris.org/os/licensing.
11 * See the License for the specific language governing permissions
12 * and limitations under the License.
13 *
14 * When distributing Covered Code, include this CDDL HEADER in each
15 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16 * If applicable, add the following below this CDDL HEADER, with the
17 * fields enclosed by brackets "[]" replaced with your own identifying
18 * information: Portions Copyright [yyyy] [name of copyright owner]
19 *
20 * CDDL HEADER END
21 */
22 /*
23 * Copyright 2002 Sun Microsystems, Inc. All rights reserved.
24 * Use is subject to license terms.
25 */
26
27 #pragma ident "%Z%%M% %I% %E% SMI"
28
29 #include <stdlib.h>
30 #include <unistd.h>
31 #include <errno.h>
32 #include <sys/types.h>
33 #include <sys/mman.h>
34 #include "libproc.h"
35 #include "Pcontrol.h"
36 #include "Putil.h"
37
38
39 int
pr_meminfo(struct ps_prochandle * Pr,const uint64_t * addrs,int addr_count,const uint_t * info,int info_count,uint64_t * outdata,uint_t * validity)40 pr_meminfo(struct ps_prochandle *Pr, const uint64_t *addrs,
41 int addr_count, const uint_t *info, int info_count,
42 uint64_t *outdata, uint_t *validity)
43 {
44
45
46 int error;
47 sysret_t rval;
48 argdes_t argd[7];
49 argdes_t *adp = &argd[0];
50 struct meminfo m;
51 #ifdef _LP64
52 struct meminfo32 m32;
53 int model;
54 #endif
55 int retval = -1;
56 uintptr_t inaddr, infoaddr, outaddr, validityaddr;
57 size_t outarraysize, infoarraysize;
58 size_t inarraysize, validityarraysize;
59 size_t totalsize;
60 char *totalmap = MAP_FAILED;
61
62 inarraysize = addr_count * sizeof (uint64_t);
63 outarraysize = sizeof (uint64_t) * addr_count * info_count;
64 infoarraysize = info_count * sizeof (uint_t);
65 validityarraysize = sizeof (uint_t) * addr_count;
66
67
68 totalsize = inarraysize + outarraysize + infoarraysize +
69 validityarraysize;
70
71 if ((totalmap = pr_zmap(Pr, 0, totalsize, PROT_READ | PROT_WRITE,
72 MAP_PRIVATE)) == MAP_FAILED) {
73 dprintf("pr_meminfo: mmap failed\n");
74 goto out;
75 }
76
77 inaddr = (uintptr_t)totalmap;
78
79 outaddr = inaddr + inarraysize;
80
81 infoaddr = outaddr + outarraysize;
82
83 validityaddr = infoaddr + infoarraysize;
84
85 if (Pwrite(Pr, addrs, inarraysize, inaddr) != inarraysize) {
86 dprintf("pr_meminfo: Pwrite inaddr failed \n");
87 goto out;
88 }
89
90 if (Pwrite(Pr, info, infoarraysize, infoaddr) !=
91 infoarraysize) {
92 dprintf("pr_meminfo: Pwrite info failed \n");
93 goto out;
94 }
95
96 #ifdef _LP64
97 model = Pr->status.pr_dmodel;
98 if (model == PR_MODEL_ILP32) {
99 m32.mi_info_count = info_count;
100 m32.mi_inaddr = (caddr32_t)inaddr;
101 m32.mi_outdata = (caddr32_t)outaddr;
102 m32.mi_info_req = (caddr32_t)infoaddr;
103 m32.mi_validity = (caddr32_t)validityaddr;
104 } else
105 #endif
106 {
107 m.mi_info_count = info_count;
108 m.mi_inaddr = (uint64_t *)inaddr;
109 m.mi_outdata = (uint64_t *)outaddr;
110 m.mi_info_req = (uint_t *)infoaddr;
111 m.mi_validity = (uint_t *)validityaddr;
112 }
113
114
115 /*
116 * initial command
117 */
118
119 adp->arg_value = MISYS_MEMINFO;
120 adp->arg_object = NULL;
121 adp->arg_type = AT_BYVAL;
122 adp->arg_inout = AI_INPUT;
123 adp->arg_size = 0;
124 adp++;
125
126 /*
127 * length of input address vector
128 */
129
130 adp->arg_value = addr_count;
131 adp->arg_object = NULL;
132 adp->arg_type = AT_BYVAL;
133 adp->arg_inout = AI_INPUT;
134 adp->arg_size = 0;
135 adp++;
136
137 /*
138 * information wanted vector
139 */
140
141 adp->arg_value = 0;
142 #ifdef _LP64
143 if (model == PR_MODEL_ILP32) {
144 adp->arg_object = &m32;
145 adp->arg_size = sizeof (struct meminfo32);
146 } else
147 #endif
148 {
149 adp->arg_object = &m;
150 adp->arg_size = sizeof (struct meminfo);
151 }
152 adp->arg_type = AT_BYREF;
153 adp->arg_inout = AI_INPUT;
154
155
156 error = Psyscall(Pr, &rval, SYS_meminfosys, 3, &argd[0]);
157
158 if (error) {
159 errno = (error > 0) ? error: ENOSYS;
160 goto out;
161 }
162
163 /* syscall was successful, copy out the data */
164
165 if ((Pread(Pr, outdata, outarraysize, outaddr)) != outarraysize) {
166 dprintf("pr_meminfo: Pread of outarray failed\n");
167 goto out;
168 }
169
170 if (Pread(Pr, validity, validityarraysize, validityaddr)
171 != validityarraysize) {
172 dprintf("pr_meminfo: Pread of validity array failed\n");
173 goto out;
174 }
175
176 retval = rval.sys_rval1;
177
178 out:
179
180 if (totalmap != MAP_FAILED &&
181 pr_munmap(Pr, totalmap, totalsize) == -1) {
182 dprintf("pr_meminfo: munmap failed\n");
183 retval = -1;
184 }
185
186 return (retval);
187
188 }
189