1/*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License (the "License").
6 * You may not use this file except in compliance with the License.
7 *
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
12 *
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
18 *
19 * CDDL HEADER END
20 */
21
22/*
23 * Copyright 2007 Sun Microsystems, Inc.  All rights reserved.
24 * Use is subject to license terms.
25 */
26
27#pragma ident	"%Z%%M%	%I%	%E% SMI"
28
29#include <stdio.h>
30#include <stdlib.h>
31#include <libintl.h>
32#include <signal.h>
33#include <errno.h>
34#include <string.h>
35#include <syslog.h>
36#include "netpr.h"
37#include "netdebug.h"
38
39static int job_primitive(np_bsdjob_t *, char, char *);
40static int create_cfA_file(np_bsdjob_t *);
41static char *create_cfname(np_bsdjob_t *);
42static char *create_dfname(np_bsdjob_t *);
43extern char data_file_type;
44
45np_bsdjob_t *
46create_bsd_job(np_job_t *injob, int pr_order, int filesize)
47{
48
49	np_bsdjob_t *job;
50	char *id;
51	int x;
52	np_data_t *jobdata;
53
54	if ((injob->request_id == NULL) || (injob->username == NULL) ||
55	    (injob->dest == NULL) || (injob->printer ==  NULL)) {
56		return (NULL);
57	}
58
59	job = (np_bsdjob_t *)malloc(sizeof (np_bsdjob_t));
60	ASSERT(job, MALLOC_ERR);
61	(void) memset(job, 0, sizeof (np_bsdjob_t));
62	job->np_printer = "auto";	/* default "queue" */
63	/*
64	 * request-id comes in as printer-number
65	 * pull apart to create number
66	 */
67	if ((id = strrchr(injob->request_id, (int)'-')) == NULL) {
68		(void) fprintf(stderr,
69		gettext("Netpr: request_id in unknown format:<%s>\n"),
70			injob->request_id);
71		syslog(LOG_DEBUG, "request id in unknown format: %s",
72			injob->request_id);
73		return (NULL);
74	}
75
76	id++;
77
78	/*
79	 * 4261563 - A ID collides with an existing one, it plus
80	 * 1,000 with the ID causes breaking
81	 * Max job id for bsd is 999.
82	 */
83	job->np_request_id = malloc(4);
84	ASSERT(job->np_request_id, MALLOC_ERR);
85	errno = 0;
86	x = atoi(id);
87	if ((errno != 0) || (x < 0)) {
88		x = 0;
89	}
90	(void) snprintf(job->np_request_id, (size_t)4,
91	    "%.3d", x % 1000);
92
93	/* seperate the user/host from host!user or user@host */
94	if ((id = strchr(injob->username, '@')) != NULL) {
95		*id++ = '\0';
96		job->np_username = strdup(injob->username);
97		job->np_host = strdup(id);
98		*--id = '@';
99	} else if ((id = strrchr(injob->username, '!')) != NULL) {
100		*id++ = '\0';
101		job->np_username = strdup(id);
102		job->np_host = strdup(injob->username);
103		*--id = '!';
104	} else {
105		syslog(LOG_DEBUG, "using localhost for user %s",
106			injob->username);
107		job->np_username = strdup(injob->username);
108		job->np_host = strdup("localhost");
109	}
110
111	job->np_printer = injob->printer;
112	job->np_filename = injob->filename;
113
114	job->np_df_letter = 'A';
115
116	/* build cfAfilename: (cfA)(np_request_id)(np_host) */
117	if ((job->np_cfAfilename = create_cfname(job)) == NULL) {
118		(void) fprintf(stderr,
119			gettext("Netpr: System error creating cfAfilename\n"));
120			syslog(LOG_DEBUG, "System error creating cfAfilename");
121		return (NULL);
122	}
123
124	job->np_timeout = injob->timeout;
125	job->np_banner = injob->banner;
126	job->np_print_order = pr_order;
127
128	if (injob->title == NULL)
129		job->np_title = injob->filename;
130	else
131		job->np_title = injob->title;
132
133	if ((create_cfA_file(job)) == -1) {
134		(void) fprintf(stderr,
135		gettext("Netpr: Cannot create bsd control file\n"));
136		syslog(LOG_DEBUG, "Cannot create bsd control file");
137		return (NULL);
138	}
139
140	/* Now we have a title, add to the control file */
141	if (injob->banner == BANNER) {
142		(void) job_primitive(job, 'C', job->np_host);
143		(void) job_primitive(job, 'J', job->np_title);
144		(void) job_primitive(job, 'L', job->np_username);
145	}
146
147
148	/* create dfname for this file */
149
150	/* allocate the jobdata and initialize what we have so far */
151	jobdata = malloc(sizeof (np_data_t));
152	ASSERT(jobdata, MALLOC_ERR);
153	(void) memset(jobdata, 0, sizeof (np_data_t));
154
155	jobdata->np_path_file = malloc(strlen(job->np_filename) + 1);
156	ASSERT(jobdata->np_path_file, MALLOC_ERR);
157	(void) strcpy(jobdata->np_path_file, job->np_filename);
158
159	jobdata->np_data_size = filesize;
160
161	if ((jobdata->np_dfAfilename = create_dfname(job)) == NULL) {
162		return (NULL);
163	}
164
165	/*
166	 * data_file_type should contain the RFC-1179 control file message
167	 * type for the control file.  The is is set via the "-f" option
168	 * to netpr, which get it from the "destination-full-control-file-type"
169	 * option passed in.  Normally this will be either 'l' or 'f'.
170	 */
171	if (data_file_type != 0) {
172		(void) job_primitive(job, data_file_type,
173				jobdata->np_dfAfilename);
174		(void) job_primitive(job, 'U', jobdata->np_dfAfilename);
175		(void) job_primitive(job, 'N', "print-data");
176	}
177
178	syslog(LOG_DEBUG, "data file info: %s", job->np_cfAfile);
179
180	/*
181	 * attach np_data to bsdjob
182	 */
183	job->np_data = jobdata;
184
185	return (job);
186}
187
188
189/*
190 * Create df<x>name for this file
191 * df<X><nnn><hostname>
192 */
193static char *
194create_dfname(np_bsdjob_t *job)
195{
196	char *dfname;
197
198	if (job == NULL)
199		return (NULL);
200
201	/* Trying to print too many files */
202	if (job->np_df_letter > 'z') {
203		errno = ENFILE;
204		return (NULL);
205	}
206
207	dfname = (char *)malloc(strlen(job->np_host) + 3 + 3 + 1);
208	ASSERT(dfname, MALLOC_ERR);
209	(void) memset(dfname, 0, strlen(job->np_host) + 3 + 3 + 1);
210	(void) sprintf(dfname, "%s%c%s%s", "df", job->np_df_letter,
211	    job->np_request_id, job->np_host);
212
213	/* udate np_df_letter for the next caller */
214	job->np_df_letter += 1;
215	if ((job->np_df_letter > 'Z') && (job->np_df_letter < 'a'))
216		job->np_df_letter = 'a';
217
218	return (dfname);
219}
220
221static char *
222create_cfname(np_bsdjob_t *job)
223{
224	char *cfname;
225
226	if (job == NULL)
227		return (NULL);
228
229	cfname = (char *)malloc(strlen(job->np_host) + 3 + 3 + 1);
230	ASSERT(cfname, MALLOC_ERR);
231	(void) memset(cfname, 0, strlen(job->np_host) + 3 + 3 + 1);
232	(void) sprintf(cfname, "%s%s%s", "cfA",
233	job->np_request_id, job->np_host);
234	return (cfname);
235}
236
237static int
238create_cfA_file(np_bsdjob_t *job)
239{
240	/*
241	 * Read through job structure, creating entries
242	 * in control file as appropriate
243	 */
244	if ((job->np_host == NULL) || (job->np_username == NULL)) {
245		(void) fprintf(stderr, gettext(
246		"Netpr: Missing required data, cannot build control file\n"));
247		return (-1);
248	}
249	(void) job_primitive(job, 'H', job->np_host);
250	(void) job_primitive(job, 'P', job->np_username);
251
252	return (0);
253}
254
255static int
256job_primitive(np_bsdjob_t *job, char option, char *value)
257{
258	char buf[BUFSIZ];
259
260	if ((job == NULL) || (value == NULL))
261		return (-1);
262
263	job->np_cfAfilesize += strlen(value) + 2; /* (opt)(value)\n */
264	if (job->np_cfAfile == NULL) {
265		/* Always allocate one greater than cfAfilesize for the \0 */
266		job->np_cfAfile = calloc(1, job->np_cfAfilesize + 1);
267		ASSERT(job->np_cfAfile, MALLOC_ERR);
268	} else {
269		job->np_cfAfile = realloc(job->np_cfAfile,
270			job->np_cfAfilesize + 1);
271		ASSERT(job->np_cfAfile, REALLOC_ERR);
272	}
273	(void) snprintf(buf, sizeof (buf),  "%c%s\n", option, value);
274	(void) strcat(job->np_cfAfile, buf);
275	syslog(LOG_DEBUG, "adding: %d %s", job->np_cfAfilesize, buf);
276
277	return (0);
278}
279