--- freem/src/ssvn_library.c 2025/01/19 02:04:04 1.1 +++ freem/src/ssvn_library.c 2025/03/24 04:13:11 1.5 @@ -1,23 +1,11 @@ /* - * * - * * * - * * * - * *************** - * * * * * - * * MUMPS * - * * * * * - * *************** - * * * - * * * - * * - * - * ssvn_library.c - * ^$LIBRARY ssv + * $Id: ssvn_library.c,v 1.5 2025/03/24 04:13:11 snw Exp $ + * ^$LIBRARY ssvn * * - * Author: Serena Willis + * Author: Serena Willis * Copyright (C) 1998 MUG Deutschland - * Copyright (C) 2020, 2023 Coherent Logic Development LLC + * Copyright (C) 2020, 2023, 2025 Coherent Logic Development LLC * * * This file is part of FreeM. @@ -35,6 +23,19 @@ * You should have received a copy of the GNU Affero Public License * along with FreeM. If not, see . * + * $Log: ssvn_library.c,v $ + * Revision 1.5 2025/03/24 04:13:11 snw + * Replace action macro dat with fra_dat to avoid symbol conflict on OS/2 + * + * Revision 1.4 2025/03/22 18:43:54 snw + * Make STRLEN 255 chars and add BIGSTR macro for larger buffers + * + * Revision 1.3 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 @@ -58,7 +59,7 @@ void ssvn_library_add_dir(char *libdir) DIR *dir; struct dirent *ent; - char filename[STRLEN]; + char filename[PATHLEN]; char rtnname[256]; char *rtnext; @@ -70,7 +71,7 @@ void ssvn_library_add_dir(char *libdir) dir = opendir (libdir); while ((ent = readdir (dir)) != NULL) { - strncpy (filename, ent->d_name, STRLEN - 1); + strncpy (filename, ent->d_name, PATHLEN); rtnext = ent->d_name + (strlen (ent->d_name) - 2); @@ -99,7 +100,7 @@ void ssvn_library_add_dir(char *libdir) void ssvn_library_update(void) { - char t_buf[STRLEN]; + char t_buf[PATHLEN]; stcpy (t_buf, rou0plib); stcnv_m2c (t_buf); @@ -126,7 +127,7 @@ void ssvn_library(short action, char *ke case fra_order: case fra_query: case bigquery: - case dat: + case fra_dat: symtab_bltin (action, key, data); goto done;