|
|
| version 1.3, 2025/03/09 15:20:18 | version 1.8, 2025/04/14 19:46:18 |
|---|---|
| Line 1 | Line 1 |
| /* | /* |
| * * | * $Id$ |
| * * * | |
| * * * | |
| * *************** | |
| * * * * * | |
| * * MUMPS * | |
| * * * * * | |
| * *************** | |
| * * * | |
| * * * | |
| * * | |
| * | |
| * shmmgr.c | |
| * shared memory manager | * shared memory manager |
| * | * |
| * | * |
| * Author: Serena Willis <snw@coherent-logic.com> | * Author: Serena Willis <snw@coherent-logic.com> |
| * Copyright (C) 1998 MUG Deutschland | * Copyright (C) 1998 MUG Deutschland |
| * Copyright (C) 2020 Coherent Logic Development LLC | * Copyright (C) 2020, 2025 Coherent Logic Development LLC |
| * | * |
| * | * |
| * This file is part of FreeM. | * This file is part of FreeM. |
| Line 35 | Line 23 |
| * You should have received a copy of the GNU Affero Public License | * You should have received a copy of the GNU Affero Public License |
| * along with FreeM. If not, see <https://www.gnu.org/licenses/>. | * along with FreeM. If not, see <https://www.gnu.org/licenses/>. |
| * | * |
| * $Log$ | |
| * Revision 1.8 2025/04/14 19:46:18 snw | |
| * Add SHM_REMAP flag to shmat on FreeBSD | |
| * | |
| * Revision 1.7 2025/04/09 19:52:02 snw | |
| * Eliminate as many warnings as possible while building with -Wall | |
| * | |
| * Revision 1.6 2025/04/04 19:43:18 snw | |
| * Switch to using environment catalog to determine user and group for environment, and remove -u and -g flags from freem | |
| * | |
| * Revision 1.5 2025/03/24 02:56:50 snw | |
| * Shared memory compatibility fixes for OS/2 | |
| * | |
| * Revision 1.4 2025/03/09 19:50:47 snw | |
| * Second phase of REUSE compliance and header reformat | |
| * | |
| * | |
| * SPDX-FileCopyrightText: (C) 2025 Coherent Logic Development LLC | |
| * SPDX-License-Identifier: AGPL-3.0-or-later | |
| **/ | **/ |
| #include <stdlib.h> | #include <stdlib.h> |
| Line 53 | Line 60 |
| #include <sys/ipc.h> | #include <sys/ipc.h> |
| #include <sys/sem.h> | #include <sys/sem.h> |
| #if !defined(__OpenBSD__) && !defined(__APPLE__) | #if !defined(__OpenBSD__) && !defined(__APPLE__) && !defined(__OS2__) |
| union semun { | union semun { |
| int val; /* Value for SETVAL */ | int val; /* Value for SETVAL */ |
| struct semid_ds *buf; /* Buffer for IPC_STAT, IPC_SET */ | struct semid_ds *buf; /* Buffer for IPC_STAT, IPC_SET */ |
| Line 75 shm_config_t *shm_config = (shm_config_t | Line 82 shm_config_t *shm_config = (shm_config_t |
| short shm_init(const size_t seg_size) | short shm_init(const size_t seg_size) |
| { | { |
| union semun arg; | |
| size_t alloc_map_size; | size_t alloc_map_size; |
| long pg_size; | long pg_size; |
| register int i; | |
| key_t shm_sk; | key_t shm_sk; |
| shm_sk = ftok (config_file, 5); | shm_sk = ftok (config_file, 5); |
| Line 97 short shm_init(const size_t seg_size) | Line 102 short shm_init(const size_t seg_size) |
| shm_config->key = ftok (config_file, 1); | shm_config->key = ftok (config_file, 1); |
| shm_config->pgsiz = pg_size; | shm_config->pgsiz = pg_size; |
| shm_config->seg_id = shmget (shm_config->key, shm_config->segsiz, 0660 | IPC_CREAT); | shm_config->seg_id = shmget (shm_config->key, shm_config->segsiz, 0770 | IPC_CREAT); |
| if (shm_config->seg_id == -1) { | if (shm_config->seg_id == -1) { |
| if (errno == 22) { | if (errno == 22) { |
| fprintf (stderr, "shm_init: cannot get shared memory segment of %ld bytes\r\n\r\n", (unsigned long) shm_config->segsiz); | fprintf (stderr, "shm_init: cannot get shared memory segment of %ld bytes\r\n\r\n", (unsigned long) shm_config->segsiz); |
| Line 167 short shm_init(const size_t seg_size) | Line 172 short shm_init(const size_t seg_size) |
| fprintf (stderr, "shm_init: detach failed during detach/reattach [shmdt error %s]\r\n", strerror (errno)); | fprintf (stderr, "shm_init: detach failed during detach/reattach [shmdt error %s]\r\n", strerror (errno)); |
| exit (1); | exit (1); |
| } | } |
| #if defined(__FreeBSD__) | |
| shm_config->dta = shmat (shm_config->seg_id, new_addr, SHM_REMAP); | |
| #else | |
| shm_config->dta = shmat (shm_config->seg_id, new_addr, 0); | shm_config->dta = shmat (shm_config->seg_id, new_addr, 0); |
| #endif | |
| if (shm_config->dta == (void *) -1) { | if (shm_config->dta == (void *) -1) { |
| fprintf (stderr, "shm_init: fatal error attaching shared memory segment [shmat error '%s']\r\n", strerror (errno)); | fprintf (stderr, "shm_init: fatal error attaching shared memory segment [shmat error '%s']\r\n", strerror (errno)); |
| Line 199 short shm_init(const size_t seg_size) | Line 210 short shm_init(const size_t seg_size) |
| void shm_daemon_init(void) | void shm_daemon_init(void) |
| { | { |
| union semun arg; | union semun arg; |
| size_t alloc_map_size; | |
| key_t shm_sk; | key_t shm_sk; |
| register int i; | register int i; |
| Line 475 void shm_dump(void) | Line 485 void shm_dump(void) |
| printf ("SHARED MEMORY CONFIGURATION\r\n"); | printf ("SHARED MEMORY CONFIGURATION\r\n"); |
| printf (" pgsiz %ld\r\n", (unsigned long) shm_config->pgsiz); | printf (" pgsiz %ld\r\n", (unsigned long) shm_config->pgsiz); |
| printf (" pgct %d\r\n", shm_config->pgct); | printf (" pgct %d\r\n", shm_config->pgct); |
| printf (" key %ld\r\n", shm_config->key); | printf (" key %d\r\n", shm_config->key); |
| printf (" segid %d\r\n", shm_config->seg_id); | printf (" segid %d\r\n", shm_config->seg_id); |
| printf (" sizeof shm_page_t %ld\r\n", (long) sizeof (shm_page_t)); | printf (" sizeof shm_page_t %ld\r\n", (long) sizeof (shm_page_t)); |
| printf (" segsiz %ld\r\n", (long) shm_config->segsiz); | printf (" segsiz %ld\r\n", (long) shm_config->segsiz); |