modules/lcms/src/cmsnamed.c

   1 //
   2 //  Little cms
   3 //  Copyright (C) 1998-2007 Marti Maria
   4 //
   5 // Permission is hereby granted, free of charge, to any person obtaining
   6 // a copy of this software and associated documentation files (the "Software"),
   7 // to deal in the Software without restriction, including without limitation
   8 // the rights to use, copy, modify, merge, publish, distribute, sublicense,
   9 // and/or sell copies of the Software, and to permit persons to whom the Software
  10 // is furnished to do so, subject to the following conditions:
  11 //
  12 // The above copyright notice and this permission notice shall be included in
  13 // all copies or substantial portions of the Software.
  14 //
  15 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  16 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO
  17 // THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  18 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
  19 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
  20 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
  21 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  22
  23
  24 // Named color support
  25
  26 #include "lcms.h"
  27
  28
  29
  30 static
  31 LPcmsNAMEDCOLORLIST GrowNamedColorList(LPcmsNAMEDCOLORLIST v, int ByElements)
  32 {
  33     if (ByElements > v ->Allocated) {
  34
  35         LPcmsNAMEDCOLORLIST TheNewList;
  36         int NewElements;
  37         size_t size;
  38
  39         if (v ->Allocated == 0)
  40             NewElements = 64;   // Initial guess
  41         else
  42             NewElements = v ->Allocated;
  43
  44         while (ByElements > NewElements)
  45                 NewElements *= 2;
  46
  47         size = sizeof(cmsNAMEDCOLORLIST) + (sizeof(cmsNAMEDCOLOR) * NewElements);
  48         TheNewList = (LPcmsNAMEDCOLORLIST) _cmsMalloc(size);
  49
  50
  51         if (TheNewList == NULL) {
  52             cmsSignalError(LCMS_ERRC_ABORTED, "Out of memory reallocating named color list");
  53             return NULL;
  54         }
  55         else {
  56               ZeroMemory(TheNewList, size);
  57               CopyMemory(TheNewList, v, sizeof(cmsNAMEDCOLORLIST) + (v ->nColors - 1) * sizeof(cmsNAMEDCOLOR));
  58               TheNewList -> Allocated = NewElements;
  59
  60               _cmsFree(v);
  61               return TheNewList;
  62         }
  63     }
  64
  65     return v;
  66 }
  67
  68
  69 LPcmsNAMEDCOLORLIST cmsAllocNamedColorList(int n)
  70 {
  71     size_t size = sizeof(cmsNAMEDCOLORLIST) + (n - 1) * sizeof(cmsNAMEDCOLOR);
  72
  73     LPcmsNAMEDCOLORLIST v = (LPcmsNAMEDCOLORLIST) _cmsMalloc(size);
  74
  75
  76     if (v == NULL) {
  77         cmsSignalError(LCMS_ERRC_ABORTED, "Out of memory creating named color list");
  78         return NULL;
  79     }
  80
  81     ZeroMemory(v, size);
  82
  83     v ->nColors   = n;
  84     v ->Allocated = n;
  85     v ->Prefix[0] = 0;
  86     v ->Suffix[0] = 0;
  87
  88     return v;
  89 }
  90
  91 void cmsFreeNamedColorList(LPcmsNAMEDCOLORLIST v)
  92 {
  93     if (v == NULL) {
  94         cmsSignalError(LCMS_ERRC_RECOVERABLE, "Couldn't free a NULL named color list");
  95         return;
  96     }
  97
  98     _cmsFree(v);
  99 }
 100
 101 LCMSBOOL cmsAppendNamedColor(cmsHTRANSFORM xform, const char* Name, WORD PCS[3], WORD Colorant[MAXCHANNELS])
 102 {
 103     _LPcmsTRANSFORM v = (_LPcmsTRANSFORM) xform;
 104     LPcmsNAMEDCOLORLIST List;
 105     int i;
 106
 107     if (v ->NamedColorList == NULL) return FALSE;
 108
 109     v ->NamedColorList = GrowNamedColorList(v ->NamedColorList, v->NamedColorList ->nColors + 1);
 110
 111     List = v ->NamedColorList;
 112
 113     for (i=0; i < MAXCHANNELS; i++)
 114         List ->List[List ->nColors].DeviceColorant[i] = Colorant[i];
 115
 116     for (i=0; i < 3; i++)
 117         List ->List[List ->nColors].PCS[i] = PCS[i];
 118
 119     strncpy(List ->List[List ->nColors].Name, Name, MAX_PATH-1);
 120
 121     List ->nColors++;
 122     return TRUE;
 123 }
 124
 125
 126
 127 // Returns named color count
 128
 129 int LCMSEXPORT cmsNamedColorCount(cmsHTRANSFORM xform)
 130 {
 131      _LPcmsTRANSFORM v = (_LPcmsTRANSFORM) xform;
 132
 133      if (v ->NamedColorList == NULL) return 0;
 134      return v ->NamedColorList ->nColors;
 135 }
 136
 137
 138 LCMSBOOL LCMSEXPORT cmsNamedColorInfo(cmsHTRANSFORM xform, int nColor, char* Name, char* Prefix, char* Suffix)
 139 {
 140     _LPcmsTRANSFORM v = (_LPcmsTRANSFORM) xform;
 141
 142
 143      if (v ->NamedColorList == NULL) return FALSE;
 144
 145      if (nColor < 0 || nColor >= cmsNamedColorCount(xform)) return FALSE;
 146
 147      if (Name) strncpy(Name, v ->NamedColorList->List[nColor].Name, 31);
 148      if (Prefix) strncpy(Prefix, v ->NamedColorList->Prefix, 31);
 149      if (Suffix) strncpy(Suffix, v ->NamedColorList->Suffix, 31);
 150
 151      return TRUE;
 152 }
 153
 154
 155 int  LCMSEXPORT cmsNamedColorIndex(cmsHTRANSFORM xform, const char* Name)
 156 {
 157     _LPcmsTRANSFORM v = (_LPcmsTRANSFORM) xform;
 158     int i, n;
 159
 160          if (v ->NamedColorList == NULL) return -1;
 161
 162         n = cmsNamedColorCount(xform);
 163         for (i=0; i < n; i++) {
 164             if (stricmp(Name,  v ->NamedColorList->List[i].Name) == 0)
 165                     return i;
 166         }
 167
 168         return -1;
 169 }
 170
 171