home *** CD-ROM | disk | FTP | other *** search
- /* Copyright (c) 1988 Bellcore
- ** All Rights Reserved
- ** Permission is granted to copy or use this program, EXCEPT that it
- ** may not be sold for profit, the copyright notice must be reproduced
- ** on copies, and credit should be given to Bellcore where it is due.
- ** BELLCORE MAKES NO WARRANTY AND ACCEPTS NO LIABILITY FOR THIS PROGRAM.
- */
-
-
- #ifndef lint
- static char rcsid[]= "$Header: misc.c,v 1.1 88/09/15 11:34:01 daniel Rel $";
- #endif
-
- #include <stdio.h>
- #include "misc.h"
- #include "visual.h"
- #include "output.h"
-
- /*
- ** various routines used throughout the program
- */
-
- static int _Z_qflag = 0;
-
- void
- Z_setquiet()
- {
- _Z_qflag = 1;
- }
-
- char Z_err_buf[Z_LINELEN];
-
- #ifndef NOCHATTER
- /*
- ** I/O coverup to reassure users with HUGE files
- ** that spiff is doing something
- */
- void
- Z_chatter(str)
- char *str;
- {
- if (!_Z_qflag)
- {
- (void) fputs("spiff -- ",stderr);
- (void) fputs(str,stderr);
- }
- }
- #endif
-
- /*
- ** complain unless you've been told to be quiet
- */
- void
- Z_complain(str)
- char *str;
- {
- if (!_Z_qflag)
- (void) fputs(str,stderr);
- }
-
- /*
- ** quit with an error code
- */
- static void
- _Z_errexit()
- {
- (void) exit(2);
- }
-
- /*
- ** complain and die
- */
- void
- _Z_qfatal(str)
- char *str;
- {
- V_cleanup(); /* try reset the device to normal */
- O_cleanup(); /* " " " " " " */
- Z_complain(str);
- _Z_errexit();
- }
-
- /*
- ** scream and die
- */
- void
- Z_fatal(str)
- char *str;
- {
- V_cleanup(); /* try reset the device to normal */
- O_cleanup(); /* " " " " " " */
- (void) fputs(str,stderr);
- _Z_errexit();
- }
-
- /*
- ** allocate memory with error checking
- */
- int*
- _Z_myalloc(k)
- int k;
- {
- int *tmp;
- if (tmp = (int*) calloc((unsigned)k,(unsigned)1))
- {
- return(tmp);
- }
- Z_fatal("Out of Memory\n");
- return(tmp); /* boilerplate to shut up lint */
- }
-
- void
- Z_exceed(d)
- int d;
- {
- (void) sprintf(Z_err_buf,
- "The files differ in more than %d places\n", d);
- _Z_qfatal(Z_err_buf);
- }
-