papi_status_t
papiPrinterListJobs(papi_service_t handle, char *name,
char **requested_attrs, int type_mask,
int max_num_jobs, papi_job_t **jobs)
{
papi_status_t status, result = PAPI_INTERNAL_ERROR;
service_t *svc = handle;
papi_attribute_t **request = NULL, **op = NULL, **response = NULL;
void *iter = NULL;
if ((svc == NULL) || (name == NULL))
return (PAPI_BAD_ARGUMENT);
/* if we are already connected, use that connection. */
if (svc->connection == NULL)
if ((result = service_connect(svc, name)) != PAPI_OK)
return (result);
ipp_initialize_request(svc, &request, OPID_GET_JOBS);
ipp_initialize_operational_attributes(svc, &op, name, -1);
if (requested_attrs != NULL) {
int i;
for (i = 0; requested_attrs[i] != NULL; i++)
papiAttributeListAddString(&op, PAPI_ATTR_APPEND,
"requested-attributes", requested_attrs[i]);
}
papiAttributeListAddCollection(&request, PAPI_ATTR_REPLACE,
"operational-attributes-group", op);
papiAttributeListFree(op);
result = ipp_send_request(svc, request, &response);
papiAttributeListFree(request);
op = NULL;
for (status = papiAttributeListGetCollection(response, &iter,
"job-attributes-group", &op);
status == PAPI_OK;
status = papiAttributeListGetCollection(response, &iter,
NULL, &op)) {
job_t *j = NULL;
if ((j = calloc(1, sizeof (*j))) == NULL)
return (PAPI_TEMPORARY_ERROR);
copy_attributes(&j->attributes, op);
op = NULL;
list_append(jobs, j);
}
papiAttributeListFree(response);
return (result);
}
papi_status_t
papiPrintersList(papi_service_t handle, char **requested_attrs,
papi_filter_t *filter, papi_printer_t **printers)
{
papi_status_t status, result = PAPI_INTERNAL_ERROR;
service_t *svc = handle;
papi_attribute_t **request = NULL, **op = NULL, **response = NULL;
void *iter = NULL;
if ((svc == NULL) || (printers == NULL))
return (PAPI_BAD_ARGUMENT);
/* if we are already connected, use that connection. */
if (svc->connection == NULL)
if ((result = service_connect(svc, DEFAULT_DEST)) != PAPI_OK)
return (result);
ipp_initialize_request(svc, &request, OPID_CUPS_GET_PRINTERS);
ipp_initialize_operational_attributes(svc, &op, NULL, -1);
if (requested_attrs != NULL) {
int i;
for (i = 0; requested_attrs[i] != NULL; i++)
papiAttributeListAddString(&op, PAPI_ATTR_APPEND,
"requested-attributes", requested_attrs[i]);
}
papiAttributeListAddCollection(&request, PAPI_ATTR_REPLACE,
"operational-attributes-group", op);
papiAttributeListFree(op);
result = ipp_send_request(svc, request, &response);
papiAttributeListFree(request);
op = NULL;
for (status = papiAttributeListGetCollection(response, &iter,
"printer-attributes-group", &op);
status == PAPI_OK;
status = papiAttributeListGetCollection(response, &iter,
NULL, &op)) {
printer_t *p = NULL;
if ((p = calloc(1, sizeof (*p))) == NULL)
return (PAPI_TEMPORARY_ERROR);
copy_attributes(&p->attributes, op);
op = NULL;
list_append(printers, p);
}
papiAttributeListFree(response);
return (result);
}
papi_status_t
papiPrinterQuery(papi_service_t handle, char *name,
char **requested_attrs,
papi_attribute_t **job_attributes,
papi_printer_t *printer)
{
papi_status_t result = PAPI_INTERNAL_ERROR;
service_t *svc = handle;
printer_t *p = NULL;
papi_attribute_t **request = NULL, **op = NULL, **response = NULL;
if ((svc == NULL) || (name == NULL) || (printer == NULL))
return (PAPI_BAD_ARGUMENT);
/* if we are already connected, use that connection. */
if (svc->connection == NULL)
if ((result = service_connect(svc, name)) != PAPI_OK)
return (result);
if ((*printer = p = calloc(1, sizeof (*p))) == NULL)
return (PAPI_TEMPORARY_ERROR);
ipp_initialize_request(svc, &request, OPID_GET_PRINTER_ATTRIBUTES);
ipp_initialize_operational_attributes(svc, &op, name, -1);
if (requested_attrs != NULL) {
int i;
for (i = 0; requested_attrs[i] != NULL; i++)
papiAttributeListAddString(&op, PAPI_ATTR_APPEND,
"requested-attributes", requested_attrs[i]);
}
papiAttributeListAddCollection(&request, PAPI_ATTR_REPLACE,
"operational-attributes-group", op);
papiAttributeListFree(op);
result = ipp_send_request(svc, request, &response);
papiAttributeListFree(request);
op = NULL;
papiAttributeListGetCollection(response, NULL,
"printer-attributes-group", &op);
copy_attributes(&p->attributes, op);
papiAttributeListFree(response);
return (result);
}
papi_status_t
ipp_cancel_job(papi_service_t svc, papi_attribute_t **request,
papi_attribute_t ***response)
{
papi_status_t status;
papi_attribute_t **operational = NULL;
char *message = NULL;
char *queue = NULL;
int id = -1;
/* Get operational attributes from the request */
(void) papiAttributeListGetCollection(request, NULL,
"operational-attributes-group", &operational);
/*
* the operational-attributes-group must contain:
* job-uri (or printer-uri/job-id)
*/
get_printer_id(operational, &queue, &id);
if (id < 0) {
ipp_set_status(response, PAPI_BAD_REQUEST,
"missing job-uri or job-id");
return (PAPI_BAD_REQUEST);
} else if (queue == NULL) {
ipp_set_status(response, PAPI_BAD_REQUEST,
"missing printer-uri or job-uri");
return (PAPI_BAD_REQUEST);
}
/*
* the operational-attributes-group may contain:
* message
*/
(void) papiAttributeListGetString(operational, NULL,
"message", &message);
status = papiJobCancel(svc, queue, id);
if (status != PAPI_OK) {
ipp_set_status(response, status,
"cancel failed: %s-%d: %s",
(queue ? queue : "(null)"), id,
ipp_svc_status_mesg(svc, status));
} else if (message != NULL) { /* add unsupported attribute group */
papi_attribute_t **unsupported = NULL;
papiAttributeListAddValue(&unsupported, PAPI_ATTR_EXCL,
"message", PAPI_COLLECTION, NULL);
(void) papiAttributeListAddCollection(response,
PAPI_ATTR_REPLACE, "unsupported-attributes-group",
unsupported);
papiAttributeListFree(unsupported);
status = PAPI_OK_SUBST;
ipp_set_status(response, status,
"unsupported attribute in request");
}
return (status);
}
papi_status_t
papiJobValidate(papi_service_t handle, char *printer,
papi_attribute_t **job_attributes,
papi_job_ticket_t *job_ticket,
char **files, papi_job_t *job)
{
papi_status_t status;
papi_attribute_t **attributes = NULL;
int i;
papiAttributeListAddString(&attributes, PAPI_ATTR_REPLACE,
"job-hold-until", "indefinite");
for (i = 0; job_attributes[i]; i++)
list_append(&attributes, job_attributes[i]);
status = papiJobSubmitByReference(handle, printer,
(papi_attribute_t **)attributes,
job_ticket, files, job);
if (status == PAPI_OK) {
int id = papiJobGetId(*job);
if (id != -1)
papiJobCancel(handle, printer, id);
}
attributes[1] = NULL; /* after attr[0], they are in another list */
papiAttributeListFree(attributes);
return (status);
}
void
papiPrinterFree(papi_printer_t printer)
{
printer_t *tmp = printer;
if (tmp != NULL) {
papiAttributeListFree(tmp->attributes);
free(tmp);
}
}
void
papiJobFree(papi_job_t job)
{
job_t *tmp = (job_t *)job;
if (tmp != NULL) {
papiAttributeListFree(tmp->attributes);
free(tmp);
}
}
static papi_status_t
psm_modifyAttrsFile(papi_attribute_t **attrs, char *file)
{
papi_status_t result = PAPI_OK;
papi_attribute_t **newAttrs = NULL;
struct stat tmpBuf;
FILE *fd = NULL;
if ((attrs != NULL) && (*attrs != NULL) && (file != NULL)) {
/*
* check file exist before try to modify it, if it doesn't
* exist assume there is an error
*/
if (stat(file, &tmpBuf) == 0) {
/*
* if file is currently empty just write the given
* attributes to the file otherwise exact the attributes
* from the file and modify them accordingly before
* writing them back to the file
*/
if (tmpBuf.st_size == 0) {
newAttrs = (papi_attribute_t **)attrs;
fd = fopen(file, "w");
if (fd != NULL) {
papiAttributeListPrint(fd,
newAttrs, "");
fclose(fd);
} else {
result = PAPI_NOT_POSSIBLE;
}
} else {
result =
psm_modifyAttrsList(file, attrs, &newAttrs);
fd = fopen(file, "w");
if (fd != NULL) {
papiAttributeListPrint(fd,
newAttrs, "");
fclose(fd);
} else {
result = PAPI_NOT_POSSIBLE;
}
papiAttributeListFree(newAttrs);
}
} else {
result = PAPI_NOT_POSSIBLE;
}
}
return (result);
} /* psm_modifyAttrsFile */
static papi_status_t
_printer_enable_disable_pause_resume_delete(papi_service_t handle, char *name,
char *message, uint16_t type)
{
papi_status_t result = PAPI_INTERNAL_ERROR;
service_t *svc = handle;
papi_attribute_t **request = NULL, **op = NULL, **response = NULL;
if ((svc == NULL) || (name == NULL))
return (PAPI_BAD_ARGUMENT);
/* if we are already connected, use that connection. */
if (svc->connection == NULL)
if ((result = service_connect(svc, name)) != PAPI_OK)
return (result);
ipp_initialize_request(svc, &request, type);
ipp_initialize_operational_attributes(svc, &op, name, -1);
switch (type) {
case OPID_DISABLE_PRINTER:
papiAttributeListAddString(&op, PAPI_ATTR_REPLACE,
"printer-message-from-operator", message);
break;
case OPID_PAUSE_PRINTER:
papiAttributeListAddString(&op, PAPI_ATTR_REPLACE,
"printer-state-message", message);
break;
default: /* a message value is of no use */
break;
}
papiAttributeListAddCollection(&request, PAPI_ATTR_REPLACE,
"operational-attributes-group", op);
papiAttributeListFree(op);
result = ipp_send_request(svc, request, &response);
papiAttributeListFree(request);
papiAttributeListFree(response);
return (result);
}
static papi_status_t
ipp_initialize_response(papi_attribute_t **request,
papi_attribute_t ***response)
{
papi_attribute_t **operational = NULL;
int i;
if ((request == NULL) || (response == NULL))
return (PAPI_BAD_ARGUMENT);
/* If the response was initialized, start over */
if (*response != NULL) {
papiAttributeListFree(*response);
*response = NULL;
}
/* Add the basic ipp header information to the response */
(void) papiAttributeListGetInteger(request, NULL, "version-major", &i);
(void) papiAttributeListAddInteger(response, PAPI_ATTR_REPLACE,
"version-major", i);
(void) papiAttributeListGetInteger(request, NULL, "version-minor", &i);
(void) papiAttributeListAddInteger(response, PAPI_ATTR_REPLACE,
"version-minor", i);
(void) papiAttributeListGetInteger(request, NULL, "request-id", &i);
(void) papiAttributeListAddInteger(response, PAPI_ATTR_REPLACE,
"request-id", i);
/* Add a default operational attributes group to the response */
(void) papiAttributeListAddString(&operational, PAPI_ATTR_EXCL,
"attributes-charset", "utf-8");
(void) papiAttributeListAddString(&operational, PAPI_ATTR_EXCL,
"attributes-natural-language", "en-us");
(void) papiAttributeListAddCollection(response, PAPI_ATTR_REPLACE,
"operational-attributes-group", operational);
papiAttributeListFree(operational);
return (PAPI_OK);
}
void
papiServiceDestroy(papi_service_t handle)
{
service_t *svc = handle;
if (svc != NULL) {
if (svc->md != NULL)
mdisconnect(svc->md);
if (svc->msgbuf != NULL)
free(svc->msgbuf);
papiAttributeListFree(svc->attributes);
free(svc);
}
}
void
papiServiceDestroy(papi_service_t handle)
{
if (handle != NULL) {
service_t *svc = handle;
if (svc->attributes != NULL)
papiAttributeListFree(svc->attributes);
if (svc->name != NULL)
free(svc->name);
if (svc->user != NULL)
free(svc->user);
if (svc->password != NULL)
free(svc->password);
if (svc->uri != NULL)
uri_free(svc->uri);
if (svc->post != NULL)
free(svc->post);
if (svc->connection != NULL)
httpClose(svc->connection);
free(handle);
}
}
static void
gp_transport_papi_finalize (GObject *object)
{
GPTransportPAPI *transport;
transport = GP_TRANSPORT_PAPI (object);
if (transport->stream != NULL) {
/*
* What does g_warning do? Do we want it everywhere we have a
* failure?
*/
g_warning ("Destroying GPTransportPAPI with open PAPI stream");
}
g_assert (transport->printer);
g_free (transport->printer);
transport->printer = NULL;
papiAttributeListFree (transport->attributes);
transport->attributes = NULL;
G_OBJECT_CLASS (parent_class)->finalize (object);
}
/*
* When the PAPI supports papiJobCreate(), papiJobStreamAdd() and
* papiJobClose(), this will be much cleaner and more efficient, but in the
* meantime, we are using a private, non-standard interface to do this.
*/
papi_status_t
ipp_send_document(papi_service_t svc, papi_attribute_t **request,
papi_attribute_t ***response, ipp_reader_t iread, void *fd)
{
papi_status_t status;
papi_stream_t s = NULL;
papi_job_t j = NULL;
papi_attribute_t **operational = NULL;
papi_attribute_t **job_attributes = NULL;
char *queue = NULL;
ssize_t rc;
int id = -1;
char buf[BUFSIZ];
char last = PAPI_FALSE;
char *keys[] = { "attributes-natural-language", "attributes-charset",
"printer-uri", "job-id", "job-uri", "last-document",
NULL };
/* Get operational attributes from the request */
(void) papiAttributeListGetCollection(request, NULL,
"operational-attributes-group", &operational);
/*
* the operational-attributes-group must contain:
* job-uri (or printer-uri/job-id)
* last-document
*/
get_printer_id(operational, &queue, &id);
if (id < 0) {
ipp_set_status(response, PAPI_BAD_REQUEST,
"missing job-uri or job-id");
return (PAPI_BAD_REQUEST);
} else if (queue == NULL) {
ipp_set_status(response, PAPI_BAD_REQUEST,
"missing printer-uri or job-uri");
return (PAPI_BAD_REQUEST);
}
status = papiAttributeListGetBoolean(operational, NULL,
"last-document", &last);
if (status != PAPI_OK) {
ipp_set_status(response, status, "last-document: %s",
papiStatusString(status));
return (PAPI_BAD_REQUEST);
}
/*
* the operational-attributes-group may contain:
* document-name
* compression
* document-format
* document-natural-language
* Simply copy the entire contents of the operational-attributes-group
* for the PAPI call's possible use.
*/
split_and_copy_attributes(keys, operational, NULL, &job_attributes);
/* copy any job-attributes-group attributes for the PAPI call */
if (papiAttributeListGetCollection(request, NULL,
"job-attributes-group", &operational) == PAPI_OK)
copy_attributes(&job_attributes, operational);
/* create a stream to write the document data on */
status = papiJobStreamAdd(svc, queue, id, &s);
papiAttributeListFree(job_attributes);
if (status != PAPI_OK) {
ipp_set_status(response, status, "job submission: %s",
ipp_svc_status_mesg(svc, status));
return (status);
}
/* copy the document data from the IPP connection to the stream */
while ((status == PAPI_OK) && ((rc = iread(fd, buf, sizeof (buf))) > 0))
status = papiJobStreamWrite(svc, s, buf, rc);
if (status != PAPI_OK) {
ipp_set_status(response, status, "write job data: %s",
ipp_svc_status_mesg(svc, status));
return (status);
}
/* close the stream */
status = papiJobStreamClose(svc, s, &j);
if (status != PAPI_OK) {
ipp_set_status(response, status, "close job stream: %s",
ipp_svc_status_mesg(svc, status));
papiJobFree(j); /* we shouldn't have a job, but just in case */
return (status);
}
/* if it's the last document, commit the job */
if (last == PAPI_TRUE) {
status = papiJobCommit(svc, queue, id);
}
/* add the job attributes to the response in a job-attributes-group */
if (j != NULL) {
papi_to_ipp_job_group(response, request, PAPI_ATTR_REPLACE, j);
papiJobFree(j);
}
return (status);
}
papi_status_t
ipp_validate_job(papi_service_t svc, papi_attribute_t **request,
papi_attribute_t ***response, ipp_reader_t iread, void *fd)
{
papi_status_t status;
papi_job_t j = NULL;
papi_attribute_t **operational = NULL;
papi_attribute_t **job_attributes = NULL;
char *queue = NULL;
char *files[] = { "/etc/syslog.conf", NULL };
ssize_t rc;
char buf[BUFSIZ];
char *keys[] = { "attributes-natural-language", "attributes-charset",
"printer-uri", NULL };
/* Get operational attributes from the request */
(void) papiAttributeListGetCollection(request, NULL,
"operational-attributes-group", &operational);
/*
* The operational-attributes-group must contain:
* printer-uri
*/
get_printer_id(operational, &queue, NULL);
if (queue == NULL) {
ipp_set_status(response, status, "printer-uri: %s",
papiStatusString(status));
return (PAPI_BAD_REQUEST);
}
/*
* The operational-attributes-group may contain:
* job-name
* ipp-attribute-fidelity
* document-name
* compression
* document-format
* document-natural-language
* job-k-octets
* job-impressions
* job-media-sheets
* Simply copy the entire contents of the operational-attributes-group
* for the PAPI call's possible use.
*/
split_and_copy_attributes(keys, operational, NULL, &job_attributes);
/* copy any job-attributes-group attributes for the PAPI call */
if (papiAttributeListGetCollection(request, NULL,
"job-attributes-group", &operational) == PAPI_OK)
copy_attributes(&job_attributes, operational);
/* request job validation */
status = papiJobValidate(svc, queue, job_attributes, NULL, files, &j);
papiAttributeListFree(job_attributes);
if (status != PAPI_OK) {
ipp_set_status(response, status, "validating job: %s",
ipp_svc_status_mesg(svc, status));
papiJobFree(j); /* we shouldn't have a job, but just in case */
return (status);
}
/* add the job attributes to the response in a job-attributes-group */
if (j != NULL) {
papi_to_ipp_job_group(response, request, PAPI_ATTR_REPLACE, j);
papiJobFree(j);
}
return (status);
}
static int
ipp_handler(request_rec *r)
{
papi_attribute_t **request = NULL, **response = NULL;
IPPListenerConfig *config;
papi_status_t status;
int ret;
/* Really, IPP is all POST requests */
if (r->method_number != M_POST)
return (DECLINED);
#ifndef APACHE2
/*
* An IPP request must have a MIME type of "application/ipp"
* (RFC-2910, Section 4, page 19). If it doesn't match this
* MIME type, we should decline the request and let someone else
* try and handle it.
*/
if (r->headers_in != NULL) {
char *mime_type = (char *)ap_table_get(r->headers_in,
"Content-Type");
if ((mime_type == NULL) ||
(strcasecmp(mime_type, "application/ipp") != 0))
return (DECLINED);
}
#endif
/* CHUNKED_DECHUNK might not work right for IPP? */
if ((ret = ap_setup_client_block(r, REQUEST_CHUNKED_DECHUNK)) != OK)
return (ret);
if (!ap_should_client_block(r))
return (HTTP_INTERNAL_SERVER_ERROR);
#ifndef APACHE2
ap_soft_timeout("ipp_module: read/reply request ", r);
#endif
/* read the IPP request off the network */
status = ipp_read_message(read_data, r, &request, IPP_TYPE_REQUEST);
if (status != PAPI_OK)
_log_rerror(APLOG_MARK, APLOG_ERR, r,
"read failed: %s\n", papiStatusString(status));
#ifdef DEBUG
papiAttributeListPrint(stderr, request, "request (%d) ", getpid());
#endif
(void) papiAttributeListAddString(&request, PAPI_ATTR_EXCL,
"originating-host", (char *)
#ifdef APACHE2
ap_get_remote_host
(r->connection, r->per_dir_config, REMOTE_NAME, NULL));
#else
ap_get_remote_host
(r->connection, r->per_dir_config, REMOTE_NAME));
#endif
(void) papiAttributeListAddInteger(&request, PAPI_ATTR_EXCL,
"uri-port", ap_get_server_port(r));
if (r->headers_in != NULL) {
char *host = (char *)ap_table_get(r->headers_in, "Host");
if ((host == NULL) || (host[0] == '\0'))
host = (char *)ap_get_server_name(r);
(void) papiAttributeListAddString(&request, PAPI_ATTR_EXCL,
"uri-host", host);
}
(void) papiAttributeListAddString(&request, PAPI_ATTR_EXCL,
"uri-path", r->uri);
config = ap_get_module_config(r->per_dir_config, &ipp_module);
if (config != NULL) {
(void) papiAttributeListAddInteger(&request, PAPI_ATTR_EXCL,
"conformance", config->conformance);
(void) papiAttributeListAddCollection(&request, PAPI_ATTR_EXCL,
"operations", config->operations);
if (config->default_user != NULL)
(void) papiAttributeListAddString(&request,
PAPI_ATTR_EXCL, "default-user",
config->default_user);
if (config->default_svc != NULL)
(void) papiAttributeListAddString(&request,
PAPI_ATTR_EXCL, "default-service",
config->default_svc);
}
/*
* For Trusted Solaris, pass the fd number of the socket connection
* to the backend so the it can be forwarded to the backend print
* service to retrieve the sensativity label off of a multi-level
* port.
*/
(void) papiAttributeListAddInteger(&request, PAPI_ATTR_EXCL,
"peer-socket", ap_bfileno(r->connection->client, B_RD));
/* process the request */
status = ipp_process_request(request, &response, read_data, r);
if (status != PAPI_OK) {
errno = 0;
_log_rerror(APLOG_MARK, APLOG_ERR, r,
"request failed: %s\n", papiStatusString(status));
discard_data(r);
}
#ifdef DEBUG
fprintf(stderr, "processing result: %s\n", papiStatusString(status));
papiAttributeListPrint(stderr, response, "response (%d) ", getpid());
#endif
/*
* If the client is using chunking and we have not yet received the
* final "0" sized chunk, we need to discard any data that may
* remain in the post request.
*/
if ((r->read_chunked != 0) &&
(ap_table_get(r->headers_in, "Content-Length") == NULL))
discard_data(r);
/* write an IPP response back to the network */
r->content_type = "application/ipp";
#ifndef APACHE2
ap_send_http_header(r);
#endif
status = ipp_write_message(write_data, r, response);
if (status != PAPI_OK)
_log_rerror(APLOG_MARK, APLOG_ERR, r,
"write failed: %s\n", papiStatusString(status));
#ifdef DEBUG
fprintf(stderr, "write result: %s\n", papiStatusString(status));
fflush(stderr);
#endif
papiAttributeListFree(request);
papiAttributeListFree(response);
#ifndef APACHE2
ap_kill_timeout(r);
if (ap_rflush(r) < 0)
_log_rerror(APLOG_MARK, APLOG_ERR, r,
"flush failed, response may not have been sent");
#endif
return (OK);
}
int
main(int ac, char *av[])
{
papi_status_t status;
papi_service_t svc = NULL;
papi_attribute_t **list = NULL;
papi_encryption_t encryption = PAPI_ENCRYPT_NEVER;
papi_job_t job = NULL;
char prefetch[3];
int prefetch_len = sizeof (prefetch);
char *printer = NULL;
char b = PAPI_TRUE;
int copy = 0;
int silent = 0;
int dump = 0;
int validate = 0;
int modify = -1;
int c;
uid_t ruid;
struct passwd *pw;
(void) setlocale(LC_ALL, "");
(void) textdomain("SUNW_OST_OSCMD");
ruid = getuid();
if ((pw = getpwuid(ruid)) != NULL)
(void) initgroups(pw->pw_name, pw->pw_gid);
(void) setuid(ruid);
while ((c = getopt(ac, av, "DEH:P:S:T:cd:f:i:mn:o:pq:rst:Vwy:")) != EOF)
switch (c) {
case 'H': /* handling */
if (strcasecmp(optarg, "hold") == 0)
papiAttributeListAddString(&list,
PAPI_ATTR_EXCL,
"job-hold-until", "indefinite");
else if (strcasecmp(optarg, "immediate") == 0)
papiAttributeListAddString(&list,
PAPI_ATTR_EXCL,
"job-hold-until", "no-hold");
else
papiAttributeListAddString(&list,
PAPI_ATTR_EXCL,
"job-hold-until", optarg);
break;
case 'P': { /* page list */
char buf[BUFSIZ];
snprintf(buf, sizeof (buf), "page-ranges=%s", optarg);
papiAttributeListFromString(&list,
PAPI_ATTR_EXCL, buf);
}
break;
case 'S': /* charset */
papiAttributeListAddString(&list, PAPI_ATTR_EXCL,
"lp-charset", optarg);
break;
case 'T': /* type */
papiAttributeListAddString(&list, PAPI_ATTR_EXCL,
"document-format",
lp_type_to_mime_type(optarg));
break;
case 'D': /* dump */
dump = 1;
break;
case 'c': /* copy */
copy = 1;
break;
case 'd': /* destination */
printer = optarg;
break;
case 'f': /* form */
papiAttributeListAddString(&list, PAPI_ATTR_EXCL,
"form", optarg);
break;
case 'i': /* modify job */
if ((get_printer_id(optarg, &printer, &modify) < 0) ||
(modify < 0)) {
fprintf(stderr,
gettext("invalid request id: %s\n"),
optarg);
exit(1);
}
break;
case 'm': /* mail when complete */
papiAttributeListAddBoolean(&list, PAPI_ATTR_EXCL,
"rfc-1179-mail", 1);
break;
case 'n': /* copies */
papiAttributeListAddInteger(&list, PAPI_ATTR_EXCL,
"copies", atoi(optarg));
break;
case 'o': /* lp "options" */
papiAttributeListFromString(&list,
PAPI_ATTR_REPLACE, optarg);
break;
case 'p': /* Solaris - notification */
papiAttributeListAddBoolean(&list, PAPI_ATTR_EXCL,
"rfc-1179-mail", 1);
break;
case 'q': { /* priority */
int i = atoi(optarg);
i = 100 - (i * 2.5);
if ((i < 1) || (i > 100)) {
fprintf(stderr, gettext("UX:lp: "));
fprintf(stderr, gettext("ERROR: "));
fprintf(stderr, gettext("Bad priority"
" value \"%s\"."), optarg);
fprintf(stderr, gettext("\n "));
fprintf(stderr, gettext("TO FIX"));
fprintf(stderr, gettext(": "));
fprintf(stderr, gettext("Use an integer value"
" from 0 to 39."));
fprintf(stderr, gettext("\n"));
exit(1);
}
papiAttributeListAddInteger(&list, PAPI_ATTR_EXCL,
"job-priority", i);
}
break;
case 'r': /* "raw" mode */
papiAttributeListAddString(&list, PAPI_ATTR_EXCL,
"document-format",
"application/octet-stream");
papiAttributeListAddString(&list, PAPI_ATTR_APPEND,
"stty", "raw");
break;
case 's': /* suppress message */
silent = 1;
break;
case 't': /* title */
papiAttributeListAddString(&list, PAPI_ATTR_EXCL,
"job-name", optarg);
break;
case 'V': /* validate */
validate = 1;
break;
case 'w':
papiAttributeListAddBoolean(&list, PAPI_ATTR_EXCL,
"rfc-1179-mail", 1);
break;
case 'y': /* lp "modes" */
papiAttributeListAddString(&list, PAPI_ATTR_APPEND,
"lp-modes", optarg);
break;
case 'E':
encryption = PAPI_ENCRYPT_REQUIRED;
break;
default:
usage(av[0]);
}
/* convert "banner", "nobanner" to "job-sheet" */
if (papiAttributeListGetBoolean(list, NULL, "banner", &b) == PAPI_OK) {
(void) papiAttributeListDelete(&list, "banner");
if (b == PAPI_FALSE)
papiAttributeListAddString(&list, PAPI_ATTR_EXCL,
"job-sheets", "none");
}
if ((printer == NULL) &&
((printer = getenv("PRINTER")) == NULL) &&
((printer = getenv("LPDEST")) == NULL))
printer = DEFAULT_DEST;
if (((optind + 1) == ac) && (strcmp(av[optind], "-") == 0))
optind = ac;
if (modify == -1) {
char *document_format = "text/plain";
if (optind != ac) {
/* get the mime type of the file data */
#ifdef MAGIC_MIME
magic_t ms = NULL;
if ((ms = magic_open(MAGIC_MIME)) != NULL) {
document_format = magic_file(ms, av[optind]);
magic_close(ms);
}
#else
if (is_postscript(av[optind]) == 1)
document_format = "application/postscript";
#endif
} else {
if (is_postscript_stream(0, prefetch, &prefetch_len)
== 1)
document_format = "application/postscript";
}
papiAttributeListAddInteger(&list, PAPI_ATTR_EXCL, "copies", 1);
papiAttributeListAddString(&list, PAPI_ATTR_EXCL,
"document-format", document_format);
papiAttributeListAddString(&list, PAPI_ATTR_EXCL,
"job-sheets", "standard");
}
status = papiServiceCreate(&svc, printer, NULL, NULL, cli_auth_callback,
encryption, NULL);
if (status != PAPI_OK) {
fprintf(stderr, gettext(
"Failed to contact service for %s: %s\n"), printer,
verbose_papi_message(svc, status));
exit(1);
}
if (dump != 0) {
printf("requesting attributes:\n");
papiAttributeListPrint(stdout, list, "\t");
printf("\n");
}
if (modify != -1)
status = papiJobModify(svc, printer, modify, list, &job);
else if (optind == ac) /* no file list, use stdin */
status = jobSubmitSTDIN(svc, printer, prefetch, prefetch_len,
list, &job);
else if (validate == 1) /* validate the request can be processed */
status = papiJobValidate(svc, printer, list,
NULL, &av[optind], &job);
else if (copy == 0) /* reference the files in the job, default */
status = papiJobSubmitByReference(svc, printer, list,
NULL, &av[optind], &job);
else /* copy the files before return, -c */
status = papiJobSubmit(svc, printer, list,
NULL, &av[optind], &job);
papiAttributeListFree(list);
if (status != PAPI_OK) {
fprintf(stderr, gettext("%s: %s\n"), printer,
verbose_papi_message(svc, status));
papiJobFree(job);
papiServiceDestroy(svc);
exit(1);
}
if (((silent == 0) || (dump != 0)) &&
((list = papiJobGetAttributeList(job)) != NULL)) {
int32_t id = -1;
if (printer == NULL)
papiAttributeListGetString(list, NULL,
"printer-name", &printer);
papiAttributeListGetInteger(list, NULL,
"job-id-requested", &id);
if (id == -1) {
papiAttributeListGetInteger(list, NULL, "job-id", &id);
}
printf(gettext("request id is %s-%d "), printer, id);
if (ac != optind)
printf("(%d file(s))\n", ac - optind);
else
printf("(standard input)\n");
if (dump != 0) {
printf("job attributes:\n");
papiAttributeListPrint(stdout, list, "\t");
printf("\n");
}
}
papiJobFree(job);
papiServiceDestroy(svc);
return (0);
}