jkOwnLib/gfWebLib.c

Go to the documentation of this file.

/* gfWebLib - some helper routines for the webBlat and webPcr.
 * Copyright 2004-2005 Jim Kent.  All rights reserved. */
#include "common.h"
#include "linefile.h"
#include "hash.h"
#include "cheapcgi.h"
#include "gfWebLib.h"


struct gfServerAt *gfWebFindServer(struct gfServerAt *serverList, char *varName)
/* Find active server (that matches contents of CGI variable varName). */
{
struct gfServerAt *server = serverList;
if (cgiVarExists(varName))
     {
     char *db = cgiString(varName);
     for (server = serverList; server != NULL; server = server->next)
          {
          if (sameString(db, server->name))
              break;
          }
     if (server == NULL)
          errAbort("%s %s not found", varName, db);
     }
return server;
}

struct gfWebConfig *gfWebConfigRead(char *fileName)
/* Read configuration file into globals. */
{
struct gfWebConfig *cfg;
struct lineFile *lf = lineFileOpen(fileName, TRUE);
char *line, *word;
struct hash *uniqHash = newHash(0), *uniqTransHash = newHash(0), *hash;

AllocVar(cfg);
cfg->company = "";
while (lineFileNextReal(lf, &line))
    {
    word = nextWord(&line);
    if (sameWord("company", word))
        {
        cfg->company = cloneString(trimSpaces(line));
        }
    else if (sameWord("gfServer", word) || sameWord("gfServerTrans", word))
        {
        struct gfServerAt *server;
        char *dupe = cloneString(line);
        AllocVar(server);
        server->host = nextWord(&dupe);
        server->port = nextWord(&dupe);
        server->seqDir = nextWord(&dupe);
        server->name = trimSpaces(dupe);
        if (server->name == NULL || server->name[0] == 0)
            errAbort("Badly formed gfServer command line %d of %s:\n%s",
                lf->lineIx, fileName, line);
        if (sameString("gfServerTrans", word))
            {
            slAddTail(&cfg->transServerList, server);
            hash = uniqTransHash;
            }
        else
            {
            slAddTail(&cfg->serverList, server);
            hash = uniqHash;
            }
        if (hashLookup(hash, server->name))
            errAbort("Duplicate %s name %s line %d of %s",
                word, server->name, lf->lineIx, fileName);
        hashAdd(hash, server->name, NULL);
        }
    else if (sameWord("tempDir", word))
        {
        cfg->tempDir = cloneString(trimSpaces(line));
        }
    else if (sameWord("background", word))
        {
        cfg->background = cloneString(trimSpaces(line));
        }
    else
        {
        errAbort("Unrecognized command %s line %d of  %s", word, lf->lineIx, fileName);
        }
    }

if (cfg->serverList == NULL && cfg->transServerList == NULL)
    errAbort("no gfServer's specified in %s", fileName);
freeHash(&uniqHash);
freeHash(&uniqTransHash);
return cfg;
}

---