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: stable/10/usr.bin/ipcs/ipc.c 326818 2017-12-13 06:20:18Z delphij $"); 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 48174891Sedwin#include "ipc.h" 49174891Sedwin 50174891Sedwinint use_sysctl = 1; 51174891Sedwinstruct semid_kernel *sema; 52174891Sedwinstruct seminfo seminfo; 53174891Sedwinstruct msginfo msginfo; 54174891Sedwinstruct msqid_kernel *msqids; 55174891Sedwinstruct shminfo shminfo; 56174891Sedwinstruct shmid_kernel *shmsegs; 57174891Sedwinvoid kget(int idx, void *addr, size_t size); 58174891Sedwin 59174891Sedwinstruct nlist symbols[] = { 60174891Sedwin {"sema"}, 61174891Sedwin {"seminfo"}, 62174891Sedwin {"msginfo"}, 63174891Sedwin {"msqids"}, 64174891Sedwin {"shminfo"}, 65174891Sedwin {"shmsegs"}, 66174891Sedwin {NULL} 67174891Sedwin}; 68174891Sedwin 69174891Sedwin#define SHMINFO_XVEC X(shmmax, sizeof(u_long)) \ 70174891Sedwin X(shmmin, sizeof(u_long)) \ 71174891Sedwin X(shmmni, sizeof(u_long)) \ 72174891Sedwin X(shmseg, sizeof(u_long)) \ 73174891Sedwin X(shmall, sizeof(u_long)) 74174891Sedwin 75224016Sbz#define SEMINFO_XVEC X(semmni, sizeof(int)) \ 76174891Sedwin X(semmns, sizeof(int)) \ 77174891Sedwin X(semmnu, sizeof(int)) \ 78174891Sedwin X(semmsl, sizeof(int)) \ 79174891Sedwin X(semopm, sizeof(int)) \ 80174891Sedwin X(semume, sizeof(int)) \ 81174891Sedwin X(semusz, sizeof(int)) \ 82174891Sedwin X(semvmx, sizeof(int)) \ 83174891Sedwin X(semaem, sizeof(int)) 84174891Sedwin 85174891Sedwin#define MSGINFO_XVEC X(msgmax, sizeof(int)) \ 86174891Sedwin X(msgmni, sizeof(int)) \ 87174891Sedwin X(msgmnb, sizeof(int)) \ 88174891Sedwin X(msgtql, sizeof(int)) \ 89174891Sedwin X(msgssz, sizeof(int)) \ 90174891Sedwin X(msgseg, sizeof(int)) 91174891Sedwin 92174891Sedwin#define X(a, b) { "kern.ipc." #a, offsetof(TYPEC, a), (b) }, 93174891Sedwin#define TYPEC struct shminfo 94174891Sedwinstruct scgs_vector shminfo_scgsv[] = { SHMINFO_XVEC { NULL } }; 95174891Sedwin#undef TYPEC 96174891Sedwin#define TYPEC struct seminfo 97174891Sedwinstruct scgs_vector seminfo_scgsv[] = { SEMINFO_XVEC { NULL } }; 98174891Sedwin#undef TYPEC 99174891Sedwin#define TYPEC struct msginfo 100174891Sedwinstruct scgs_vector msginfo_scgsv[] = { MSGINFO_XVEC { NULL } }; 101174891Sedwin#undef TYPEC 102174891Sedwin#undef X 103174891Sedwin 104174891Sedwinkvm_t *kd; 105174891Sedwin 106174891Sedwinvoid 107174891Sedwinsysctlgatherstruct(void *addr, size_t size, struct scgs_vector *vecarr) 108174891Sedwin{ 109174891Sedwin struct scgs_vector *xp; 110174891Sedwin size_t tsiz; 111174891Sedwin int rv; 112174891Sedwin 113174891Sedwin for (xp = vecarr; xp->sysctl != NULL; xp++) { 114174891Sedwin assert(xp->offset <= size); 115174891Sedwin tsiz = xp->size; 116174891Sedwin rv = sysctlbyname(xp->sysctl, (char *)addr + xp->offset, 117174891Sedwin &tsiz, NULL, 0); 118174891Sedwin if (rv == -1) 119174891Sedwin err(1, "sysctlbyname: %s", xp->sysctl); 120174891Sedwin if (tsiz != xp->size) 121223925Sdelphij errx(1, "%s size mismatch (expected %zu, got %zu)", 122174891Sedwin xp->sysctl, xp->size, tsiz); 123174891Sedwin } 124174891Sedwin} 125174891Sedwin 126174891Sedwinvoid 127174891Sedwinkget(int idx, void *addr, size_t size) 128174891Sedwin{ 129208986Sbz const char *symn; /* symbol name */ 130174891Sedwin size_t tsiz; 131174891Sedwin int rv; 132174891Sedwin unsigned long kaddr; 133174891Sedwin const char *sym2sysctl[] = { /* symbol to sysctl name table */ 134174891Sedwin "kern.ipc.sema", 135174891Sedwin "kern.ipc.seminfo", 136174891Sedwin "kern.ipc.msginfo", 137174891Sedwin "kern.ipc.msqids", 138174891Sedwin "kern.ipc.shminfo", 139174891Sedwin "kern.ipc.shmsegs" }; 140174891Sedwin 141174891Sedwin assert((unsigned)idx <= sizeof(sym2sysctl) / sizeof(*sym2sysctl)); 142174891Sedwin if (!use_sysctl) { 143174891Sedwin symn = symbols[idx].n_name; 144174891Sedwin if (*symn == '_') 145174891Sedwin symn++; 146174891Sedwin if (symbols[idx].n_type == 0 || symbols[idx].n_value == 0) 147174891Sedwin errx(1, "symbol %s undefined", symn); 148174891Sedwin /* 149174891Sedwin * For some symbols, the value we retrieve is 150174891Sedwin * actually a pointer; since we want the actual value, 151174891Sedwin * we have to manually dereference it. 152174891Sedwin */ 153174891Sedwin switch (idx) { 154174891Sedwin case X_MSQIDS: 155174891Sedwin tsiz = sizeof(msqids); 156174891Sedwin rv = kvm_read(kd, symbols[idx].n_value, 157174891Sedwin &msqids, tsiz); 158174891Sedwin kaddr = (u_long)msqids; 159174891Sedwin break; 160174891Sedwin case X_SHMSEGS: 161174891Sedwin tsiz = sizeof(shmsegs); 162174891Sedwin rv = kvm_read(kd, symbols[idx].n_value, 163174891Sedwin &shmsegs, tsiz); 164174891Sedwin kaddr = (u_long)shmsegs; 165174891Sedwin break; 166174891Sedwin case X_SEMA: 167174891Sedwin tsiz = sizeof(sema); 168174891Sedwin rv = kvm_read(kd, symbols[idx].n_value, 169174891Sedwin &sema, tsiz); 170174891Sedwin kaddr = (u_long)sema; 171174891Sedwin break; 172174891Sedwin default: 173174891Sedwin rv = tsiz = 0; 174174891Sedwin kaddr = symbols[idx].n_value; 175174891Sedwin break; 176174891Sedwin } 177174891Sedwin if ((unsigned)rv != tsiz) 178174891Sedwin errx(1, "%s: %s", symn, kvm_geterr(kd)); 179174891Sedwin if ((unsigned)kvm_read(kd, kaddr, addr, size) != size) 180174891Sedwin errx(1, "%s: %s", symn, kvm_geterr(kd)); 181174891Sedwin } else { 182174891Sedwin switch (idx) { 183174891Sedwin case X_SHMINFO: 184174891Sedwin sysctlgatherstruct(addr, size, shminfo_scgsv); 185174891Sedwin break; 186174891Sedwin case X_SEMINFO: 187174891Sedwin sysctlgatherstruct(addr, size, seminfo_scgsv); 188174891Sedwin break; 189174891Sedwin case X_MSGINFO: 190174891Sedwin sysctlgatherstruct(addr, size, msginfo_scgsv); 191174891Sedwin break; 192174891Sedwin default: 193174891Sedwin tsiz = size; 194174891Sedwin rv = sysctlbyname(sym2sysctl[idx], addr, &tsiz, 195174891Sedwin NULL, 0); 196174891Sedwin if (rv == -1) 197174891Sedwin err(1, "sysctlbyname: %s", sym2sysctl[idx]); 198174891Sedwin if (tsiz != size) 199174891Sedwin errx(1, "%s size mismatch " 200223925Sdelphij "(expected %zu, got %zu)", 201174891Sedwin sym2sysctl[idx], size, tsiz); 202174891Sedwin break; 203174891Sedwin } 204174891Sedwin } 205174891Sedwin} 206