dlls/mscms/profile.c

   1 /*
   2  * MSCMS - Color Management System for Wine
   3  *
   4  * Copyright 2004 Hans Leidekker
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  */
  20
  21 #include "config.h"
  22 #include "wine/debug.h"
  23
  24 #include <stdarg.h>
  25
  26 #include "windef.h"
  27 #include "winbase.h"
  28 #include "winnls.h"
  29
  30 #include "wingdi.h"
  31 #include "icm.h"
  32
  33 #define LCMS_API_FUNCTION(f) extern typeof(f) * p##f;
  34 #include "lcms_api.h"
  35 #undef LCMS_API_FUNCTION
  36
  37 WINE_DEFAULT_DEBUG_CHANNEL(mscms);
  38
  39 BOOL WINAPI GetColorDirectoryA( PCSTR machine, PSTR buffer, PDWORD size )
  40 {
  41     INT len;
  42     LPWSTR bufferW;
  43     BOOL ret = FALSE;
  44     DWORD sizeW = *size * sizeof(WCHAR);
  45
  46     TRACE( "( %p, %ld )\n", buffer, *size );
  47
  48     if (machine || !buffer) return FALSE;
  49
  50     bufferW = HeapAlloc( GetProcessHeap(), 0, sizeW );
  51
  52     if (bufferW)
  53     {
  54         ret = GetColorDirectoryW( NULL, bufferW, &sizeW );
  55         *size = sizeW / sizeof(WCHAR);
  56
  57         if (ret)
  58         {
  59             len = WideCharToMultiByte( CP_ACP, 0, bufferW, *size, buffer, *size, NULL, NULL );
  60             if (!len) ret = FALSE;
  61         }
  62
  63         HeapFree( GetProcessHeap(), 0, bufferW );
  64     }
  65
  66     return ret;
  67 }
  68
  69 BOOL WINAPI GetColorDirectoryW( PCWSTR machine, PWSTR buffer, PDWORD size )
  70 {
  71     /* FIXME: Get this directory from the registry? */
  72     static const WCHAR colordir[] =
  73     { 'c',':','\\','w','i','n','d','o','w','s','\\', 's','y','s','t','e','m','3','2',
  74       '\\','s','p','o','o','l','\\','d','r','i','v','e','r','s','\\','c','o','l','o','r',0 };
  75
  76     DWORD len;
  77
  78     TRACE( "( %p, %ld )\n", buffer, *size );
  79
  80     if (machine || !buffer) return FALSE;
  81
  82     len = lstrlenW( colordir ) * sizeof(WCHAR);
  83
  84     if (len <= *size)
  85     {
  86         lstrcatW( buffer, colordir );
  87         return TRUE;
  88     }
  89
  90     *size = len;
  91     return FALSE;
  92 }
  93
  94 BOOL WINAPI InstallColorProfileA( PCSTR machine, PCSTR profile )
  95 {
  96     UINT len;
  97     LPWSTR profileW;
  98     BOOL ret = FALSE;
  99
 100     TRACE( "( %s )\n", debugstr_a(profile) );
 101
 102     if (machine || !profile) return FALSE;
 103
 104     len = MultiByteToWideChar( CP_ACP, 0, profile, -1, NULL, 0 );
 105     profileW = HeapAlloc( GetProcessHeap(), 0, len * sizeof(WCHAR) );
 106
 107     if (profileW)
 108     {
 109         MultiByteToWideChar( CP_ACP, 0, profile, -1, profileW, len );
 110
 111         ret = InstallColorProfileW( NULL, profileW );
 112         HeapFree( GetProcessHeap(), 0, profileW );
 113     }
 114
 115     return ret;
 116 }
 117
 118 BOOL WINAPI InstallColorProfileW( PCWSTR machine, PCWSTR profile )
 119 {
 120     FIXME( "( %s ) stub\n", debugstr_w(profile) );
 121
 122     if (machine || !profile) return FALSE;
 123
 124     return FALSE;
 125 }
 126
 127 BOOL WINAPI UninstallColorProfileA( PCSTR machine, PCSTR profile, BOOL delete )
 128 {
 129     if (machine || !profile) return FALSE;
 130
 131     if (delete)
 132         return DeleteFileA( profile );
 133
 134     return TRUE;
 135 }
 136
 137 BOOL WINAPI UninstallColorProfileW( PCWSTR machine, PCWSTR profile, BOOL delete )
 138 {
 139     if (machine || !profile) return FALSE;
 140
 141     if (delete)
 142         return DeleteFileW( profile );
 143
 144     return TRUE;
 145 }
 146
 147 HPROFILE WINAPI OpenColorProfileA( PPROFILE profile, DWORD access, DWORD sharing, DWORD creation )
 148 {
 149     HPROFILE handle = NULL;
 150
 151     TRACE( "( %p, %lx, %lx, %lx )\n", profile, access, sharing, creation );
 152
 153     if (!profile || !profile->pProfileData) return NULL;
 154
 155     /* No AW conversion needed for memory based profiles */
 156     if (profile->dwType & PROFILE_MEMBUFFER)
 157         return OpenColorProfileW( profile, access, sharing, creation );
 158
 159     if (profile->dwType & PROFILE_FILENAME)
 160     {
 161         UINT len;
 162         PROFILE profileW;
 163
 164         profileW.dwType = profile->dwType;
 165
 166         len = MultiByteToWideChar( CP_ACP, 0, profile->pProfileData, -1, NULL, 0 );
 167         profileW.pProfileData = HeapAlloc( GetProcessHeap(), 0, len * sizeof(WCHAR) );
 168
 169         if (profileW.pProfileData)
 170         {
 171             profileW.cbDataSize = len * sizeof(WCHAR);
 172             MultiByteToWideChar( CP_ACP, 0, profile->pProfileData, -1, profileW.pProfileData, len );
 173
 174             handle = OpenColorProfileW( &profileW, access, sharing, creation );
 175             HeapFree( GetProcessHeap(), 0, profileW.pProfileData );
 176         }
 177     }
 178
 179     return handle;
 180 }
 181
 182 /******************************************************************************
 183  * OpenColorProfileW               [MSCMS.@]
 184  *
 185  * Open a color profile.
 186  *
 187  * PARAMS
 188  *  profile   [I] Pointer to a color profile structure
 189  *  access    [I] Desired access
 190  *  sharing   [I] Sharing mode
 191  *  creation  [I] Creation mode
 192  *
 193  * RETURNS
 194  *  Success: Handle to the opened profile
 195  *  Failure: NULL
 196  *
 197  * NOTES
 198  *  Values for access:   PROFILE_READ or PROFILE_READWRITE
 199  *  Values for sharing:  0 (no sharing), FILE_SHARE_READ and/or FILE_SHARE_WRITE
 200  *  Values for creation: one of CREATE_NEW, CREATE_ALWAYS, OPEN_EXISTING,
 201  *                       OPEN_ALWAYS, TRUNCATE_EXISTING.
 202  */
 203
 204 HPROFILE WINAPI OpenColorProfileW( PPROFILE profile, DWORD access, DWORD sharing, DWORD creation )
 205 {
 206 #ifdef HAVE_LCMS_H
 207     cmsHPROFILE cmsprofile = NULL;
 208     HANDLE handle = NULL;
 209
 210     TRACE( "( %p, %lx, %lx, %lx )\n", profile, access, sharing, creation );
 211
 212     if (!profile || !profile->pProfileData) return NULL;
 213
 214     if (profile->dwType & PROFILE_MEMBUFFER)
 215     {
 216         FIXME( "Memory based profile not yet supported.\n" ); return NULL;
 217     }
 218
 219     if (profile->dwType & PROFILE_FILENAME)
 220     {
 221         char *unixname;
 222         DWORD flags = 0;
 223
 224         TRACE("profile file: %s\n", debugstr_w( (WCHAR *)profile->pProfileData ));
 225
 226         if (access & PROFILE_READ) flags = GENERIC_READ;
 227         if (access & PROFILE_READWRITE) flags = GENERIC_READ|GENERIC_WRITE;
 228
 229         if (!flags) return NULL;
 230
 231         handle = CreateFileW( profile->pProfileData, flags, sharing, NULL, creation, 0, NULL );
 232         if (handle == INVALID_HANDLE_VALUE) return NULL;
 233
 234         unixname = wine_get_unix_file_name( (WCHAR *)profile->pProfileData );
 235
 236         if (unixname)
 237         {
 238             cmsprofile = cmsOpenProfileFromFile( unixname, flags & GENERIC_READ ? "r" : "w" );
 239             HeapFree( GetProcessHeap(), 0, unixname );
 240         }
 241     }
 242
 243     if (cmsprofile) return MSCMS_create_hprofile_handle( handle, cmsprofile );
 244
 245 #endif /* HAVE_LCMS_H */
 246     return NULL;
 247 }
 248
 249 BOOL WINAPI CloseColorProfile( HPROFILE profile )
 250 {
 251     BOOL ret1, ret2 = FALSE;
 252
 253     TRACE( "( %p )\n", profile );
 254
 255 #ifdef HAVE_LCMS_H
 256     ret1 = cmsCloseProfile( MSCMS_hprofile2cmsprofile( profile ) );
 257     ret2 = CloseHandle( MSCMS_hprofile2handle( profile ) );
 258
 259     MSCMS_destroy_hprofile_handle( profile );
 260
 261 #endif /* HAVE_LCMS_H */
 262     return ret1 && ret2;
 263 }