mirror of https://github.com/tongzx/nt5src
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
118 lines
3.0 KiB
118 lines
3.0 KiB
/************************************************************************/
|
|
/* */
|
|
/* RCPP - Resource Compiler Pre-Processor for NT system */
|
|
/* */
|
|
/* ERROR.C - Error Handler Routines */
|
|
/* */
|
|
/* 04-Dec-90 w-BrianM Update for NT from PM SDK RCPP */
|
|
/* */
|
|
/************************************************************************/
|
|
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include "rcpptype.h"
|
|
#include "rcppdecl.h"
|
|
#include "rcppext.h"
|
|
#include "msgs.h"
|
|
|
|
|
|
/* defines for message types */
|
|
#define W_MSG 4000
|
|
#define E_MSG 2000
|
|
#define F_MSG 1000
|
|
|
|
static char Errbuff[128] = {
|
|
0};
|
|
|
|
/************************************************************************/
|
|
/* Local Function Prototypes */
|
|
/************************************************************************/
|
|
void message (int, int, char *);
|
|
|
|
|
|
/************************************************************************/
|
|
/* ERROR - Print an error message to STDOUT. */
|
|
/************************************************************************/
|
|
#define MAX_ERRORS 100
|
|
|
|
void error (int msgnum)
|
|
{
|
|
|
|
message(E_MSG, msgnum, Msg_Text);
|
|
if (++Nerrors > MAX_ERRORS) {
|
|
Msg_Temp = GET_MSG (1003);
|
|
SET_MSG (Msg_Text, Msg_Temp, MAX_ERRORS);
|
|
fatal(1003); /* die - too many errors */
|
|
}
|
|
return;
|
|
}
|
|
|
|
|
|
/************************************************************************/
|
|
/* FATAL - Print an error message to STDOUT and exit. */
|
|
/************************************************************************/
|
|
void fatal (int msgnum)
|
|
{
|
|
message(F_MSG, msgnum, Msg_Text);
|
|
exit(++Nerrors);
|
|
}
|
|
|
|
|
|
/************************************************************************/
|
|
/* WARNING - Print an error message to STDOUT. */
|
|
/************************************************************************/
|
|
void warning (int msgnum)
|
|
{
|
|
message(W_MSG, msgnum, Msg_Text);
|
|
}
|
|
|
|
|
|
/************************************************************************/
|
|
/* MESSAGE - format and print the message to STDERR. */
|
|
/* The msg goes out in the form : */
|
|
/* <file>(<line>) : <msgtype> <errnum> <expanded msg> */
|
|
/************************************************************************/
|
|
void message(int msgtype, int msgnum, char *msg)
|
|
{
|
|
char mbuff[512];
|
|
register char *p = mbuff;
|
|
register char *msgname;
|
|
char msgnumstr[32];
|
|
|
|
if (Linenumber > 0 && Filename) {
|
|
SET_MSG (p, "%s(%d) : ", Filename, Linenumber);
|
|
p += strlen(p);
|
|
}
|
|
if (msgtype) {
|
|
switch (msgtype)
|
|
{
|
|
case W_MSG:
|
|
msgname = GET_MSG(MSG_WARN);
|
|
break;
|
|
case E_MSG:
|
|
msgname = GET_MSG(MSG_ERROR);
|
|
break;
|
|
case F_MSG:
|
|
msgname = GET_MSG(MSG_FATAL);
|
|
break;
|
|
}
|
|
strcpy(p, msgname);
|
|
p += strlen(msgname);
|
|
SET_MSG(msgnumstr, " %s%d: ", "RC", msgnum);
|
|
strcpy(p, msgnumstr);
|
|
p += strlen(msgnumstr);
|
|
strcpy(p, msg);
|
|
p += strlen(p);
|
|
}
|
|
fwrite(mbuff, strlen(mbuff), 1, stderr);
|
|
fwrite("\n", 1, 1, stderr);
|
|
if (Srclist && Errfl) {
|
|
|
|
/* emit messages to error il file too */
|
|
|
|
fwrite(mbuff, strlen(mbuff), 1, Errfl);
|
|
fwrite("\n", 1, 1, Errfl);
|
|
}
|
|
return;
|
|
}
|