File: strerr_die.c

package info (click to toggle)
qmail 1.01-5
  • links: PTS
  • area: non-free
  • in suites: hamm
  • size: 2,188 kB
  • ctags: 1,711
  • sloc: ansic: 13,993; makefile: 1,914; perl: 448; sh: 377
file content (37 lines) | stat: -rw-r--r-- 870 bytes parent folder | download | duplicates (43)
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
#include "substdio.h"
#include "subfd.h"
#include "exit.h"
#include "strerr.h"

void strerr_warn(x1,x2,x3,x4,x5,x6,se)
char *x1; char *x2; char *x3; char *x4; char *x5; char *x6;
struct strerr *se;
{
  strerr_sysinit();
 
  if (x1) substdio_puts(subfderr,x1);
  if (x2) substdio_puts(subfderr,x2);
  if (x3) substdio_puts(subfderr,x3);
  if (x4) substdio_puts(subfderr,x4);
  if (x5) substdio_puts(subfderr,x5);
  if (x6) substdio_puts(subfderr,x6);
 
  while(se) {
    if (se->x) substdio_puts(subfderr,se->x);
    if (se->y) substdio_puts(subfderr,se->y);
    if (se->z) substdio_puts(subfderr,se->z);
    se = se->who;
  }
 
  substdio_puts(subfderr,"\n");
  substdio_flush(subfderr);
}

void strerr_die(e,x1,x2,x3,x4,x5,x6,se)
int e;
char *x1; char *x2; char *x3; char *x4; char *x5; char *x6;
struct strerr *se;
{
  strerr_warn(x1,x2,x3,x4,x5,x6,se);
  _exit(e);
}