ini.c

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include <error.h>
#include <errno.h>
#include "ini.h"
#include "misc.h"
#include "serial.h"
extern char            serialDevice[20]; 
extern char            fsynthSoundFont[150];
extern char            midiLinkDIR[50]; 
extern char            CSSW10RomPath[150];
extern char            MUNTRomPath[150];
extern char            UDPServer[100];
extern char            mixerControl[20];
extern int             cssw10Volume;
extern int             MP3Volume;
extern int             muntVolume;
extern int             fsynthVolume;
extern int             modemVolume;
extern int             midilinkPriority;
extern unsigned int    UDPServerPort;
extern unsigned int    TCPServerPort;
extern unsigned int    TCPTermRows;
extern int             UDPBaudRate;
extern int             TCPBaudRate;
extern int             UDPBaudRate_alt;
extern int             TCPBaudRate_alt;
extern int             MIDIBaudRate;
extern int             USBSerBaudRate;
extern char            USBSerModule[100];
extern int             TCPFlow;
extern int             TCPDTR;
extern int             TCPQuiet;
extern int             UDPFlow;
extern unsigned int    UDPServerFilterIP;
extern unsigned int    DELAYSYSEX;
extern char            MP3Path[500];
extern char            MP3Player[20];
extern char 	       MIDIPath[500];
//extern char            PDFPath[500];
extern char            downloadPath[500];
extern char            uploadPath[100];
extern char            CSSW10Options[30];
extern char            MUNTOptions[30];
extern char            MT32LCDMsg[21];
extern int             MODEMSOUND;
extern char            modemConnectSndWAV[50];
extern char            modemDialSndWAV[50];
extern char            modemRingSndWAV[50];
extern int             TCPATHDelay;
extern enum ASCIITRANS TCPAsciiTrans;
extern enum SOFTSYNTH  TCPSoftSynth;
extern int             CSSW10CPUMask;
extern int             MUNTCPUMask;
extern int             FSYNTHCPUMask;
extern char            OPENAI_KEY[150];
///////////////////////////////////////////////////////////////////////////////////////
//
// void ini_bool(char * value, int * dest)
//
void ini_bool(char * value, int * dest)
{
    if (strlen(value) > 0)
    {
        char c = toupper(value[0]);
        if (c == 'T' || c == 'Y')
            *dest = TRUE;
        else
            *dest = FALSE;
    }
    else
        *dest = FALSE;
}

///////////////////////////////////////////////////////////////////////////////////////
//
// void int_str(char * dest)
//
void ini_str(char * key, char * value, char * dest, int max)
{
    if(strlen(value) < max)
    {
        //if(strlen(value) > 0)
        strcpy(dest, value);
    }
    else
        misc_print(0, "ERROR: ini_process_key_value() --> '%s' > %d chars!\n", key, max);
}

///////////////////////////////////////////////////////////////////////////////////////
//
// void ini_int(char * value, int * dest)
//
void ini_int(char * value, int * dest)
{
    char * endPtr;
    int iTmp = strtol(value, &endPtr, 10);
    if(*endPtr == (char) 0x00)
        *dest = iTmp;
}

///////////////////////////////////////////////////////////////////////////////////////
//
// void ini_uint(char * value, unsigned int * iValue )
//
void ini_uint(char * value, unsigned int * dest )
{
    char * endPtr;
    unsigned int iTmp = strtol(value, &endPtr, 10);
    if(*endPtr == (char) 0x00)
        *dest = iTmp;
}

///////////////////////////////////////////////////////////////////////////////////////
//
// char ini_process_key_value_pair(char * key, char * value)
//
char ini_process_key_value_pair(char * key, char * value)
{
    if(strcmp("MP3_VOLUME", key) == 0)
    {
        misc_replace_char(value, strlen(value), '%', 0x00);
        ini_int(value, &MP3Volume);
    }
	else if(strcmp("CSSW10_VOLUME", key) == 0)
    {
        misc_replace_char(value, strlen(value), '%', 0x00);
        ini_int(value, &fsynthVolume);
    }
	else if (strcmp("CSSW10_ROM_PATH", key) == 0)
    {
        ini_str(key, value, MUNTRomPath, sizeof(MUNTRomPath));
    }
    else if (strcmp("CSSW10_CPU_MASK", key) == 0)
    {
        ini_int(value, &MUNTCPUMask);
    }
    else if(strcmp("MUNT_VOLUME", key) == 0)
    {
        misc_replace_char(value, strlen(value), '%', 0x00);
        ini_int(value, &muntVolume);
    }
    else if (strcmp("MUNT_ROM_PATH", key) == 0)
    {
        ini_str(key, value, MUNTRomPath, sizeof(MUNTRomPath));
    }
    else if (strcmp("MUNT_CPU_MASK", key) == 0)
    {
        ini_int(value, &MUNTCPUMask);
    }
    else if(strcmp("FSYNTH_VOLUME", key) == 0)
    {
        misc_replace_char(value, strlen(value), '%', 0x00);
        ini_int(value, &fsynthVolume);
    }
    else if (strcmp("FSYNTH_CPU_MASK", key) == 0)
    {
        ini_int(value, &FSYNTHCPUMask);
    }
    else if(strcmp("MODEM_VOLUME", key) == 0)
    {
        misc_replace_char(value, strlen(value), '%', 0x00);
        ini_int(value, &modemVolume);
    }
    else if (strcmp("MIXER_CONTROL", key) == 0)
    {
        ini_str(key, value, mixerControl, sizeof(mixerControl));
    }
    else if(strcmp("UDP_SERVER_PORT", key) == 0)
    {
        ini_uint(value, &UDPServerPort);
    }
    else if(strcmp("TCP_SERVER_PORT", key) == 0)
    {
        ini_uint(value, &TCPServerPort);
    }
    else if (strcmp("UDP_SERVER", key) == 0)
    {
        ini_str(key, value, UDPServer, sizeof(UDPServer));
    }
    else if (strcmp("UDP_SERVER_FILTER", key) == 0)
    {
        ini_bool(value, &UDPServerFilterIP);
    }
    else if (strcmp("DELAYSYSEX", key) == 0)
    {
        ini_bool(value, &DELAYSYSEX);
    }
    else if (strcmp("FSYNTH_SOUNDFONT", key) == 0)
    {
        ini_str(key, value, fsynthSoundFont, sizeof(fsynthSoundFont));
    }
    else if (strcmp("MIDILINK_PRIORITY", key) == 0)
    {
        ini_int(value, &midilinkPriority);
    }
    else if (strcmp("UDP_BAUD", key) == 0)
    {
        ini_int(value, &UDPBaudRate);
    }
    else if (strcmp("TCP_BAUD", key) == 0)
    {
        ini_int(value, &TCPBaudRate);
    }
    else if (strcmp("UDP_BAUD_ALT", key) == 0)
    {
        ini_int(value, &UDPBaudRate_alt);
    }
    else if (strcmp("TCP_BAUD_ALT", key) == 0)
    {
        ini_int(value, &TCPBaudRate_alt);
    }
    else if (strcmp("TCP_ATH_DELAY", key) == 0)
    {
        ini_int(value, &TCPATHDelay);
    }
    else if (strcmp("MIDI_BAUD", key) == 0)
    {
        ini_int(value, &MIDIBaudRate);
    }
    else if (strcmp("USB_SERIAL_BAUD", key) == 0)
    {
        ini_int(value, &USBSerBaudRate);
    }
    else if (strcmp("USB_SERIAL_MODULE", key) == 0)
    {
        ini_str(key, value, USBSerModule, sizeof(USBSerModule));
    }
    else if (strcmp("TCP_TERM_ROWS", key) == 0)
    {
        ini_uint(value, &TCPTermRows);
    }
    else if (strcmp("TCP_TERM_UPLOAD", key) == 0)
    {
        ini_str(key, value, uploadPath, sizeof(uploadPath));
    }
    else if (strcmp("TCP_TERM_DOWNLOAD", key) == 0)
    {
        ini_str(key, value, downloadPath, sizeof(downloadPath));
    }
    else if (strcmp("TCP_TERM_MP3", key) == 0)
    {
        ini_str(key, value, MP3Path, sizeof(MP3Path));
    }
    else if (strcmp("TCP_TERM_MP3_PLAYER", key) == 0)
    {
        ini_str(key, value, MP3Player, sizeof(MP3Player));
    } 
    else if (strcmp("TCP_TERM_MIDI", key) == 0)
    {
        ini_str(key, value, MIDIPath, sizeof(MIDIPath));
    }
    /*else if (strcmp("TCP_TERM_PDF", key) == 0)
    {
        ini_str(key, value, PDFPath, sizeof(PDFPath));
    }*/
    else if (strcmp("TCP_DTR", key) == 0)
    {
        ini_int(value, &TCPDTR);
    }
    else if (strcmp("TCP_FLOW", key) == 0)
    {
        ini_int(value, &TCPFlow);
    }
    else if (strcmp("TCP_QUIET", key) == 0)
    {
        ini_int(value, &TCPQuiet);
    }
    else if(strcmp("TCP_SOUND", key) == 0)
    {
        ini_bool(value, &MODEMSOUND);
    }
    else if(strcmp("TCP_SOUND_DIAL", key) == 0)
    {
        ini_str(key, value, modemDialSndWAV, sizeof(modemDialSndWAV));    
    }
    else if(strcmp("TCP_SOUND_RING", key) == 0)
    {
        ini_str(key, value, modemRingSndWAV, sizeof(modemRingSndWAV));
    }
    else if(strcmp("TCP_SOUND_CONNECT", key) == 0)
    {
        ini_str(key, value, modemConnectSndWAV, sizeof(modemConnectSndWAV));
    } 
    else if(strcmp("TCP_TERM_TRANS", key) == 0)
    {
        misc_str_to_upper(value);
        TCPAsciiTrans = misc_str_to_trans(value);
    }
    else if (strcmp("UDP_FLOW", key) == 0)
    {
        ini_int(value, &UDPFlow);
    }
    else if (strcmp("MUNT_OPTIONS", key) == 0)
    {
        ini_str(key, value, MUNTOptions, sizeof(MUNTOptions));
    }
    else if (strcmp("MT32_LCD_MSG", key) == 0)
    {
        ini_str(key, value, MT32LCDMsg, sizeof(MT32LCDMsg));
    }
    else if (strcmp("TCP_TERM_SYNTH", key) == 0)
    {
        if(strlen(key) > 0)
            switch(toupper(value[0]))
            {
            case 'M':
                TCPSoftSynth = MUNT;
                break;
            case 'F':
                TCPSoftSynth = FluidSynth;
                break;
            default:
                TCPSoftSynth = FluidSynth;
                break;
            }
    }
    else if (strcmp("TCP_TERM_DIR", key) == 0) 
    {
        ini_str(key, value, midiLinkDIR, sizeof(midiLinkDIR));    
    }
    else if (strcmp("SERIAL_DEVICE", key) == 0)
    {
        ini_str(key, value, serialDevice, sizeof(serialDevice));
    }
    else if (strcmp("OPENAI_KEY", key) == 0)
    {
        ini_str(key, value, OPENAI_KEY, sizeof(OPENAI_KEY));
    }
    else
        misc_print(0, "ERROR: ini_process_key_value() Unknown INI KEY --> '%s' = '%s'\n", key, value);
}

///////////////////////////////////////////////////////////////////////////////////////
//
// void ini_print_settings(int priority)
//
void ini_print_settings(int p)
{
    misc_print(p, "Settings:\n");
    misc_print(p, "  - SERIAL_DEVICE      --> '%s'\n", serialDevice);
    if(midilinkPriority != 0)
        misc_print(p, "  - MIDILINK_PRIORITY  --> %d\n",   midilinkPriority);
    else
        misc_print(p, "  - MIDILINK_PRIORITY  --> Default (don't change)\n");
	misc_print(p, "  - CSSW10_OPTIONS       --> '%s'\n", CSSW10Options);
    misc_print(p, "  - CSSW10_ROM_PATH      --> '%s'\n", CSSW10RomPath);
	
    misc_print(p, "  - MUNT_OPTIONS       --> '%s'\n", MUNTOptions);
    misc_print(p, "  - MUNT_ROM_PATH      --> '%s'\n", MUNTRomPath);
	
    if(MP3Volume != -1)
        misc_print(p, "  - MP3_VOLUME         --> %d%c\n", MP3Volume, '%');
    else
        misc_print(p, "  - MP3_VOLUME         --> Default (don't set)\n");
    if(muntVolume != -1)
        misc_print(p, "  - MUNT_VOLUME        --> %d%c\n", muntVolume, '%');
    else
        misc_print(p, "  - MUNT_VOLUME        --> Default (don't set)\n");
	misc_print(p, "  - CSSW32_CPU_MASK    --> %d\n",CSSW10CPUMask);
    misc_print(p, "  - MUNT_CPU_MASK      --> %d\n",MUNTCPUMask);
    misc_print(p, "  - FSYNTH_CPU_MASK    --> %d\n",FSYNTHCPUMask);  
    if(fsynthVolume != -1)
        misc_print(p, "  - FSYNTH_VOLUME      --> %d%c\n", fsynthVolume, '%');
    else
        misc_print(p, "  - FSYNTH_VOLUME      --> Default (don't set)\n");
    if(modemVolume != -1)
        misc_print(p, "  - MODEM_VOLUME       --> %d%c\n", modemVolume, '%');
    else
        misc_print(p, "  - MODEM_VOLUME       --> Default (don't set)\n");
    misc_print(p, "  - MIXER_CONTROL      --> %s\n", mixerControl);
    misc_print(p, "  - FSYNTH_SOUNTFONT   --> '%s'\n", fsynthSoundFont);
    misc_print(p, "  - UDP_SERVER         --> '%s'%s\n", UDPServer,
               misc_ipaddr_is_multicast(UDPServer)?" MULTICAST":"");
    misc_print(p, "  - UDP_SERVER_PORT    --> %d\n",     UDPServerPort);
    if(UDPBaudRate > 0)
        misc_print(p, "  - UDP_BAUD           --> %d\n", UDPBaudRate);
    else
        misc_print(p, "  - UDP_BAUD           --> Default (don't change)\n");
    if(UDPBaudRate_alt > 0)
        misc_print(p, "  - UDP_BAUD_ALT       --> %d\n", UDPBaudRate);
    else
        misc_print(p, "  - UDP_BAUD_ALT       --> Undefined\n");
    if(UDPBaudRate > 0)
        misc_print(p, "  - MIDI_BAUD          --> %d\n", MIDIBaudRate);
    else
        misc_print(p, "  - MIDI_BAUD          --> Default (don't change)\n");    
    misc_print(p, "  - UDP_SERVER_FILTER  --> %s\n",   UDPServerFilterIP?"TRUE":"FALSE");
    if(UDPFlow != -1)
        misc_print(p, "  - UDP_FLOW           --> (%d) %s\n", UDPFlow, misc_hayes_flow_to_str(UDPFlow));
    else
        misc_print(p, "  - UDP_FLOW           --> Default (don't change)\n");
    if(TCPBaudRate > 0)
        misc_print(p, "  - TCP_BAUD           --> %d\n",   TCPBaudRate);
    else
        misc_print(p, "  - TCP_BAUD           --> Default (don't change)\n");
    if(TCPBaudRate_alt > 0)
        misc_print(p, "  - TCP_BAUD_ALT       --> %d\n",   TCPBaudRate_alt);
    else
        misc_print(p, "  - TCP_BAUD_ALT       --> Default (don't change)\n");
    if(UDPBaudRate > 0)
        misc_print(p, "  - MIDI_BAUD          --> %d\n", MIDIBaudRate);
    else
        misc_print(p, "  - MIDI_BAUD          --> Default (don't change)\n");    
    misc_print(p, "  - UDP_SERVER_FILTER  --> %s\n",   UDPServerFilterIP?"TRUE":"FALSE");
    if(UDPFlow != -1)
        misc_print(p, "  - UDP_FLOW           --> (%d) %s\n", UDPFlow, misc_hayes_flow_to_str(UDPFlow));
    else
        misc_print(p, "  - UDP_FLOW           --> Default (don't change)\n");
    if(TCPBaudRate > 0)
        misc_print(p, "  - TCP_BAUD           --> %d\n",   TCPBaudRate);
    else
        misc_print(p, "  - TCP_BAUD           --> Default (don't change)\n");
    if(TCPBaudRate_alt > 0)
        misc_print(p, "  - TCP_BAUD_ALT       --> %d\n",   TCPBaudRate_alt);
    else
        misc_print(p, "  - TCP_BAUD_ALT       --> Default (don't change)\n");
    misc_print(p, "  - TCP_DTR            --> (%d) %s\n", TCPDTR, misc_hayes_DTR_to_str(TCPDTR));
    misc_print(p, "  - TCP_QUIET          --> (%d) %s\n", TCPQuiet, misc_hayes_ATQ_to_str(TCPQuiet));
    if(TCPFlow != -1)
        misc_print(p, "  - TCP_FLOW           --> (%d) %s\n", TCPFlow, misc_hayes_flow_to_str(TCPFlow));
    else
        misc_print(p, "  - TCP_FLOW           --> Default (don't change)\n");
    misc_print(p, "  - TCP_ATH_DELAY      --> %d\n",    TCPATHDelay);
    misc_print(p, "  - TCP_SERVER_PORT    --> %d\n",    TCPServerPort);
    misc_print(p, "  - TCP_TERM_ROWS      --> %d\n",    TCPTermRows);
    misc_print(p, "  - TCP_TERM_UPLOAD    --> '%s'\n",  uploadPath);
    misc_print(p, "  - TCP_TERM_DOWNLOAD  --> '%s'\n",  downloadPath);
    //misc_print(p, "  - TCP_TERM_PDF       --> '%s'\n",  PDFPath);
    misc_print(p, "  - TCP_TERM_MP3       --> '%s'\n",  MP3Path);
    misc_print(p, "  - TCP_TERM_MP3_PLAYER--> '%s'\n",  MP3Path);
    misc_print(p, "  - TCP_TERM_MIDI      --> '%s'\n",  MIDIPath);
    misc_print(p, "  - TCP_TERM_SYNTH     --> %s\n",   (TCPSoftSynth==MUNT)?"MUNT":"FluidSynth");
    misc_print(p, "  - TCP_TERM_TRANS     --> %s\n",    misc_trans_to_str(TCPAsciiTrans));
    misc_print(p, "  - TCP_SOUND          --> %s\n",    MODEMSOUND?"TRUE":"FALSE");
    if (strlen(modemDialSndWAV) > 0)
        misc_print(p, "  - TCP_SOUND_DIAL     --> '%s'\n",  modemDialSndWAV);
    else
        misc_print(p, "  - TCP_SOUND_DIAL     --> Software\n");
    if (strlen(modemRingSndWAV) > 0)
        misc_print(p, "  - TCP_SOUND_RING     --> '%s'\n",  modemRingSndWAV);
    else
        misc_print(p, "  - TCP_SOUND_RING     --> Software\n");
    if (strlen(modemConnectSndWAV) > 0)
        misc_print(p, "  - TCP_SOUND_CONNECT  --> '%s'\n",  modemConnectSndWAV);
    else
        misc_print(p, "  - TCP_SOUND_CONNECT  --> Software\n");
    misc_print(p, "  - TCP_TERM_DIR       --> '%s'\n", midiLinkDIR); 
    if(USBSerBaudRate > 0)
        misc_print(p, "  - USB_SERIAL_BAUD    --> %d\n", USBSerBaudRate);
    else
        misc_print(p, "  - USB_SERIAL_BAUD    --> Default (don't change)\n");    
    misc_print(p, "  - USB_SERIAL_MODULE  --> '%s'\n", USBSerModule);
    misc_print(p, "  - DELAYSYSEX         --> %s\n",    DELAYSYSEX?"TRUE":"FALSE");
    misc_print(p, "  - MT32_LCD_MSG       --> '%s'\n",  MT32LCDMsg);
    misc_print(p, "  - OPENAI_KEY         --> '%s'\n", OPENAI_KEY);
    misc_print(p, "\n");
}

///////////////////////////////////////////////////////////////////////////////////////
//
// char ini_first_char(char * str, int len)
//
char ini_first_char(char * str, int len)
{
    for (int i = 0; i < len; i++)
        if (str[i] != ' ') return str[i];
    return 0x00;
}

///////////////////////////////////////////////////////////////////////////////////////
//
// int ini_parse_line(char * str, int len, char * key, int keyMax, char * val, int valMax, char * sec, int secMax)
//
int ini_parse_line(char * str, int len, char * key, int keyMax, char * val, int valMax, char * sec, int secMax)
{
    enum mode {mode_sec, mode_val, mode_key};
    int mode = mode_key;
    int iKey = 0;
    int iVal = 0;
    int iSec = 0;
    keyMax--;
    valMax--;
    secMax--;

    for (int i = 0; i < len; i++)
        switch(str[i])
        {
        case '[':
            if(mode == mode_key)
            {
                mode = mode_sec;
                iSec = 0;
            }
            break;
        case ']':
            if (mode == mode_sec)
                mode = mode_key;
            break;
        case '=':
            if(mode == mode_key)
                mode = mode_val;
            break;
        case ' ':
            if (mode == mode_val || mode == mode_sec)
                switch(mode)
                {
                case mode_val:
                    if(iVal)
                        val[iVal++] = str[i];
                    break;
                case mode_sec:
                    if(iSec)
                        sec[iSec++] = str[i];
                    break;
                }
            break;
        case 0x0a: // [NEW LINE]
        case 0x0d: // [RETURN]
        case 0x00: // [NULL]
        case '\t': // [TAB]
            break;
        default :
            switch (mode)
            {
            case mode_val:
                if(iVal < valMax)
                    val[iVal++] = str[i];
                break;
            case mode_key:
                if(iKey < keyMax)
                    key[iKey++] = toupper(str[i]);
                break;
            case mode_sec:
                if (iSec < secMax)
                    sec[iSec++] = toupper(str[i]);
                break;
            }
        }
    key[iKey] = 0x00;
    val[iVal] = 0x00;
    if(iSec)
        sec[iSec] = 0x00;        
    if (mode == mode_val)
        return TRUE;
    else
        return FALSE;
}

///////////////////////////////////////////////////////////////////////////////////////
//
// int ini_read_loop (char * fileName, char * section, int priority, char * key,  
//                    int keyMax, char * val, int valMax, char * sec, int secMax)
//
int ini_read_loop (char * fileName, char * section, int priority, char * key, 
                   int keyMax, char * val, int valMax, char * sec, int secMax)
{
    int count;
    char str[1024];
    FILE * file;
    file = fopen(fileName, "r");
    sec[0] = 0x00;
    
    if (file)
    {
        while (fgets(str, sizeof(str), file)!= NULL)
        {
            if(ini_first_char(str, strlen(str)) != '#')
                if(ini_parse_line(str, strlen(str), key, keyMax, val, valMax, sec, secMax))
                    if(sec[0] == 0x00 || strcmp(section, sec) == 0)
                        ini_process_key_value_pair(key, val);
        }
        fclose(file);
        ini_print_settings(priority);
        return TRUE;
    }
    else
    {
        misc_print(0, "ERROR: ini_read_loop() : Unable to open --> '%s'\n", fileName);
        return FALSE;
    }
}

///////////////////////////////////////////////////////////////////////////////////////
//
// int ini_read_ini(char * fileName, char * section)
//
int ini_read_ini(char * fileName, char * section, int priority)
{
    char key[30];
    char val[150];
    char sec[30];
    ini_read_loop(fileName, section, priority, key, sizeof(key), val, sizeof(val), sec, sizeof(sec));
}