This is misc.c in view mode; [Download] [Up]
/*
* misc.c
*
* Copyright (C) 1989, 1991, Craig E. Kolb
* All rights reserved.
*
* This software may be freely copied, modified, and redistributed
* provided that this copyright notice is preserved on all copies.
*
* You may not distribute this software, in whole or in part, as part of
* any commercial product without the express consent of the authors.
*
* There is no warranty or other guarantee of fitness of this software
* for any purpose. It is provided solely "as is".
*
* $Id$
*
* $Log$
*/
#include "rayshade.h"
#ifdef RUSAGE
#include <sys/time.h>
#include <sys/resource.h>
#else
#ifdef TIMES
#include <sys/types.h>
#include <sys/times.h>
#include <sys/param.h>
#endif
#endif
#include "options.h"
#include "stats.h"
Float RSabstmp; /* Temporary value used by fabs macro. Ugly. */
static void RSmessage();
/*
* Open input file and call yyparse().
*/
void
read_input_file()
{
extern FILE *yyin; /* lex/yacc file pointer */
extern char yyfilename[];
#if defined(CPPSTDIN) && defined(POPEN)
char cmd[BUFSIZ];
if (Options.cppargs != (char *)NULL)
sprintf(cmd, "%s %s ", CPPSTDIN, Options.cppargs);
else
/* fromstdin */
sprintf(cmd, "%s %s ", CPPSTDIN, CPPMINUS);
if (Options.inputname == (char *)NULL) {
(void)strcpy(yyfilename, "stdin");
} else {
(void)strcpy(yyfilename, Options.inputname);
(void)strcat(cmd, Options.inputname);
}
yyin = popen(cmd, "r");
if (yyin == (FILE *)NULL)
RLerror(RL_PANIC, "popen of \"%s\" failed!\n", cmd);
#else
if (Options.inputname == (char *)NULL) {
yyin = stdin;
(void)strcpy(yyfilename, "stdin");
} else {
(void)strcpy(yyfilename, Options.inputname);
yyin = fopen(Options.inputname, "r");
if (yyin == (FILE *)NULL)
RLerror(RL_PANIC,
"Cannot open %s.\n",Options.inputname);
}
#endif
(void)yyparse();
}
void
OpenStatsFile()
{
if (Options.statsname == (char *)NULL || Stats.fstats != stderr)
return; /* Not specified or already opened. */
Stats.fstats = fopen(Options.statsname, "w");
if (Stats.fstats == (FILE *)NULL) {
RLerror(RL_PANIC,
"Cannot open stats file %s.\n", Options.statsname);
}
}
void
RLerror(level, pat, arg1, arg2, arg3)
int level;
char *pat, *arg1, *arg2, *arg3;
{
switch (level) {
case RL_ADVISE:
if (!Options.quiet)
RSmessage("Warning", pat, arg1, arg2, arg3);
break;
case RL_WARN:
RSmessage("Warning", pat, arg1, arg2, arg3);
break;
case RL_ABORT:
RSmessage("Error", pat, arg1, arg2, arg3);
exit(1);
break;
case RL_PANIC:
RSmessage("Fatal error", pat, arg1, arg2, arg3);
exit(2);
break;
default:
RSmessage("Unknown error", pat, arg1, arg2, arg3);
exit(3);
}
}
static void
RSmessage(type, pat, arg1, arg2, arg3)
char *type, *pat, *arg1, *arg2, *arg3;
{
extern FILE *yyin;
extern int yylineno;
if (yyin) {
/*
* cleanup() hasn't nulled yyin, so line #
* info is valid.
*/
fprintf(stderr,"%s: %s: line %d: ",
Options.progname, type, yylineno);
} else {
fprintf(stderr,"%s: %s: ", Options.progname, type);
}
fprintf(stderr, pat, arg1, arg2, arg3);
}
#ifdef RUSAGE
void
get_cpu_time(usertime, systime)
Float *usertime, *systime;
{
struct rusage usage;
getrusage(RUSAGE_SELF, &usage);
*usertime = (Float)usage.ru_utime.tv_sec +
(Float)usage.ru_utime.tv_usec / 1000000.;
*systime = (Float)usage.ru_stime.tv_sec +
(Float)usage.ru_stime.tv_usec / 1000000.;
}
#else
#ifdef TIMES
void
get_cpu_time(usertime, systime)
Float *usertime, *systime;
{
CLOCKTYPE time;
(void)times(&time);
*usertime = (Float)time.tms_utime / (Float)HZ;
*systime = (Float)time.tms_stime / (Float)HZ;
}
#else /* !RUSAGE && !TIMES */
void
get_cpu_time(usertime, systime)
Float *usertime, *systime;
{
*usertime = *systime = 0.;
}
#endif /* TIMES */
#endif /* RUSAGE */
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.