1174891Sedwin/* 2174891Sedwin * Copyright (c) 1994 SigmaSoft, Th. Lockert <tholo@sigmasoft.com> 3174891Sedwin * All rights reserved. 4174891Sedwin * 5174891Sedwin * Redistribution and use in source and binary forms, with or without 6174891Sedwin * modification, are permitted provided that the following conditions 7174891Sedwin * are met: 8174891Sedwin * 1. Redistributions of source code must retain the above copyright 9174891Sedwin * notice, this list of conditions and the following disclaimer. 10174891Sedwin * 2. Redistributions in binary form must reproduce the above copyright 11174891Sedwin * notice, this list of conditions and the following disclaimer in the 12174891Sedwin * documentation and/or other materials provided with the distribution. 13174891Sedwin * 3. The name of the author may not be used to endorse or promote products 14174891Sedwin * derived from this software without specific prior written permission. 15174891Sedwin * 16174891Sedwin * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, 17174891Sedwin * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY 18174891Sedwin * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL 19174891Sedwin * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, 20174891Sedwin * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, 21174891Sedwin * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; 22174891Sedwin * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 23174891Sedwin * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR 24174891Sedwin * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF 25174891Sedwin * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 26174891Sedwin * 27228992Suqs * The split of ipcs.c into ipcs.c and ipc.c to accommodate the 28174891Sedwin * changes in ipcrm.c was done by Edwin Groothuis <edwin@FreeBSD.org> 29174891Sedwin */ 30174891Sedwin 31174891Sedwin#include <sys/cdefs.h> 32174891Sedwin__FBSDID("$FreeBSD$"); 33174891Sedwin 34174891Sedwin#include <sys/types.h> 35174891Sedwin#include <sys/sysctl.h> 36174891Sedwin#define _KERNEL 37174891Sedwin#include <sys/sem.h> 38174891Sedwin#include <sys/shm.h> 39174891Sedwin#include <sys/msg.h> 40174891Sedwin#undef _KERNEL 41174891Sedwin 42174891Sedwin#include <assert.h> 43174891Sedwin#include <err.h> 44174891Sedwin#include <kvm.h> 45174891Sedwin#include <nlist.h> 46174891Sedwin#include <stddef.h> 47174891Sedwin#include <stdio.h> 48174891Sedwin 49174891Sedwin#include "ipc.h" 50174891Sedwin 51174891Sedwinint use_sysctl = 1; 52174891Sedwinstruct semid_kernel *sema; 53174891Sedwinstruct seminfo seminfo; 54174891Sedwinstruct msginfo msginfo; 55174891Sedwinstruct msqid_kernel *msqids; 56174891Sedwinstruct shminfo shminfo; 57174891Sedwinstruct shmid_kernel *shmsegs; 58174891Sedwinvoid kget(int idx, void *addr, size_t size); 59174891Sedwin 60174891Sedwinstruct nlist symbols[] = { 61174891Sedwin {"sema"}, 62174891Sedwin {"seminfo"}, 63174891Sedwin {"msginfo"}, 64174891Sedwin {"msqids"}, 65174891Sedwin {"shminfo"}, 66174891Sedwin {"shmsegs"}, 67174891Sedwin {NULL} 68174891Sedwin}; 69174891Sedwin 70174891Sedwin#define SHMINFO_XVEC X(shmmax, sizeof(u_long)) \ 71174891Sedwin X(shmmin, sizeof(u_long)) \ 72174891Sedwin X(shmmni, sizeof(u_long)) \ 73174891Sedwin X(shmseg, sizeof(u_long)) \ 74174891Sedwin X(shmall, sizeof(u_long)) 75174891Sedwin 76224016Sbz#define SEMINFO_XVEC X(semmni, sizeof(int)) \ 77174891Sedwin X(semmns, sizeof(int)) \ 78174891Sedwin X(semmnu, sizeof(int)) \ 79174891Sedwin X(semmsl, sizeof(int)) \ 80174891Sedwin X(semopm, sizeof(int)) \ 81174891Sedwin X(semume, sizeof(int)) \ 82174891Sedwin X(semusz, sizeof(int)) \ 83174891Sedwin X(semvmx, sizeof(int)) \ 84174891Sedwin X(semaem, sizeof(int)) 85174891Sedwin 86174891Sedwin#define MSGINFO_XVEC X(msgmax, sizeof(int)) \ 87174891Sedwin X(msgmni, sizeof(int)) \ 88174891Sedwin X(msgmnb, sizeof(int)) \ 89174891Sedwin X(msgtql, sizeof(int)) \ 90174891Sedwin X(msgssz, sizeof(int)) \ 91174891Sedwin X(msgseg, sizeof(int)) 92174891Sedwin 93174891Sedwin#define X(a, b) { "kern.ipc." #a, offsetof(TYPEC, a), (b) }, 94174891Sedwin#define TYPEC struct shminfo 95174891Sedwinstruct scgs_vector shminfo_scgsv[] = { SHMINFO_XVEC { NULL } }; 96174891Sedwin#undef TYPEC 97174891Sedwin#define TYPEC struct seminfo 98174891Sedwinstruct scgs_vector seminfo_scgsv[] = { SEMINFO_XVEC { NULL } }; 99174891Sedwin#undef TYPEC 100174891Sedwin#define TYPEC struct msginfo 101174891Sedwinstruct scgs_vector msginfo_scgsv[] = { MSGINFO_XVEC { NULL } }; 102174891Sedwin#undef TYPEC 103174891Sedwin#undef X 104174891Sedwin 105174891Sedwinkvm_t *kd; 106174891Sedwin 107174891Sedwinvoid 108174891Sedwinsysctlgatherstruct(void *addr, size_t size, struct scgs_vector *vecarr) 109174891Sedwin{ 110174891Sedwin struct scgs_vector *xp; 111174891Sedwin size_t tsiz; 112174891Sedwin int rv; 113174891Sedwin 114174891Sedwin for (xp = vecarr; xp->sysctl != NULL; xp++) { 115174891Sedwin assert(xp->offset <= size); 116174891Sedwin tsiz = xp->size; 117174891Sedwin rv = sysctlbyname(xp->sysctl, (char *)addr + xp->offset, 118174891Sedwin &tsiz, NULL, 0); 119174891Sedwin if (rv == -1) 120174891Sedwin err(1, "sysctlbyname: %s", xp->sysctl); 121174891Sedwin if (tsiz != xp->size) 122223925Sdelphij errx(1, "%s size mismatch (expected %zu, got %zu)", 123174891Sedwin xp->sysctl, xp->size, tsiz); 124174891Sedwin } 125174891Sedwin} 126174891Sedwin 127174891Sedwinvoid 128174891Sedwinkget(int idx, void *addr, size_t size) 129174891Sedwin{ 130208986Sbz const char *symn; /* symbol name */ 131174891Sedwin size_t tsiz; 132174891Sedwin int rv; 133174891Sedwin unsigned long kaddr; 134174891Sedwin const char *sym2sysctl[] = { /* symbol to sysctl name table */ 135174891Sedwin "kern.ipc.sema", 136174891Sedwin "kern.ipc.seminfo", 137174891Sedwin "kern.ipc.msginfo", 138174891Sedwin "kern.ipc.msqids", 139174891Sedwin "kern.ipc.shminfo", 140174891Sedwin "kern.ipc.shmsegs" }; 141174891Sedwin 142174891Sedwin assert((unsigned)idx <= sizeof(sym2sysctl) / sizeof(*sym2sysctl)); 143174891Sedwin if (!use_sysctl) { 144174891Sedwin symn = symbols[idx].n_name; 145174891Sedwin if (*symn == '_') 146174891Sedwin symn++; 147174891Sedwin if (symbols[idx].n_type == 0 || symbols[idx].n_value == 0) 148174891Sedwin errx(1, "symbol %s undefined", symn); 149174891Sedwin /* 150174891Sedwin * For some symbols, the value we retrieve is 151174891Sedwin * actually a pointer; since we want the actual value, 152174891Sedwin * we have to manually dereference it. 153174891Sedwin */ 154174891Sedwin switch (idx) { 155174891Sedwin case X_MSQIDS: 156174891Sedwin tsiz = sizeof(msqids); 157174891Sedwin rv = kvm_read(kd, symbols[idx].n_value, 158174891Sedwin &msqids, tsiz); 159174891Sedwin kaddr = (u_long)msqids; 160174891Sedwin break; 161174891Sedwin case X_SHMSEGS: 162174891Sedwin tsiz = sizeof(shmsegs); 163174891Sedwin rv = kvm_read(kd, symbols[idx].n_value, 164174891Sedwin &shmsegs, tsiz); 165174891Sedwin kaddr = (u_long)shmsegs; 166174891Sedwin break; 167174891Sedwin case X_SEMA: 168174891Sedwin tsiz = sizeof(sema); 169174891Sedwin rv = kvm_read(kd, symbols[idx].n_value, 170174891Sedwin &sema, tsiz); 171174891Sedwin kaddr = (u_long)sema; 172174891Sedwin break; 173174891Sedwin default: 174174891Sedwin rv = tsiz = 0; 175174891Sedwin kaddr = symbols[idx].n_value; 176174891Sedwin break; 177174891Sedwin } 178174891Sedwin if ((unsigned)rv != tsiz) 179174891Sedwin errx(1, "%s: %s", symn, kvm_geterr(kd)); 180174891Sedwin if ((unsigned)kvm_read(kd, kaddr, addr, size) != size) 181174891Sedwin errx(1, "%s: %s", symn, kvm_geterr(kd)); 182174891Sedwin } else { 183174891Sedwin switch (idx) { 184174891Sedwin case X_SHMINFO: 185174891Sedwin sysctlgatherstruct(addr, size, shminfo_scgsv); 186174891Sedwin break; 187174891Sedwin case X_SEMINFO: 188174891Sedwin sysctlgatherstruct(addr, size, seminfo_scgsv); 189174891Sedwin break; 190174891Sedwin case X_MSGINFO: 191174891Sedwin sysctlgatherstruct(addr, size, msginfo_scgsv); 192174891Sedwin break; 193174891Sedwin default: 194174891Sedwin tsiz = size; 195174891Sedwin rv = sysctlbyname(sym2sysctl[idx], addr, &tsiz, 196174891Sedwin NULL, 0); 197174891Sedwin if (rv == -1) 198174891Sedwin err(1, "sysctlbyname: %s", sym2sysctl[idx]); 199174891Sedwin if (tsiz != size) 200174891Sedwin errx(1, "%s size mismatch " 201223925Sdelphij "(expected %zu, got %zu)", 202174891Sedwin sym2sysctl[idx], size, tsiz); 203174891Sedwin break; 204174891Sedwin } 205174891Sedwin } 206174891Sedwin} 207