|
|
| version 1.1, 2025/01/19 02:04:04 | version 1.7, 2025/04/01 16:37:12 |
|---|---|
| Line 1 | Line 1 |
| /* | /* |
| * * | * $Id$ |
| * * * | |
| * * * | |
| * *************** | |
| * * * * * | |
| * * MUMPS * | |
| * * * * * | |
| * *************** | |
| * * * | |
| * * * | |
| * * | |
| * | |
| * frmgbl.c | |
| * freem global C variables | * freem global C variables |
| * | * |
| * | * |
| * Author: Serena Willis <jpw@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.7 2025/04/01 16:37:12 snw | |
| * Configure DEFAULT environment the same as others, and set permissions/ownership directly in fmadm configure. Add env.conf file as a centralized configuration listing all environments. | |
| * | |
| * Revision 1.6 2025/03/24 04:05:36 snw | |
| * Replace crlf with frm_crlf to avoid symbol conflict with readline on OS/2 | |
| * | |
| * Revision 1.5 2025/03/09 19:14:25 snw | |
| * First phase of REUSE compliance and header reformat | |
| * | |
| * | |
| * SPDX-FileCopyrightText: (C) 2025 Coherent Logic Development LLC | |
| * SPDX-License-Identifier: AGPL-3.0-or-later | |
| **/ | **/ |
| /* needed if byte data are to be interpreted as unsigned integer */ | /* needed if byte data are to be interpreted as unsigned integer */ |
| Line 56 | Line 57 |
| # include "errmsg.h" | # include "errmsg.h" |
| #endif | #endif |
| #if defined HAVE_NCURSESW_CURSES_H | |
| # include <ncursesw/curses.h> | |
| #elif defined HAVE_NCURSESW_H | |
| # include <ncursesw.h> | |
| #elif defined HAVE_NCURSES_CURSES_H | |
| # include <ncurses/curses.h> | |
| #elif defined HAVE_NCURSES_H | |
| # include <ncurses.h> | |
| #elif defined HAVE_CURSES_H | |
| # include <curses.h> | |
| #else | |
| # error "SysV or X/Open-compatible Curses header file required" | |
| #endif | |
| #define UNSIGN(A) ((A)&0377) | #define UNSIGN(A) ((A)&0377) |
| #define g_EOL 30 | #define g_EOL 30 |
| Line 349 frm_devstat devstat[MAXDEV + 1]; /* chan | Line 336 frm_devstat devstat[MAXDEV + 1]; /* chan |
| short xpos[MAXDEV + 1]; /* $X-vector */ | short xpos[MAXDEV + 1]; /* $X-vector */ |
| short ypos[MAXDEV + 1]; /* $Y-vector */ | short ypos[MAXDEV + 1]; /* $Y-vector */ |
| short crlf[MAXDEV + 1]; /* CR/LF flag vector */ | short frm_crlf[MAXDEV + 1]; /* CR/LF flag vector */ |
| short fm_nodelay[MAXDEV + 1]; /* nodelay flag vector */ | short fm_nodelay[MAXDEV + 1]; /* nodelay flag vector */ |
| int ESCflag[MAXDEV + 1] = | int ESCflag[MAXDEV + 1] = |
| Line 429 int noclear = FALSE; /* nocle | Line 416 int noclear = FALSE; /* nocle |
| int standard = D_FREEM; /* default dialect */ | int standard = D_FREEM; /* default dialect */ |
| int quiet_mode = FALSE; /* quiet mode */ | int quiet_mode = FALSE; /* quiet mode */ |
| char config_file[4096]; /* path to configuration file */ | char config_file[4096]; /* path to configuration file */ |
| char env_config_file[4096]; /* path to environment config file */ | |
| char env_user[255]; | |
| char env_group[255]; | |
| char shm_env[255]; /* shared memory environment */ | char shm_env[255]; /* shared memory environment */ |
| short fp_mode = 0; /* set to 0 for fixed-point math, 1 for IEEE754 floating point */ | short fp_mode = 0; /* set to 0 for fixed-point math, 1 for IEEE754 floating point */ |
| Line 636 short timeoutms; | Line 626 short timeoutms; |
| char tmp4[80] = "\201"; | char tmp4[80] = "\201"; |
| short param = 0; /* parameter count */ | short param = 0; /* parameter count */ |
| short paramx = 0; /* current parameter */ | short paramx = 0; /* current parameter */ |
| char *ttyname (); | |
| short level = 0; /* level count */ | short level = 0; /* level count */ |
| pid_t pid; /* $J = process ID */ | pid_t pid; /* $J = process ID */ |