Load cups into easysw/current.

git-svn-id: svn+ssh://src.apple.com/svn/cups/easysw/current@2 a1ca3aef-8c08-0410-bb20-df032aa958be

1 files changed, 434 insertions, 0 deletions

diff --git a/cgi-bin/printers.c b/cgi-bin/printers.c
new file mode 100644
index 000000000..25bb7ea70
--- /dev/null
+++ b/cgi-bin/printers.c
@@ -0,0 +1,434 @@
+/*
+ * "$Id: printers.c 4921 2006-01-12 21:26:26Z mike $"
+ *
+ *   Printer status CGI for the Common UNIX Printing System (CUPS).
+ *
+ *   Copyright 1997-2006 by Easy Software Products.
+ *
+ *   These coded instructions, statements, and computer programs are the
+ *   property of Easy Software Products and are protected by Federal
+ *   copyright law.  Distribution and use rights are outlined in the file
+ *   "LICENSE.txt" which should have been included with this file.  If this
+ *   file is missing or damaged please contact Easy Software Products
+ *   at:
+ *
+ *       Attn: CUPS Licensing Information
+ *       Easy Software Products
+ *       44141 Airport View Drive, Suite 204
+ *       Hollywood, Maryland 20636 USA
+ *
+ *       Voice: (301) 373-9600
+ *       EMail: cups-info@cups.org
+ *         WWW: http://www.cups.org
+ *
+ * Contents:
+ *
+ *   main() - Main entry for CGI.
+ */
+
+/*
+ * Include necessary headers...
+ */
+
+#include "cgi-private.h"
+
+
+/*
+ * 'main()' - Main entry for CGI.
+ */
+
+int					/* O - Exit status */
+main(int  argc,				/* I - Number of command-line arguments */
+     char *argv[])			/* I - Command-line arguments */
+{
+  cups_lang_t	*language;		/* Language information */
+  char		*printer;		/* Printer name */
+  http_t	*http;			/* Connection to the server */
+  ipp_t		*request,		/* IPP request */
+		*response;		/* IPP response */
+  ipp_attribute_t *attr;		/* IPP attribute */
+  ipp_status_t	status;			/* Operation status... */
+  char		uri[HTTP_MAX_URI];	/* Printer URI */
+  const char	*which_jobs;		/* Which jobs to show */
+  const char	*op;			/* Operation to perform, if any */
+  char		refresh[1024];		/* Refresh URL */
+  static const char *def_attrs[] =	/* Attributes for default printer */
+		{
+		  "printer-name",
+		  "printer-uri-supported"
+		};
+
+
+ /*
+  * Get any form variables...
+  */
+
+  cgiInitialize();
+  op = cgiGetVariable("OP");
+
+ /*
+  * Get the request language...
+  */
+
+  language = cupsLangDefault();
+
+ /*
+  * Set the web interface section...
+  */
+
+  cgiSetVariable("SECTION", "printers");
+
+ /*
+  * Connect to the HTTP server...
+  */
+
+  http = httpConnectEncrypt(cupsServer(), ippPort(), cupsEncryption());
+
+ /*
+  * Tell the client to expect UTF-8 encoded HTML...
+  */
+
+  puts("Content-Type: text/html;charset=utf-8\n");
+
+ /*
+  * See if we need to show a list of printers or the status of a
+  * single printer...
+  */
+
+  cgiSetServerVersion();
+
+  printer = argv[0];
+  if (strcmp(printer, "/") == 0 || strstr(printer, "printers.cgi") != NULL)
+  {
+    printer = NULL;
+    cgiSetVariable("TITLE", _cupsLangString(language, _("Printer")));
+  }
+  else
+    cgiSetVariable("TITLE", printer);
+
+  if (op == NULL || strcasecmp(op, "print-test-page") != 0)
+  {
+   /*
+    * Get the default destination...
+    */
+
+    request = ippNew();
+    request->request.op.operation_id = CUPS_GET_DEFAULT;
+    request->request.op.request_id   = 1;
+
+    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);
+
+    ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
+                  "requested-attributes",
+		  sizeof(def_attrs) / sizeof(def_attrs[0]), NULL, def_attrs);
+
+    if ((response = cupsDoRequest(http, request, "/")) != NULL)
+    {
+      if ((attr = ippFindAttribute(response, "printer-name", IPP_TAG_NAME)) != NULL)
+        cgiSetVariable("DEFAULT_NAME", attr->values[0].string.text);
+
+      if ((attr = ippFindAttribute(response, "printer-uri-supported", IPP_TAG_URI)) != NULL)
+      {
+	char	url[HTTP_MAX_URI];	/* New URL */
+
+
+        cgiSetVariable("DEFAULT_URI",
+	               cgiRewriteURL(attr->values[0].string.text,
+		                     url, sizeof(url), NULL));
+      }
+
+      ippDelete(response);
+    }
+
+   /*
+    * Get the printer info...
+    */
+
+    request = ippNew();
+
+    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 (printer == NULL)
+    {
+     /*
+      * Build a CUPS_GET_PRINTERS request, which requires the following
+      * attributes:
+      *
+      *    attributes-charset
+      *    attributes-natural-language
+      */
+
+      request->request.op.operation_id = CUPS_GET_PRINTERS;
+      request->request.op.request_id   = 1;
+
+      ippAddInteger(request, IPP_TAG_OPERATION, IPP_TAG_ENUM,
+                    "printer-type", 0);
+      ippAddInteger(request, IPP_TAG_OPERATION, IPP_TAG_ENUM,
+                    "printer-type-mask", CUPS_PRINTER_CLASS);
+
+      if (getenv("REMOTE_USER") != NULL)
+	ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
+                     NULL, getenv("REMOTE_USER"));
+    }
+    else
+    {
+     /*
+      * Build an IPP_GET_PRINTER_ATTRIBUTES request, which requires the following
+      * attributes:
+      *
+      *    attributes-charset
+      *    attributes-natural-language
+      *    printer-uri
+      */
+
+      request->request.op.operation_id = IPP_GET_PRINTER_ATTRIBUTES;
+      request->request.op.request_id   = 1;
+
+      httpAssembleURIf(uri, sizeof(uri), "ipp", NULL, "localhost", 0,
+                       "/printers/%s", printer);
+      ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI, "printer-uri", NULL,
+                   uri);
+    }
+
+    cgiGetAttributes(request, "printers.tmpl");
+
+   /*
+    * Do the request and get back a response...
+    */
+
+    if ((response = cupsDoRequest(http, request, "/")) != NULL)
+    {
+     /*
+      * Got the result; set the CGI variables and check the status of a
+      * single-queue request...
+      */
+
+      cgiSetIPPVars(response, NULL, NULL, NULL, 0);
+
+      if (printer && (attr = ippFindAttribute(response, "printer-state",
+                                              IPP_TAG_ENUM)) != NULL &&
+          attr->values[0].integer == IPP_PRINTER_PROCESSING)
+      {
+       /*
+        * Printer is processing - automatically refresh the page until we
+	* are done printing...
+	*/
+
+	cgiFormEncode(uri, printer, sizeof(uri));
+	snprintf(refresh, sizeof(refresh), "10;/printers/%s", uri);
+	cgiSetVariable("refresh_page", refresh);
+      }
+
+     /*
+      * Delete the response...
+      */
+
+      ippDelete(response);
+    }
+    else if (printer)
+      fprintf(stderr, "ERROR: Get-Printer-Attributes request failed - %s (%x)\n",
+              ippErrorString(cupsLastError()), cupsLastError());
+    else
+      fprintf(stderr, "ERROR: CUPS-Get-Printers request failed - %s (%x)\n",
+              ippErrorString(cupsLastError()), cupsLastError());
+
+   /*
+    * Show the standard header...
+    */
+
+    cgiCopyTemplateLang("header.tmpl");
+
+   /*
+    * Write the report...
+    */
+
+    cgiCopyTemplateLang("printers.tmpl");
+
+   /*
+    * Get jobs for the specified printer if a printer has been chosen...
+    */
+
+    if (printer != NULL)
+    {
+     /*
+      * Build an IPP_GET_JOBS request, which requires the following
+      * attributes:
+      *
+      *    attributes-charset
+      *    attributes-natural-language
+      *    printer-uri
+      */
+
+      request = ippNew();
+
+      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);
+
+      request->request.op.operation_id = IPP_GET_JOBS;
+      request->request.op.request_id   = 1;
+
+      httpAssembleURIf(uri, sizeof(uri), "ipp", NULL, "localhost", 0,
+                       "/printers/%s", printer);
+      ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI, "printer-uri", NULL,
+                   uri);
+
+      if ((which_jobs = cgiGetVariable("which_jobs")) != NULL)
+	ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD, "which-jobs",
+                     NULL, which_jobs);
+
+      if (getenv("REMOTE_USER") != NULL)
+      {
+	ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
+                     NULL, getenv("REMOTE_USER"));
+
+	if (strcmp(getenv("REMOTE_USER"), "root"))
+	  ippAddBoolean(request, IPP_TAG_OPERATION, "my-jobs", 1);
+      }
+      else
+	ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
+                     NULL, "unknown");
+
+      cgiGetAttributes(request, "jobs.tmpl");
+
+     /*
+      * Do the request and get back a response...
+      */
+
+      if ((response = cupsDoRequest(http, request, "/")) != NULL)
+      {
+	cgiSetIPPVars(response, NULL, NULL, NULL, 0);
+	ippDelete(response);
+
+	cgiCopyTemplateLang("jobs.tmpl");
+      }
+      else
+	fprintf(stderr, "ERROR: Get-Jobs request failed - %s (%x)\n",
+        	ippErrorString(cupsLastError()), cupsLastError());
+    }
+  }
+  else
+  {
+   /*
+    * Print a test page...
+    */
+
+    char	filename[1024];		/* Test page filename */
+    const char	*datadir;		/* CUPS_DATADIR env var */
+
+
+    cgiFormEncode(uri, printer, sizeof(uri));
+    snprintf(refresh, sizeof(refresh), "2;/printers/%s", uri);
+    cgiSetVariable("refresh_page", refresh);
+
+    if ((datadir = getenv("CUPS_DATADIR")) == NULL)
+      datadir = CUPS_DATADIR;
+
+    snprintf(filename, sizeof(filename), "%s/data/testprint.ps", datadir);
+    httpAssembleURIf(uri, sizeof(uri), "ipp", NULL, "localhost", 0,
+                     "/printers/%s", printer);
+
+   /*
+    * Build an IPP_PRINT_JOB request, which requires the following
+    * attributes:
+    *
+    *    attributes-charset
+    *    attributes-natural-language
+    *    printer-uri
+    *    requesting-user-name
+    *    document-format
+    */
+
+    request = ippNew();
+
+    request->request.op.operation_id = IPP_PRINT_JOB;
+    request->request.op.request_id   = 1;
+
+    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_URI, "printer-uri",
+        	 NULL, uri);
+
+    if (getenv("REMOTE_USER") != NULL)
+      ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
+                   NULL, getenv("REMOTE_USER"));
+    else
+      ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
+                   NULL, "root");
+
+    ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "job-name",
+        	 NULL, "Test Page");
+
+    ippAddString(request, IPP_TAG_JOB, IPP_TAG_MIMETYPE, "document-format",
+        	 NULL, "application/postscript");
+
+   /*
+    * Do the request and get back a response...
+    */
+
+    if ((response = cupsDoFileRequest(http, request, uri + 15,
+                                      filename)) != NULL)
+    {
+      status = response->request.status.status_code;
+      cgiSetIPPVars(response, NULL, NULL, NULL, 0);
+
+      ippDelete(response);
+    }
+    else
+      status = cupsLastError();
+
+    cgiSetVariable("PRINTER_NAME", printer);
+
+   /*
+    * Show the standard header...
+    */
+
+    cgiCopyTemplateLang("header.tmpl");
+
+   /*
+    * Show the result...
+    */
+
+    if (status > IPP_OK_CONFLICT)
+    {
+      cgiSetVariable("ERROR", ippErrorString(status));
+      cgiCopyTemplateLang("error.tmpl");
+    }
+    else
+      cgiCopyTemplateLang("test-page.tmpl");
+  }
+
+  cgiCopyTemplateLang("trailer.tmpl");
+
+ /*
+  * Close the HTTP server connection...
+  */
+
+  httpClose(http);
+  cupsLangFree(language);
+
+ /*
+  * Return with no errors...
+  */
+
+  return (0);
+}
+
+
+/*
+ * End of "$Id: printers.c 4921 2006-01-12 21:26:26Z mike $".
+ */