Annotation of src/usr.bin/systat/pool.c, Revision 1.18
1.18 ! krw 1: /* $OpenBSD: pool.c,v 1.17 2018/02/11 09:47:33 martijn Exp $ */
1.1 canacar 2: /*
3: * Copyright (c) 2008 Can Erkin Acar <canacar@openbsd.org>
4: *
5: * Permission to use, copy, modify, and distribute this software for any
6: * purpose with or without fee is hereby granted, provided that the above
7: * copyright notice and this permission notice appear in all copies.
8: *
9: * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10: * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11: * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12: * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13: * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14: * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15: * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16: */
17:
18: #include <sys/types.h>
1.10 deraadt 19: #include <sys/signal.h>
1.1 canacar 20: #include <sys/sysctl.h>
21: #include <sys/pool.h>
22: #include <errno.h>
23: #include <stdlib.h>
1.3 chl 24: #include <string.h>
1.10 deraadt 25: #include <limits.h>
1.1 canacar 26:
27: #include "systat.h"
28:
1.12 dlg 29: #ifndef nitems
30: #define nitems(_a) (sizeof((_a)) / sizeof((_a)[0]))
31: #endif
32:
33: static int sysctl_rdint(const int *, unsigned int);
34: static int hw_ncpusfound(void);
35:
36: static int pool_get_npools(void);
37: static int pool_get_name(int, char *, size_t);
38: static int pool_get_cache(int, struct kinfo_pool_cache *);
39: static int pool_get_cache_cpus(int, struct kinfo_pool_cache_cpu *,
40: unsigned int);
41:
1.1 canacar 42: void print_pool(void);
43: int read_pool(void);
44: void sort_pool(void);
45: int select_pool(void);
46: void showpool(int k);
1.8 mpi 47: int pool_keyboard_callback(int);
1.1 canacar 48:
49: /* qsort callbacks */
50: int sort_name_callback(const void *s1, const void *s2);
1.2 canacar 51: int sort_req_callback(const void *s1, const void *s2);
1.4 canacar 52: int sort_psize_callback(const void *s1, const void *s2);
53: int sort_npage_callback(const void *s1, const void *s2);
1.1 canacar 54:
55: struct pool_info {
56: char name[32];
1.7 dlg 57: struct kinfo_pool pool;
1.1 canacar 58: };
59:
1.12 dlg 60: /*
61: * the kernel gives an array of ncpusfound * kinfo_pool_cache structs, but
62: * it's idea of how big that struct is may differ from here. we fetch both
63: * ncpusfound and the size it thinks kinfo_pool_cache is from sysctl, and
64: * then allocate the memory for this here.
65: */
66: struct pool_cache_info {
67: char name[32];
68: struct kinfo_pool_cache cache;
69: struct kinfo_pool_cache_cpu *cache_cpus;
70: };
1.1 canacar 71:
1.8 mpi 72: int print_all = 0;
1.1 canacar 73: int num_pools = 0;
74: struct pool_info *pools = NULL;
1.12 dlg 75: int num_pool_caches = 0;
76: struct pool_cache_info *pool_caches = NULL;
1.17 martijn 77: size_t pool_caches_size = 0;
1.1 canacar 78:
1.12 dlg 79: int ncpusfound = 0;
1.1 canacar 80:
81: field_def fields_pool[] = {
1.11 sthen 82: {"NAME", 12, 32, 1, FLD_ALIGN_LEFT, -1, 0, 0, 0},
1.1 canacar 83: {"SIZE", 8, 24, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
84: {"REQUESTS", 8, 24, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
85: {"FAIL", 8, 24, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
86: {"INUSE", 8, 24, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
87: {"PGREQ", 8, 24, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
88: {"PGREL", 8, 24, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
89: {"NPAGE", 8, 24, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
90: {"HIWAT", 8, 24, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
91: {"MINPG", 8, 24, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
92: {"MAXPG", 8, 24, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
93: {"IDLE", 8, 24, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0}
94: };
95:
1.6 jasper 96: #define FLD_POOL_NAME FIELD_ADDR(fields_pool,0)
97: #define FLD_POOL_SIZE FIELD_ADDR(fields_pool,1)
98: #define FLD_POOL_REQS FIELD_ADDR(fields_pool,2)
99: #define FLD_POOL_FAIL FIELD_ADDR(fields_pool,3)
100: #define FLD_POOL_INUSE FIELD_ADDR(fields_pool,4)
101: #define FLD_POOL_PGREQ FIELD_ADDR(fields_pool,5)
102: #define FLD_POOL_PGREL FIELD_ADDR(fields_pool,6)
103: #define FLD_POOL_NPAGE FIELD_ADDR(fields_pool,7)
104: #define FLD_POOL_HIWAT FIELD_ADDR(fields_pool,8)
105: #define FLD_POOL_MINPG FIELD_ADDR(fields_pool,9)
106: #define FLD_POOL_MAXPG FIELD_ADDR(fields_pool,10)
107: #define FLD_POOL_IDLE FIELD_ADDR(fields_pool,11)
1.1 canacar 108:
109: /* Define views */
110: field_def *view_pool_0[] = {
111: FLD_POOL_NAME, FLD_POOL_SIZE, FLD_POOL_REQS, FLD_POOL_FAIL,
112: FLD_POOL_INUSE, FLD_POOL_PGREQ, FLD_POOL_PGREL, FLD_POOL_NPAGE,
113: FLD_POOL_HIWAT, FLD_POOL_MINPG, FLD_POOL_MAXPG, FLD_POOL_IDLE, NULL
114: };
115:
116: order_type pool_order_list[] = {
1.2 canacar 117: {"name", "name", 'N', sort_name_callback},
118: {"requests", "requests", 'Q', sort_req_callback},
1.4 canacar 119: {"size", "size", 'Z', sort_psize_callback},
120: {"npages", "npages", 'P', sort_npage_callback},
1.1 canacar 121: {NULL, NULL, 0, NULL}
122: };
123:
124: /* Define view managers */
125: struct view_manager pool_mgr = {
126: "Pool", select_pool, read_pool, sort_pool, print_header,
1.8 mpi 127: print_pool, pool_keyboard_callback, pool_order_list, pool_order_list
1.1 canacar 128: };
129:
1.12 dlg 130: field_view pool_view = {
131: view_pool_0,
132: "pool",
133: '5',
134: &pool_mgr
135: };
136:
137: void pool_cache_print(void);
138: int pool_cache_read(void);
139: void pool_cache_sort(void);
140: void pool_cache_show(const struct pool_cache_info *);
1.17 martijn 141: int pool_cache_sort_name_callback(const void *, const void *);
142: int pool_cache_sort_len_callback(const void *, const void *);
143: int pool_cache_sort_idle_callback(const void *, const void *);
144: int pool_cache_sort_ngc_callback(const void *, const void *);
145: int pool_cache_sort_req_callback(const void *, const void *);
146: int pool_cache_sort_put_callback(const void *, const void *);
147: int pool_cache_sort_lreq_callback(const void *, const void *);
148: int pool_cache_sort_lput_callback(const void *, const void *);
1.12 dlg 149: int pool_cache_kbd_cb(int);
150:
151: field_def pool_cache_fields[] = {
152: {"NAME", 12, 32, 1, FLD_ALIGN_LEFT, -1, 0, 0, 0},
153: {"LEN", 4, 4, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
1.13 dlg 154: {"IDLE", 4, 4, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
1.12 dlg 155: {"NGC", 4, 4, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
156: {"CPU", 4, 4, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
157: {"REQ", 8, 12, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
158: {"REL", 8, 12, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
159: {"LREQ", 8, 12, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
160: {"LREL", 8, 12, 1, FLD_ALIGN_RIGHT, -1, 0, 0, 0},
161: };
162:
163: #define FLD_POOL_CACHE_NAME FIELD_ADDR(pool_cache_fields, 0)
164: #define FLD_POOL_CACHE_LEN FIELD_ADDR(pool_cache_fields, 1)
1.13 dlg 165: #define FLD_POOL_CACHE_IDLE FIELD_ADDR(pool_cache_fields, 2)
1.12 dlg 166: #define FLD_POOL_CACHE_NGC FIELD_ADDR(pool_cache_fields, 3)
167: #define FLD_POOL_CACHE_CPU FIELD_ADDR(pool_cache_fields, 4)
168: #define FLD_POOL_CACHE_GET FIELD_ADDR(pool_cache_fields, 5)
169: #define FLD_POOL_CACHE_PUT FIELD_ADDR(pool_cache_fields, 6)
170: #define FLD_POOL_CACHE_LGET FIELD_ADDR(pool_cache_fields, 7)
171: #define FLD_POOL_CACHE_LPUT FIELD_ADDR(pool_cache_fields, 8)
172:
173: field_def *view_pool_cache_0[] = {
174: FLD_POOL_CACHE_NAME,
175: FLD_POOL_CACHE_LEN,
1.13 dlg 176: FLD_POOL_CACHE_IDLE,
1.12 dlg 177: FLD_POOL_CACHE_NGC,
178: FLD_POOL_CACHE_CPU,
179: FLD_POOL_CACHE_GET,
180: FLD_POOL_CACHE_PUT,
181: FLD_POOL_CACHE_LGET,
182: FLD_POOL_CACHE_LPUT,
183: NULL,
184: };
185:
186: order_type pool_cache_order_list[] = {
1.17 martijn 187: {"name", "name", 'N', pool_cache_sort_name_callback},
188: {"len", "len", 'L', pool_cache_sort_len_callback},
189: {"idle", "idle", 'I', pool_cache_sort_idle_callback},
190: {"ngc", "ngc", 'G', pool_cache_sort_ngc_callback},
191: {"requests", "requests", 'Q', pool_cache_sort_req_callback},
192: {"releases", "releases", 'P', pool_cache_sort_put_callback},
193: {"listrequests", "listrequests", 'E', pool_cache_sort_req_callback},
194: {"listreleases", "listreleases", 'U', pool_cache_sort_put_callback},
1.1 canacar 195: {NULL, NULL, 0, NULL}
196: };
197:
1.12 dlg 198: /* Define view managers */
199: struct view_manager pool_cache_mgr = {
200: "PoolCache",
1.17 martijn 201: NULL,
1.12 dlg 202: pool_cache_read,
203: pool_cache_sort,
204: print_header,
205: pool_cache_print,
206: pool_keyboard_callback,
207: pool_cache_order_list,
208: pool_cache_order_list
209: };
210:
211: field_view pool_cache_view = {
212: view_pool_cache_0,
213: "pcaches",
214: '5',
215: &pool_cache_mgr
216: };
1.1 canacar 217:
218: int
219: sort_name_callback(const void *s1, const void *s2)
220: {
221: struct pool_info *p1, *p2;
222: p1 = (struct pool_info *)s1;
223: p2 = (struct pool_info *)s2;
224:
1.2 canacar 225: return strcmp(p1->name, p2->name) * sortdir;
226: }
227:
228: int
229: sort_req_callback(const void *s1, const void *s2)
230: {
231: struct pool_info *p1, *p2;
232: p1 = (struct pool_info *)s1;
233: p2 = (struct pool_info *)s2;
234:
235: if (p1->pool.pr_nget < p2->pool.pr_nget)
236: return sortdir;
237: if (p1->pool.pr_nget > p2->pool.pr_nget)
238: return -sortdir;
239:
240: return sort_name_callback(s1, s2);
1.4 canacar 241: }
242:
243: int
244: sort_npage_callback(const void *s1, const void *s2)
245: {
246: struct pool_info *p1, *p2;
247: p1 = (struct pool_info *)s1;
248: p2 = (struct pool_info *)s2;
249:
250: if (p1->pool.pr_npages < p2->pool.pr_npages)
251: return sortdir;
252: if (p1->pool.pr_npages > p2->pool.pr_npages)
253: return -sortdir;
254:
255: return sort_name_callback(s1, s2);
256: }
257:
258: int
259: sort_psize_callback(const void *s1, const void *s2)
260: {
261: struct pool_info *p1, *p2;
262:
263: p1 = (struct pool_info *)s1;
264: p2 = (struct pool_info *)s2;
265:
1.16 martijn 266: if (p1->pool.pr_size < p2->pool.pr_size)
1.4 canacar 267: return sortdir;
1.16 martijn 268: if (p1->pool.pr_size > p2->pool.pr_size)
1.4 canacar 269: return -sortdir;
270:
271: return sort_npage_callback(s1, s2);
1.1 canacar 272: }
273:
274: void
275: sort_pool(void)
276: {
277: order_type *ordering;
278:
279: if (curr_mgr == NULL)
280: return;
281:
282: ordering = curr_mgr->order_curr;
283:
284: if (ordering == NULL)
285: return;
286: if (ordering->func == NULL)
287: return;
288: if (pools == NULL)
289: return;
290: if (num_pools <= 0)
291: return;
292:
1.2 canacar 293: mergesort(pools, num_pools, sizeof(struct pool_info), ordering->func);
1.1 canacar 294: }
295:
296: int
297: select_pool(void)
298: {
299: num_disp = num_pools;
300: return (0);
301: }
302:
303: int
304: read_pool(void)
305: {
1.12 dlg 306: int mib[] = { CTL_KERN, KERN_POOL, KERN_POOL_POOL, 0 };
307: struct pool_info *p;
308: int np, i;
1.1 canacar 309: size_t size;
310:
1.12 dlg 311: np = pool_get_npools();
312: if (np == -1) {
1.1 canacar 313: error("sysctl(npools): %s", strerror(errno));
314: return (-1);
315: }
316:
1.12 dlg 317: if (np == 0) {
318: free(pools);
319: pools = NULL;
1.1 canacar 320: num_pools = 0;
321: return (0);
322: }
323:
324: if (np > num_pools || pools == NULL) {
1.12 dlg 325: p = reallocarray(pools, np, sizeof(*pools));
1.1 canacar 326: if (p == NULL) {
327: error("realloc: %s", strerror(errno));
328: return (-1);
329: }
1.12 dlg 330: /* commit */
1.1 canacar 331: pools = p;
332: num_pools = np;
333: }
334:
1.5 canacar 335: num_disp = num_pools;
336:
1.1 canacar 337: for (i = 0; i < num_pools; i++) {
1.12 dlg 338: p = &pools[i];
339: np = i + 1;
340:
341: mib[3] = np;
1.7 dlg 342: size = sizeof(pools[i].pool);
1.12 dlg 343: if (sysctl(mib, nitems(mib), &p->pool, &size, NULL, 0) < 0) {
344: p->name[0] = '\0';
1.5 canacar 345: num_disp--;
346: continue;
1.1 canacar 347: }
348:
1.12 dlg 349: if (pool_get_name(np, p->name, sizeof(p->name)) < 0)
350: snprintf(p->name, sizeof(p->name), "#%d#", i + 1);
1.1 canacar 351: }
352:
353: return 0;
354: }
355:
356:
357: void
358: print_pool(void)
359: {
1.8 mpi 360: struct pool_info *p;
1.5 canacar 361: int i, n, count = 0;
1.1 canacar 362:
363: if (pools == NULL)
364: return;
365:
1.5 canacar 366: for (n = i = 0; i < num_pools; i++) {
1.8 mpi 367: p = &pools[i];
368: if (p->name[0] == 0)
1.5 canacar 369: continue;
1.8 mpi 370:
371: if (!print_all &&
372: (p->pool.pr_nget == 0 && p->pool.pr_npagealloc == 0))
373: continue;
374:
1.5 canacar 375: if (n++ < dispstart)
376: continue;
377: showpool(i);
1.1 canacar 378: count++;
379: if (maxprint > 0 && count >= maxprint)
380: break;
381: }
382: }
383:
384: int
385: initpool(void)
386: {
1.12 dlg 387: add_view(&pool_view);
388: read_pool();
389:
390: ncpusfound = hw_ncpusfound();
391: if (ncpusfound == -1) {
392: error("sysctl(ncpusfound): %s", strerror(errno));
393: exit(1);
394: }
1.1 canacar 395:
1.12 dlg 396: add_view(&pool_cache_view);
397: pool_cache_read();
1.1 canacar 398:
399: return(0);
400: }
401:
402: void
403: showpool(int k)
404: {
405: struct pool_info *p = pools + k;
406:
407: if (k < 0 || k >= num_pools)
408: return;
409:
410: print_fld_str(FLD_POOL_NAME, p->name);
411: print_fld_uint(FLD_POOL_SIZE, p->pool.pr_size);
412:
413: print_fld_size(FLD_POOL_REQS, p->pool.pr_nget);
414: print_fld_size(FLD_POOL_FAIL, p->pool.pr_nfail);
415: print_fld_ssize(FLD_POOL_INUSE, p->pool.pr_nget - p->pool.pr_nput);
416: print_fld_size(FLD_POOL_PGREQ, p->pool.pr_npagealloc);
417: print_fld_size(FLD_POOL_PGREL, p->pool.pr_npagefree);
418:
419: print_fld_size(FLD_POOL_NPAGE, p->pool.pr_npages);
420: print_fld_size(FLD_POOL_HIWAT, p->pool.pr_hiwat);
421: print_fld_size(FLD_POOL_MINPG, p->pool.pr_minpages);
422:
423: if (p->pool.pr_maxpages == UINT_MAX)
424: print_fld_str(FLD_POOL_MAXPG, "inf");
425: else
426: print_fld_size(FLD_POOL_MAXPG, p->pool.pr_maxpages);
427:
428: print_fld_size(FLD_POOL_IDLE, p->pool.pr_nidle);
429:
430: end_line();
1.8 mpi 431: }
432:
433: int
434: pool_keyboard_callback(int ch)
435: {
436: switch (ch) {
437: case 'A':
438: print_all ^= 1;
439: gotsig_alarm = 1;
440: default:
441: return keyboard_callback(ch);
442: };
443:
444: return (1);
1.12 dlg 445: }
446:
447: int
448: pool_cache_read(void)
449: {
450: struct pool_cache_info *pc;
451: int np, i;
452:
453: np = pool_get_npools();
454: if (np == -1) {
455: error("sysctl(npools): %s", strerror(errno));
456: return (-1);
457: }
458:
1.17 martijn 459: if (np > pool_caches_size) {
1.12 dlg 460: pc = reallocarray(pool_caches, np, sizeof(*pc));
461: if (pc == NULL) {
462: error("realloc: %s", strerror(errno));
463: return (-1);
464: }
465: /* commit to using the new memory */
466: pool_caches = pc;
467:
1.17 martijn 468: for (i = pool_caches_size; i < np; i++) {
1.12 dlg 469: pc = &pool_caches[i];
470: pc->name[0] = '\0';
471:
472: pc->cache_cpus = reallocarray(NULL, ncpusfound,
473: sizeof(*pc->cache_cpus));
474: if (pc->cache_cpus == NULL) {
475: error("malloc cache cpus: %s", strerror(errno));
476: goto unalloc;
477: }
478: }
479:
480: /* commit to using the new cache_infos */
1.17 martijn 481: pool_caches_size = np;
1.12 dlg 482: }
483:
1.17 martijn 484: num_pool_caches = 0;
485: for (i = 0; i < pool_caches_size; i++) {
486: pc = &pool_caches[num_pool_caches];
1.12 dlg 487: np = i + 1;
488:
489: if (pool_get_cache(np, &pc->cache) < 0 ||
490: pool_get_cache_cpus(np, pc->cache_cpus, ncpusfound) < 0) {
491: pc->name[0] = '\0';
492: continue;
493: }
494:
495: if (pool_get_name(np, pc->name, sizeof(pc->name)) < 0)
496: snprintf(pc->name, sizeof(pc->name), "#%d#", i + 1);
1.17 martijn 497: num_pool_caches++;
1.12 dlg 498: }
499:
500: return 0;
501:
502: unalloc:
1.17 martijn 503: while (i > pool_caches_size) {
1.12 dlg 504: pc = &pool_caches[--i];
505: free(pc->cache_cpus);
506: }
1.14 florian 507: return (-1);
1.12 dlg 508: }
509:
510: void
511: pool_cache_sort(void)
512: {
513: order_type *ordering;
514:
515: if (curr_mgr == NULL)
516: return;
517:
518: ordering = curr_mgr->order_curr;
519:
520: if (ordering == NULL)
521: return;
522: if (ordering->func == NULL)
523: return;
1.17 martijn 524: if (pool_caches == NULL)
1.12 dlg 525: return;
1.17 martijn 526: if (num_pool_caches <= 0)
1.12 dlg 527: return;
528:
1.17 martijn 529: mergesort(pool_caches, num_pool_caches, sizeof(*pool_caches), ordering->func);
1.12 dlg 530: }
531:
532: void
533: pool_cache_print(void)
534: {
535: struct pool_cache_info *pc;
536: int i, n, count = 0;
537:
538: if (pool_caches == NULL)
539: return;
540:
541: for (n = i = 0; i < num_pool_caches; i++) {
542: pc = &pool_caches[i];
543: if (pc->name[0] == '\0')
544: continue;
545:
546: if (n++ < dispstart)
547: continue;
548:
549: pool_cache_show(pc);
550: count++;
551: if (maxprint > 0 && count >= maxprint)
552: break;
553: }
554: }
555:
556: void
557: pool_cache_show(const struct pool_cache_info *pc)
558: {
559: const struct kinfo_pool_cache *kpc;
560: const struct kinfo_pool_cache_cpu *kpcc;
561: int cpu;
562:
563: kpc = &pc->cache;
564:
565: print_fld_str(FLD_POOL_CACHE_NAME, pc->name);
566: print_fld_uint(FLD_POOL_CACHE_LEN, kpc->pr_len);
1.13 dlg 567: print_fld_uint(FLD_POOL_CACHE_IDLE, kpc->pr_nitems);
1.15 dlg 568: print_fld_size(FLD_POOL_CACHE_NGC, kpc->pr_ngc);
1.12 dlg 569:
570: for (cpu = 0; cpu < ncpusfound; cpu++) {
571: kpcc = &pc->cache_cpus[cpu];
572:
573: print_fld_uint(FLD_POOL_CACHE_CPU, kpcc->pr_cpu);
574:
575: print_fld_size(FLD_POOL_CACHE_GET, kpcc->pr_nget);
576: print_fld_size(FLD_POOL_CACHE_PUT, kpcc->pr_nput);
577: print_fld_size(FLD_POOL_CACHE_LGET, kpcc->pr_nlget);
578: print_fld_size(FLD_POOL_CACHE_LPUT, kpcc->pr_nlput);
579: end_line();
580: }
1.17 martijn 581: }
582:
583: int
584: pool_cache_sort_name_callback(const void *s1, const void *s2)
585: {
586: struct pool_cache_info *pc1, *pc2;
587: pc1 = (struct pool_cache_info *)s1;
588: pc2 = (struct pool_cache_info *)s2;
589:
590: return strcmp(pc1->name, pc2->name) * sortdir;
591: }
592:
593: int
594: pool_cache_sort_len_callback(const void *s1, const void *s2)
595: {
596: struct pool_cache_info *pc1, *pc2;
597: pc1 = (struct pool_cache_info *)s1;
598: pc2 = (struct pool_cache_info *)s2;
599:
600: if (pc1->cache.pr_len < pc2->cache.pr_len)
601: return sortdir;
602: if (pc1->cache.pr_len > pc2->cache.pr_len)
603: return -sortdir;
604:
605: return pool_cache_sort_name_callback(s1, s2);
606: }
607:
608: int
609: pool_cache_sort_idle_callback(const void *s1, const void *s2)
610: {
611: struct pool_cache_info *pc1, *pc2;
612: pc1 = (struct pool_cache_info *)s1;
613: pc2 = (struct pool_cache_info *)s2;
614:
615: if (pc1->cache.pr_nitems < pc2->cache.pr_nitems)
616: return sortdir;
617: if (pc1->cache.pr_nitems > pc2->cache.pr_nitems)
618: return -sortdir;
619:
620: return pool_cache_sort_name_callback(s1, s2);
621: }
622:
623: int
624: pool_cache_sort_ngc_callback(const void *s1, const void *s2)
625: {
626: struct pool_cache_info *pc1, *pc2;
627: pc1 = (struct pool_cache_info *)s1;
628: pc2 = (struct pool_cache_info *)s2;
629:
630: if (pc1->cache.pr_ngc < pc2->cache.pr_ngc)
631: return sortdir;
632: if (pc1->cache.pr_ngc > pc2->cache.pr_ngc)
633: return -sortdir;
634:
635: return pool_cache_sort_name_callback(s1, s2);
636: }
637:
638: int
639: pool_cache_sort_req_callback(const void *s1, const void *s2)
640: {
641: struct pool_cache_info *pc1, *pc2;
642: uint64_t nget1 = 0, nget2 = 0;
643: int oflow1 = 0, oflow2 = 0;
644: int cpu;
645:
646: pc1 = (struct pool_cache_info *)s1;
647: pc2 = (struct pool_cache_info *)s2;
648:
649: for (cpu = 0; cpu < ncpusfound; cpu++) {
650: if (nget1 + pc1->cache_cpus->pr_nget < nget1)
651: oflow1++;
652: nget1 += pc1->cache_cpus->pr_nget;
653: if (nget2 + pc2->cache_cpus->pr_nget < nget2)
654: oflow2++;
655: nget2 += pc2->cache_cpus->pr_nget;
656: }
657:
658: if (oflow1 < oflow2)
659: return sortdir;
660: if (oflow1 > oflow2)
661: return -sortdir;
662: if (nget1 < nget2)
663: return sortdir;
664: if (nget1 > nget2)
665: return -sortdir;
666:
667: return pool_cache_sort_name_callback(s1, s2);
668: }
669:
670: int
671: pool_cache_sort_put_callback(const void *s1, const void *s2)
672: {
673: struct pool_cache_info *pc1, *pc2;
674: uint64_t nput1 = 0, nput2 = 0;
675: int oflow1 = 0, oflow2 = 0;
676: int cpu;
677:
678: pc1 = (struct pool_cache_info *)s1;
679: pc2 = (struct pool_cache_info *)s2;
680:
681: for (cpu = 0; cpu < ncpusfound; cpu++) {
682: if (nput1 + pc1->cache_cpus->pr_nput < nput1)
683: oflow1++;
684: nput1 += pc1->cache_cpus->pr_nput;
685: if (nput2 + pc2->cache_cpus->pr_nput < nput2)
686: oflow2++;
687: nput2 += pc2->cache_cpus->pr_nput;
688: }
689:
690: if (oflow1 < oflow2)
691: return sortdir;
692: if (oflow1 > oflow2)
693: return -sortdir;
694: if (nput1 < nput2)
695: return sortdir;
696: if (nput1 > nput2)
697: return -sortdir;
698:
699: return pool_cache_sort_name_callback(s1, s2);
700: }
701:
702: int
703: pool_cache_sort_lreq_callback(const void *s1, const void *s2)
704: {
705: struct pool_cache_info *pc1, *pc2;
706: uint64_t nlget1 = 0, nlget2 = 0;
707: int oflow1 = 0, oflow2 = 0;
708: int cpu;
709:
710: pc1 = (struct pool_cache_info *)s1;
711: pc2 = (struct pool_cache_info *)s2;
712:
713: for (cpu = 0; cpu < ncpusfound; cpu++) {
714: if (nlget1 + pc1->cache_cpus->pr_nlget < nlget1)
715: oflow1++;
716: nlget1 += pc1->cache_cpus->pr_nlget;
717: if (nlget2 + pc2->cache_cpus->pr_nlget < nlget2)
718: oflow2++;
719: nlget2 += pc2->cache_cpus->pr_nlget;
720: }
721:
722: if (oflow1 < oflow2)
723: return sortdir;
724: if (oflow1 > oflow2)
725: return -sortdir;
726: if (nlget1 < nlget2)
727: return sortdir;
728: if (nlget1 > nlget2)
729: return -sortdir;
730:
731: return pool_cache_sort_name_callback(s1, s2);
732: }
733:
734: int
735: pool_cache_sort_lput_callback(const void *s1, const void *s2)
736: {
737: struct pool_cache_info *pc1, *pc2;
738: uint64_t nlput1 = 0, nlput2 = 0;
739: int oflow1 = 0, oflow2 = 0;
740: int cpu;
741:
742: pc1 = (struct pool_cache_info *)s1;
743: pc2 = (struct pool_cache_info *)s2;
744:
745: for (cpu = 0; cpu < ncpusfound; cpu++) {
746: if (nlput1 + pc1->cache_cpus->pr_nlput < nlput1)
747: oflow1++;
748: nlput1 += pc1->cache_cpus->pr_nlput;
749: if (nlput2 + pc2->cache_cpus->pr_nlput < nlput2)
750: oflow2++;
751: nlput2 += pc2->cache_cpus->pr_nlput;
752: }
1.12 dlg 753:
1.17 martijn 754: if (oflow1 < oflow2)
755: return sortdir;
756: if (oflow1 > oflow2)
757: return -sortdir;
758: if (nlput1 < nlput2)
759: return sortdir;
760: if (nlput1 > nlput2)
761: return -sortdir;
762:
763: return pool_cache_sort_name_callback(s1, s2);
1.12 dlg 764: }
765:
1.17 martijn 766: int
1.12 dlg 767: pool_get_npools(void)
768: {
769: int mib[] = { CTL_KERN, KERN_POOL, KERN_POOL_NPOOLS };
770:
771: return (sysctl_rdint(mib, nitems(mib)));
772: }
773:
774: static int
775: pool_get_cache(int pool, struct kinfo_pool_cache *kpc)
776: {
777: int mib[] = { CTL_KERN, KERN_POOL, KERN_POOL_CACHE, pool };
778: size_t len = sizeof(*kpc);
779:
780: return (sysctl(mib, nitems(mib), kpc, &len, NULL, 0));
781: }
782:
783: static int
784: pool_get_cache_cpus(int pool, struct kinfo_pool_cache_cpu *kpcc,
785: unsigned int ncpus)
786: {
787: int mib[] = { CTL_KERN, KERN_POOL, KERN_POOL_CACHE_CPUS, pool };
788: size_t len = sizeof(*kpcc) * ncpus;
789:
790: return (sysctl(mib, nitems(mib), kpcc, &len, NULL, 0));
791: }
792:
793: static int
794: pool_get_name(int pool, char *name, size_t len)
795: {
796: int mib[] = { CTL_KERN, KERN_POOL, KERN_POOL_NAME, pool };
797:
798: return (sysctl(mib, nitems(mib), name, &len, NULL, 0));
799: }
800:
801: static int
802: hw_ncpusfound(void)
803: {
804: int mib[] = { CTL_HW, HW_NCPUFOUND };
805:
806: return (sysctl_rdint(mib, nitems(mib)));
807: }
808:
809: static int
810: sysctl_rdint(const int *mib, unsigned int nmib)
811: {
812: int i;
813: size_t size = sizeof(i);
814:
815: if (sysctl(mib, nmib, &i, &size, NULL, 0) == -1)
816: return (-1);
817:
818: return (i);
1.1 canacar 819: }