#ifndef USE_RGB_TXT
#ifdef NDBM
#include <ndbm.h>
#else
#if defined(SVR4) && !defined(SCO325)
#include <rpcsvc/dbm.h>
#else
#include <dbm.h>
#endif
#define dbm_open(name,flags,mode) (!dbminit(name))
#define dbm_firstkey(db) (firstkey())
#define dbm_fetch(db,key) (fetch(key))
#define dbm_close(db) dbmclose()
#endif
#endif
#undef NULL
#include <stdio.h>
#include <X11/Xos.h>
#include <stdlib.h>
#include "rgb.h"
#include "site.h"
#include <X11/Xfuncs.h>
char *ProgramName;
static void dumprgb(char *filename);
int
main (int argc, char *argv[])
{
char *dbname = RGB_DB;
ProgramName = argv[0];
if (argc == 2)
dbname = argv[1];
dumprgb (dbname);
exit (0);
}
#ifndef USE_RGB_TXT
static void
dumprgb (filename)
char *filename;
{
#ifdef NDBM
DBM *rgb_dbm;
#else
int rgb_dbm;
#endif
datum key;
rgb_dbm = dbm_open (filename, O_RDONLY, 0);
if (!rgb_dbm) {
fprintf (stderr, "%s: unable to open rgb database \"%s\"\n",
ProgramName, filename);
exit (1);
}
#ifndef NDBM
#define dbm_nextkey(db) (nextkey(key))
#endif
for (key = dbm_firstkey(rgb_dbm); key.dptr != NULL;
key = dbm_nextkey(rgb_dbm)) {
datum value;
value = dbm_fetch(rgb_dbm, key);
if (value.dptr) {
RGB rgb;
unsigned short r, g, b;
memcpy( (char *)&rgb, value.dptr, sizeof rgb);
#define N(x) (((x) >> 8) & 0xff)
r = N(rgb.red);
g = N(rgb.green);
b = N(rgb.blue);
#undef N
printf ("%3u %3u %3u\t\t", r, g, b);
fwrite (key.dptr, 1, key.dsize, stdout);
putchar ('\n');
} else {
fprintf (stderr, "%s: no value found for key \"", ProgramName);
fwrite (key.dptr, 1, key.dsize, stderr);
fprintf (stderr, "\"\n");
}
}
dbm_close (rgb_dbm);
}
#else
static void
dumprgb (filename)
char *filename;
{
FILE *rgb;
char *path;
char line[BUFSIZ];
char name[BUFSIZ];
int lineno = 0;
int red, green, blue;
#ifdef __UNIXOS2__
char *root = (char*)getenv("X11ROOT");
sprintf(line,"%s%s.txt",root,filename);
path = (char *)malloc(strlen(line) + 1);
strcpy(path,line);
#else
path = (char *)malloc(strlen(filename) + 5);
strcpy(path, filename);
strcat(path, ".txt");
#endif
if (!(rgb = fopen(path, "r"))) {
fprintf (stderr, "%s: unable to open rgb database \"%s\"\n",
ProgramName, filename);
free(path);
exit (1);
}
while(fgets(line, sizeof(line), rgb)) {
lineno++;
#ifndef __UNIXOS2__
if (sscanf(line, "%d %d %d %[^\n]\n", &red, &green, &blue, name) == 4) {
#else
if (sscanf(line, "%d %d %d %[^\n\r]\n", &red, &green, &blue, name) == 4) {
#endif
if (red >= 0 && red <= 0xff &&
green >= 0 && green <= 0xff &&
blue >= 0 && blue <= 0xff) {
printf ("%3u %3u %3u\t\t%s\n", red, green, blue, name);
} else {
fprintf(stderr, "%s: value for \"%s\" out of range: %s:%d\n",
ProgramName, name, path, lineno);
}
} else if (*line && *line != '!') {
fprintf(stderr, "%s: syntax error: %s:%d\n", ProgramName,
path, lineno);
}
}
free(path);
fclose(rgb);
}
#endif