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 2005 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 <limits.h>
30 #include <string.h>
31 #include <stdarg.h>
32 #include <stdio.h>
33 #include <errno.h>
34
35 #include "Pcontrol.h"
36 #include "Putil.h"
37
38 /*
39 * Place the new element on the list prior to the existing element.
40 */
41 void
list_link(void * new,void * existing)42 list_link(void *new, void *existing)
43 {
44 plist_t *p = new;
45 plist_t *q = existing;
46
47 if (q) {
48 p->list_forw = q;
49 p->list_back = q->list_back;
50 q->list_back->list_forw = p;
51 q->list_back = p;
52 } else {
53 p->list_forw = p->list_back = p;
54 }
55 }
56
57 /*
58 * Unchain the specified element from a list.
59 */
60 void
list_unlink(void * old)61 list_unlink(void *old)
62 {
63 plist_t *p = old;
64
65 if (p->list_forw != p) {
66 p->list_back->list_forw = p->list_forw;
67 p->list_forw->list_back = p->list_back;
68 }
69 p->list_forw = p->list_back = p;
70 }
71
72 /*
73 * Routines to manipulate sigset_t, fltset_t, or sysset_t. These routines
74 * are provided as equivalents for the <sys/procfs.h> macros prfillset,
75 * premptyset, praddset, and prdelset. These functions are preferable
76 * because they are not macros which rely on using sizeof (*sp), and thus
77 * can be used to create common code to manipulate event sets. The set
78 * size must be passed explicitly, e.g. : prset_fill(&set, sizeof (set));
79 */
80 void
prset_fill(void * sp,size_t size)81 prset_fill(void *sp, size_t size)
82 {
83 size_t i = size / sizeof (uint32_t);
84
85 while (i != 0)
86 ((uint32_t *)sp)[--i] = (uint32_t)0xFFFFFFFF;
87 }
88
89 void
prset_empty(void * sp,size_t size)90 prset_empty(void *sp, size_t size)
91 {
92 size_t i = size / sizeof (uint32_t);
93
94 while (i != 0)
95 ((uint32_t *)sp)[--i] = (uint32_t)0;
96 }
97
98 void
prset_add(void * sp,size_t size,uint_t flag)99 prset_add(void *sp, size_t size, uint_t flag)
100 {
101 if (flag - 1 < 32 * size / sizeof (uint32_t))
102 ((uint32_t *)sp)[(flag - 1) / 32] |= 1U << ((flag - 1) % 32);
103 }
104
105 void
prset_del(void * sp,size_t size,uint_t flag)106 prset_del(void *sp, size_t size, uint_t flag)
107 {
108 if (flag - 1 < 32 * size / sizeof (uint32_t))
109 ((uint32_t *)sp)[(flag - 1) / 32] &= ~(1U << ((flag - 1) % 32));
110 }
111
112 int
prset_ismember(void * sp,size_t size,uint_t flag)113 prset_ismember(void *sp, size_t size, uint_t flag)
114 {
115 return ((flag - 1 < 32 * size / sizeof (uint32_t)) &&
116 (((uint32_t *)sp)[(flag - 1) / 32] & (1U << ((flag - 1) % 32))));
117 }
118
119 /*
120 * If _libproc_debug is set, printf the debug message to stderr
121 * with an appropriate prefix.
122 */
123 /*PRINTFLIKE1*/
124 void
dprintf(const char * format,...)125 dprintf(const char *format, ...)
126 {
127 if (_libproc_debug) {
128 va_list alist;
129
130 va_start(alist, format);
131 (void) fputs("libproc DEBUG: ", stderr);
132 (void) vfprintf(stderr, format, alist);
133 va_end(alist);
134 }
135 }
136
137 /*
138 * Printf-style error reporting function. This is used to supplement the error
139 * return codes from various libproc functions with additional text. Since we
140 * are a library, and should not be spewing messages to stderr, we provide a
141 * default version of this function that does nothing, but by calling this
142 * function we allow the client program to define its own version of the
143 * function that will interpose on our empty default. This may be useful for
144 * clients that wish to display such messages to the user.
145 */
146 /*ARGSUSED*/
147 /*PRINTFLIKE2*/
148 void
Perror_printf(struct ps_prochandle * P,const char * format,...)149 Perror_printf(struct ps_prochandle *P, const char *format, ...)
150 {
151 /* nothing to do here */
152 }
153