xref: /titanic_52/usr/src/cmd/mail/Dout.c (revision 7c478bd95313f5f23a4c958a745db2134aa03244)
1*7c478bd9Sstevel@tonic-gate /*
2*7c478bd9Sstevel@tonic-gate  * CDDL HEADER START
3*7c478bd9Sstevel@tonic-gate  *
4*7c478bd9Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
5*7c478bd9Sstevel@tonic-gate  * Common Development and Distribution License, Version 1.0 only
6*7c478bd9Sstevel@tonic-gate  * (the "License").  You may not use this file except in compliance
7*7c478bd9Sstevel@tonic-gate  * with the License.
8*7c478bd9Sstevel@tonic-gate  *
9*7c478bd9Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*7c478bd9Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
11*7c478bd9Sstevel@tonic-gate  * See the License for the specific language governing permissions
12*7c478bd9Sstevel@tonic-gate  * and limitations under the License.
13*7c478bd9Sstevel@tonic-gate  *
14*7c478bd9Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
15*7c478bd9Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*7c478bd9Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
17*7c478bd9Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
18*7c478bd9Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
19*7c478bd9Sstevel@tonic-gate  *
20*7c478bd9Sstevel@tonic-gate  * CDDL HEADER END
21*7c478bd9Sstevel@tonic-gate  */
22*7c478bd9Sstevel@tonic-gate /*	Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T	*/
23*7c478bd9Sstevel@tonic-gate /*	  All Rights Reserved  	*/
24*7c478bd9Sstevel@tonic-gate 
25*7c478bd9Sstevel@tonic-gate 
26*7c478bd9Sstevel@tonic-gate #pragma ident	"%Z%%M%	%I%	%E% SMI" 	/* SVr4.0 1.	*/
27*7c478bd9Sstevel@tonic-gate /*
28*7c478bd9Sstevel@tonic-gate     NAME
29*7c478bd9Sstevel@tonic-gate 	Dout - Print debug output
30*7c478bd9Sstevel@tonic-gate 
31*7c478bd9Sstevel@tonic-gate     SYNOPSIS
32*7c478bd9Sstevel@tonic-gate 	void Dout(char *subname, int level, char *msg, ...)
33*7c478bd9Sstevel@tonic-gate 
34*7c478bd9Sstevel@tonic-gate     DESCRIPTION
35*7c478bd9Sstevel@tonic-gate 	Dout prints debugging output if debugging is turned
36*7c478bd9Sstevel@tonic-gate 	on (-x specified) and the level of this message is
37*7c478bd9Sstevel@tonic-gate 	lower than the value of the global variable debug.
38*7c478bd9Sstevel@tonic-gate 	The subroutine name is printed if it is not a null
39*7c478bd9Sstevel@tonic-gate 	string.
40*7c478bd9Sstevel@tonic-gate */
41*7c478bd9Sstevel@tonic-gate #include "mail.h"
42*7c478bd9Sstevel@tonic-gate #ifdef __STDC__
43*7c478bd9Sstevel@tonic-gate # include <stdarg.h>
44*7c478bd9Sstevel@tonic-gate #else
45*7c478bd9Sstevel@tonic-gate # include <varargs.h>
46*7c478bd9Sstevel@tonic-gate #endif
47*7c478bd9Sstevel@tonic-gate 
48*7c478bd9Sstevel@tonic-gate /* VARARGS3 PRINTFLIKE3 */
49*7c478bd9Sstevel@tonic-gate void
50*7c478bd9Sstevel@tonic-gate #ifdef __STDC__
51*7c478bd9Sstevel@tonic-gate Dout(char *subname, int level, char *fmt, ...)
52*7c478bd9Sstevel@tonic-gate #else
53*7c478bd9Sstevel@tonic-gate # ifdef lint
54*7c478bd9Sstevel@tonic-gate Dout(Xsubname, Xlevel, Xfmt, va_alist)
55*7c478bd9Sstevel@tonic-gate char *Xsubname, *Xfmt;
56*7c478bd9Sstevel@tonic-gate int Xlevel;
57*7c478bd9Sstevel@tonic-gate va_dcl
58*7c478bd9Sstevel@tonic-gate # else
59*7c478bd9Sstevel@tonic-gate Dout(va_alist)
60*7c478bd9Sstevel@tonic-gate va_dcl
61*7c478bd9Sstevel@tonic-gate # endif
62*7c478bd9Sstevel@tonic-gate #endif
63*7c478bd9Sstevel@tonic-gate {
64*7c478bd9Sstevel@tonic-gate #ifndef __STDC__
65*7c478bd9Sstevel@tonic-gate 	char    *subname;
66*7c478bd9Sstevel@tonic-gate 	int	level;
67*7c478bd9Sstevel@tonic-gate 	char    *fmt;
68*7c478bd9Sstevel@tonic-gate #endif
69*7c478bd9Sstevel@tonic-gate 	va_list args;
70*7c478bd9Sstevel@tonic-gate 
71*7c478bd9Sstevel@tonic-gate #ifndef __STDC__
72*7c478bd9Sstevel@tonic-gate #ifdef lint
73*7c478bd9Sstevel@tonic-gate 	subname = Xsubname;
74*7c478bd9Sstevel@tonic-gate 	level = Xlevel;
75*7c478bd9Sstevel@tonic-gate 	fmt = Xfmt;
76*7c478bd9Sstevel@tonic-gate # endif
77*7c478bd9Sstevel@tonic-gate #endif
78*7c478bd9Sstevel@tonic-gate 
79*7c478bd9Sstevel@tonic-gate #ifdef __STDC__
80*7c478bd9Sstevel@tonic-gate 	va_start(args, fmt);
81*7c478bd9Sstevel@tonic-gate #else
82*7c478bd9Sstevel@tonic-gate 	va_start(args);
83*7c478bd9Sstevel@tonic-gate 	subname = va_arg(args, char *);
84*7c478bd9Sstevel@tonic-gate 	level = va_arg(args, int);
85*7c478bd9Sstevel@tonic-gate 	fmt = va_arg(args, char *);
86*7c478bd9Sstevel@tonic-gate #endif
87*7c478bd9Sstevel@tonic-gate 
88*7c478bd9Sstevel@tonic-gate 	if (debug > level) {
89*7c478bd9Sstevel@tonic-gate 		if (subname && *subname) {
90*7c478bd9Sstevel@tonic-gate 			fprintf(dbgfp,"%s(): ", subname);
91*7c478bd9Sstevel@tonic-gate 		}
92*7c478bd9Sstevel@tonic-gate 		vfprintf(dbgfp, fmt, args);
93*7c478bd9Sstevel@tonic-gate 	}
94*7c478bd9Sstevel@tonic-gate 	va_end(args);
95*7c478bd9Sstevel@tonic-gate }
96