Index: hid.conf
===================================================================
--- hid.conf	(nonexistent)
+++ hid.conf	(revision 2)
@@ -0,0 +1,2 @@
+type=printer
+deps=ps
Index: lpr.c
===================================================================
--- lpr.c	(nonexistent)
+++ lpr.c	(revision 2)
@@ -0,0 +1,148 @@
+/* $Id$ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include <stdio.h>
+#include <stdarg.h>
+#include <stdlib.h>
+#include <string.h>
+#include <assert.h>
+
+#include "global.h"
+#include "data.h"
+#include "misc.h"
+
+#include "hid.h"
+#include "../hidint.h"
+#include "../ps/ps.h"
+#include "hid/common/hidnogui.h"
+#include "hid/common/hidinit.h"
+
+#ifdef HAVE_LIBDMALLOC
+#include <dmalloc.h>
+#endif
+
+RCSID ("$Id$");
+
+#define CRASH fprintf(stderr, "HID error: pcb called unimplemented PS function %s.\n", __FUNCTION__); abort()
+
+static HID_Attribute base_lpr_options[] = {
+
+/* %start-doc options "98 lpr Printing Options"
+@ftable @code
+@item --lprcommand <string>
+Command to use for printing. Defaults to @code{lpr}. This can be used to produce
+PDF output with a virtual PDF printer. Example: @*
+@code{--lprcommand "lp -d CUPS-PDF-Printer"}.
+@end ftable
+@noindent In addition, all @ref{Postscript Export} options are valid.
+%end-doc
+*/
+  {"lprcommand", "Command to use for printing",
+   HID_String, 0, 0, {0, 0, 0}, 0, 0},
+#define HA_lprcommand 0
+};
+
+#define NUM_OPTIONS (sizeof(lpr_options)/sizeof(lpr_options[0]))
+
+static HID_Attribute *lpr_options = 0;
+static int num_lpr_options = 0;
+static HID_Attr_Val *lpr_values;
+
+static HID_Attribute *
+lpr_get_export_options (int *n)
+{
+  /*
+   * We initialize the default value in this manner because the GUI
+   * HID's may want to free() this string value and replace it with a
+   * new one based on how a user fills out a print dialog.
+   */
+  if (base_lpr_options[HA_lprcommand].default_val.str_value == NULL)
+    {
+      base_lpr_options[HA_lprcommand].default_val.str_value = strdup("lpr");
+    }
+
+  if (lpr_options == 0)
+    {
+      HID_Attribute *ps_opts = ps_hid.get_export_options (&num_lpr_options);
+      lpr_options =
+	(HID_Attribute *) calloc (num_lpr_options, sizeof (HID_Attribute));
+      memcpy (lpr_options, ps_opts, num_lpr_options * sizeof (HID_Attribute));
+      memcpy (lpr_options, base_lpr_options, sizeof (base_lpr_options));
+      lpr_values =
+	(HID_Attr_Val *) calloc (num_lpr_options, sizeof (HID_Attr_Val));
+    }
+  if (n)
+    *n = num_lpr_options;
+  return lpr_options;
+}
+
+static void
+lpr_do_export (HID_Attr_Val * options)
+{
+  FILE *f;
+  int i;
+  const char *filename;
+
+  if (!options)
+    {
+      lpr_get_export_options (0);
+      for (i = 0; i < num_lpr_options; i++)
+	lpr_values[i] = lpr_options[i].default_val;
+      options = lpr_values;
+    }
+
+  filename = options[HA_lprcommand].str_value;
+
+  printf ("LPR: open %s\n", filename);
+  f = popen (filename, "w");
+  if (!f)
+    {
+      perror (filename);
+      return;
+    }
+
+  ps_hid_export_to_file (f, options);
+
+  fclose (f);
+}
+
+static void
+lpr_parse_arguments (int *argc, char ***argv)
+{
+  lpr_get_export_options (0);
+  hid_register_attributes (lpr_options, num_lpr_options);
+  hid_parse_command_line (argc, argv);
+}
+
+static void
+lpr_calibrate (double xval, double yval)
+{
+  ps_calibrate_1 (xval, yval, 1);
+}
+
+static HID lpr_hid;
+
+void
+hid_lpr_init ()
+{
+  memset (&lpr_hid, 0, sizeof (HID));
+
+  common_nogui_init (&lpr_hid);
+  ps_ps_init (&lpr_hid);
+
+  lpr_hid.struct_size         = sizeof (HID);
+  lpr_hid.name                = "lpr";
+  lpr_hid.description         = "Postscript print";
+  lpr_hid.printer             = 1;
+  lpr_hid.poly_before         = 1;
+
+  lpr_hid.get_export_options  = lpr_get_export_options;
+  lpr_hid.do_export           = lpr_do_export;
+  lpr_hid.parse_arguments     = lpr_parse_arguments;
+  lpr_hid.calibrate           = lpr_calibrate;
+
+  hid_register_hid (&lpr_hid);
+}