Home | History | Annotate | Download | only in lpsched
      1     0  stevel /*
      2     0  stevel  * CDDL HEADER START
      3     0  stevel  *
      4     0  stevel  * The contents of this file are subject to the terms of the
      5  3125  jacobs  * Common Development and Distribution License (the "License").
      6  3125  jacobs  * You may not use this file except in compliance with the License.
      7     0  stevel  *
      8     0  stevel  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
      9     0  stevel  * or http://www.opensolaris.org/os/licensing.
     10     0  stevel  * See the License for the specific language governing permissions
     11     0  stevel  * and limitations under the License.
     12     0  stevel  *
     13     0  stevel  * When distributing Covered Code, include this CDDL HEADER in each
     14     0  stevel  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
     15     0  stevel  * If applicable, add the following below this CDDL HEADER, with the
     16     0  stevel  * fields enclosed by brackets "[]" replaced with your own identifying
     17     0  stevel  * information: Portions Copyright [yyyy] [name of copyright owner]
     18     0  stevel  *
     19     0  stevel  * CDDL HEADER END
     20     0  stevel  */
     21  3125  jacobs 
     22  3125  jacobs /*
     23  3125  jacobs  * Copyright 2006 Sun Microsystems, Inc.  All rights reserved.
     24  3125  jacobs  * Use is subject to license terms.
     25  3125  jacobs  */
     26  3125  jacobs 
     27     0  stevel /*	Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T	*/
     28     0  stevel /*	  All Rights Reserved  	*/
     29     0  stevel 
     30     0  stevel 
     31     0  stevel #pragma ident	"%Z%%M%	%I%	%E% SMI"
     32     0  stevel 
     33     0  stevel #include "stdarg.h"
     34     0  stevel #include "lpsched.h"
     35  3125  jacobs #include <syslog.h>
     36     0  stevel 
     37     0  stevel static void log(char *, va_list);
     38     0  stevel 
     39     0  stevel /**
     40     0  stevel  ** open_logfile() - OPEN FILE FOR LOGGING MESSAGE
     41     0  stevel  **/
     42     0  stevel 
     43     0  stevel static int
     44     0  stevel open_logfile(char *name)
     45     0  stevel {
     46     0  stevel 	char			path[80];
     47     0  stevel 
     48     0  stevel 	snprintf(path, sizeof (path), "%s/%s", Lp_Logs, name);
     49     0  stevel 	return (open_locked(path, "a", 0640));
     50     0  stevel }
     51     0  stevel 
     52     0  stevel 
     53     0  stevel /**
     54     0  stevel  ** fail() - LOG MESSAGE AND EXIT (ABORT IF DEBUGGING)
     55     0  stevel  **/
     56     0  stevel 
     57     0  stevel /*VARARGS1*/
     58     0  stevel void
     59     0  stevel fail(char *format, ...)
     60     0  stevel {
     61     0  stevel 	va_list			ap;
     62     0  stevel 
     63     0  stevel 	va_start (ap, format);
     64     0  stevel 	log (format, ap);
     65     0  stevel 	va_end (ap);
     66     0  stevel 
     67     0  stevel #if	defined(DEBUG)
     68     0  stevel 	if (debug & DB_ABORT)
     69     0  stevel 		abort ();
     70     0  stevel 	else
     71     0  stevel #endif
     72     0  stevel 		exit (1);
     73     0  stevel 	/*NOTREACHED*/
     74     0  stevel }
     75     0  stevel 
     76     0  stevel /**
     77     0  stevel  ** note() - LOG MESSAGE
     78     0  stevel  **/
     79     0  stevel 
     80     0  stevel /*VARARGS1*/
     81     0  stevel void
     82     0  stevel note(char *format, ...)
     83     0  stevel {
     84     0  stevel 	va_list			ap;
     85     0  stevel 
     86     0  stevel 	va_start (ap, format);
     87     0  stevel 	log (format, ap);
     88     0  stevel 	va_end (ap);
     89     0  stevel }
     90     0  stevel 
     91     0  stevel 
     92     0  stevel 
     93     0  stevel /**
     94     0  stevel  ** mallocfail() - COMPLAIN ABOUT MEMORY ALLOCATION FAILURE
     95     0  stevel  **/
     96     0  stevel 
     97     0  stevel void
     98     0  stevel mallocfail(void)
     99     0  stevel {
    100     0  stevel 	fail ("Memory allocation failed!\n");
    101     0  stevel 	/*NOTREACHED*/
    102     0  stevel }
    103     0  stevel 
    104     0  stevel /**
    105     0  stevel  ** log() - LOW LEVEL ROUTINE THAT LOGS MESSSAGES
    106     0  stevel  **/
    107     0  stevel 
    108     0  stevel static void
    109     0  stevel log(char *format, va_list ap)
    110     0  stevel {
    111     0  stevel 	int			close_it;
    112     0  stevel 	int			fd;
    113     0  stevel 	static int		nodate	= 0;
    114     0  stevel 	char buf[BUFSIZ];
    115  3125  jacobs 
    116  3125  jacobs 	vsyslog(LOG_DEBUG, format, ap);
    117     0  stevel 
    118     0  stevel 	if (!am_in_background) {
    119     0  stevel 		fd = 1;
    120     0  stevel 		close_it = 0;
    121     0  stevel 	} else {
    122     0  stevel 		if ((fd = open_logfile("lpsched")) < 0)
    123     0  stevel 			return;
    124     0  stevel 		close_it = 1;
    125     0  stevel 	}
    126     0  stevel 
    127     0  stevel 	if (am_in_background && !nodate) {
    128     0  stevel 		time_t curtime;
    129     0  stevel 		struct tm *tm;
    130     0  stevel 
    131     0  stevel 		time(&curtime);
    132     0  stevel 		if ((tm = localtime(&curtime)) != NULL)
    133     0  stevel 			fdprintf (fd, "%.2d/%.2d %.2d:%.2d:%.2d: ",
    134     0  stevel 			 	tm->tm_mon+1, tm->tm_mday, tm->tm_hour,
    135     0  stevel 				tm->tm_min, tm->tm_sec);
    136     0  stevel 		else
    137     0  stevel 			fdprintf(fd, "bad date: ");
    138     0  stevel 	}
    139     0  stevel 	nodate = 0;
    140     0  stevel 
    141     0  stevel 	vsnprintf (buf, sizeof (buf),  format, ap);
    142     0  stevel 	write(fd, buf, strlen(buf));
    143     0  stevel 	if (format[strlen(format) - 1] != '\n')
    144     0  stevel 		nodate = 1;
    145     0  stevel 
    146     0  stevel 	if (close_it)
    147     0  stevel 		close(fd);
    148     0  stevel }
    149     0  stevel 
    150     0  stevel /**
    151     0  stevel  ** execlog()
    152     0  stevel  **/
    153     0  stevel 
    154     0  stevel /*VARARGS1*/
    155     0  stevel void
    156     0  stevel execlog(char *format, ...)
    157     0  stevel {
    158     0  stevel 	va_list			ap;
    159     0  stevel 
    160     0  stevel #if	defined(DEBUG)
    161     0  stevel 	int			fd	= open_logfile("exec");
    162     0  stevel 	char			buf[BUFSIZ];
    163     0  stevel 	EXEC *			ep;
    164     0  stevel 	static int		nodate	= 0;
    165     0  stevel 
    166     0  stevel 	va_start (ap, format);
    167     0  stevel 	if (fd >= 0) {
    168     0  stevel 		if (!nodate) {
    169     0  stevel 			time_t now = time((time_t *)0);
    170     0  stevel 
    171     0  stevel 			fdprintf (fd, "%24.24s: ", ctime(&now));
    172     0  stevel 		}
    173     0  stevel 		nodate = 0;
    174     0  stevel 		if (!STREQU(format, "%e")) {
    175     0  stevel 			vsnprintf (buf, sizeof (buf), format, ap);
    176     0  stevel 			write(fd, buf, strlen(buf));
    177     0  stevel 			if (format[strlen(format) - 1] != '\n')
    178     0  stevel 				nodate = 1;
    179     0  stevel 		} else switch ((ep = va_arg(ap, EXEC *))->type) {
    180     0  stevel 		case EX_INTERF:
    181     0  stevel 			fdprintf(fd, "      EX_INTERF %s %s\n",
    182     0  stevel 				ep->ex.printer->printer->name,
    183     0  stevel 				ep->ex.printer->request->secure->req_id);
    184     0  stevel 			break;
    185     0  stevel 		case EX_SLOWF:
    186     0  stevel 			fdprintf(fd, "      EX_SLOWF %s\n",
    187     0  stevel 				ep->ex.request->secure->req_id);
    188     0  stevel 			break;
    189     0  stevel 		case EX_ALERT:
    190     0  stevel 			fdprintf(fd, "      EX_ALERT %s\n",
    191     0  stevel 				ep->ex.printer->printer->name);
    192     0  stevel 			break;
    193     0  stevel 		case EX_FAULT_MESSAGE:
    194     0  stevel 			fdprintf(fd, "      EX_FAULT_MESSAGE %s\n",
    195     0  stevel 				ep->ex.printer->printer->name);
    196     0  stevel 			break;
    197     0  stevel 		case EX_FORM_MESSAGE:
    198     0  stevel 			fdprintf(fd, "      EX_FORM_MESSAGE %s\n",
    199     0  stevel 				ep->ex.form->form->name);
    200     0  stevel 			break;
    201     0  stevel 		case EX_FALERT:
    202     0  stevel 			fdprintf(fd, "      EX_FALERT %s\n",
    203     0  stevel 				ep->ex.form->form->name);
    204     0  stevel 			break;
    205     0  stevel 		case EX_PALERT:
    206     0  stevel 			fdprintf(fd, "      EX_PALERT %s\n",
    207     0  stevel 				ep->ex.pwheel->pwheel->name);
    208     0  stevel 			break;
    209     0  stevel 		case EX_NOTIFY:
    210     0  stevel 			fdprintf(fd, "      EX_NOTIFY %s\n",
    211     0  stevel 				ep->ex.request->secure->req_id);
    212     0  stevel 			break;
    213     0  stevel 		default:
    214     0  stevel 			fdprintf (fd, "      EX_???\n");
    215     0  stevel 			break;
    216     0  stevel 		}
    217     0  stevel 		close(fd);
    218     0  stevel 	}
    219     0  stevel #endif
    220     0  stevel }
    221