1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122
|
#include <ncbi.h>
#define TEST_VERSION
#define OPT_TUPLES 1
#define OPT_SHORT 2
void ErrMsgRoot_PrintHeader (ErrMsgRootPtr idx, unsigned int opts, FILE *fd);
int main (int argc, char **argv)
{
ErrMsgRootPtr idx;
FILE *fout = stdout;
char mod[32];
int i;
unsigned int opts =0;
mod[0] = '\0';
ErrSetOptFlags(EO_LOGTO_STDERR);
ErrClearOptFlags(EO_SHOW_CODES | EO_BEEP);
ErrSetMessageLevel(SEV_MAX);
ErrSetLogLevel(SEV_WARNING);
for (i=1; i<argc; ++i)
{
if (argv[i][0] == '-')
{
switch(argv[i][1])
{
case '2' :
opts |= OPT_TUPLES;
break;
case 's' :
opts |= OPT_SHORT;
break;
}
}
else if (mod[0] == '\0')
{
char *p;
strncat(mod,argv[i],sizeof mod);
if ((p = strstr(argv[i],".msg")) != NULL)
*p = '\0';
}
else if (fout == stdout)
{
ErrSetFatalLevel(SEV_INFO);
fout = fopen(argv[i],"w");
ErrSetFatalLevel(SEV_FATAL);
}
}
if (mod[0] == '\0')
{
fprintf(stderr,"\nUSAGE: errhdr [options] msgfile [hdrfile] \n\n");
fprintf(stderr," options: -2 for code,subcode tuples\n");
fprintf(stderr," -s for short subcode defines\n");
return 1;
}
if ((idx = ErrGetMsgRoot(mod)) ==NULL)
{
return 1;
}
if (idx->list == NULL /*not_avail*/ )
{
fprintf(stderr,"Unable to find error message file for module \"%s\"\n",mod);
return 1;
}
ErrMsgRoot_PrintHeader(idx,opts,fout);
return 0;
}
void ErrMsgRoot_PrintHeader (ErrMsgRootPtr idx, unsigned int opts, FILE *fd)
{
ErrMsgNode *lev1;
ErrMsgNode *lev2;
fprintf(fd,"#ifndef __MODULE_%s__\n",idx->name);
fprintf(fd,"#define __MODULE_%s__\n\n",idx->name);
for (lev1=idx->list; lev1; lev1=lev1->next)
{
if (opts & OPT_TUPLES)
{
fprintf(fd,"#define ERR_%s %d,0\n",lev1->name,(int)lev1->code);
for (lev2=lev1->list; lev2; lev2=lev2->next)
fprintf(fd,"#define ERR_%s_%s %d,%d\n",lev1->name,lev2->name,
(int)lev1->code,(int)lev2->code);
}
else
{
fprintf(fd,"#define ERR_%s %d\n",lev1->name,(int)lev1->code);
for (lev2=lev1->list; lev2; lev2=lev2->next)
{
if (opts & OPT_SHORT)
fprintf(fd,"#define SUB_%s %d\n",
lev2->name,(int)lev2->code);
else
fprintf(fd,"#define SUB_%s_%s %d\n",
lev1->name,lev2->name,(int)lev2->code);
}
}
}
fprintf(fd,"\n#endif\n");
}
Int2
Nlm_Main(void)
{
fprintf(stderr,"Kludge main executed in file %s", __FILE__);
exit (1);
}
|