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 2017 Gary Mills 24 * Copyright 2008 Sun Microsystems, Inc. All rights reserved. 25 * Use is subject to license terms. 26 * 27 */ 28 29 /* $Id: lpr.c 146 2006-03-24 00:26:54Z njacobs $ */ 30 31 #include <stdio.h> 32 #include <stdlib.h> 33 #include <unistd.h> 34 #include <string.h> 35 #include <locale.h> 36 #include <libintl.h> 37 #include <papi.h> 38 #include "common.h" 39 40 #ifdef HAVE_LIBMAGIC /* for mimetype auto-detection */ 41 #include <magic.h> 42 #endif /* HAVE_LIBMAGIC */ 43 44 static void 45 usage(char *program) 46 { 47 char *name; 48 49 if ((name = strrchr(program, '/')) == NULL) 50 name = program; 51 else 52 name++; 53 54 fprintf(stdout, 55 gettext("Usage: %s [-P printer] [-# copies] [-C class] " 56 "[-J job] [-T title] " 57 "[-p [-i indent] [-w width]] " 58 "[-1|-2|-3|-4 font] [-m] [-h] [-s] " 59 "[-filter_option] [file ..]\n"), name); 60 exit(1); 61 } 62 63 int 64 main(int ac, char *av[]) 65 { 66 papi_status_t status; 67 papi_service_t svc = NULL; 68 papi_attribute_t **list = NULL; 69 papi_job_t job = NULL; 70 int exit_code = 0; 71 char *printer = NULL; 72 char prefetch[3]; 73 int prefetch_len = sizeof (prefetch); 74 papi_encryption_t encryption = PAPI_ENCRYPT_NEVER; 75 int dump = 0; 76 int validate = 0; 77 int copy = 1; /* default is to copy the data */ 78 char *document_format = "text/plain"; 79 int c; 80 81 (void) setlocale(LC_ALL, ""); 82 (void) textdomain("SUNW_OST_OSCMD"); 83 84 while ((c = getopt(ac, av, 85 "EP:#:C:DVJ:T:w:i:hplrstdgvcfmn1:2:3:4:")) != EOF) 86 switch (c) { 87 case 'E': 88 encryption = PAPI_ENCRYPT_REQUIRED; 89 break; 90 case 'P': 91 printer = optarg; 92 break; 93 case '#': 94 papiAttributeListAddInteger(&list, PAPI_ATTR_EXCL, 95 "copies", atoi(optarg)); 96 break; 97 case 'C': 98 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 99 "rfc-1179-class", optarg); 100 break; 101 case 'D': 102 dump = 1; 103 break; 104 case 'J': 105 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 106 "job-name", optarg); 107 break; 108 case 'T': 109 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 110 "pr-title", optarg); 111 break; 112 case 'p': 113 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 114 "document-format", "application/x-pr"); 115 papiAttributeListAddBoolean(&list, PAPI_ATTR_EXCL, 116 "pr-filter", 1); 117 break; 118 case 'i': 119 papiAttributeListAddInteger(&list, PAPI_ATTR_EXCL, 120 "pr-indent", atoi(optarg)); 121 break; 122 case 'w': 123 papiAttributeListAddInteger(&list, PAPI_ATTR_EXCL, 124 "pr-width", atoi(optarg)); 125 break; 126 case 'h': 127 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 128 "job-sheets", "none"); 129 break; 130 case 'l': 131 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 132 "document-format", "application/octet-stream"); 133 break; 134 case 'o': 135 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 136 "document-format", "application/postscript"); 137 break; 138 case 'c': 139 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 140 "document-format", "application/x-cif"); 141 break; 142 case 'd': 143 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 144 "document-format", "application/x-dvi"); 145 break; 146 case 'f': 147 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 148 "document-format", "application/x-fortran"); 149 break; 150 case 'g': 151 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 152 "document-format", "application/x-plot"); 153 break; 154 case 'n': 155 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 156 "document-format", "application/x-ditroff"); 157 break; 158 case 't': 159 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 160 "document-format", "application/x-troff"); 161 break; 162 case 'v': 163 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 164 "document-format", "application/x-raster"); 165 break; 166 case 'm': 167 papiAttributeListAddBoolean(&list, PAPI_ATTR_EXCL, 168 "rfc-1179-mail", 1); 169 break; 170 case 'r': 171 break; 172 case 's': 173 copy = 0; 174 break; 175 case 'V': /* validate */ 176 validate = 1; 177 break; 178 case '1': 179 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 180 "rfc-1179-font-r", optarg); 181 break; 182 case '2': 183 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 184 "rfc-1179-font-i", optarg); 185 break; 186 case '3': 187 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 188 "rfc-1179-font-b", optarg); 189 break; 190 case '4': 191 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 192 "rfc-1179-font-s", optarg); 193 break; 194 default: 195 usage(av[0]); 196 } 197 198 if ((printer == NULL) && 199 ((printer = getenv("PRINTER")) == NULL) && 200 ((printer = getenv("LPDEST")) == NULL)) 201 printer = DEFAULT_DEST; 202 203 if (((optind + 1) == ac) && (strcmp(av[optind], "-") == 0)) 204 optind = ac; 205 206 if (optind != ac) { 207 /* get the mime type of the file data */ 208 #ifdef MAGIC_MIME 209 magic_t ms; 210 211 if ((ms = magic_open(MAGIC_MIME)) != NULL) { 212 document_format = magic_file(ms, av[optind]); 213 magic_close(ms); 214 } 215 #else 216 if (is_postscript(av[optind]) == 1) 217 document_format = "application/postscript"; 218 #endif 219 } else { 220 if (is_postscript_stream(0, prefetch, &prefetch_len) == 1) 221 document_format = "application/postscript"; 222 } 223 224 papiAttributeListAddInteger(&list, PAPI_ATTR_EXCL, "copies", 1); 225 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 226 "document-format", document_format); 227 papiAttributeListAddString(&list, PAPI_ATTR_EXCL, 228 "job-sheets", "standard"); 229 230 status = papiServiceCreate(&svc, printer, NULL, NULL, cli_auth_callback, 231 encryption, NULL); 232 if (status != PAPI_OK) { 233 fprintf(stderr, gettext( 234 "Failed to contact service for %s: %s\n"), printer, 235 verbose_papi_message(svc, status)); 236 exit(1); 237 } 238 239 if (validate == 1) /* validate the request can be processed */ 240 status = papiJobValidate(svc, printer, list, 241 NULL, &av[optind], &job); 242 else if (optind == ac) /* no file list, use stdin */ 243 status = jobSubmitSTDIN(svc, printer, prefetch, prefetch_len, 244 list, &job); 245 else if (copy == 0) /* reference the files in the job, default */ 246 status = papiJobSubmitByReference(svc, printer, list, 247 NULL, &av[optind], &job); 248 else /* copy the files before return, -c */ 249 status = papiJobSubmit(svc, printer, list, 250 NULL, &av[optind], &job); 251 252 papiAttributeListFree(list); 253 254 if (status != PAPI_OK) { 255 fprintf(stderr, gettext("%s: %s\n"), printer, 256 verbose_papi_message(svc, status)); 257 papiJobFree(job); 258 papiServiceDestroy(svc); 259 exit(1); 260 } 261 262 if (dump != 0) { 263 list = papiJobGetAttributeList(job); 264 printf("job attributes:\n"); 265 papiAttributeListPrint(stdout, list, "\t"); 266 printf("\n"); 267 } 268 269 papiJobFree(job); 270 papiServiceDestroy(svc); 271 272 return (exit_code); 273 } 274