TinkerKnobs.H

Go to the documentation of this file.

// TinkerKnobs.H
//
// 3/20/98 WAH:  Made initializations of "d" in Read methods explicit
//               assignments instead.
// 4/6/98 WAH:   Made clearer error message for unset TINKERKNOBS.

#ifndef TINKERKNOBS_H
#define TINKERKNOBS_H

#include "TinkerHash.H"

#include <stdio.h>
#include <stdlib.h>
#include <ctype.h>

#define KNOB_TRUE ((char) 1)
#define KNOB_FALSE ((char) 0)

#define DEFAULT_KNOBTABLE_SIZE (64)
typedef char* knobstring;

class knobnamelist
{
  friend class knobs;

  char *name;
  class knobnamelist *next;

  knobnamelist (char *n)
  {
    name = new char [strlen (n) + 1];
    strcpy (name, n);
    next = NULL;
  }
  ~knobnamelist() {delete[] name; delete next;}
}; // end class knobnamelist

class knobs
{
  char *customknobfile;
  hashtable *t;
  knobnamelist *names;

  char *curfname;
  char *defaultpanel;

public:
  knobs (char *customk = NULL)
  {
    char *commonknobs = getenv ("TINKERKNOBS");
    if (commonknobs == NULL)
      {
        fprintf (stderr, "***Tinker Knobs Error***\n"
"Please set the environment variable TINKERKNOBS to the full pathname of\n"
"the common Tinker knob file, e.g.:\n"
"setenv TINKERKNOBS /ncsu/tinker/tools/LEGO/knobs.txt\n\n");
        exit(1);
      } // end if

    t = new hashtable(DEFAULT_KNOBTABLE_SIZE);
    names = NULL;
    (void) Load (commonknobs);
    if (customk != NULL)
      {
        customknobfile = new char [strlen (customk) + 1];
        strcpy (customknobfile, customk);
      } // end if
    else
      {
        customk = getenv ("MYTINKERKNOBS");
        if (customk != NULL)
          {
            customknobfile = new char [strlen (customk) + 1];
            strcpy (customknobfile, customk);
          } // end if
        else
          customknobfile = NULL;
      } // end else

    if (customknobfile != NULL)
      (void) Load (customknobfile);
    curfname = NULL;
    defaultpanel = NULL;
  }
  ~knobs()
  {
    delete[] customknobfile; delete t; delete names; delete defaultpanel;
  }

  char *GetDefaultPanel (void) { return defaultpanel; }
  void SetDefaultPanel (char *dp)
  {
    delete[] defaultpanel;
    defaultpanel = new char [strlen (dp) + 1];
    strcpy (defaultpanel, dp);
    return;
  }

  int Load (char *);
  int Load (FILE *);

  char Read (char *knobname, char &d)
  {
    char *pk;

    d = '\0';
    if (strchr (knobname, ':') == NULL)
      {
        if (defaultpanel == NULL)
          {
            fprintf (stderr, "No default panel specified for knob %s.\n",
                     knobname);
            exit(1);
          } // end if
        pk = new char [strlen (defaultpanel) + strlen (knobname) + 2];
        sprintf (pk, "%s:%s", defaultpanel, knobname);
        t->Lookup (pk, d);
        delete[] pk;
        return d;
      }
    else
      return t->Lookup (knobname, d);
  }
  int Read (char *knobname, int &d)
  {
    char *pk;

    d = 0;
    if (strchr (knobname, ':') == NULL)
      {
        if (defaultpanel == NULL)
          {
            fprintf (stderr, "No default panel specified for knob %s.\n",
                     knobname);
            exit(1);
          } // end if
        pk = new char [strlen (defaultpanel) + strlen (knobname) + 2];
        sprintf (pk, "%s:%s", defaultpanel, knobname);
        t->Lookup (pk, d);
        delete[] pk;
        return d;
      }
    else
      return t->Lookup (knobname, d);
  }
  double Read (char *knobname, double &d)
  {
    char *pk;

    d = 0.0;
    if (strchr (knobname, ':') == NULL)
      {
        if (defaultpanel == NULL)
          {
            fprintf (stderr, "No default panel specified for knob %s.\n",
                     knobname);
            exit(1);
          } // end if
        pk = new char [strlen (defaultpanel) + strlen (knobname) + 2];
        sprintf (pk, "%s:%s", defaultpanel, knobname);
        t->Lookup (pk, d);
        delete[] pk;
        return d;
      }
    else
      return t->Lookup (knobname, d);
  }
  knobstring Read (char *knobname, knobstring &d)
  {
    char *pk;

    d = NULL;
    if (strchr (knobname, ':') == NULL)
      {
        if (defaultpanel == NULL)
          {
            fprintf (stderr, "No default panel specified for knob %s.\n",
                     knobname);
            exit(1);
          } // end if
        pk = new char [strlen (defaultpanel) + strlen (knobname) + 2];
        sprintf (pk, "%s:%s", defaultpanel, knobname);
        t->Lookup (pk, (tinkerhash_pvoid &) d);
        delete[] pk;
        return (knobstring) d;
      }
    else
      return (knobstring) t->Lookup (knobname, (tinkerhash_pvoid &) d);
  }

  void Adjust (char *knobname, char d)
  {
    char *pk;

    if (strchr (knobname, ':') == NULL)
      {
        if (defaultpanel == NULL)
          {
            fprintf (stderr, "No default panel specified for knob %s.\n",
                     knobname);
            exit(1);
          } // end if
        pk = new char [strlen (defaultpanel) + strlen (knobname) + 2];
        sprintf (pk, "%s:%s", defaultpanel, knobname);
        t->Set (pk, d);
        delete[] pk;
        return;
      }
    else
      t->Set (knobname, d);
  }
  void Adjust (char *knobname, int d)
  {
    char *pk;

    if (strchr (knobname, ':') == NULL)
      {
        if (defaultpanel == NULL)
          {
            fprintf (stderr, "No default panel specified for knob %s.\n",
                     knobname);
            exit(1);
          } // end if
        pk = new char [strlen (defaultpanel) + strlen (knobname) + 2];
        sprintf (pk, "%s:%s", defaultpanel, knobname);
        t->Set (pk, d);
        delete[] pk;
        return;
      }
    else
      t->Set (knobname, d);
  }
  void Adjust (char *knobname, double d)
  {
    char *pk;

    if (strchr (knobname, ':') == NULL)
      {
        if (defaultpanel == NULL)
          {
            fprintf (stderr, "No default panel specified for knob %s.\n",
                     knobname);
            exit(1);
          } // end if
        pk = new char [strlen (defaultpanel) + strlen (knobname) + 2];
        sprintf (pk, "%s:%s", defaultpanel, knobname);
        t->Set (pk, d);
        delete[] pk;
        return;
      }
    else
      t->Set (knobname, d);
  }
  void Adjust (char *knobname, tinkerhash_pvoid d)
  {
    char *pk;

    if (strchr (knobname, ':') == NULL)
      {
        if (defaultpanel == NULL)
          {
            fprintf (stderr, "No default panel specified for knob %s.\n",
                     knobname);
            exit(1);
          } // end if
        pk = new char [strlen (defaultpanel) + strlen (knobname) + 2];
        sprintf (pk, "%s:%s", defaultpanel, knobname);
        t->Set (pk, d);
        delete[] pk;
        return;
      }
    else
      t->Set (knobname, d);
  }

  int Save (char *);
  int Save (FILE *);
  int Parse (int, char *[]);

}; // end class knobs

#endif

---