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) |
|
{ |
|
|
|
} |
|