usbloadergx/source/themes/gettheme.c

#include <stdlib.h>
#include <string.h>
#include <stdio.h>
#include <gctypes.h>
#include <ogc/gx.h>

enum
{
    ALIGN_LEFT, ALIGN_RIGHT, ALIGN_CENTRE, ALIGN_TOP, ALIGN_BOTTOM, ALIGN_MIDDLE
};

typedef struct _MSG
{
	u32 id;
	char* msgstr;
	struct _MSG *next;
} MSG;
static MSG *baseMSG=0;


#define HASHWORDBITS 32

/* Defines the so called `hashpjw' function by P.J. Weinberger
   [see Aho/Sethi/Ullman, COMPILERS: Principles, Techniques and Tools,
   1986, 1987 Bell Telephone Laboratories, Inc.]  */
static inline u32 hash_string (const char *str_param)
{
    u32 hval, g;
    const char *str = str_param;

    /* Compute the hash value for the given string.  */
    hval = 0;
    while (*str != '\0')
    {
        hval <<= 4;
        hval += (u8) *str++;
        g = hval & ((u32) 0xf << (HASHWORDBITS - 4));
        if (g != 0)
        {
            hval ^= g >> (HASHWORDBITS - 8);
            hval ^= g;
        }
    }
    return hval;
}


static MSG *findMSG(u32 id)
{
	MSG *msg;
	for(msg=baseMSG; msg; msg=msg->next)
	{
		if(msg->id == id)
			return msg;
	}
	return NULL;
}

static MSG *setMSG(const char *msgid, const char *msgstr)
{
	u32 id = hash_string(msgid);
	MSG *msg = findMSG(id);
	if(!msg)
	{
		msg = (MSG *)malloc(sizeof(MSG));
		msg->id		= id;
		msg->msgstr = NULL;
		msg->next	= baseMSG;
		baseMSG		= msg;
	}
	if(msg)
	{
		if(msgstr)
		{
			if(msg->msgstr) free(msg->msgstr);
			msg->msgstr = strdup(msgstr);
		}
		return msg;
	}
	return NULL;
}

static inline void ClearPrefixes(char * msg)
{
    if(!msg)
        return;

    const char * ptr = msg;

    int i = 0;

    while(ptr[0] != '\0')
    {
        if(ptr[0] == '\\' && (ptr[1] == '\\' || ptr[1] == '"'))
        {
            ++ptr;
        }

        msg[i] = ptr[0];

        ++i;
        ++ptr;
    }

    msg[i] = '\0';
}

void ThemeCleanUp(void)
{
	while(baseMSG)
	{
		MSG *nextMsg =baseMSG->next;
		free(baseMSG->msgstr);
		free(baseMSG);
		baseMSG = nextMsg;
	}
}

bool LoadTheme(const char* themeFile)
{
	FILE *f;
	char line[200];
	char *lastID=NULL;

	ThemeCleanUp();
	f = fopen(themeFile, "r");
	if(!f)
		return false;

	while (fgets(line, sizeof(line), f))
	{
		// lines starting with # are comments
		if (line[0] == '#')
			continue;
		else if (strncmp(line, "msgid \"", 7) == 0)
		{
			char *msgid, *end;
			if(lastID) { free(lastID); lastID=NULL;}
			msgid = &line[7];
			end = strrchr(msgid, '"');
			if(end && end-msgid>1)
			{
				*end = 0;
				ClearPrefixes(msgid);
				lastID = strdup(msgid);
			}
		}
		else if (strncmp(line, "msgstr \"", 8) == 0)
		{
			char *msgstr, *end;

			if(lastID == NULL)
				continue;

			msgstr = &line[8];
			end = strrchr(msgstr, '"');
			if(end && end-msgstr>1)
			{
				*end = 0;
				ClearPrefixes(msgstr);
				setMSG(lastID, msgstr);
			}
			free(lastID);
			lastID=NULL;
		}
	}

	fclose(f);
	return true;
}

int getThemeInt(const char *msgid)
{
	MSG *msg = findMSG(hash_string(msgid));
	if(msg) return atoi(msg->msgstr);
	return atoi(msgid);
}

int getThemeAlignment(const char *msgid)
{
	MSG *msg = findMSG(hash_string(msgid));

	const char * string = msgid;
	if(msg)
	    string = msg->msgstr;

    while(*string == ' ') string++;

    if(strncasecmp(string, "left", strlen("left")) == 0)
        return ALIGN_LEFT;

    else if(strncasecmp(string, "right", strlen("right")) == 0)
        return ALIGN_RIGHT;

    else if(strncasecmp(string, "center", strlen("center")) == 0)
        return ALIGN_CENTRE;

    else if(strncasecmp(string, "top", strlen("top")) == 0)
        return ALIGN_TOP;

    else if(strncasecmp(string, "bottom", strlen("bottom")) == 0)
        return ALIGN_BOTTOM;

    else if(strncasecmp(string, "middle", strlen("middle")) == 0)
        return ALIGN_MIDDLE;

	return -1;
}

GXColor getThemeColor(const char *msgid)
{
	MSG *msg = findMSG(hash_string(msgid));

	const char * string = msgid;
	if(msg)
	    string = msg->msgstr;

    GXColor color = (GXColor) {0, 0, 0, 0};

    while(*string == ' ') string++;

    while(*string != '\0')
    {
        if(*string == 'r')
        {
            string++;
            while(*string == ' ' || *string == '=' || *string == ',') string++;

            if(*string == '\0')
                break;

            color.r = atoi(string) & 0xFF;
        }
        else if(*string == 'g')
        {
            string++;
            while(*string == ' ' || *string == '=' || *string == ',') string++;

            if(*string == '\0')
                break;

            color.g = atoi(string) & 0xFF;
        }
        else if(*string == 'b')
        {
            string++;
            while(*string == ' ' || *string == '=' || *string == ',') string++;

            if(*string == '\0')
                break;

            color.b = atoi(string) & 0xFF;
        }
        else if(*string == 'a')
        {
            string++;
            while(*string == ' ' || *string == '=' || *string == ',') string++;

            if(*string == '\0')
                break;

            color.a = atoi(string) & 0xFF;
        }
        else if(*string == '-')
        {
            break;
        }

        ++string;
    }

	return color;
}