#include "cups.h"
#include "ipp.h"
#include "language.h"
#include "string.h"
#include "debug.h"
#include <stdlib.h>
#include <ctype.h>
#include <errno.h>
#include <fcntl.h>
#include <sys/stat.h>
#if defined(WIN32) || defined(__EMX__)
# include <io.h>
#else
# include <unistd.h>
#endif
static http_t *cups_server = NULL;
static ipp_status_t last_error = IPP_OK;
static char authstring[HTTP_MAX_VALUE] = "";
static char pwdstring[33] = "";
static char *cups_connect(const char *name, char *printer, char *hostname);
static int cups_local_auth(http_t *http);
int
cupsCancelJob(const char *name,
int job)
{
char printer[HTTP_MAX_URI],
hostname[HTTP_MAX_URI],
uri[HTTP_MAX_URI];
ipp_t *request,
*response;
cups_lang_t *language;
if (!cups_connect(name, printer, hostname))
{
DEBUG_puts("Unable to connect to server!");
last_error = IPP_SERVICE_UNAVAILABLE;
return (0);
}
request = ippNew();
request->request.op.operation_id = IPP_CANCEL_JOB;
request->request.op.request_id = 1;
language = cupsLangDefault();
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
"attributes-charset", NULL, cupsLangEncoding(language));
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
"attributes-natural-language", NULL,
language != NULL ? language->language : "C");
snprintf(uri, sizeof(uri), "ipp://%s:%d/printers/%s", hostname, ippPort(), printer);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI, "printer-uri",
NULL, uri);
ippAddInteger(request, IPP_TAG_OPERATION, IPP_TAG_INTEGER, "job-id", job);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
NULL, cupsUser());
if ((response = cupsDoRequest(cups_server, request, "/jobs/")) == NULL)
{
last_error = IPP_BAD_REQUEST;
return (0);
}
else
{
last_error = response->request.status.status_code;
ippDelete(response);
return (1);
}
}
ipp_t *
cupsDoFileRequest(http_t *http,
ipp_t *request,
const char *resource,
const char *filename)
{
ipp_t *response;
char length[255];
http_status_t status;
FILE *file;
struct stat fileinfo;
int bytes;
char buffer[32768];
const char *password;
char realm[HTTP_MAX_VALUE],
nonce[HTTP_MAX_VALUE],
plain[255],
encode[512];
char prompt[1024];
int digest_tries;
DEBUG_printf(("cupsDoFileRequest(%p, %p, \'%s\', \'%s\')\n",
http, request, resource ? resource : "(null)",
filename ? filename : "(null)"));
if (http == NULL || request == NULL || resource == NULL)
{
if (request != NULL)
ippDelete(request);
last_error = IPP_INTERNAL_ERROR;
return (NULL);
}
if (filename != NULL)
{
if (stat(filename, &fileinfo))
{
ippDelete(request);
last_error = IPP_NOT_FOUND;
return (NULL);
}
#ifdef WIN32
if (fileinfo.st_mode & _S_IFDIR)
#else
if (S_ISDIR(fileinfo.st_mode))
#endif
{
ippDelete(request);
last_error = IPP_NOT_POSSIBLE;
return (NULL);
}
if ((file = fopen(filename, "rb")) == NULL)
{
ippDelete(request);
last_error = IPP_NOT_FOUND;
return (NULL);
}
}
else
file = NULL;
response = NULL;
status = HTTP_ERROR;
digest_tries = 0;
while (response == NULL)
{
DEBUG_puts("cupsDoFileRequest: setup...");
if (filename != NULL)
sprintf(length, "%lu", (unsigned long)(ippLength(request) +
(size_t)fileinfo.st_size));
else
sprintf(length, "%lu", (unsigned long)ippLength(request));
httpClearFields(http);
httpSetField(http, HTTP_FIELD_CONTENT_LENGTH, length);
httpSetField(http, HTTP_FIELD_CONTENT_TYPE, "application/ipp");
httpSetField(http, HTTP_FIELD_AUTHORIZATION, authstring);
DEBUG_printf(("cupsDoFileRequest: authstring=\"%s\"\n", authstring));
DEBUG_puts("cupsDoFileRequest: post...");
if (httpPost(http, resource))
{
if (httpReconnect(http))
{
status = HTTP_ERROR;
break;
}
else
continue;
}
DEBUG_puts("cupsDoFileRequest: ipp write...");
request->state = IPP_IDLE;
if (ippWrite(http, request) != IPP_ERROR)
if (filename != NULL)
{
DEBUG_puts("cupsDoFileRequest: file write...");
rewind(file);
while ((bytes = fread(buffer, 1, sizeof(buffer), file)) > 0)
if (httpWrite(http, buffer, bytes) < bytes)
break;
}
DEBUG_puts("cupsDoFileRequest: update...");
while ((status = httpUpdate(http)) == HTTP_CONTINUE);
DEBUG_printf(("cupsDoFileRequest: status = %d\n", status));
if (status == HTTP_UNAUTHORIZED)
{
DEBUG_puts("cupsDoFileRequest: unauthorized...");
httpFlush(http);
httpReconnect(http);
if (cups_local_auth(http))
continue;
if (strncmp(http->fields[HTTP_FIELD_WWW_AUTHENTICATE], "Basic", 5) == 0 ||
digest_tries > 1 || !pwdstring[0])
{
snprintf(prompt, sizeof(prompt), "Password for %s on %s? ", cupsUser(),
http->hostname);
if ((password = cupsGetPassword(prompt)) == NULL)
break;
if (!password[0])
break;
strlcpy(pwdstring, password, sizeof(pwdstring));
digest_tries = 0;
}
else
digest_tries ++;
if (strncmp(http->fields[HTTP_FIELD_WWW_AUTHENTICATE], "Basic", 5) == 0)
{
snprintf(plain, sizeof(plain), "%s:%s", cupsUser(), pwdstring);
httpEncode64(encode, plain);
snprintf(authstring, sizeof(authstring), "Basic %s", encode);
}
else
{
httpGetSubField(http, HTTP_FIELD_WWW_AUTHENTICATE, "realm", realm);
httpGetSubField(http, HTTP_FIELD_WWW_AUTHENTICATE, "nonce", nonce);
httpMD5(cupsUser(), realm, pwdstring, encode);
httpMD5Final(nonce, "POST", resource, encode);
snprintf(authstring, sizeof(authstring),
"Digest username=\"%s\", realm=\"%s\", nonce=\"%s\", "
"response=\"%s\"", cupsUser(), realm, nonce, encode);
}
continue;
}
else if (status == HTTP_ERROR)
{
#ifdef WIN32
if (http->error != WSAENETDOWN && http->error != WSAENETUNREACH)
#else
if (http->error != ENETDOWN && http->error != ENETUNREACH)
#endif
continue;
else
break;
}
#ifdef HAVE_SSL
else if (status == HTTP_UPGRADE_REQUIRED)
{
httpFlush(http);
httpEncryption(http, HTTP_ENCRYPT_REQUIRED);
continue;
}
#endif
else if (status != HTTP_OK)
{
DEBUG_printf(("cupsDoFileRequest: error %d...\n", status));
httpFlush(http);
break;
}
else
{
DEBUG_puts("cupsDoFileRequest: response...");
response = ippNew();
if (ippRead(http, response) == IPP_ERROR)
{
DEBUG_puts("IPP read error!");
ippDelete(response);
response = NULL;
last_error = IPP_SERVICE_UNAVAILABLE;
break;
}
}
}
if (filename != NULL)
fclose(file);
httpFlush(http);
ippDelete(request);
if (response)
last_error = response->request.status.status_code;
else if (status == HTTP_NOT_FOUND)
last_error = IPP_NOT_FOUND;
else if (status == HTTP_UNAUTHORIZED)
last_error = IPP_NOT_AUTHORIZED;
else if (status != HTTP_OK)
{
DEBUG_printf(("HTTP error %d mapped to IPP_SERVICE_UNAVAILABLE!\n",
status));
last_error = IPP_SERVICE_UNAVAILABLE;
}
return (response);
}
void
cupsFreeJobs(int num_jobs,
cups_job_t *jobs)
{
int i;
if (num_jobs <= 0 || jobs == NULL)
return;
for (i = 0; i < num_jobs; i ++)
{
free(jobs[i].dest);
free(jobs[i].user);
free(jobs[i].format);
free(jobs[i].title);
}
free(jobs);
}
int
cupsGetClasses(char ***classes)
{
int n;
ipp_t *request,
*response;
ipp_attribute_t *attr;
cups_lang_t *language;
char **temp;
if (classes == NULL)
{
last_error = IPP_INTERNAL_ERROR;
return (0);
}
if (!cups_connect("default", NULL, NULL))
{
DEBUG_puts("Unable to connect to server!");
last_error = IPP_SERVICE_UNAVAILABLE;
return (0);
}
request = ippNew();
request->request.op.operation_id = CUPS_GET_CLASSES;
request->request.op.request_id = 1;
language = cupsLangDefault();
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
"attributes-charset", NULL, cupsLangEncoding(language));
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
"attributes-natural-language", NULL, language->language);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
"requested-attributes", NULL, "printer-name");
n = 0;
*classes = NULL;
if ((response = cupsDoRequest(cups_server, request, "/")) != NULL)
{
last_error = response->request.status.status_code;
for (attr = response->attrs; attr != NULL; attr = attr->next)
if (attr->name != NULL &&
strcasecmp(attr->name, "printer-name") == 0 &&
attr->value_tag == IPP_TAG_NAME)
{
if (n == 0)
temp = malloc(sizeof(char *));
else
temp = realloc(*classes, sizeof(char *) * (n + 1));
if (temp == NULL)
{
while (n > 0)
{
n --;
free((*classes)[n]);
}
free(*classes);
ippDelete(response);
return (0);
}
*classes = temp;
temp[n] = strdup(attr->values[0].string.text);
n ++;
}
ippDelete(response);
}
else
last_error = IPP_BAD_REQUEST;
return (n);
}
const char *
cupsGetDefault(void)
{
ipp_t *request,
*response;
ipp_attribute_t *attr;
cups_lang_t *language;
const char *var;
static char def_printer[256];
if ((var = getenv("LPDEST")) != NULL)
return (var);
else if ((var = getenv("PRINTER")) != NULL && strcmp(var, "lp") != 0)
return (var);
if (!cups_connect("default", NULL, NULL))
{
DEBUG_puts("Unable to connect to server!");
last_error = IPP_SERVICE_UNAVAILABLE;
return (NULL);
}
request = ippNew();
request->request.op.operation_id = CUPS_GET_DEFAULT;
request->request.op.request_id = 1;
language = cupsLangDefault();
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
"attributes-charset", NULL, cupsLangEncoding(language));
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
"attributes-natural-language", NULL, language->language);
if ((response = cupsDoRequest(cups_server, request, "/")) != NULL)
{
last_error = response->request.status.status_code;
if ((attr = ippFindAttribute(response, "printer-name", IPP_TAG_NAME)) != NULL)
{
strlcpy(def_printer, attr->values[0].string.text, sizeof(def_printer));
ippDelete(response);
return (def_printer);
}
ippDelete(response);
}
else
last_error = IPP_BAD_REQUEST;
return (NULL);
}
int
cupsGetJobs(cups_job_t **jobs,
const char *mydest,
int myjobs,
int completed)
{
int n;
ipp_t *request,
*response;
ipp_attribute_t *attr;
cups_lang_t *language;
cups_job_t *temp;
int id,
priority,
size;
ipp_jstate_t state;
time_t completed_time,
creation_time,
processing_time;
const char *dest,
*format,
*title,
*user;
char uri[HTTP_MAX_URI];
static const char * const attrs[] =
{
"job-id",
"job-priority",
"job-k-octets",
"job-state",
"time-at-completed",
"time-at-creation",
"time-at-processing",
"job-printer-uri",
"document-format",
"job-name",
"job-originating-user-name"
};
if (jobs == NULL)
{
last_error = IPP_INTERNAL_ERROR;
return (0);
}
if (!cups_connect("default", NULL, NULL))
{
DEBUG_puts("Unable to connect to server!");
last_error = IPP_SERVICE_UNAVAILABLE;
return (0);
}
request = ippNew();
request->request.op.operation_id = IPP_GET_JOBS;
request->request.op.request_id = 1;
language = cupsLangDefault();
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
"attributes-charset", NULL, cupsLangEncoding(language));
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
"attributes-natural-language", NULL, language->language);
if (mydest)
snprintf(uri, sizeof(uri), "ipp://localhost/printers/%s", mydest);
else
strcpy(uri, "ipp://localhost/jobs");
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
"printer-uri", NULL, uri);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME,
"requesting-user-name", NULL, cupsUser());
if (myjobs)
ippAddBoolean(request, IPP_TAG_OPERATION, "my-jobs", 1);
if (completed)
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
"which-jobs", NULL, "completed");
ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
"requested-attributes", sizeof(attrs) / sizeof(attrs[0]),
NULL, attrs);
n = 0;
*jobs = NULL;
if ((response = cupsDoRequest(cups_server, request, "/")) != NULL)
{
last_error = response->request.status.status_code;
for (attr = response->attrs; attr != NULL; attr = attr->next)
{
while (attr != NULL && attr->group_tag != IPP_TAG_JOB)
attr = attr->next;
if (attr == NULL)
break;
id = 0;
size = 0;
priority = 50;
state = IPP_JOB_PENDING;
user = "unknown";
dest = NULL;
format = "application/octet-stream";
title = "untitled";
creation_time = 0;
completed_time = 0;
processing_time = 0;
while (attr != NULL && attr->group_tag == IPP_TAG_JOB)
{
if (strcmp(attr->name, "job-id") == 0 &&
attr->value_tag == IPP_TAG_INTEGER)
id = attr->values[0].integer;
else if (strcmp(attr->name, "job-state") == 0 &&
attr->value_tag == IPP_TAG_ENUM)
state = (ipp_jstate_t)attr->values[0].integer;
else if (strcmp(attr->name, "job-priority") == 0 &&
attr->value_tag == IPP_TAG_INTEGER)
priority = attr->values[0].integer;
else if (strcmp(attr->name, "job-k-octets") == 0 &&
attr->value_tag == IPP_TAG_INTEGER)
size = attr->values[0].integer;
else if (strcmp(attr->name, "time-at-completed") == 0 &&
attr->value_tag == IPP_TAG_INTEGER)
completed_time = attr->values[0].integer;
else if (strcmp(attr->name, "time-at-creation") == 0 &&
attr->value_tag == IPP_TAG_INTEGER)
creation_time = attr->values[0].integer;
else if (strcmp(attr->name, "time-at-processing") == 0 &&
attr->value_tag == IPP_TAG_INTEGER)
processing_time = attr->values[0].integer;
else if (strcmp(attr->name, "job-printer-uri") == 0 &&
attr->value_tag == IPP_TAG_URI)
{
if ((dest = strrchr(attr->values[0].string.text, '/')) != NULL)
dest ++;
}
else if (strcmp(attr->name, "job-originating-user-name") == 0 &&
attr->value_tag == IPP_TAG_NAME)
user = attr->values[0].string.text;
else if (strcmp(attr->name, "document-format") == 0 &&
attr->value_tag == IPP_TAG_MIMETYPE)
format = attr->values[0].string.text;
else if (strcmp(attr->name, "job-name") == 0 &&
(attr->value_tag == IPP_TAG_TEXT ||
attr->value_tag == IPP_TAG_NAME))
title = attr->values[0].string.text;
attr = attr->next;
}
if (dest == NULL || id == 0)
{
if (attr == NULL)
break;
else
continue;
}
if (n == 0)
temp = malloc(sizeof(cups_job_t));
else
temp = realloc(*jobs, sizeof(cups_job_t) * (n + 1));
if (temp == NULL)
{
cupsFreeJobs(n, *jobs);
*jobs = NULL;
ippDelete(response);
return (0);
}
*jobs = temp;
temp += n;
n ++;
temp->dest = strdup(dest);
temp->user = strdup(user);
temp->format = strdup(format);
temp->title = strdup(title);
temp->id = id;
temp->priority = priority;
temp->state = state;
temp->size = size;
temp->completed_time = completed_time;
temp->creation_time = creation_time;
temp->processing_time = processing_time;
if (attr == NULL)
break;
}
ippDelete(response);
}
else
last_error = IPP_BAD_REQUEST;
return (n);
}
const char *
cupsGetPPD(const char *name)
{
int i;
ipp_t *request,
*response;
ipp_attribute_t *attr;
cups_lang_t *language;
int fd;
int bytes;
char buffer[8192];
char printer[HTTP_MAX_URI],
method[HTTP_MAX_URI],
username[HTTP_MAX_URI],
hostname[HTTP_MAX_URI],
resource[HTTP_MAX_URI];
int port;
const char *password;
char realm[HTTP_MAX_VALUE],
nonce[HTTP_MAX_VALUE],
plain[255],
encode[512];
http_status_t status;
char prompt[1024];
int digest_tries;
static char filename[HTTP_MAX_URI];
int isRemote = 0;
static const char * const requested_attrs[] =
{
"printer-uri-supported",
"printer-type",
"member-uris"
};
if (name == NULL)
{
last_error = IPP_INTERNAL_ERROR;
return (NULL);
}
if (!cups_connect(name, printer, hostname))
{
DEBUG_puts("Unable to connect to server!");
last_error = IPP_SERVICE_UNAVAILABLE;
return (NULL);
}
request = ippNew();
request->request.op.operation_id = IPP_GET_PRINTER_ATTRIBUTES;
request->request.op.request_id = 1;
language = cupsLangDefault();
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
"attributes-charset", NULL, cupsLangEncoding(language));
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
"attributes-natural-language", NULL, language->language);
snprintf(buffer, sizeof(buffer), "ipp://localhost/printers/%s", printer);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
"printer-uri", NULL, buffer);
ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_NAME,
"requested-attributes",
sizeof(requested_attrs) / sizeof(requested_attrs[0]),
NULL, requested_attrs);
if ((response = cupsDoRequest(cups_server, request, "/")) != NULL)
{
last_error = response->request.status.status_code;
printer[0] = '\0';
hostname[0] = '\0';
if ((attr = ippFindAttribute(response, "member-uris", IPP_TAG_URI)) != NULL)
{
for (i = 0; i < attr->num_values; i ++)
{
httpSeparate(attr->values[0].string.text, method, username, hostname,
&port, resource);
if (strncmp(resource, "/printers/", 10) == 0)
{
strlcpy(printer, resource + 10, sizeof(printer));
gethostname(buffer, sizeof(buffer));
if (strcasecmp(buffer, hostname) == 0)
strcpy(hostname, "localhost");
isRemote = strcmp(hostname, "localhost");
break;
}
}
}
else if ((attr = ippFindAttribute(response, "printer-uri-supported",
IPP_TAG_URI)) != NULL)
{
httpSeparate(attr->values[0].string.text, method, username, hostname,
&port, resource);
strlcpy(printer, strrchr(resource, '/') + 1, sizeof(printer));
if ((attr = ippFindAttribute(response, "printer-type", IPP_TAG_ENUM)) != NULL)
{
isRemote = attr->values[0].integer & CUPS_PRINTER_REMOTE;
}
}
ippDelete(response);
}
cupsLangFree(language);
if (!printer[0])
{
last_error = IPP_NOT_FOUND;
return (NULL);
}
if (isRemote)
{
httpClose(cups_server);
if ((cups_server = httpConnectEncrypt(hostname, ippPort(),
cupsEncryption())) == NULL)
{
DEBUG_puts("Unable to connect to server!");
last_error = IPP_SERVICE_UNAVAILABLE;
return (NULL);
}
}
if ((fd = cupsTempFd(filename, sizeof(filename))) < 0)
{
last_error = IPP_INTERNAL_ERROR;
httpFlush(cups_server);
httpClose(cups_server);
cups_server = NULL;
return (NULL);
}
snprintf(resource, sizeof(resource), "/printers/%s.ppd", printer);
digest_tries = 0;
do
{
httpClearFields(cups_server);
httpSetField(cups_server, HTTP_FIELD_HOST, hostname);
httpSetField(cups_server, HTTP_FIELD_AUTHORIZATION, authstring);
if (httpGet(cups_server, resource))
{
if (httpReconnect(cups_server))
{
status = HTTP_ERROR;
break;
}
else
{
status = HTTP_UNAUTHORIZED;
continue;
}
}
while ((status = httpUpdate(cups_server)) == HTTP_CONTINUE);
if (status == HTTP_UNAUTHORIZED)
{
DEBUG_puts("cupsGetPPD: unauthorized...");
httpFlush(cups_server);
if (cups_local_auth(cups_server))
continue;
if (strncmp(cups_server->fields[HTTP_FIELD_WWW_AUTHENTICATE], "Basic", 5) == 0 ||
digest_tries > 1 || !pwdstring[0])
{
snprintf(prompt, sizeof(prompt), "Password for %s on %s? ", cupsUser(),
cups_server->hostname);
if ((password = cupsGetPassword(prompt)) == NULL)
break;
if (!password[0])
break;
strlcpy(pwdstring, password, sizeof(pwdstring));
digest_tries = 0;
}
else
digest_tries ++;
if (strncmp(cups_server->fields[HTTP_FIELD_WWW_AUTHENTICATE], "Basic", 5) == 0)
{
snprintf(plain, sizeof(plain), "%s:%s", cupsUser(), pwdstring);
httpEncode64(encode, plain);
snprintf(authstring, sizeof(authstring), "Basic %s", encode);
}
else
{
httpGetSubField(cups_server, HTTP_FIELD_WWW_AUTHENTICATE, "realm", realm);
httpGetSubField(cups_server, HTTP_FIELD_WWW_AUTHENTICATE, "nonce", nonce);
httpMD5(cupsUser(), realm, pwdstring, encode);
httpMD5Final(nonce, "GET", resource, encode);
snprintf(authstring, sizeof(authstring),
"Digest username=\"%s\", realm=\"%s\", nonce=\"%s\", "
"response=\"%s\"", cupsUser(), realm, nonce, encode);
}
continue;
}
#ifdef HAVE_SSL
else if (status == HTTP_UPGRADE_REQUIRED)
{
httpFlush(cups_server);
httpEncryption(cups_server, HTTP_ENCRYPT_REQUIRED);
continue;
}
#endif
}
while (status == HTTP_UNAUTHORIZED || status == HTTP_UPGRADE_REQUIRED);
if (status != HTTP_OK)
{
switch (status)
{
case HTTP_NOT_FOUND :
last_error = IPP_NOT_FOUND;
break;
case HTTP_ERROR :
DEBUG_puts("Mapping HTTP error to IPP_SERVICE_UNAVAILABLE");
last_error = IPP_SERVICE_UNAVAILABLE;
break;
case HTTP_UNAUTHORIZED :
last_error = IPP_NOT_AUTHORIZED;
break;
default :
last_error = IPP_INTERNAL_ERROR;
break;
}
unlink(filename);
httpFlush(cups_server);
httpClose(cups_server);
cups_server = NULL;
return (NULL);
}
while ((bytes = httpRead(cups_server, buffer, sizeof(buffer))) > 0)
write(fd, buffer, bytes);
close(fd);
return (filename);
}
int
cupsGetPrinters(char ***printers)
{
int n;
ipp_t *request,
*response;
ipp_attribute_t *attr;
cups_lang_t *language;
char **temp;
if (printers == NULL)
{
last_error = IPP_INTERNAL_ERROR;
return (0);
}
if (!cups_connect("default", NULL, NULL))
{
DEBUG_puts("Unable to connect to server!");
last_error = IPP_SERVICE_UNAVAILABLE;
return (0);
}
request = ippNew();
request->request.op.operation_id = CUPS_GET_PRINTERS;
request->request.op.request_id = 1;
language = cupsLangDefault();
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
"attributes-charset", NULL, cupsLangEncoding(language));
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
"attributes-natural-language", NULL, language->language);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
"requested-attributes", NULL, "printer-name");
n = 0;
*printers = NULL;
if ((response = cupsDoRequest(cups_server, request, "/")) != NULL)
{
last_error = response->request.status.status_code;
for (attr = response->attrs; attr != NULL; attr = attr->next)
if (attr->name != NULL &&
strcasecmp(attr->name, "printer-name") == 0 &&
attr->value_tag == IPP_TAG_NAME)
{
if (n == 0)
temp = malloc(sizeof(char *));
else
temp = realloc(*printers, sizeof(char *) * (n + 1));
if (temp == NULL)
{
while (n > 0)
{
n --;
free((*printers)[n]);
}
free(*printers);
ippDelete(response);
return (0);
}
*printers = temp;
temp[n] = strdup(attr->values[0].string.text);
n ++;
}
ippDelete(response);
}
else
last_error = IPP_BAD_REQUEST;
return (n);
}
ipp_status_t
cupsLastError(void)
{
return (last_error);
}
int
cupsPrintFile(const char *name,
const char *filename,
const char *title,
int num_options,
cups_option_t *options)
{
DEBUG_printf(("cupsPrintFile(\'%s\', \'%s\', %d, %p)\n",
name, filename, num_options, options));
return (cupsPrintFiles(name, 1, &filename, title, num_options, options));
}
int
cupsPrintFiles(const char *name,
int num_files,
const char **files,
const char *title,
int num_options,
cups_option_t *options)
{
int i;
const char *val;
ipp_t *request;
ipp_t *response;
ipp_attribute_t *attr;
char hostname[HTTP_MAX_URI],
printer[HTTP_MAX_URI],
uri[HTTP_MAX_URI];
cups_lang_t *language;
int jobid;
DEBUG_printf(("cupsPrintFiles(\'%s\', %d, %p, %d, %p)\n",
name, num_files, files, num_options, options));
if (name == NULL || num_files < 1 || files == NULL)
return (0);
if (!cups_connect(name, printer, hostname))
{
DEBUG_printf(("cupsPrintFile: Unable to open connection - %s.\n",
strerror(errno)));
DEBUG_puts("Unable to connect to server!");
last_error = IPP_SERVICE_UNAVAILABLE;
return (0);
}
language = cupsLangDefault();
if ((request = ippNew()) == NULL)
return (0);
request->request.op.operation_id = num_files == 1 ? IPP_PRINT_JOB :
IPP_CREATE_JOB;
request->request.op.request_id = 1;
snprintf(uri, sizeof(uri), "ipp://%s:%d/printers/%s", hostname, ippPort(), printer);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
"attributes-charset", NULL, cupsLangEncoding(language));
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
"attributes-natural-language", NULL,
language != NULL ? language->language : "C");
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI, "printer-uri",
NULL, uri);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
NULL, cupsUser());
if (title)
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "job-name", NULL, title);
cupsEncodeOptions(request, num_options, options);
snprintf(uri, sizeof(uri), "/printers/%s", printer);
if (num_files == 1)
response = cupsDoFileRequest(cups_server, request, uri, *files);
else
response = cupsDoRequest(cups_server, request, uri);
if (response == NULL)
jobid = 0;
else if (response->request.status.status_code > IPP_OK_CONFLICT)
{
DEBUG_printf(("IPP response code was 0x%x!\n",
response->request.status.status_code));
jobid = 0;
}
else if ((attr = ippFindAttribute(response, "job-id", IPP_TAG_INTEGER)) == NULL)
{
DEBUG_puts("No job ID!");
jobid = 0;
}
else
jobid = attr->values[0].integer;
if (response != NULL)
ippDelete(response);
if (jobid > 0 && num_files > 1)
for (i = 0; i < num_files; i ++)
{
if ((request = ippNew()) == NULL)
return (0);
request->request.op.operation_id = IPP_SEND_DOCUMENT;
request->request.op.request_id = 1;
snprintf(uri, sizeof(uri), "ipp://%s:%d/jobs/%d", hostname, ippPort(),
jobid);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
"attributes-charset", NULL, cupsLangEncoding(language));
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
"attributes-natural-language", NULL,
language != NULL ? language->language : "C");
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI, "job-uri",
NULL, uri);
if (cupsGetOption("raw", num_options, options))
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_MIMETYPE, "document-format",
NULL, "application/vnd.cups-raw");
else if ((val = cupsGetOption("document-format", num_options, options)) != NULL)
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_MIMETYPE, "document-format",
NULL, val);
else
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_MIMETYPE, "document-format",
NULL, "application/octet-stream");
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
NULL, cupsUser());
if (i == (num_files - 1))
ippAddBoolean(request, IPP_TAG_OPERATION, "last-document", 1);
snprintf(uri, sizeof(uri), "/printers/%s", printer);
if ((response = cupsDoFileRequest(cups_server, request, uri,
files[i])) != NULL)
ippDelete(response);
}
return (jobid);
}
static char *
cups_connect(const char *name,
char *printer,
char *hostname)
{
char hostbuf[HTTP_MAX_URI];
DEBUG_printf(("cups_connect(\"%s\", %p, %p)\n", name, printer, hostname));
if (name == NULL)
{
last_error = IPP_BAD_REQUEST;
return (NULL);
}
strlcpy(hostbuf, cupsServer(), sizeof(hostbuf));
if (hostname != NULL)
strlcpy(hostname, hostbuf, HTTP_MAX_URI);
else
hostname = hostbuf;
if (printer != NULL)
strlcpy(printer, name, HTTP_MAX_URI);
else
printer = (char *)name;
if (cups_server != NULL)
{
if (strcasecmp(cups_server->hostname, hostname) == 0)
return (printer);
httpClose(cups_server);
}
DEBUG_printf(("connecting to %s on port %d...\n", hostname, ippPort()));
if ((cups_server = httpConnectEncrypt(hostname, ippPort(),
cupsEncryption())) == NULL)
{
DEBUG_puts("Unable to connect to server!");
last_error = IPP_SERVICE_UNAVAILABLE;
return (NULL);
}
else
return (printer);
}
static int
cups_local_auth(http_t *http)
{
#if defined(WIN32) || defined(__EMX__)
return (0);
#else
int pid;
FILE *fp;
char filename[1024],
certificate[33];
const char *root;
DEBUG_printf(("cups_local_auth(http=%p) hostaddr=%08x, hostname=\"%s\"\n",
http, ntohl(http->hostaddr.sin_addr.s_addr), http->hostname));
if (ntohl(http->hostaddr.sin_addr.s_addr) != 0x7f000001 &&
strcasecmp(http->hostname, "localhost") != 0)
{
DEBUG_puts("cups_local_auth: Not a local connection!");
return (0);
}
if ((root = getenv("CUPS_SERVERROOT")) == NULL)
root = CUPS_SERVERROOT;
pid = getpid();
snprintf(filename, sizeof(filename), "%s/certs/%d", root, pid);
if ((fp = fopen(filename, "r")) == NULL && pid > 0)
{
DEBUG_printf(("cups_local_auth: Unable to open file %s: %s\n",
filename, strerror(errno)));
snprintf(filename, sizeof(filename), "%s/certs/0", root);
fp = fopen(filename, "r");
}
if (fp == NULL)
{
DEBUG_printf(("cups_local_auth: Unable to open file %s: %s\n",
filename, strerror(errno)));
return (0);
}
fgets(certificate, sizeof(certificate), fp);
fclose(fp);
snprintf(authstring, sizeof(authstring), "Local %s", certificate);
DEBUG_printf(("cups_local_auth: Returning authstring = \"%s\"\n",
authstring));
return (1);
#endif
}