[BACK]Return to pool.c CVS log [TXT][DIR] Up to [local] / src / usr.bin / systat

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: }