dlls/msi/font.c - wine - Git at Google

 /*
  * Implementation of the Microsoft Installer (msi.dll)
  *
  * Copyright 2004,2005 Aric Stewart for CodeWeavers
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Lesser General Public
  * License as published by the Free Software Foundation; either
  * version 2.1 of the License, or (at your option) any later version.
  *
  * This library is distributed in the hope that it will be useful,
  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  * Lesser General Public License for more details.
  *
  * You should have received a copy of the GNU Lesser General Public
  * License along with this library; if not, write to the Free Software
  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  */

 #include <stdarg.h>
 #include "windef.h"
 #include "winbase.h"
 #include "winerror.h"
 #include "winreg.h"
 #include "wine/debug.h"
 #include "msipriv.h"
 #include "wine/unicode.h"

 WINE_DEFAULT_DEBUG_CHANNEL(msi);

 typedef struct _tagTT_OFFSET_TABLE {
     USHORT uMajorVersion;
     USHORT uMinorVersion;
     USHORT uNumOfTables;
     USHORT uSearchRange;
     USHORT uEntrySelector;
     USHORT uRangeShift;
 } TT_OFFSET_TABLE;

 typedef struct _tagTT_TABLE_DIRECTORY {
     char szTag[4]; /* table name */
     ULONG uCheckSum; /* Check sum */
     ULONG uOffset; /* Offset from beginning of file */
     ULONG uLength; /* length of the table in bytes */
 } TT_TABLE_DIRECTORY;

 typedef struct _tagTT_NAME_TABLE_HEADER {
     USHORT uFSelector; /* format selector. Always 0 */
     USHORT uNRCount; /* Name Records count */
     USHORT uStorageOffset; /* Offset for strings storage,
                             * from start of the table */
 } TT_NAME_TABLE_HEADER;

 #define NAME_ID_FULL_FONT_NAME  4
 #define NAME_ID_VERSION         5

 typedef struct _tagTT_NAME_RECORD {
     USHORT uPlatformID;
     USHORT uEncodingID;
     USHORT uLanguageID;
     USHORT uNameID;
     USHORT uStringLength;
     USHORT uStringOffset; /* from start of storage area */
 } TT_NAME_RECORD;

 #define SWAPWORD(x) MAKEWORD(HIBYTE(x), LOBYTE(x))
 #define SWAPLONG(x) MAKELONG(SWAPWORD(HIWORD(x)), SWAPWORD(LOWORD(x)))

 static const WCHAR regfont1[] =
     {'S','o','f','t','w','a','r','e','\\',
      'M','i','c','r','o','s','o','f','t','\\',
      'W','i','n','d','o','w','s',' ','N','T','\\',
      'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
      'F','o','n','t','s',0};
 static const WCHAR regfont2[] =
     {'S','o','f','t','w','a','r','e','\\',
      'M','i','c','r','o','s','o','f','t','\\',
      'W','i','n','d','o','w','s','\\',
      'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
      'F','o','n','t','s',0};

 /*
  * Code based off of code located here
  * http://www.codeproject.com/gdi/fontnamefromfile.asp
  */
 WCHAR *load_ttf_name_id( const WCHAR *filename, DWORD id )
 {
     TT_TABLE_DIRECTORY tblDir;
     BOOL bFound = FALSE;
     TT_OFFSET_TABLE ttOffsetTable;
     TT_NAME_TABLE_HEADER ttNTHeader;
     TT_NAME_RECORD ttRecord;
     DWORD dwRead;
     HANDLE handle;
     LPWSTR ret = NULL;
     int i;

     handle = CreateFileW(filename ,GENERIC_READ, 0, NULL, OPEN_EXISTING,
                     FILE_ATTRIBUTE_NORMAL, 0 );
     if (handle == INVALID_HANDLE_VALUE)
     {
         ERR("Unable to open font file %s\n", debugstr_w(filename));
         return NULL;
     }

     if (!ReadFile(handle,&ttOffsetTable, sizeof(TT_OFFSET_TABLE),&dwRead,NULL))
         goto end;

     ttOffsetTable.uNumOfTables = SWAPWORD(ttOffsetTable.uNumOfTables);
     ttOffsetTable.uMajorVersion = SWAPWORD(ttOffsetTable.uMajorVersion);
     ttOffsetTable.uMinorVersion = SWAPWORD(ttOffsetTable.uMinorVersion);

     if (ttOffsetTable.uMajorVersion != 1 || ttOffsetTable.uMinorVersion != 0)
         goto end;

     for (i=0; i< ttOffsetTable.uNumOfTables; i++)
     {
         if (!ReadFile(handle,&tblDir, sizeof(TT_TABLE_DIRECTORY),&dwRead,NULL))
             break;
         if (memcmp(tblDir.szTag,"name",4)==0)
         {
             bFound = TRUE;
             tblDir.uLength = SWAPLONG(tblDir.uLength);
             tblDir.uOffset = SWAPLONG(tblDir.uOffset);
             break;
         }
     }

     if (!bFound)
         goto end;

     SetFilePointer(handle, tblDir.uOffset, NULL, FILE_BEGIN);
     if (!ReadFile(handle,&ttNTHeader, sizeof(TT_NAME_TABLE_HEADER), &dwRead,NULL))
         goto end;

     ttNTHeader.uNRCount = SWAPWORD(ttNTHeader.uNRCount);
     ttNTHeader.uStorageOffset = SWAPWORD(ttNTHeader.uStorageOffset);
     bFound = FALSE;
     for(i=0; i<ttNTHeader.uNRCount; i++)
     {
         if (!ReadFile(handle,&ttRecord, sizeof(TT_NAME_RECORD),&dwRead,NULL))
             break;

         ttRecord.uNameID = SWAPWORD(ttRecord.uNameID);
         if (ttRecord.uNameID == id)
         {
             int nPos;
             LPSTR buf;

             ttRecord.uStringLength = SWAPWORD(ttRecord.uStringLength);
             ttRecord.uStringOffset = SWAPWORD(ttRecord.uStringOffset);
             nPos = SetFilePointer(handle, 0, NULL, FILE_CURRENT);
             SetFilePointer(handle, tblDir.uOffset + ttRecord.uStringOffset + ttNTHeader.uStorageOffset,
                            NULL, FILE_BEGIN);
             buf = msi_alloc_zero( ttRecord.uStringLength + 1 );
             ReadFile(handle, buf, ttRecord.uStringLength, &dwRead, NULL);
             if (strlen(buf) > 0)
             {
                 ret = strdupAtoW(buf);
                 msi_free(buf);
                 break;
             }
             msi_free(buf);
             SetFilePointer(handle,nPos, NULL, FILE_BEGIN);
         }
     }

 end:
     CloseHandle(handle);
     TRACE("Returning %s\n", debugstr_w(ret));
     return ret;
 }

 static WCHAR *font_name_from_file( const WCHAR *filename )
 {
     static const WCHAR truetypeW[] = {' ','(','T','r','u','e','T','y','p','e',')',0};
     WCHAR *name, *ret = NULL;

     if ((name = load_ttf_name_id( filename, NAME_ID_FULL_FONT_NAME )))
     {
         ret = msi_alloc( (strlenW( name ) + strlenW( truetypeW ) + 1 ) * sizeof(WCHAR) );
         strcpyW( ret, name );
         strcatW( ret, truetypeW );
         msi_free( name );
     }
     return ret;
 }

 WCHAR *font_version_from_file( const WCHAR *filename )
 {
     WCHAR *version, *p, *ret = NULL;

     if ((p = version = load_ttf_name_id( filename, NAME_ID_VERSION )))
     {
         while (*p && !isdigitW( *p )) p++;
         ret = msi_alloc( (strlenW( p ) + 1) * sizeof(WCHAR) );
         strcpyW( ret, p );
         msi_free( version );
     }
     return ret;
 }

 static UINT ITERATE_RegisterFonts(MSIRECORD *row, LPVOID param)
 {
     MSIPACKAGE *package = param;
     LPWSTR name;
     LPCWSTR filename;
     MSIFILE *file;
     HKEY hkey1, hkey2;
     MSIRECORD *uirow;
     LPWSTR uipath, p;

     filename = MSI_RecordGetString( row, 1 );
     file = get_loaded_file( package, filename );
     if (!file)
     {
         ERR("Unable to load file\n");
         return ERROR_SUCCESS;
     }

     if (!file->Component->Enabled)
     {
         TRACE("component is disabled\n");
         return ERROR_SUCCESS;
     }

     if (file->Component->ActionRequest != INSTALLSTATE_LOCAL)
     {
         TRACE("Component not scheduled for installation\n");
         return ERROR_SUCCESS;
     }

     RegCreateKeyW(HKEY_LOCAL_MACHINE,regfont1,&hkey1);
     RegCreateKeyW(HKEY_LOCAL_MACHINE,regfont2,&hkey2);

     if (MSI_RecordIsNull(row,2))
         name = font_name_from_file( file->TargetPath );
     else
         name = msi_dup_record_field(row,2);

     if (name)
     {
         msi_reg_set_val_str( hkey1, name, file->TargetPath);
         msi_reg_set_val_str( hkey2, name, file->TargetPath);
     }

     msi_free(name);
     RegCloseKey(hkey1);
     RegCloseKey(hkey2);

     /* the UI chunk */
     uirow = MSI_CreateRecord( 1 );
     uipath = strdupW( file->TargetPath );
     p = strrchrW(uipath,'\\');
     if (p) p++;
     else p = uipath;
     MSI_RecordSetStringW( uirow, 1, p );
     ui_actiondata( package, szRegisterFonts, uirow);
     msiobj_release( &uirow->hdr );
     msi_free( uipath );
     /* FIXME: call ui_progress? */

     return ERROR_SUCCESS;
 }

 UINT ACTION_RegisterFonts(MSIPACKAGE *package)
 {
     UINT rc;
     MSIQUERY * view;
     static const WCHAR ExecSeqQuery[] =
         {'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
          '`','F','o','n','t','`',0};

     rc = MSI_DatabaseOpenViewW(package->db, ExecSeqQuery, &view);
     if (rc != ERROR_SUCCESS)
     {
         TRACE("MSI_DatabaseOpenViewW failed: %d\n", rc);
         return ERROR_SUCCESS;
     }

     MSI_IterateRecords(view, NULL, ITERATE_RegisterFonts, package);
     msiobj_release(&view->hdr);

     return ERROR_SUCCESS;
 }

 static UINT ITERATE_UnregisterFonts( MSIRECORD *row, LPVOID param )
 {
     MSIPACKAGE *package = param;
     LPWSTR name;
     LPCWSTR filename;
     MSIFILE *file;
     HKEY hkey1, hkey2;
     MSIRECORD *uirow;
     LPWSTR uipath, p;

     filename = MSI_RecordGetString( row, 1 );
     file = get_loaded_file( package, filename );
     if (!file)
     {
         ERR("Unable to load file\n");
         return ERROR_SUCCESS;
     }

     if (!file->Component->Enabled)
     {
         TRACE("component is disabled\n");
         return ERROR_SUCCESS;
     }

     if (file->Component->ActionRequest != INSTALLSTATE_ABSENT)
     {
         TRACE("Component not scheduled for removal\n");
         return ERROR_SUCCESS;
     }

     RegCreateKeyW( HKEY_LOCAL_MACHINE, regfont1, &hkey1 );
     RegCreateKeyW( HKEY_LOCAL_MACHINE, regfont2, &hkey2 );

     if (MSI_RecordIsNull( row, 2 ))
         name = font_name_from_file( file->TargetPath );
     else
         name = msi_dup_record_field( row, 2 );

     if (name)
     {
         RegDeleteValueW( hkey1, name );
         RegDeleteValueW( hkey2, name );
     }

     msi_free( name );
     RegCloseKey( hkey1 );
     RegCloseKey( hkey2 );

     /* the UI chunk */
     uirow = MSI_CreateRecord( 1 );
     uipath = strdupW( file->TargetPath );
     p = strrchrW( uipath,'\\' );
     if (p) p++;
     else p = uipath;
     MSI_RecordSetStringW( uirow, 1, p );
     ui_actiondata( package, szUnregisterFonts, uirow );
     msiobj_release( &uirow->hdr );
     msi_free( uipath );
     /* FIXME: call ui_progress? */

     return ERROR_SUCCESS;
 }

 UINT ACTION_UnregisterFonts( MSIPACKAGE *package )
 {
     UINT r;
     MSIQUERY *view;
     static const WCHAR query[] =
         {'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
          '`','F','o','n','t','`',0};

     r = MSI_DatabaseOpenViewW( package->db, query, &view );
     if (r != ERROR_SUCCESS)
     {
         TRACE("MSI_DatabaseOpenViewW failed: %u\n", r);
         return ERROR_SUCCESS;
     }

     MSI_IterateRecords( view, NULL, ITERATE_UnregisterFonts, package );
     msiobj_release( &view->hdr );

     return ERROR_SUCCESS;
 }
	/*
	* Implementation of the Microsoft Installer (msi.dll)
	*
	* Copyright 2004,2005 Aric Stewart for CodeWeavers
	*
	* This library is free software; you can redistribute it and/or
	* modify it under the terms of the GNU Lesser General Public
	* License as published by the Free Software Foundation; either
	* version 2.1 of the License, or (at your option) any later version.
	*
	* This library is distributed in the hope that it will be useful,
	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
	* Lesser General Public License for more details.
	*
	* You should have received a copy of the GNU Lesser General Public
	* License along with this library; if not, write to the Free Software
	* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
	*/

	#include <stdarg.h>
	#include "windef.h"
	#include "winbase.h"
	#include "winerror.h"
	#include "winreg.h"
	#include "wine/debug.h"
	#include "msipriv.h"
	#include "wine/unicode.h"

	WINE_DEFAULT_DEBUG_CHANNEL(msi);

	typedef struct _tagTT_OFFSET_TABLE {
	USHORT uMajorVersion;
	USHORT uMinorVersion;
	USHORT uNumOfTables;
	USHORT uSearchRange;
	USHORT uEntrySelector;
	USHORT uRangeShift;
	} TT_OFFSET_TABLE;

	typedef struct _tagTT_TABLE_DIRECTORY {
	char szTag[4]; /* table name */
	ULONG uCheckSum; /* Check sum */
	ULONG uOffset; /* Offset from beginning of file */
	ULONG uLength; /* length of the table in bytes */
	} TT_TABLE_DIRECTORY;

	typedef struct _tagTT_NAME_TABLE_HEADER {
	USHORT uFSelector; /* format selector. Always 0 */
	USHORT uNRCount; /* Name Records count */
	USHORT uStorageOffset; /* Offset for strings storage,
	* from start of the table */
	} TT_NAME_TABLE_HEADER;

	#define NAME_ID_FULL_FONT_NAME 4
	#define NAME_ID_VERSION 5

	typedef struct _tagTT_NAME_RECORD {
	USHORT uPlatformID;
	USHORT uEncodingID;
	USHORT uLanguageID;
	USHORT uNameID;
	USHORT uStringLength;
	USHORT uStringOffset; /* from start of storage area */
	} TT_NAME_RECORD;

	#define SWAPWORD(x) MAKEWORD(HIBYTE(x), LOBYTE(x))
	#define SWAPLONG(x) MAKELONG(SWAPWORD(HIWORD(x)), SWAPWORD(LOWORD(x)))

	static const WCHAR regfont1[] =
	{'S','o','f','t','w','a','r','e','\\',
	'M','i','c','r','o','s','o','f','t','\\',
	'W','i','n','d','o','w','s',' ','N','T','\\',
	'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
	'F','o','n','t','s',0};
	static const WCHAR regfont2[] =
	{'S','o','f','t','w','a','r','e','\\',
	'M','i','c','r','o','s','o','f','t','\\',
	'W','i','n','d','o','w','s','\\',
	'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
	'F','o','n','t','s',0};

	/*
	* Code based off of code located here
	* http://www.codeproject.com/gdi/fontnamefromfile.asp
	*/
	WCHAR load_ttf_name_id( const WCHAR filename, DWORD id )
	{
	TT_TABLE_DIRECTORY tblDir;
	BOOL bFound = FALSE;
	TT_OFFSET_TABLE ttOffsetTable;
	TT_NAME_TABLE_HEADER ttNTHeader;
	TT_NAME_RECORD ttRecord;
	DWORD dwRead;
	HANDLE handle;
	LPWSTR ret = NULL;
	int i;

	handle = CreateFileW(filename ,GENERIC_READ, 0, NULL, OPEN_EXISTING,
	FILE_ATTRIBUTE_NORMAL, 0 );
	if (handle == INVALID_HANDLE_VALUE)
	{
	ERR("Unable to open font file %s\n", debugstr_w(filename));
	return NULL;
	}

	if (!ReadFile(handle,&ttOffsetTable, sizeof(TT_OFFSET_TABLE),&dwRead,NULL))
	goto end;

	ttOffsetTable.uNumOfTables = SWAPWORD(ttOffsetTable.uNumOfTables);
	ttOffsetTable.uMajorVersion = SWAPWORD(ttOffsetTable.uMajorVersion);
	ttOffsetTable.uMinorVersion = SWAPWORD(ttOffsetTable.uMinorVersion);

	if (ttOffsetTable.uMajorVersion != 1 \|\| ttOffsetTable.uMinorVersion != 0)
	goto end;

	for (i=0; i< ttOffsetTable.uNumOfTables; i++)
	{
	if (!ReadFile(handle,&tblDir, sizeof(TT_TABLE_DIRECTORY),&dwRead,NULL))
	break;
	if (memcmp(tblDir.szTag,"name",4)==0)
	{
	bFound = TRUE;
	tblDir.uLength = SWAPLONG(tblDir.uLength);
	tblDir.uOffset = SWAPLONG(tblDir.uOffset);
	break;
	}
	}

	if (!bFound)
	goto end;

	SetFilePointer(handle, tblDir.uOffset, NULL, FILE_BEGIN);
	if (!ReadFile(handle,&ttNTHeader, sizeof(TT_NAME_TABLE_HEADER), &dwRead,NULL))
	goto end;

	ttNTHeader.uNRCount = SWAPWORD(ttNTHeader.uNRCount);
	ttNTHeader.uStorageOffset = SWAPWORD(ttNTHeader.uStorageOffset);
	bFound = FALSE;
	for(i=0; i<ttNTHeader.uNRCount; i++)
	{
	if (!ReadFile(handle,&ttRecord, sizeof(TT_NAME_RECORD),&dwRead,NULL))
	break;

	ttRecord.uNameID = SWAPWORD(ttRecord.uNameID);
	if (ttRecord.uNameID == id)
	{
	int nPos;
	LPSTR buf;

	ttRecord.uStringLength = SWAPWORD(ttRecord.uStringLength);
	ttRecord.uStringOffset = SWAPWORD(ttRecord.uStringOffset);
	nPos = SetFilePointer(handle, 0, NULL, FILE_CURRENT);
	SetFilePointer(handle, tblDir.uOffset + ttRecord.uStringOffset + ttNTHeader.uStorageOffset,
	NULL, FILE_BEGIN);
	buf = msi_alloc_zero( ttRecord.uStringLength + 1 );
	ReadFile(handle, buf, ttRecord.uStringLength, &dwRead, NULL);
	if (strlen(buf) > 0)
	{
	ret = strdupAtoW(buf);
	msi_free(buf);
	break;
	}
	msi_free(buf);
	SetFilePointer(handle,nPos, NULL, FILE_BEGIN);
	}
	}

	end:
	CloseHandle(handle);
	TRACE("Returning %s\n", debugstr_w(ret));
	return ret;
	}

	static WCHAR font_name_from_file( const WCHAR filename )
	{
	static const WCHAR truetypeW[] = {' ','(','T','r','u','e','T','y','p','e',')',0};
	WCHAR name, ret = NULL;

	if ((name = load_ttf_name_id( filename, NAME_ID_FULL_FONT_NAME )))
	{
	ret = msi_alloc( (strlenW( name ) + strlenW( truetypeW ) + 1 ) * sizeof(WCHAR) );
	strcpyW( ret, name );
	strcatW( ret, truetypeW );
	msi_free( name );
	}
	return ret;
	}

	WCHAR font_version_from_file( const WCHAR filename )
	{
	WCHAR version, p, *ret = NULL;

	if ((p = version = load_ttf_name_id( filename, NAME_ID_VERSION )))
	{
	while (p && !isdigitW( p )) p++;
	ret = msi_alloc( (strlenW( p ) + 1) * sizeof(WCHAR) );
	strcpyW( ret, p );
	msi_free( version );
	}
	return ret;
	}

	static UINT ITERATE_RegisterFonts(MSIRECORD *row, LPVOID param)
	{
	MSIPACKAGE *package = param;
	LPWSTR name;
	LPCWSTR filename;
	MSIFILE *file;
	HKEY hkey1, hkey2;
	MSIRECORD *uirow;
	LPWSTR uipath, p;

	filename = MSI_RecordGetString( row, 1 );
	file = get_loaded_file( package, filename );
	if (!file)
	{
	ERR("Unable to load file\n");
	return ERROR_SUCCESS;
	}

	if (!file->Component->Enabled)
	{
	TRACE("component is disabled\n");
	return ERROR_SUCCESS;
	}

	if (file->Component->ActionRequest != INSTALLSTATE_LOCAL)
	{
	TRACE("Component not scheduled for installation\n");
	return ERROR_SUCCESS;
	}

	RegCreateKeyW(HKEY_LOCAL_MACHINE,regfont1,&hkey1);
	RegCreateKeyW(HKEY_LOCAL_MACHINE,regfont2,&hkey2);

	if (MSI_RecordIsNull(row,2))
	name = font_name_from_file( file->TargetPath );
	else
	name = msi_dup_record_field(row,2);

	if (name)
	{
	msi_reg_set_val_str( hkey1, name, file->TargetPath);
	msi_reg_set_val_str( hkey2, name, file->TargetPath);
	}

	msi_free(name);
	RegCloseKey(hkey1);
	RegCloseKey(hkey2);

	/* the UI chunk */
	uirow = MSI_CreateRecord( 1 );
	uipath = strdupW( file->TargetPath );
	p = strrchrW(uipath,'\\');
	if (p) p++;
	else p = uipath;
	MSI_RecordSetStringW( uirow, 1, p );
	ui_actiondata( package, szRegisterFonts, uirow);
	msiobj_release( &uirow->hdr );
	msi_free( uipath );
	/* FIXME: call ui_progress? */

	return ERROR_SUCCESS;
	}

	UINT ACTION_RegisterFonts(MSIPACKAGE *package)
	{
	UINT rc;
	MSIQUERY * view;
	static const WCHAR ExecSeqQuery[] =
	{'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
	'`','F','o','n','t','`',0};

	rc = MSI_DatabaseOpenViewW(package->db, ExecSeqQuery, &view);
	if (rc != ERROR_SUCCESS)
	{
	TRACE("MSI_DatabaseOpenViewW failed: %d\n", rc);
	return ERROR_SUCCESS;
	}

	MSI_IterateRecords(view, NULL, ITERATE_RegisterFonts, package);
	msiobj_release(&view->hdr);

	return ERROR_SUCCESS;
	}

	static UINT ITERATE_UnregisterFonts( MSIRECORD *row, LPVOID param )
	{
	MSIPACKAGE *package = param;
	LPWSTR name;
	LPCWSTR filename;
	MSIFILE *file;
	HKEY hkey1, hkey2;
	MSIRECORD *uirow;
	LPWSTR uipath, p;

	filename = MSI_RecordGetString( row, 1 );
	file = get_loaded_file( package, filename );
	if (!file)
	{
	ERR("Unable to load file\n");
	return ERROR_SUCCESS;
	}

	if (!file->Component->Enabled)
	{
	TRACE("component is disabled\n");
	return ERROR_SUCCESS;
	}

	if (file->Component->ActionRequest != INSTALLSTATE_ABSENT)
	{
	TRACE("Component not scheduled for removal\n");
	return ERROR_SUCCESS;
	}

	RegCreateKeyW( HKEY_LOCAL_MACHINE, regfont1, &hkey1 );
	RegCreateKeyW( HKEY_LOCAL_MACHINE, regfont2, &hkey2 );

	if (MSI_RecordIsNull( row, 2 ))
	name = font_name_from_file( file->TargetPath );
	else
	name = msi_dup_record_field( row, 2 );

	if (name)
	{
	RegDeleteValueW( hkey1, name );
	RegDeleteValueW( hkey2, name );
	}

	msi_free( name );
	RegCloseKey( hkey1 );
	RegCloseKey( hkey2 );

	/* the UI chunk */
	uirow = MSI_CreateRecord( 1 );
	uipath = strdupW( file->TargetPath );
	p = strrchrW( uipath,'\\' );
	if (p) p++;
	else p = uipath;
	MSI_RecordSetStringW( uirow, 1, p );
	ui_actiondata( package, szUnregisterFonts, uirow );
	msiobj_release( &uirow->hdr );
	msi_free( uipath );
	/* FIXME: call ui_progress? */

	return ERROR_SUCCESS;
	}

	UINT ACTION_UnregisterFonts( MSIPACKAGE *package )
	{
	UINT r;
	MSIQUERY *view;
	static const WCHAR query[] =
	{'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
	'`','F','o','n','t','`',0};

	r = MSI_DatabaseOpenViewW( package->db, query, &view );
	if (r != ERROR_SUCCESS)
	{
	TRACE("MSI_DatabaseOpenViewW failed: %u\n", r);
	return ERROR_SUCCESS;
	}

	MSI_IterateRecords( view, NULL, ITERATE_UnregisterFonts, package );
	msiobj_release( &view->hdr );

	return ERROR_SUCCESS;
	}