cups/pwg-media.c

   1 /*
   2  * "$Id$"
   3  *
   4  *   PWG media name API implementation for CUPS.
   5  *
   6  *   Copyright 2009-2012 by Apple Inc.
   7  *
   8  *   These coded instructions, statements, and computer programs are the
   9  *   property of Apple Inc. and are protected by Federal copyright
  10  *   law.  Distribution and use rights are outlined in the file "LICENSE.txt"
  11  *   which should have been included with this file.  If this file is
  12  *   file is missing or damaged, see the license at "http://www.cups.org/".
  13  *
  14  *   This file is subject to the Apple OS-Developed Software exception.
  15  *
  16  * Contents:
  17  *
  18  */
  19
  20 /*
  21  * Include necessary headers...
  22  */
  23
  24 #include "cups-private.h"
  25 #include <math.h>
  26
  27
  28 /*
  29  * Local macros...
  30  */
  31
  32 #define _PWG_MEDIA_IN(p,l,a,x,y) {p, l, a, (int)(x * 2540), (int)(y * 2540)}
  33 #define _PWG_MEDIA_MM(p,l,a,x,y) {p, l, a, (int)(x * 100), (int)(y * 100)}
  34
  35
  36 /*
  37  * Local functions...
  38  */
  39
  40 static int      pwg_compare_legacy(_pwg_media_t *a, _pwg_media_t *b);
  41 static int      pwg_compare_pwg(_pwg_media_t *a, _pwg_media_t *b);
  42 static int      pwg_compare_ppd(_pwg_media_t *a, _pwg_media_t *b);
  43
  44
  45 /*
  46  * Local globals...
  47  */
  48
  49 static _pwg_media_t const cups_pwg_media[] =
  50 {                                       /* Media size lookup table */
  51   /* North American Standard Sheet Media Sizes */
  52   _PWG_MEDIA_IN("na_index-3x5_3x5in", NULL, "3x5", 3, 5),
  53   _PWG_MEDIA_IN("na_personal_3.625x6.5in", NULL, "EnvPersonal", 3.625, 6.5),
  54   _PWG_MEDIA_IN("na_monarch_3.875x7.5in", "monarch-envelope", "EnvMonarch", 3.875, 7.5),
  55   _PWG_MEDIA_IN("na_number-9_3.875x8.875in", "na-number-9-envelope", "Env9", 3.875, 8.875),
  56   _PWG_MEDIA_IN("na_index-4x6_4x6in", NULL, "4x6", 4, 6),
  57   _PWG_MEDIA_IN("na_number-10_4.125x9.5in", "na-number-10-envelope", "Env10", 4.125, 9.5),
  58   _PWG_MEDIA_IN("na_a2_4.375x5.75in", NULL, "EnvA2", 4.375, 5.75),
  59   _PWG_MEDIA_IN("na_number-11_4.5x10.375in", NULL, "Env11", 4.5, 10.375),
  60   _PWG_MEDIA_IN("na_number-12_4.75x11in", NULL, "Env12", 4.75, 11),
  61   _PWG_MEDIA_IN("na_5x7_5x7in", NULL, "5x7", 5, 7),
  62   _PWG_MEDIA_IN("na_index-5x8_5x8in", NULL, "5x8", 5, 8),
  63   _PWG_MEDIA_IN("na_number-14_5x11.5in", NULL, "Env14", 5, 11.5),
  64   _PWG_MEDIA_IN("na_invoice_5.5x8.5in", "invoice", "Statement", 5.5, 8.5),
  65   _PWG_MEDIA_IN("na_index-4x6-ext_6x8in", NULL, NULL, 6, 8),
  66   _PWG_MEDIA_IN("na_6x9_6x9in", "na-6x9-envelope", "6x9", 6, 9),
  67   _PWG_MEDIA_IN("na_c5_6.5x9.5in", NULL, "6.5x9.5", 6.5, 9.5),
  68   _PWG_MEDIA_IN("na_7x9_7x9in", "na-7x9-envelope", "7x9", 7, 9),
  69   _PWG_MEDIA_IN("na_executive_7.25x10.5in", "executive", "Executive", 7.25, 10.5),
  70   _PWG_MEDIA_IN("na_govt-letter_8x10in", "na-8x10", "8x10", 8, 10),
  71   _PWG_MEDIA_IN("na_govt-legal_8x13in", NULL, "8x13", 8, 13),
  72   _PWG_MEDIA_IN("na_quarto_8.5x10.83in", "quarto", "Quarto", 8.5, 10.83),
  73   _PWG_MEDIA_IN("na_letter_8.5x11in", "na-letter", "Letter", 8.5, 11),
  74   _PWG_MEDIA_IN("na_fanfold-eur_8.5x12in", NULL, "FanFoldGerman", 8.5, 12),
  75   _PWG_MEDIA_IN("na_letter-plus_8.5x12.69in", NULL, "LetterPlus", 8.5, 12.69),
  76   _PWG_MEDIA_IN("na_foolscap_8.5x13in", NULL, "FanFoldGermanLegal", 8.5, 13),
  77   _PWG_MEDIA_IN("na_legal_8.5x14in", "na-legal", "Legal", 8.5, 14),
  78   _PWG_MEDIA_IN("na_super-a_8.94x14in", NULL, "SuperA", 8.94, 14),
  79   _PWG_MEDIA_IN("na_9x11_9x11in", "na-9x11-envelope", "9x11", 9, 11),
  80   _PWG_MEDIA_IN("na_arch-a_9x12in", "arch-a", "ARCHA", 9, 12),
  81   _PWG_MEDIA_IN("na_letter-extra_9.5x12in", NULL, "LetterExtra", 9.5, 12),
  82   _PWG_MEDIA_IN("na_legal-extra_9.5x15in", NULL, "LegalExtra", 9.5, 15),
  83   _PWG_MEDIA_IN("na_10x11_10x11in", NULL, "10x11", 10, 11),
  84   _PWG_MEDIA_IN("na_10x13_10x13in", "na-10x13-envelope", "10x13", 10, 13),
  85   _PWG_MEDIA_IN("na_10x14_10x14in", "na-10x14-envelope", "10x14", 10, 14),
  86   _PWG_MEDIA_IN("na_10x15_10x15in", "na-10x15-envelope", "10x15", 10, 15),
  87   _PWG_MEDIA_IN("na_11x12_11x12in", NULL, "11x12", 11, 12),
  88   _PWG_MEDIA_IN("na_edp_11x14in", NULL, "11x14", 11, 14),
  89   _PWG_MEDIA_IN("na_fanfold-us_11x14.875in", NULL, NULL, 11, 14.875),
  90   _PWG_MEDIA_IN("na_11x15_11x15in", NULL, "11x15", 11, 15),
  91   _PWG_MEDIA_IN("na_ledger_11x17in", "tabloid", "Tabloid", 11, 17),
  92   _PWG_MEDIA_IN("na_eur-edp_12x14in", NULL, NULL, 12, 14),
  93   _PWG_MEDIA_IN("na_arch-b_12x18in", "arch-b", "ARCHB", 12, 18),
  94   _PWG_MEDIA_IN("na_12x19_12x19in", NULL, "12x19", 12, 19),
  95   _PWG_MEDIA_IN("na_b-plus_12x19.17in", NULL, "SuperB", 12, 19.17),
  96   _PWG_MEDIA_IN("na_super-b_13x19in", "super-b", "13x19", 13, 19),
  97   _PWG_MEDIA_IN("na_c_17x22in", "c", "AnsiC", 17, 22),
  98   _PWG_MEDIA_IN("na_arch-c_18x24in", "arch-c", "ARCHC", 18, 24),
  99   _PWG_MEDIA_IN("na_d_22x34in", "d", "AnsiD", 22, 34),
 100   _PWG_MEDIA_IN("na_arch-d_24x36in", "arch-d", "ARCHD", 24, 36),
 101   _PWG_MEDIA_IN("asme_f_28x40in", "f", NULL, 28, 40),
 102   _PWG_MEDIA_IN("na_wide-format_30x42in", NULL, NULL, 30, 42),
 103   _PWG_MEDIA_IN("na_e_34x44in", "e", "AnsiE", 34, 44),
 104   _PWG_MEDIA_IN("na_arch-e_36x48in", "arch-e", "ARCHE", 36, 48),
 105   _PWG_MEDIA_IN("na_f_44x68in", NULL, "AnsiF", 44, 68),
 106
 107   /* Chinese Standard Sheet Media Inch Sizes */
 108   _PWG_MEDIA_IN("roc_16k_7.75x10.75in", NULL, "roc16k", 7.75, 10.75),
 109   _PWG_MEDIA_IN("roc_8k_10.75x15.5in", NULL, "roc8k", 10.75, 15.5),
 110
 111   /* ISO Standard Sheet Media Sizes */
 112   _PWG_MEDIA_MM("iso_a10_26x37mm", "iso-a10", "A10", 26, 37),
 113   _PWG_MEDIA_MM("iso_a9_37x52mm", "iso-a9", "A9", 37, 52),
 114   _PWG_MEDIA_MM("iso_a8_52x74mm", "iso-a8", "A8", 52, 74),
 115   _PWG_MEDIA_MM("iso_a7_74x105mm", "iso-a7", "A7", 74, 105),
 116   _PWG_MEDIA_MM("iso_a6_105x148mm", "iso-a6", "A6", 105, 148),
 117   _PWG_MEDIA_MM("iso_a5_148x210mm", "iso-a5", "A5", 148, 210),
 118   _PWG_MEDIA_MM("iso_a5-extra_174x235mm", NULL, "A5Extra", 174, 235),
 119   _PWG_MEDIA_MM("iso_a4_210x297mm", "iso-a4", "A4", 210, 297),
 120   _PWG_MEDIA_MM("iso_a4-tab_225x297mm", NULL, "A4Tab", 225, 297),
 121   _PWG_MEDIA_MM("iso_a4-extra_235.5x322.3mm", NULL, "A4Extra", 235.5, 322.3),
 122   _PWG_MEDIA_MM("iso_a3_297x420mm", "iso-a3", "A3", 297, 420),
 123   _PWG_MEDIA_MM("iso_a4x3_297x630mm", "iso-a4x3", NULL, 297, 630),
 124   _PWG_MEDIA_MM("iso_a4x4_297x841mm", "iso-a4x4", NULL, 297, 841),
 125   _PWG_MEDIA_MM("iso_a4x5_297x1051mm", "iso-a4x5", NULL, 297, 1051),
 126   _PWG_MEDIA_MM("iso_a4x6_297x1261mm", "iso-a4x6", NULL, 297, 1261),
 127   _PWG_MEDIA_MM("iso_a4x7_297x1471mm", "iso-a4x7", NULL, 297, 1471),
 128   _PWG_MEDIA_MM("iso_a4x8_297x1682mm", "iso-a4x8", NULL, 297, 1682),
 129   _PWG_MEDIA_MM("iso_a4x9_297x1892mm", "iso-a4x9", NULL, 297, 1892),
 130   _PWG_MEDIA_MM("iso_a3-extra_322x445mm", "iso-a3-extra", "A3Extra", 322, 445),
 131   _PWG_MEDIA_MM("iso_a2_420x594mm", "iso-a2", "A2", 420, 594),
 132   _PWG_MEDIA_MM("iso_a3x3_420x891mm", "iso-a3x3", NULL, 420, 891),
 133   _PWG_MEDIA_MM("iso_a3x4_420x1189mm", "iso-a3x4", NULL, 420, 1189),
 134   _PWG_MEDIA_MM("iso_a3x5_420x1486mm", "iso-a3x5", NULL, 420, 1486),
 135   _PWG_MEDIA_MM("iso_a3x6_420x1783mm", "iso-a3x6", NULL, 420, 1783),
 136   _PWG_MEDIA_MM("iso_a3x7_420x2080mm", "iso-a3x7", NULL, 420, 2080),
 137   _PWG_MEDIA_MM("iso_a1_594x841mm", "iso-a1", "A1", 594, 841),
 138   _PWG_MEDIA_MM("iso_a2x3_594x1261mm", "iso-a2x3", NULL, 594, 1261),
 139   _PWG_MEDIA_MM("iso_a2x4_594x1682mm", "iso-a2x4", NULL, 594, 1682),
 140   _PWG_MEDIA_MM("iso_a2x5_594x2102mm", "iso-a2x5", NULL, 594, 2102),
 141   _PWG_MEDIA_MM("iso_a0_841x1189mm", "iso-a0", "A0", 841, 1189),
 142   _PWG_MEDIA_MM("iso_a1x3_841x1783mm", "iso-a1x3", NULL, 841, 1783),
 143   _PWG_MEDIA_MM("iso_a1x4_841x2378mm", "iso-a1x4", NULL, 841, 2378),
 144   _PWG_MEDIA_MM("iso_2a0_1189x1682mm", NULL, NULL, 1189, 1682),
 145   _PWG_MEDIA_MM("iso_a0x3_1189x2523mm", NULL, NULL, 1189, 2523),
 146   _PWG_MEDIA_MM("iso_b10_31x44mm", "iso-b10", "ISOB10", 31, 44),
 147   _PWG_MEDIA_MM("iso_b9_44x62mm", "iso-b9", "ISOB9", 44, 62),
 148   _PWG_MEDIA_MM("iso_b8_62x88mm", "iso-b8", "ISOB8", 62, 88),
 149   _PWG_MEDIA_MM("iso_b7_88x125mm", "iso-b7", "ISOB7", 88, 125),
 150   _PWG_MEDIA_MM("iso_b6_125x176mm", "iso-b6", "ISOB6", 125, 176),
 151   _PWG_MEDIA_MM("iso_b6c4_125x324mm", NULL, NULL, 125, 324),
 152   _PWG_MEDIA_MM("iso_b5_176x250mm", "iso-b5", "ISOB5", 176, 250),
 153   _PWG_MEDIA_MM("iso_b5-extra_201x276mm", NULL, "ISOB5Extra", 201, 276),
 154   _PWG_MEDIA_MM("iso_b4_250x353mm", "iso-b4", "ISOB4", 250, 353),
 155   _PWG_MEDIA_MM("iso_b3_353x500mm", "iso-b3", "ISOB3", 353, 500),
 156   _PWG_MEDIA_MM("iso_b2_500x707mm", "iso-b2", "ISOB2", 500, 707),
 157   _PWG_MEDIA_MM("iso_b1_707x1000mm", "iso-b1", "ISOB1", 707, 1000),
 158   _PWG_MEDIA_MM("iso_b0_1000x1414mm", "iso-b0", "ISOB0", 1000, 1414),
 159   _PWG_MEDIA_MM("iso_c10_28x40mm", "iso-c10", NULL, 28, 40),
 160   _PWG_MEDIA_MM("iso_c9_40x57mm", "iso-c9", NULL, 40, 57),
 161   _PWG_MEDIA_MM("iso_c8_57x81mm", "iso-c8", NULL, 57, 81),
 162   _PWG_MEDIA_MM("iso_c7_81x114mm", "iso-c7", "EnvC7", 81, 114),
 163   _PWG_MEDIA_MM("iso_c7c6_81x162mm", NULL, NULL, 81, 162),
 164   _PWG_MEDIA_MM("iso_c6_114x162mm", "iso-c6", "EnvC6", 114, 162),
 165   _PWG_MEDIA_MM("iso_c6c5_114x229mm", NULL, "EnvC65", 114, 229),
 166   _PWG_MEDIA_MM("iso_c5_162x229mm", "iso-c5", "EnvC5", 162, 229),
 167   _PWG_MEDIA_MM("iso_c4_229x324mm", "iso-c4", "EnvC4", 229, 324),
 168   _PWG_MEDIA_MM("iso_c3_324x458mm", "iso-c3", "EnvC3", 324, 458),
 169   _PWG_MEDIA_MM("iso_c2_458x648mm", "iso-c2", "EnvC2", 458, 648),
 170   _PWG_MEDIA_MM("iso_c1_648x917mm", "iso-c1", "EnvC1", 648, 917),
 171   _PWG_MEDIA_MM("iso_c0_917x1297mm", "iso-c0", "EnvC0", 917, 1297),
 172   _PWG_MEDIA_MM("iso_dl_110x220mm", "iso-designated", "EnvDL", 110, 220),
 173   _PWG_MEDIA_MM("iso_ra2_430x610mm", "iso-ra2", NULL, 430, 610),
 174   _PWG_MEDIA_MM("iso_sra2_450x640mm", "iso-sra2", NULL, 450, 640),
 175   _PWG_MEDIA_MM("iso_ra1_610x860mm", "iso-ra1", NULL, 610, 860),
 176   _PWG_MEDIA_MM("iso_sra1_640x900mm", "iso-sra1", NULL, 640, 900),
 177   _PWG_MEDIA_MM("iso_ra0_860x1220mm", "iso-ra0", NULL, 860, 1220),
 178   _PWG_MEDIA_MM("iso_sra0_900x1280mm", "iso-sra0", NULL, 900, 1280),
 179
 180   /* Japanese Standard Sheet Media Sizes */
 181   _PWG_MEDIA_MM("jis_b10_32x45mm", "jis-b10", "B10", 32, 45),
 182   _PWG_MEDIA_MM("jis_b9_45x64mm", "jis-b9", "B9", 45, 64),
 183   _PWG_MEDIA_MM("jis_b8_64x91mm", "jis-b8", "B8", 64, 91),
 184   _PWG_MEDIA_MM("jis_b7_91x128mm", "jis-b7", "B7", 91, 128),
 185   _PWG_MEDIA_MM("jis_b6_128x182mm", "jis-b6", "B6", 128, 182),
 186   _PWG_MEDIA_MM("jis_b5_182x257mm", "jis-b5", "B5", 182, 257),
 187   _PWG_MEDIA_MM("jis_b4_257x364mm", "jis-b4", "B4", 257, 364),
 188   _PWG_MEDIA_MM("jis_b3_364x515mm", "jis-b3", "B3", 364, 515),
 189   _PWG_MEDIA_MM("jis_b2_515x728mm", "jis-b2", "B2", 515, 728),
 190   _PWG_MEDIA_MM("jis_b1_728x1030mm", "jis-b1", "B1", 728, 1030),
 191   _PWG_MEDIA_MM("jis_b0_1030x1456mm", "jis-b0", "B0", 1030, 1456),
 192   _PWG_MEDIA_MM("jis_exec_216x330mm", NULL, NULL, 216, 330),
 193   _PWG_MEDIA_MM("jpn_chou4_90x205mm", NULL, "EnvChou4", 90, 205),
 194   _PWG_MEDIA_MM("jpn_hagaki_100x148mm", NULL, "Postcard", 100, 148),
 195   _PWG_MEDIA_MM("jpn_you4_105x235mm", NULL, "EnvYou4", 105, 235),
 196   _PWG_MEDIA_MM("jpn_you6_98x190mm", NULL, "EnvYou6", 98, 190),
 197   _PWG_MEDIA_MM("jpn_chou2_111.1x146mm", NULL, NULL, 111.1, 146),
 198   _PWG_MEDIA_MM("jpn_chou3_120x235mm", NULL, "EnvChou3", 120, 235),
 199   _PWG_MEDIA_MM("jpn_oufuku_148x200mm", NULL, "DoublePostcardRotated", 148, 200),
 200   _PWG_MEDIA_MM("jpn_kahu_240x322.1mm", NULL, NULL, 240, 322.1),
 201   _PWG_MEDIA_MM("jpn_kaku2_240x332mm", NULL, "EnvKaku2", 240, 332),
 202
 203   /* Chinese Standard Sheet Media Sizes */
 204   _PWG_MEDIA_MM("prc_32k_97x151mm", NULL, "PRC32K", 97, 151),
 205   _PWG_MEDIA_MM("prc_1_102x165mm", NULL, "EnvPRC1", 102, 165),
 206   _PWG_MEDIA_MM("prc_2_102x176mm", NULL, "EnvPRC2", 102, 176),
 207   _PWG_MEDIA_MM("prc_4_110x208mm", NULL, "EnvPRC4", 110, 208),
 208   _PWG_MEDIA_MM("prc_5_110x220mm", NULL, "EnvPRC5", 110, 220),
 209   _PWG_MEDIA_MM("prc_8_120x309mm", NULL, "EnvPRC8", 120, 309),
 210   _PWG_MEDIA_MM("prc_6_120x320mm", NULL, NULL, 120, 320),
 211   _PWG_MEDIA_MM("prc_3_125x176mm", NULL, "EnvPRC3", 125, 176),
 212   _PWG_MEDIA_MM("prc_16k_146x215mm", NULL, "PRC16K", 146, 215),
 213   _PWG_MEDIA_MM("prc_7_160x230mm", NULL, "EnvPRC7", 160, 230),
 214   _PWG_MEDIA_MM("om_juuro-ku-kai_198x275mm", NULL, NULL, 198, 275),
 215   _PWG_MEDIA_MM("om_pa-kai_267x389mm", NULL, NULL, 267, 389),
 216   _PWG_MEDIA_MM("om_dai-pa-kai_275x395mm", NULL, NULL, 275, 395),
 217   _PWG_MEDIA_MM("prc_10_324x458mm", NULL, "EnvPRC10", 324, 458),
 218
 219   /* Other English Standard Sheet Media Sizes */
 220   _PWG_MEDIA_IN("oe_photo-l_3.5x5in", NULL, "3.5x5", 3.5, 5),
 221
 222   /* Other Metric Standard Sheet Media Sizes */
 223   _PWG_MEDIA_MM("om_small-photo_100x150mm", NULL, "om_small-photo", 100, 150),
 224   _PWG_MEDIA_MM("om_italian_110x230mm", NULL, "EnvItalian", 110, 230),
 225   _PWG_MEDIA_MM("om_postfix_114x229mm", NULL, NULL, 114, 229),
 226   _PWG_MEDIA_MM("om_large-photo_200x300", NULL, "om_large-photo", 200, 300),
 227   _PWG_MEDIA_MM("om_folio_210x330mm", "folio", "Folio", 210, 330),
 228   _PWG_MEDIA_MM("om_folio-sp_215x315mm", NULL, "FolioSP", 215, 315),
 229   _PWG_MEDIA_MM("om_invite_220x220mm", NULL, "EnvInvite", 220, 220)
 230 };
 231
 232
 233 /*
 234  * '_pwgFormatInches()' - Convert and format PWG units as inches.
 235  */
 236
 237 char *                                  /* O - String */
 238 _pwgFormatInches(char   *buf,           /* I - Buffer */
 239                  size_t bufsize,        /* I - Size of buffer */
 240                  int    val)            /* I - Value in hundredths of millimeters */
 241 {
 242   int   thousandths,                    /* Thousandths of inches */
 243         integer,                        /* Integer portion */
 244         fraction;                       /* Fractional portion */
 245
 246
 247  /*
 248   * Convert hundredths of millimeters to thousandths of inches and round to
 249   * the nearest thousandth.
 250   */
 251
 252   thousandths = (val * 1000 + 1270) / 2540;
 253   integer     = thousandths / 1000;
 254   fraction    = thousandths % 1000;
 255
 256  /*
 257   * Format as a pair of integers (avoids locale stuff), avoiding trailing
 258   * zeros...
 259   */
 260
 261   if (fraction == 0)
 262     snprintf(buf, bufsize, "%d", integer);
 263   else if (fraction % 10)
 264     snprintf(buf, bufsize, "%d.%03d", integer, fraction);
 265   else if (fraction % 100)
 266     snprintf(buf, bufsize, "%d.%02d", integer, fraction / 10);
 267   else
 268     snprintf(buf, bufsize, "%d.%01d", integer, fraction / 100);
 269
 270   return (buf);
 271 }
 272
 273
 274 /*
 275  * '_pwgFormatMillimeters()' - Convert and format PWG units as millimeters.
 276  */
 277
 278 char *                                  /* O - String */
 279 _pwgFormatMillimeters(char   *buf,      /* I - Buffer */
 280                       size_t bufsize,   /* I - Size of buffer */
 281                       int    val)       /* I - Value in hundredths of millimeters */
 282 {
 283   int   integer,                        /* Integer portion */
 284         fraction;                       /* Fractional portion */
 285
 286
 287  /*
 288   * Convert hundredths of millimeters to integer and fractional portions.
 289   */
 290
 291   integer     = val / 100;
 292   fraction    = val % 100;
 293
 294  /*
 295   * Format as a pair of integers (avoids locale stuff), avoiding trailing
 296   * zeros...
 297   */
 298
 299   if (fraction == 0)
 300     snprintf(buf, bufsize, "%d", integer);
 301   else if (fraction % 10)
 302     snprintf(buf, bufsize, "%d.%02d", integer, fraction);
 303   else
 304     snprintf(buf, bufsize, "%d.%01d", integer, fraction / 10);
 305
 306   return (buf);
 307 }
 308
 309
 310 /*
 311  * '_pwgGenerateSize()' - Generate a PWG size keyword.
 312  */
 313
 314 void
 315 _pwgGenerateSize(char       *keyword,   /* I - Keyword buffer */
 316                  size_t     keysize,    /* I - Size of keyword buffer */
 317                  const char *prefix,    /* I - Prefix for PWG size or NULL */
 318                  const char *name,      /* I - Size name or NULL */
 319                  int        width,      /* I - Width of page in 2540ths */
 320                  int        length)     /* I - Length of page in 2540ths */
 321 {
 322   const char    *units;                 /* Units to report */
 323   char          usize[12 + 1 + 12 + 3], /* Unit size: NNNNNNNNNNNNxNNNNNNNNNNNNuu */
 324                 *uptr;                  /* Pointer into unit size */
 325   char          *(*format)(char *, size_t, int);
 326                                         /* Formatting function */
 327
 328
 329   if ((width % 635) == 0 && (length % 635) == 0)
 330   {
 331    /*
 332     * Use inches since the size is a multiple of 1/4 inch.
 333     */
 334
 335     units   = "in";
 336     format  = _pwgFormatInches;
 337
 338     if (!prefix)
 339       prefix = "oe";
 340   }
 341   else
 342   {
 343    /*
 344     * Use millimeters since the size is not a multiple of 1/4 inch.
 345     */
 346
 347     units   = "mm";
 348     format  = _pwgFormatMillimeters;
 349
 350     if (!prefix)
 351       prefix = "om";
 352   }
 353
 354   uptr = usize;
 355   (*format)(uptr, sizeof(usize) - (uptr - usize), width);
 356   uptr += strlen(uptr);
 357   *uptr++ = 'x';
 358   (*format)(uptr, sizeof(usize) - (uptr - usize), length);
 359   uptr += strlen(uptr);
 360
 361  /*
 362   * Safe because usize can hold up to 12 + 1 + 12 + 4 bytes.
 363   */
 364
 365   memcpy(uptr, units, 3);
 366
 367   if (!name)
 368     name = usize;
 369
 370  /*
 371   * Format the name...
 372   */
 373
 374   snprintf(keyword, keysize, "%s_%s_%s", prefix, name, usize);
 375 }
 376
 377
 378 /*
 379  * '_pwgInitSize()' - Initialize a PWG size using IPP job template attributes.
 380  */
 381
 382 int                                     /* O - 1 if size was initialize, 0 otherwise */
 383 _pwgInitSize(_pwg_size_t *size,         /* I - Size to initialize */
 384              ipp_t       *job,          /* I - Job template attributes */
 385              int         *margins_set)  /* O - 1 if margins were set, 0 otherwise */
 386 {
 387   ipp_attribute_t *media,               /* media attribute */
 388                 *media_bottom_margin,   /* media-bottom-margin member attribute */
 389                 *media_col,             /* media-col attribute */
 390                 *media_left_margin,     /* media-left-margin member attribute */
 391                 *media_right_margin,    /* media-right-margin member attribute */
 392                 *media_size,            /* media-size member attribute */
 393                 *media_top_margin,      /* media-top-margin member attribute */
 394                 *x_dimension,           /* x-dimension member attribute */
 395                 *y_dimension;           /* y-dimension member attribute */
 396   _pwg_media_t  *pwg;                   /* PWG media value */
 397
 398
 399  /*
 400   * Range check input...
 401   */
 402
 403   if (!size || !job || !margins_set)
 404     return (0);
 405
 406  /*
 407   * Look for media-col and then media...
 408   */
 409
 410   memset(size, 0, sizeof(_pwg_size_t));
 411   *margins_set = 0;
 412
 413   if ((media_col = ippFindAttribute(job, "media-col",
 414                                     IPP_TAG_BEGIN_COLLECTION)) != NULL)
 415   {
 416    /*
 417     * Got media-col, look for media-size member attribute...
 418     */
 419
 420     if ((media_size = ippFindAttribute(media_col->values[0].collection,
 421                                        "media-size",
 422                                        IPP_TAG_BEGIN_COLLECTION)) != NULL)
 423     {
 424      /*
 425       * Got media-size, look for x-dimension and y-dimension member
 426       * attributes...
 427       */
 428
 429       x_dimension = ippFindAttribute(media_size->values[0].collection,
 430                                      "x-dimension", IPP_TAG_INTEGER);
 431       y_dimension = ippFindAttribute(media_size->values[0].collection,
 432                                      "y-dimension", IPP_TAG_INTEGER);
 433
 434       if (x_dimension && y_dimension)
 435       {
 436         size->width  = x_dimension->values[0].integer;
 437         size->length = y_dimension->values[0].integer;
 438       }
 439       else if (!x_dimension)
 440       {
 441         _cupsSetError(IPP_INTERNAL_ERROR,
 442                       _("Missing x-dimension in media-size."), 1);
 443         return (0);
 444       }
 445       else if (!y_dimension)
 446       {
 447         _cupsSetError(IPP_INTERNAL_ERROR,
 448                       _("Missing y-dimension in media-size."), 1);
 449         return (0);
 450       }
 451     }
 452     else
 453     {
 454       _cupsSetError(IPP_INTERNAL_ERROR, _("Missing media-size in media-col."),
 455                     1);
 456       return (0);
 457     }
 458
 459     /* media-*-margin */
 460     media_bottom_margin = ippFindAttribute(media_col->values[0].collection,
 461                                            "media-bottom-margin",
 462                                            IPP_TAG_INTEGER);
 463     media_left_margin   = ippFindAttribute(media_col->values[0].collection,
 464                                            "media-left-margin",
 465                                            IPP_TAG_INTEGER);
 466     media_right_margin  = ippFindAttribute(media_col->values[0].collection,
 467                                            "media-right-margin",
 468                                            IPP_TAG_INTEGER);
 469     media_top_margin    = ippFindAttribute(media_col->values[0].collection,
 470                                            "media-top-margin",
 471                                            IPP_TAG_INTEGER);
 472     if (media_bottom_margin && media_left_margin && media_right_margin &&
 473         media_top_margin)
 474     {
 475       *margins_set = 1;
 476       size->bottom = media_bottom_margin->values[0].integer;
 477       size->left   = media_left_margin->values[0].integer;
 478       size->right  = media_right_margin->values[0].integer;
 479       size->top    = media_top_margin->values[0].integer;
 480     }
 481   }
 482   else
 483   {
 484     if ((media = ippFindAttribute(job, "media", IPP_TAG_NAME)) == NULL)
 485       if ((media = ippFindAttribute(job, "media", IPP_TAG_KEYWORD)) == NULL)
 486         if ((media = ippFindAttribute(job, "PageSize", IPP_TAG_NAME)) == NULL)
 487           media = ippFindAttribute(job, "PageRegion", IPP_TAG_NAME);
 488
 489     if (media)
 490     {
 491       const char *name = media->values[0].string.text;
 492                                         /* Name string */
 493
 494       if ((pwg = _pwgMediaForPWG(name)) == NULL)
 495       {
 496        /*
 497         * Not a PWG name, try a legacy name...
 498         */
 499
 500         if ((pwg = _pwgMediaForLegacy(name)) == NULL)
 501         {
 502          /*
 503           * Not a legacy name, try a PPD name...
 504           */
 505
 506           const char    *suffix;        /* Suffix on media string */
 507
 508           pwg = _pwgMediaForPPD(name);
 509           if (pwg &&
 510               (suffix = name + strlen(name) - 10 /* .FullBleed */) > name &&
 511               !_cups_strcasecmp(suffix, ".FullBleed"))
 512           {
 513            /*
 514             * Indicate that margins are set with the default values of 0.
 515             */
 516
 517             *margins_set = 1;
 518           }
 519         }
 520       }
 521
 522       if (pwg)
 523       {
 524         size->width  = pwg->width;
 525         size->length = pwg->length;
 526       }
 527       else
 528       {
 529         _cupsSetError(IPP_INTERNAL_ERROR, _("Unsupported media value."), 1);
 530         return (0);
 531       }
 532     }
 533     else
 534     {
 535       _cupsSetError(IPP_INTERNAL_ERROR, _("Missing media or media-col."), 1);
 536       return (0);
 537     }
 538   }
 539
 540   return (1);
 541 }
 542
 543
 544 /*
 545  * '_pwgMediaForLegacy()' - Find a PWG media size by ISO/IPP legacy name.
 546  */
 547
 548 _pwg_media_t *                          /* O - Matching size or NULL */
 549 _pwgMediaForLegacy(
 550     const char *legacy)                 /* I - Legacy size name */
 551 {
 552   _pwg_media_t  key;                    /* Search key */
 553   _cups_globals_t *cg = _cupsGlobals(); /* Global data */
 554
 555
 556  /*
 557   * Range check input...
 558   */
 559
 560   if (!legacy)
 561     return (NULL);
 562
 563  /*
 564   * Build the lookup table for PWG names as needed...
 565   */
 566
 567   if (!cg->leg_size_lut)
 568   {
 569     int                 i;              /* Looping var */
 570     _pwg_media_t        *size;          /* Current size */
 571
 572     cg->leg_size_lut = cupsArrayNew((cups_array_func_t)pwg_compare_legacy,
 573                                     NULL);
 574
 575     for (i = (int)(sizeof(cups_pwg_media) / sizeof(cups_pwg_media[0])),
 576              size = (_pwg_media_t *)cups_pwg_media;
 577          i > 0;
 578          i --, size ++)
 579       if (size->legacy)
 580         cupsArrayAdd(cg->leg_size_lut, size);
 581   }
 582
 583  /*
 584   * Lookup the name...
 585   */
 586
 587   key.legacy = legacy;
 588   return ((_pwg_media_t *)cupsArrayFind(cg->leg_size_lut, &key));
 589 }
 590
 591
 592 /*
 593  * '_pwgMediaForPPD()' - Find a PWG media size by Adobe PPD name.
 594  */
 595
 596 _pwg_media_t *                          /* O - Matching size or NULL */
 597 _pwgMediaForPPD(const char *ppd)        /* I - PPD size name */
 598 {
 599   _pwg_media_t  key,                    /* Search key */
 600                 *size;                  /* Matching size */
 601   _cups_globals_t *cg = _cupsGlobals(); /* Global data */
 602
 603
 604  /*
 605   * Range check input...
 606   */
 607
 608   if (!ppd)
 609     return (NULL);
 610
 611  /*
 612   * Build the lookup table for PWG names as needed...
 613   */
 614
 615   if (!cg->ppd_size_lut)
 616   {
 617     int i;                              /* Looping var */
 618
 619     cg->ppd_size_lut = cupsArrayNew((cups_array_func_t)pwg_compare_ppd, NULL);
 620
 621     for (i = (int)(sizeof(cups_pwg_media) / sizeof(cups_pwg_media[0])),
 622              size = (_pwg_media_t *)cups_pwg_media;
 623          i > 0;
 624          i --, size ++)
 625       if (size->ppd)
 626         cupsArrayAdd(cg->ppd_size_lut, size);
 627   }
 628
 629  /*
 630   * Lookup the name...
 631   */
 632
 633   key.ppd = ppd;
 634   if ((size = (_pwg_media_t *)cupsArrayFind(cg->ppd_size_lut, &key)) == NULL)
 635   {
 636    /*
 637     * See if the name is of the form:
 638     *
 639     *   [Custom.]WIDTHxLENGTH[.FullBleed]    - Size in points/inches [borderless]
 640     *   [Custom.]WIDTHxLENGTHcm[.FullBleed]  - Size in centimeters [borderless]
 641     *   [Custom.]WIDTHxLENGTHft[.FullBleed]  - Size in feet [borderless]
 642     *   [Custom.]WIDTHxLENGTHin[.FullBleed]  - Size in inches [borderless]
 643     *   [Custom.]WIDTHxLENGTHm[.FullBleed]   - Size in meters [borderless]
 644     *   [Custom.]WIDTHxLENGTHmm[.FullBleed]  - Size in millimeters [borderless]
 645     *   [Custom.]WIDTHxLENGTHpt[.FullBleed]  - Size in points [borderless]
 646     */
 647
 648     double              w, l,           /* Width and length of page */
 649                         factor;         /* Unit scaling factor */
 650     char                *ptr;           /* Pointer into name */
 651     struct lconv        *loc;           /* Locale data */
 652     int                 custom;         /* Custom page size? */
 653
 654     if (!_cups_strncasecmp(ppd, "Custom.", 7))
 655     {
 656       custom = 1;
 657       factor = 2540.0 / 72.0;
 658       ptr    = (char *)ppd + 7;
 659     }
 660     else
 661     {
 662       custom = 0;
 663       factor = 2540.0;
 664       ptr    = (char *)ppd;
 665     }
 666
 667     loc = localeconv();
 668     w   = _cupsStrScand(ptr, &ptr, loc);
 669
 670     if (ptr && ptr > ppd && *ptr == 'x')
 671     {
 672       l = _cupsStrScand(ptr + 1, &ptr, loc);
 673
 674       if (ptr &&
 675           (!*ptr ||
 676            !_cups_strcasecmp(ptr, "FullBleed") ||
 677            !_cups_strcasecmp(ptr, ".FullBleed") ||
 678            !_cups_strcasecmp(ptr, "cm") ||
 679            !_cups_strcasecmp(ptr, "cm.FullBleed") ||
 680            !_cups_strcasecmp(ptr, "ft") ||
 681            !_cups_strcasecmp(ptr, "ft.FullBleed") ||
 682            !_cups_strcasecmp(ptr, "in") ||
 683            !_cups_strcasecmp(ptr, "in.FullBleed") ||
 684            !_cups_strcasecmp(ptr, "m") ||
 685            !_cups_strcasecmp(ptr, "m.FullBleed") ||
 686            !_cups_strcasecmp(ptr, "mm") ||
 687            !_cups_strcasecmp(ptr, "mm.FullBleed") ||
 688            !_cups_strcasecmp(ptr, "pt") ||
 689            !_cups_strcasecmp(ptr, "pt.FullBleed")))
 690       {
 691         size = &(cg->pwg_media);
 692
 693         if (!_cups_strncasecmp(ptr, "cm", 2))
 694           factor = 1000.0;
 695         else if (!_cups_strncasecmp(ptr, "ft", 2))
 696           factor = 2540.0 * 12.0;
 697         else if (!_cups_strncasecmp(ptr, "in", 2))
 698           factor = 2540.0;
 699         else if (!_cups_strncasecmp(ptr, "mm", 2))
 700           factor = 100.0;
 701         else if (*ptr == 'm' || *ptr == 'M')
 702           factor = 100000.0;
 703         else if (!_cups_strncasecmp(ptr, "pt", 2))
 704           factor = 2540.0 / 72.0;
 705
 706        /*
 707         * Not a standard size; convert it to a PWG custom name of the form:
 708         *
 709         *     [oe|om]_WIDTHxHEIGHTuu_WIDTHxHEIGHTuu
 710         */
 711
 712         size->width  = (int)(w * factor);
 713         size->length = (int)(l * factor);
 714         size->pwg    = cg->pwg_name;
 715
 716         _pwgGenerateSize(cg->pwg_name, sizeof(cg->pwg_name),
 717                          custom ? "custom" : NULL, custom ? ppd + 7 : NULL,
 718                          size->width, size->length);
 719       }
 720     }
 721   }
 722
 723   return (size);
 724 }
 725
 726
 727 /*
 728  * '_pwgMediaForPWG()' - Find a PWG media size by 5101.1 self-describing name.
 729  */
 730
 731 _pwg_media_t *                          /* O - Matching size or NULL */
 732 _pwgMediaForPWG(const char *pwg)        /* I - PWG size name */
 733 {
 734   char          *ptr;                   /* Pointer into name */
 735   _pwg_media_t  key,                    /* Search key */
 736                 *size;                  /* Matching size */
 737   _cups_globals_t *cg = _cupsGlobals(); /* Global data */
 738
 739
 740  /*
 741   * Range check input...
 742   */
 743
 744   if (!pwg)
 745     return (NULL);
 746
 747  /*
 748   * Build the lookup table for PWG names as needed...
 749   */
 750
 751   if (!cg->pwg_size_lut)
 752   {
 753     int i;                              /* Looping var */
 754
 755     cg->pwg_size_lut = cupsArrayNew((cups_array_func_t)pwg_compare_pwg, NULL);
 756
 757     for (i = (int)(sizeof(cups_pwg_media) / sizeof(cups_pwg_media[0])),
 758              size = (_pwg_media_t *)cups_pwg_media;
 759          i > 0;
 760          i --, size ++)
 761       cupsArrayAdd(cg->pwg_size_lut, size);
 762   }
 763
 764  /*
 765   * Lookup the name...
 766   */
 767
 768   key.pwg = pwg;
 769   if ((size = (_pwg_media_t *)cupsArrayFind(cg->pwg_size_lut, &key)) == NULL &&
 770       (ptr = (char *)strchr(pwg, '_')) != NULL &&
 771       (ptr = (char *)strchr(ptr + 1, '_')) != NULL)
 772   {
 773    /*
 774     * Try decoding the self-describing name of the form:
 775     *
 776     * class_name_WWWxHHHin
 777     * class_name_WWWxHHHmm
 778     */
 779
 780     double              w, l;           /* Width and length of page */
 781     struct lconv        *loc;           /* Locale data */
 782
 783     ptr ++;
 784     loc = localeconv();
 785     w   = _cupsStrScand(ptr, &ptr, loc);
 786
 787     if (ptr && *ptr == 'x')
 788     {
 789       l = _cupsStrScand(ptr + 1, &ptr, loc);
 790
 791       if (ptr && (!strcmp(ptr, "in") || !strcmp(ptr, "mm")))
 792       {
 793         size = &(cg->pwg_media);
 794
 795         if (!strcmp(ptr, "mm"))
 796         {
 797           size->width  = (int)(w * 100);
 798           size->length = (int)(l * 100);
 799         }
 800         else
 801         {
 802           size->width  = (int)(w * 2540);
 803           size->length = (int)(l * 2540);
 804         }
 805
 806         strlcpy(cg->pwg_name, pwg, sizeof(cg->pwg_name));
 807         size->pwg = cg->pwg_name;
 808       }
 809     }
 810   }
 811
 812   return (size);
 813 }
 814
 815
 816 /*
 817  * '_pwgMediaForSize()' - Get the PWG media name for a given size.
 818  */
 819
 820 _pwg_media_t *                          /* O - PWG media name */
 821 _pwgMediaForSize(int width,             /* I - Width in 2540ths */
 822                  int length)            /* I - Length in 2540ths */
 823 {
 824   int           i;                      /* Looping var */
 825   _pwg_media_t  *media,                 /* Current media */
 826                 *best_media = NULL;     /* Best match */
 827   int           dw, dl,                 /* Difference in width and length */
 828                 best_dw = 999,          /* Best difference in width and length */
 829                 best_dl = 999;
 830   _cups_globals_t *cg = _cupsGlobals(); /* Global data */
 831
 832
 833  /*
 834   * Range check input...
 835   */
 836
 837   if (width <= 0 || length <= 0)
 838     return (NULL);
 839
 840  /*
 841   * Look for a standard size...
 842   */
 843
 844   for (i = (int)(sizeof(cups_pwg_media) / sizeof(cups_pwg_media[0])),
 845            media = (_pwg_media_t *)cups_pwg_media;
 846        i > 0;
 847        i --, media ++)
 848   {
 849    /*
 850     * Adobe uses a size matching algorithm with an epsilon of 5 points, which
 851     * is just about 176/2540ths...
 852     */
 853
 854     dw = abs(media->width - width);
 855     dl = abs(media->length - length);
 856
 857     if (!dw && !dl)
 858       return (media);
 859     else if (dw < 176 && dl < 176)
 860     {
 861       if (dw <= best_dw && dl <= best_dl)
 862       {
 863         best_media = media;
 864         best_dw    = dw;
 865         best_dl    = dl;
 866       }
 867     }
 868   }
 869
 870   if (best_media)
 871     return (best_media);
 872
 873  /*
 874   * Not a standard size; convert it to a PWG custom name of the form:
 875   *
 876   *     custom_WIDTHxHEIGHTuu_WIDTHxHEIGHTuu
 877   */
 878
 879   _pwgGenerateSize(cg->pwg_name, sizeof(cg->pwg_name), "custom", NULL, width,
 880                    length);
 881
 882   cg->pwg_media.pwg    = cg->pwg_name;
 883   cg->pwg_media.width  = width;
 884   cg->pwg_media.length = length;
 885
 886   return (&(cg->pwg_media));
 887 }
 888
 889
 890 /*
 891  * 'pwg_compare_legacy()' - Compare two sizes using the legacy names.
 892  */
 893
 894 static int                              /* O - Result of comparison */
 895 pwg_compare_legacy(_pwg_media_t *a,     /* I - First size */
 896                    _pwg_media_t *b)     /* I - Second size */
 897 {
 898   return (strcmp(a->legacy, b->legacy));
 899 }
 900
 901
 902 /*
 903  * 'pwg_compare_ppd()' - Compare two sizes using the PPD names.
 904  */
 905
 906 static int                              /* O - Result of comparison */
 907 pwg_compare_ppd(_pwg_media_t *a,        /* I - First size */
 908                 _pwg_media_t *b)        /* I - Second size */
 909 {
 910   return (strcmp(a->ppd, b->ppd));
 911 }
 912
 913
 914 /*
 915  * 'pwg_compare_pwg()' - Compare two sizes using the PWG names.
 916  */
 917
 918 static int                              /* O - Result of comparison */
 919 pwg_compare_pwg(_pwg_media_t *a,        /* I - First size */
 920                 _pwg_media_t *b)        /* I - Second size */
 921 {
 922   return (strcmp(a->pwg, b->pwg));
 923 }
 924
 925
 926 /*
 927  * End of "$Id$".
 928  */