root/trunk/freewrt/tools/nfotizer/interpret.c

/* nfotizer - split information given in info.nfo files into several places.
 * Copyright (C) 2007  Phil Sutter <n0-1@freewrt.org>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License along
 * with this program; if not, write to the Free Software Foundation, Inc.,
 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 */
#include "nfotizer.h"
#include <stdlib.h>             /* calloc */
#include <string.h>             /* strlen */
#include <stdbool.h>            /* bool */

/* toggle a boolean */
#define TOGGLE(x)       ( x = !x )

/* Interpret the string fmt.
 * idid is the separator used for variables in fmt.
 * The values for the variables found are taken from htable. */
char *
interpret(const char *idid, const char *fmt, struct htab *htable)
{
        int myfmt_len;
        char *myfmt, *fmtdup, *fmtduptmp, *result = 0, *token, *tmp;
        bool is_id;

        if (!idid || !fmt)
                return NULL;

        myfmt_len = strlen(fmt);
        myfmt = calloc(myfmt_len, sizeof(char));
        fmtdup = strdup(fmt);
        fmtduptmp = fmtdup;
        is_id = (*fmt == *idid);

        for (;; fmtduptmp = NULL, TOGGLE(is_id)) {
                token = strtok(fmtduptmp, idid);
                DBG("next token is \"%s\"", token);
                if (token == NULL)
                        break;
                if (is_id) {
                        if ((result = htab_get(token, *htable)) == NULL) {
                                PERR("key %s not found in hash table", token);
                                continue;
                        }
                        asprintf(&tmp, "%s%s", myfmt, result);
                        zap(myfmt);
                        zap(result);
                        myfmt = tmp;
                } else {
                        asprintf(&tmp, "%s%s", myfmt, token);
                        zap(myfmt);
                        /* zap(token); */
                        myfmt = tmp;
                }
        }
        free(fmtdup);
        return myfmt;
}

/* allocating strcat */
char *
my_strcat(char *dest, char *src)
{
        char *ret = NULL;
        if (asprintf(&ret, "%s%s", dest, src) < 0)
                return NULL;

        return ret;
}