|
|
| version 1.1.1.1, 2025/01/19 02:04:04 | version 1.5, 2025/04/09 19:52:02 |
|---|---|
| Line 1 | Line 1 |
| /* | /* |
| * * | * $Id$ |
| * * * | |
| * * * | |
| * *************** | |
| * * * * * | |
| * * MUMPS * | |
| * * * * * | |
| * *************** | |
| * * * | |
| * * * | |
| * * | |
| * | |
| * iniconf.c | |
| * Function implementations for reading | * Function implementations for reading |
| * FreeM configuration files | * FreeM configuration files |
| * | * |
| * | * |
| * 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 36 | Line 24 |
| * 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.5 2025/04/09 19:52:02 snw | |
| * Eliminate as many warnings as possible while building with -Wall | |
| * | |
| * Revision 1.4 2025/04/02 19:59:38 snw | |
| * Automatically modify env.conf from fmadm reconfigure | |
| * | |
| * Revision 1.3 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 | |
| **/ | **/ |
| #define FALSE 0 | #define FALSE 0 |
| Line 49 | Line 50 |
| #include <pwd.h> | #include <pwd.h> |
| #include <string.h> | #include <string.h> |
| #include <limits.h> | #include <limits.h> |
| #include <fs.h> | |
| #include "mpsdef.h" | #include "mpsdef.h" |
| extern char config_file[4096]; | extern char config_file[4096]; |
| Line 69 extern char config_file[4096]; | Line 71 extern char config_file[4096]; |
| # include <sys/syslimits.h> | # include <sys/syslimits.h> |
| #endif | #endif |
| ini_keyvalue *ini_head; | /* ini_keyvalue *ini_head; */ |
| /* prototypes for internal-use-only functions */ | |
| int read_profile_string(char *file, char *section, char *key, char *value); | |
| int get_conf(char *section, char *key, char *value) | int get_conf(char *section, char *key, char *value) |
| { | { |
| Line 282 int file_exists(char *filename) | Line 281 int file_exists(char *filename) |
| } | } |
| } | } |
| void write_profile_string(char *file, char *section, char *key, char *value) | void parse_section_header(char *input, char *buf, size_t buflen) |
| { | { |
| ini_keyvalue *ini_head; | strncpy (buf, &(input[1]), buflen); |
| buf[strlen (buf) - 2] = '\0'; | |
| } | } |
| ini_keyvalue *ini_insert(ini_section *s, char *section, char *key, char *value) | int modify_profile_string(char *file, char *section, char *key, char *value) |
| { | { |
| ini_section *t; | FILE *input_fp; |
| FILE *output_fp; | |
| for (t = s; t != NULL; t = t->next) { | char output_filename[4096]; |
| char input_line[255]; | |
| if (strcmp (t->name, section) == 0) { | char current_section[255]; |
| char *savptr; | |
| char *current_key; | |
| char tmpsi[255]; | |
| char tmps[255]; | |
| int changed = FALSE; | |
| snprintf (output_filename, 4095, "%s.tmp", file); | |
| if ((input_fp = fopen (file, "r")) == NULL) { | |
| return FALSE; | |
| } | |
| if ((output_fp = fopen (output_filename, "w+")) == NULL) { | |
| fclose (input_fp); | |
| return FALSE; | |
| } | |
| while (fgets (input_line, 255, input_fp)) { | |
| if (input_line[0] == '[') { | |
| /* this is a section; write it unchanged */ | |
| fputs (input_line, output_fp); | |
| /* this section already exists. update. */ | /* update the current section */ |
| return ini_kv_insert (s, key, value); | parse_section_header (input_line, current_section, 255); |
| } | |
| } | else { |
| /* is this a key/value pair? */ | |
| } | if (strchr (input_line, '=') != NULL) { |
| /* are we in the requested section? */ | |
| /* section does not exist. insert. */ | if (strcmp (section, current_section) == 0) { |
| t = (ini_section *) malloc (sizeof (ini_section)); | /* yes; we'll parse it */ |
| NULLPTRCHK(t,"ini_insert"); | strcpy (tmpsi, input_line); |
| savptr = tmpsi; | |
| t->name = (char *) malloc ((strlen (section) + 1) * sizeof (char)); | current_key = strtok_r (tmpsi, "=", &savptr); |
| NULLPTRCHK(t->name,"ini_insert"); | /* is this key the one we're changing? */ |
| if (strcmp (key, current_key) == 0) { | |
| strcpy (t->name, section); | /* yes; modify it and write out*/ |
| snprintf (tmps, 255, "%s=%s\n", current_key, value); | |
| t->next = s; | |
| s = t; | fputs (tmps, output_fp); |
| changed = TRUE; | |
| return ini_kv_insert (s, key, value); | } |
| else { | |
| } | /* not the requested key; pass it through unmodified */ |
| fputs (input_line, output_fp); | |
| ini_keyvalue *ini_kv_insert(ini_section *s, char *key, char *value) | } |
| { | } |
| ini_keyvalue *t; | else { |
| /* not the requested section; write it out unchanged */ | |
| for (t = s->head; t != NULL; t = t->next) { | fputs (input_line, output_fp); |
| } | |
| if (strcmp (t->key, key) == 0) { | } |
| else { | |
| /* this is an update */ | /* not a key/value pair; write it out unchanged */ |
| free (t->value); | fputs (input_line, output_fp); |
| t->value = (char *) malloc ((strlen (value) + 1) * sizeof (char)); | } |
| NULLPTRCHK(t->value,"ini_kv_insert"); | } |
| strcpy (t->value, value); | |
| return t; | |
| } | |
| } | |
| /* this is an insert */ | |
| t = (ini_keyvalue *) malloc (sizeof (ini_keyvalue)); | |
| NULLPTRCHK(t,"ini_kv_insert"); | |
| t->key = (char *) malloc ((strlen (key) + 1) * sizeof (char)); | |
| NULLPTRCHK(t->key,"ini_kv_insert"); | |
| t->value = (char *) malloc ((strlen (value) + 1) * sizeof (char)); | |
| NULLPTRCHK(t->value,"ini_kv_insert"); | |
| strcpy (t->key, key); | |
| strcpy (t->value, value); | |
| t->next = s->head; | |
| s->head = t; | |
| return t; | |
| } | |
| void ini_section_delete(ini_section *head, char *name) | |
| { | |
| ini_section *t = head; | |
| ini_section *p = NULL; | |
| if ((t != (ini_section *) NULL) && (strcmp (t->name, name) == 0)) { | |
| head = t->next; | |
| free (t->name); | |
| free (t); | |
| return; | |
| } | |
| while ((t != NULL) && (strcmp (t->name, name) != 0)) { | |
| p = t; | |
| t = t->next; | |
| } | } |
| if (t == NULL) return; | /* close both files */ |
| fclose (output_fp); | |
| free (t->name); | fclose (input_fp); |
| free (t); | |
| /* delete the original file */ | |
| return; | unlink (file); |
| /* rename the temporary file */ | |
| #if !defined(__OS2__) | |
| cp (file, output_filename); | |
| #else | |
| DosCopy (output_filename, file); | |
| #endif | |
| return changed; | |
| } | } |
| void ini_key_delete(ini_section *head, char *key) | |
| { | |
| } |