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