]> git.ipfire.org Git - thirdparty/cups.git/blobdiff - cups/options.c
Move debug printfs to internal usage only.
[thirdparty/cups.git] / cups / options.c
index 4ffb39f8244aa05359fb4b0078b9cf18df6c1278..11814c9af256d8796016e14f1d27659dea7b160f 100644 (file)
@@ -1,37 +1,52 @@
 /*
- * "$Id: options.c 7278 2008-01-31 01:23:09Z mike $"
+ * Option routines for CUPS.
  *
- *   Option routines for the Common UNIX Printing System (CUPS).
+ * Copyright 2007-2017 by Apple Inc.
+ * Copyright 1997-2007 by Easy Software Products.
  *
- *   Copyright 2007-2008 by Apple Inc.
- *   Copyright 1997-2007 by Easy Software Products.
- *
- *   These coded instructions, statements, and computer programs are the
- *   property of Apple Inc. 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
- *   file is missing or damaged, see the license at "http://www.cups.org/".
- *
- *   This file is subject to the Apple OS-Developed Software exception.
- *
- * Contents:
- *
- *   cupsAddOption()    - Add an option to an option array.
- *   cupsFreeOptions()  - Free all memory used by options.
- *   cupsGetOption()    - Get an option value.
- *   cupsParseOptions() - Parse options from a command-line argument.
- *   cupsRemoveOption() - Remove an option from an option array.
+ * Licensed under Apache License v2.0.  See the file "LICENSE" for more information.
  */
 
 /*
  * Include necessary headers...
  */
 
-#include "cups.h"
-#include <stdlib.h>
-#include <ctype.h>
-#include "string.h"
-#include "debug.h"
+#include "cups-private.h"
+#include "debug-internal.h"
+
+
+/*
+ * Local functions...
+ */
+
+static int     cups_compare_options(cups_option_t *a, cups_option_t *b);
+static int     cups_find_option(const char *name, int num_options,
+                                cups_option_t *option, int prev, int *rdiff);
+
+
+/*
+ * 'cupsAddIntegerOption()' - Add an integer option to an option array.
+ *
+ * New option arrays can be initialized simply by passing 0 for the
+ * "num_options" parameter.
+ *
+ * @since CUPS 2.2.4/macOS 10.13@
+ */
+
+int                                    /* O  - Number of options */
+cupsAddIntegerOption(
+    const char    *name,               /* I  - Name of option */
+    int           value,               /* I  - Value of option */
+    int           num_options,         /* I  - Number of options */
+    cups_option_t **options)           /* IO - Pointer to options */
+{
+  char strvalue[32];                   /* String value */
+
+
+  snprintf(strvalue, sizeof(strvalue), "%d", value);
+
+  return (cupsAddOption(name, strvalue, num_options, options));
+}
 
 
 /*
@@ -47,39 +62,72 @@ cupsAddOption(const char    *name,  /* I  - Name of option */
              int           num_options,/* I  - Number of options */
               cups_option_t **options) /* IO - Pointer to options */
 {
-  int          i;                      /* Looping var */
   cups_option_t        *temp;                  /* Pointer to new option */
+  int          insert,                 /* Insertion point */
+               diff;                   /* Result of search */
+
 
+  DEBUG_printf(("2cupsAddOption(name=\"%s\", value=\"%s\", num_options=%d, options=%p)", name, value, num_options, (void *)options));
 
-  if (name == NULL || !name[0] || value == NULL ||
-      options == NULL || num_options < 0)
+  if (!name || !name[0] || !value || !options || num_options < 0)
+  {
+    DEBUG_printf(("3cupsAddOption: Returning %d", num_options));
     return (num_options);
+  }
+
+  if (!_cups_strcasecmp(name, "cupsPrintQuality"))
+    num_options = cupsRemoveOption("print-quality", num_options, options);
+  else if (!_cups_strcasecmp(name, "print-quality"))
+    num_options = cupsRemoveOption("cupsPrintQuality", num_options, options);
 
  /*
   * Look for an existing option with the same name...
   */
 
-  for (i = 0, temp = *options; i < num_options; i ++, temp ++)
-    if (!strcasecmp(temp->name, name))
-      break;
+  if (num_options == 0)
+  {
+    insert = 0;
+    diff   = 1;
+  }
+  else
+  {
+    insert = cups_find_option(name, num_options, *options, num_options - 1,
+                              &diff);
+
+    if (diff > 0)
+      insert ++;
+  }
 
-  if (i >= num_options)
+  if (diff)
   {
    /*
     * No matching option name...
     */
 
+    DEBUG_printf(("4cupsAddOption: New option inserted at index %d...",
+                  insert));
+
     if (num_options == 0)
       temp = (cups_option_t *)malloc(sizeof(cups_option_t));
     else
-      temp = (cups_option_t *)realloc(*options, sizeof(cups_option_t) *
-                                               (num_options + 1));
+      temp = (cups_option_t *)realloc(*options, sizeof(cups_option_t) * (size_t)(num_options + 1));
 
-    if (temp == NULL)
+    if (!temp)
+    {
+      DEBUG_puts("3cupsAddOption: Unable to expand option array, returning 0");
       return (0);
+    }
 
-    *options    = temp;
-    temp        += num_options;
+    *options = temp;
+
+    if (insert < num_options)
+    {
+      DEBUG_printf(("4cupsAddOption: Shifting %d options...",
+                    (int)(num_options - insert)));
+      memmove(temp + insert + 1, temp + insert, (size_t)(num_options - insert) * sizeof(cups_option_t));
+    }
+
+    temp        += insert;
     temp->name  = _cupsStrAlloc(name);
     num_options ++;
   }
@@ -89,11 +137,17 @@ cupsAddOption(const char    *name, /* I  - Name of option */
     * Match found; free the old value...
     */
 
+    DEBUG_printf(("4cupsAddOption: Option already exists at index %d...",
+                  insert));
+
+    temp = *options + insert;
     _cupsStrFree(temp->value);
   }
 
   temp->value = _cupsStrAlloc(value);
 
+  DEBUG_printf(("3cupsAddOption: Returning %d", num_options));
+
   return (num_options);
 }
 
@@ -110,7 +164,9 @@ cupsFreeOptions(
   int  i;                              /* Looping var */
 
 
-  if (num_options <= 0 || options == NULL)
+  DEBUG_printf(("cupsFreeOptions(num_options=%d, options=%p)", num_options, (void *)options));
+
+  if (num_options <= 0 || !options)
     return;
 
   for (i = 0; i < num_options; i ++)
@@ -123,6 +179,38 @@ cupsFreeOptions(
 }
 
 
+/*
+ * 'cupsGetIntegerOption()' - Get an integer option value.
+ *
+ * INT_MIN is returned when the option does not exist, is not an integer, or
+ * exceeds the range of values for the "int" type.
+ *
+ * @since CUPS 2.2.4/macOS 10.13@
+ */
+
+int                                    /* O - Option value or @code INT_MIN@ */
+cupsGetIntegerOption(
+    const char    *name,               /* I - Name of option */
+    int           num_options,         /* I - Number of options */
+    cups_option_t *options)            /* I - Options */
+{
+  const char   *value = cupsGetOption(name, num_options, options);
+                                       /* String value of option */
+  char         *ptr;                   /* Pointer into string value */
+  long         intvalue;               /* Integer value */
+
+
+  if (!value || !*value)
+    return (INT_MIN);
+
+  intvalue = strtol(value, &ptr, 10);
+  if (intvalue < INT_MIN || intvalue > INT_MAX || *ptr)
+    return (INT_MIN);
+
+  return ((int)intvalue);
+}
+
+
 /*
  * 'cupsGetOption()' - Get an option value.
  */
@@ -132,16 +220,27 @@ cupsGetOption(const char    *name,        /* I - Name of option */
               int           num_options,/* I - Number of options */
               cups_option_t *options)  /* I - Options */
 {
-  int  i;                              /* Looping var */
+  int  diff,                           /* Result of comparison */
+       match;                          /* Matching index */
+
 
+  DEBUG_printf(("2cupsGetOption(name=\"%s\", num_options=%d, options=%p)", name, num_options, (void *)options));
 
-  if (name == NULL || num_options <= 0 || options == NULL)
+  if (!name || num_options <= 0 || !options)
+  {
+    DEBUG_puts("3cupsGetOption: Returning NULL");
     return (NULL);
+  }
 
-  for (i = 0; i < num_options; i ++)
-    if (strcasecmp(options[i].name, name) == 0)
-      return (options[i].value);
+  match = cups_find_option(name, num_options, options, -1, &diff);
 
+  if (!diff)
+  {
+    DEBUG_printf(("3cupsGetOption: Returning \"%s\"", options[match].value));
+    return (options[match].value);
+  }
+
+  DEBUG_puts("3cupsGetOption: Returning NULL");
   return (NULL);
 }
 
@@ -166,33 +265,61 @@ cupsParseOptions(
        *ptr,                           /* Pointer into string */
        *name,                          /* Pointer to name */
        *value,                         /* Pointer to value */
+       sep,                            /* Separator character */
        quote;                          /* Quote character */
 
 
+  DEBUG_printf(("cupsParseOptions(arg=\"%s\", num_options=%d, options=%p)", arg, num_options, (void *)options));
+
  /*
   * Range check input...
   */
 
   if (!arg)
+  {
+    DEBUG_printf(("1cupsParseOptions: Returning %d", num_options));
     return (num_options);
+  }
 
   if (!options || num_options < 0)
+  {
+    DEBUG_puts("1cupsParseOptions: Returning 0");
     return (0);
+  }
 
  /*
   * Make a copy of the argument string and then divide it up...
   */
 
   if ((copyarg = strdup(arg)) == NULL)
+  {
+    DEBUG_puts("1cupsParseOptions: Unable to copy arg string");
+    DEBUG_printf(("1cupsParseOptions: Returning %d", num_options));
     return (num_options);
+  }
 
-  ptr = copyarg;
+  if (*copyarg == '{')
+  {
+   /*
+    * Remove surrounding {} so we can parse "{name=value ... name=value}"...
+    */
+
+    if ((ptr = copyarg + strlen(copyarg) - 1) > copyarg && *ptr == '}')
+    {
+      *ptr = '\0';
+      ptr  = copyarg + 1;
+    }
+    else
+      ptr = copyarg;
+  }
+  else
+    ptr = copyarg;
 
  /*
   * Skip leading spaces...
   */
 
-  while (isspace(*ptr & 255))
+  while (_cups_isspace(*ptr))
     ptr ++;
 
  /*
@@ -206,7 +333,7 @@ cupsParseOptions(
     */
 
     name = ptr;
-    while (!isspace(*ptr & 255) && *ptr != '=' && *ptr)
+    while (!strchr("\f\n\r\t\v =", *ptr) && *ptr)
       ptr ++;
 
    /*
@@ -220,16 +347,21 @@ cupsParseOptions(
     * Skip trailing spaces...
     */
 
-    while (isspace(*ptr & 255))
+    while (_cups_isspace(*ptr))
       *ptr++ = '\0';
 
-    if (*ptr != '=')
+    if ((sep = *ptr) == '=')
+      *ptr++ = '\0';
+
+    DEBUG_printf(("2cupsParseOptions: name=\"%s\"", name));
+
+    if (sep != '=')
     {
      /*
       * Boolean option...
       */
 
-      if (!strncasecmp(name, "no", 2))
+      if (!_cups_strncasecmp(name, "no", 2))
         num_options = cupsAddOption(name + 2, "false", num_options,
                                    options);
       else
@@ -242,81 +374,84 @@ cupsParseOptions(
     * Remove = and parse the value...
     */
 
-    *ptr++ = '\0';
+    value = ptr;
 
-    if (*ptr == '\'' || *ptr == '\"')
+    while (*ptr && !_cups_isspace(*ptr))
     {
-     /*
-      * Quoted string constant...
-      */
-
-      quote = *ptr++;
-      value = ptr;
-
-      while (*ptr != quote && *ptr)
+      if (*ptr == ',')
+        ptr ++;
+      else if (*ptr == '\'' || *ptr == '\"')
       {
-        if (*ptr == '\\' && ptr[1])
-         _cups_strcpy(ptr, ptr + 1);
+       /*
+       * Quoted string constant...
+       */
 
-        ptr ++;
-      }
+       quote = *ptr;
+       _cups_strcpy(ptr, ptr + 1);
 
-      if (*ptr != '\0')
-        *ptr++ = '\0';
-    }
-    else if (*ptr == '{')
-    {
-     /*
-      * Collection value...
-      */
+       while (*ptr != quote && *ptr)
+       {
+         if (*ptr == '\\' && ptr[1])
+           _cups_strcpy(ptr, ptr + 1);
+
+         ptr ++;
+       }
 
-      int depth;
+       if (*ptr)
+         _cups_strcpy(ptr, ptr + 1);
+      }
+      else if (*ptr == '{')
+      {
+       /*
+       * Collection value...
+       */
 
-      value = ptr;
+       int depth;
 
-      for (depth = 1; *ptr; ptr ++)
-        if (*ptr == '{')
-         depth ++;
-       else if (*ptr == '}')
+       for (depth = 0; *ptr; ptr ++)
        {
-         depth --;
-         if (!depth)
+         if (*ptr == '{')
+           depth ++;
+         else if (*ptr == '}')
          {
-           ptr ++;
-
-           if (*ptr != ',')
+           depth --;
+           if (!depth)
+           {
+             ptr ++;
              break;
+           }
          }
-        }
-        else if (*ptr == '\\' && ptr[1])
-         _cups_strcpy(ptr, ptr + 1);
-
-      if (*ptr != '\0')
-        *ptr++ = '\0';
-    }
-    else
-    {
-     /*
-      * Normal space-delimited string...
-      */
-
-      value = ptr;
-
-      while (!isspace(*ptr & 255) && *ptr)
+         else if (*ptr == '\\' && ptr[1])
+           _cups_strcpy(ptr, ptr + 1);
+       }
+      }
+      else
       {
-        if (*ptr == '\\' && ptr[1])
-         _cups_strcpy(ptr, ptr + 1);
+       /*
+       * Normal space-delimited string...
+       */
 
-        ptr ++;
+       while (*ptr && !_cups_isspace(*ptr))
+       {
+         if (*ptr == '\\' && ptr[1])
+           _cups_strcpy(ptr, ptr + 1);
+
+         ptr ++;
+       }
       }
     }
 
+    if (*ptr != '\0')
+      *ptr++ = '\0';
+
+    DEBUG_printf(("2cupsParseOptions: value=\"%s\"", value));
+
    /*
     * Skip trailing whitespace...
     */
 
-    while (isspace(*ptr & 255))
-      *ptr++ = '\0';
+    while (_cups_isspace(*ptr))
+      ptr ++;
 
    /*
     * Add the string value...
@@ -332,6 +467,8 @@ cupsParseOptions(
 
   free(copyarg);
 
+  DEBUG_printf(("1cupsParseOptions: Returning %d", num_options));
+
   return (num_options);
 }
 
@@ -339,7 +476,7 @@ cupsParseOptions(
 /*
  * 'cupsRemoveOption()' - Remove an option from an option array.
  *
- * @since CUPS 1.2@
+ * @since CUPS 1.2/macOS 10.5@
  */
 
 int                                    /* O  - New number of options */
@@ -352,19 +489,24 @@ cupsRemoveOption(
   cups_option_t        *option;                /* Current option */
 
 
+  DEBUG_printf(("2cupsRemoveOption(name=\"%s\", num_options=%d, options=%p)", name, num_options, (void *)options));
+
  /*
   * Range check input...
   */
 
   if (!name || num_options < 1 || !options)
+  {
+    DEBUG_printf(("3cupsRemoveOption: Returning %d", num_options));
     return (num_options);
+  }
 
  /*
   * Loop for the option...
   */
 
   for (i = num_options, option = *options; i > 0; i --, option ++)
-    if (!strcasecmp(name, option->name))
+    if (!_cups_strcasecmp(name, option->name))
       break;
 
   if (i)
@@ -373,6 +515,8 @@ cupsRemoveOption(
     * Remove this option from the array...
     */
 
+    DEBUG_puts("4cupsRemoveOption: Found option, removing it...");
+
     num_options --;
     i --;
 
@@ -380,17 +524,218 @@ cupsRemoveOption(
     _cupsStrFree(option->value);
 
     if (i > 0)
-      memmove(option, option + 1, i * sizeof(cups_option_t));
+      memmove(option, option + 1, (size_t)i * sizeof(cups_option_t));
   }
 
  /*
   * Return the new number of options...
   */
 
+  DEBUG_printf(("3cupsRemoveOption: Returning %d", num_options));
   return (num_options);
 }
 
 
 /*
- * End of "$Id: options.c 7278 2008-01-31 01:23:09Z mike $".
+ * '_cupsGet1284Values()' - Get 1284 device ID keys and values.
+ *
+ * The returned dictionary is a CUPS option array that can be queried with
+ * cupsGetOption and freed with cupsFreeOptions.
+ */
+
+int                                    /* O - Number of key/value pairs */
+_cupsGet1284Values(
+    const char *device_id,             /* I - IEEE-1284 device ID string */
+    cups_option_t **values)            /* O - Array of key/value pairs */
+{
+  int          num_values;             /* Number of values */
+  char         key[256],               /* Key string */
+               value[256],             /* Value string */
+               *ptr;                   /* Pointer into key/value */
+
+
+ /*
+  * Range check input...
+  */
+
+  if (values)
+    *values = NULL;
+
+  if (!device_id || !values)
+    return (0);
+
+ /*
+  * Parse the 1284 device ID value into keys and values.  The format is
+  * repeating sequences of:
+  *
+  *   [whitespace]key:value[whitespace];
+  */
+
+  num_values = 0;
+  while (*device_id)
+  {
+    while (_cups_isspace(*device_id))
+      device_id ++;
+
+    if (!*device_id)
+      break;
+
+    for (ptr = key; *device_id && *device_id != ':'; device_id ++)
+      if (ptr < (key + sizeof(key) - 1))
+        *ptr++ = *device_id;
+
+    if (!*device_id)
+      break;
+
+    while (ptr > key && _cups_isspace(ptr[-1]))
+      ptr --;
+
+    *ptr = '\0';
+    device_id ++;
+
+    while (_cups_isspace(*device_id))
+      device_id ++;
+
+    if (!*device_id)
+      break;
+
+    for (ptr = value; *device_id && *device_id != ';'; device_id ++)
+      if (ptr < (value + sizeof(value) - 1))
+        *ptr++ = *device_id;
+
+    if (!*device_id)
+      break;
+
+    while (ptr > value && _cups_isspace(ptr[-1]))
+      ptr --;
+
+    *ptr = '\0';
+    device_id ++;
+
+    num_values = cupsAddOption(key, value, num_values, values);
+  }
+
+  return (num_values);
+}
+
+
+/*
+ * 'cups_compare_options()' - Compare two options.
+ */
+
+static int                             /* O - Result of comparison */
+cups_compare_options(cups_option_t *a, /* I - First option */
+                    cups_option_t *b)  /* I - Second option */
+{
+  return (_cups_strcasecmp(a->name, b->name));
+}
+
+
+/*
+ * 'cups_find_option()' - Find an option using a binary search.
  */
+
+static int                             /* O - Index of match */
+cups_find_option(
+    const char    *name,               /* I - Option name */
+    int           num_options,         /* I - Number of options */
+    cups_option_t *options,            /* I - Options */
+    int           prev,                        /* I - Previous index */
+    int           *rdiff)              /* O - Difference of match */
+{
+  int          left,                   /* Low mark for binary search */
+               right,                  /* High mark for binary search */
+               current,                /* Current index */
+               diff;                   /* Result of comparison */
+  cups_option_t        key;                    /* Search key */
+
+
+  DEBUG_printf(("7cups_find_option(name=\"%s\", num_options=%d, options=%p, prev=%d, rdiff=%p)", name, num_options, (void *)options, prev, (void *)rdiff));
+
+#ifdef DEBUG
+  for (left = 0; left < num_options; left ++)
+    DEBUG_printf(("9cups_find_option: options[%d].name=\"%s\", .value=\"%s\"",
+                  left, options[left].name, options[left].value));
+#endif /* DEBUG */
+
+  key.name = (char *)name;
+
+  if (prev >= 0)
+  {
+   /*
+    * Start search on either side of previous...
+    */
+
+    if ((diff = cups_compare_options(&key, options + prev)) == 0 ||
+        (diff < 0 && prev == 0) ||
+       (diff > 0 && prev == (num_options - 1)))
+    {
+      *rdiff = diff;
+      return (prev);
+    }
+    else if (diff < 0)
+    {
+     /*
+      * Start with previous on right side...
+      */
+
+      left  = 0;
+      right = prev;
+    }
+    else
+    {
+     /*
+      * Start wih previous on left side...
+      */
+
+      left  = prev;
+      right = num_options - 1;
+    }
+  }
+  else
+  {
+   /*
+    * Start search in the middle...
+    */
+
+    left  = 0;
+    right = num_options - 1;
+  }
+
+  do
+  {
+    current = (left + right) / 2;
+    diff    = cups_compare_options(&key, options + current);
+
+    if (diff == 0)
+      break;
+    else if (diff < 0)
+      right = current;
+    else
+      left = current;
+  }
+  while ((right - left) > 1);
+
+  if (diff != 0)
+  {
+   /*
+    * Check the last 1 or 2 elements...
+    */
+
+    if ((diff = cups_compare_options(&key, options + left)) <= 0)
+      current = left;
+    else
+    {
+      diff    = cups_compare_options(&key, options + right);
+      current = right;
+    }
+  }
+
+ /*
+  * Return the closest destination and the difference...
+  */
+
+  *rdiff = diff;
+
+  return (current);
+}