dlls/shell32/classes.c

   1 /*
   2  *      file type mapping
   3  *      (HKEY_CLASSES_ROOT - Stuff)
   4  *
   5  *
   6  */
   7 #include <stdlib.h>
   8 #include <string.h>
   9 #include <stdio.h>
  10 #include "debugtools.h"
  11 #include "winerror.h"
  12 #include "winreg.h"
  13
  14 #include "shlobj.h"
  15 #include "shell32_main.h"
  16 #include "shlguid.h"
  17 #include "shresdef.h"
  18
  19 DEFAULT_DEBUG_CHANNEL(shell);
  20
  21 #define MAX_EXTENSION_LENGTH 20
  22
  23 BOOL HCR_MapTypeToValue ( LPCSTR szExtension, LPSTR szFileType, DWORD len, BOOL bPrependDot)
  24 {       HKEY    hkey;
  25         char    szTemp[MAX_EXTENSION_LENGTH + 2];
  26
  27         TRACE("%s %p\n",szExtension, szFileType );
  28
  29         if (bPrependDot)
  30           strcpy(szTemp, ".");
  31
  32         lstrcpynA(szTemp+((bPrependDot)?1:0), szExtension, MAX_EXTENSION_LENGTH);
  33
  34         if (RegOpenKeyExA(HKEY_CLASSES_ROOT,szTemp,0,0x02000000,&hkey))
  35         { return FALSE;
  36         }
  37
  38         if (RegQueryValueA(hkey,NULL,szFileType,&len))
  39         { RegCloseKey(hkey);
  40           return FALSE;
  41         }
  42
  43         RegCloseKey(hkey);
  44
  45         TRACE("-- %s\n", szFileType );
  46
  47         return TRUE;
  48 }
  49 BOOL HCR_GetExecuteCommand ( LPCSTR szClass, LPCSTR szVerb, LPSTR szDest, DWORD len )
  50 {       HKEY    hkey;
  51         char    sTemp[256];
  52
  53         TRACE("%s %s\n",szClass, szVerb );
  54
  55         sprintf(sTemp, "%s\\shell\\%s\\command",szClass, szVerb);
  56
  57         if (RegOpenKeyExA(HKEY_CLASSES_ROOT,sTemp,0,0x02000000,&hkey))
  58         { return FALSE;
  59         }
  60
  61         if (RegQueryValueA(hkey,NULL,szDest,&len))
  62         { RegCloseKey(hkey);
  63           return FALSE;
  64         }
  65         RegCloseKey(hkey);
  66
  67         TRACE("-- %s\n", szDest );
  68
  69         return TRUE;
  70
  71 }
  72 /***************************************************************************************
  73 *       HCR_GetDefaultIcon      [internal]
  74 *
  75 * Gets the icon for a filetype
  76 */
  77 BOOL HCR_GetDefaultIcon (LPCSTR szClass, LPSTR szDest, DWORD len, LPDWORD dwNr)
  78 {       HKEY    hkey;
  79         char    sTemp[256];
  80         char    sNum[5];
  81
  82         TRACE("%s\n",szClass );
  83
  84         sprintf(sTemp, "%s\\DefaultIcon",szClass);
  85
  86         if (RegOpenKeyExA(HKEY_CLASSES_ROOT,sTemp,0,0x02000000,&hkey))
  87         { return FALSE;
  88         }
  89
  90         if (RegQueryValueA(hkey,NULL,szDest,&len))
  91         { RegCloseKey(hkey);
  92           return FALSE;
  93         }
  94
  95         RegCloseKey(hkey);
  96
  97         if (ParseFieldA (szDest, 2, sNum, 5))
  98         { *dwNr=atoi(sNum);
  99         }
 100
 101         ParseFieldA (szDest, 1, szDest, len);
 102
 103         TRACE("-- %s %li\n", szDest, *dwNr );
 104
 105         return TRUE;
 106 }
 107
 108 /***************************************************************************************
 109 *       HCR_GetClassName        [internal]
 110 *
 111 * Gets the name of a registred class
 112 */
 113 BOOL HCR_GetClassName (REFIID riid, LPSTR szDest, DWORD len)
 114 {       HKEY    hkey;
 115         char    xriid[50];
 116         BOOL ret = FALSE;
 117         DWORD buflen = len;
 118
 119         strcpy(xriid,"CLSID\\");
 120         WINE_StringFromCLSID(riid,&xriid[strlen(xriid)]);
 121
 122         TRACE("%s\n",xriid );
 123
 124         szDest[0] = 0;
 125         if (!RegOpenKeyExA(HKEY_CLASSES_ROOT,xriid,0,KEY_READ,&hkey))
 126         {
 127           if (!RegQueryValueExA(hkey,"",0,NULL,szDest,&len))
 128           {
 129             ret = TRUE;
 130           }
 131           RegCloseKey(hkey);
 132         }
 133
 134         if (!ret || !szDest[0])
 135         {
 136           if(IsEqualIID(riid, &CLSID_ShellDesktop))
 137           {
 138             if (LoadStringA(shell32_hInstance, IDS_DESKTOP, szDest, buflen))
 139               ret = TRUE;
 140           }
 141           else if (IsEqualIID(riid, &CLSID_MyComputer))
 142           {
 143             if(LoadStringA(shell32_hInstance, IDS_MYCOMPUTER, szDest, buflen))
 144               ret = TRUE;
 145           }
 146         }
 147
 148         TRACE("-- %s\n", szDest);
 149
 150         return ret;
 151 }
 152
 153 /***************************************************************************************
 154 *       HCR_GetFolderAttributes [internal]
 155 *
 156 * gets the folder attributes of a class
 157 *
 158 * FIXME
 159 *       verify the defaultvalue for *szDest
 160 */
 161 BOOL HCR_GetFolderAttributes (REFIID riid, LPDWORD szDest)
 162 {       HKEY    hkey;
 163         char    xriid[60];
 164         DWORD   attributes;
 165         DWORD   len = 4;
 166
 167         strcpy(xriid,"CLSID\\");
 168         WINE_StringFromCLSID(riid,&xriid[strlen(xriid)]);
 169         TRACE("%s\n",xriid );
 170
 171         if (!szDest) return FALSE;
 172         *szDest = SFGAO_FOLDER|SFGAO_FILESYSTEM;
 173
 174         strcat (xriid, "\\ShellFolder");
 175
 176         if (RegOpenKeyExA(HKEY_CLASSES_ROOT,xriid,0,KEY_READ,&hkey))
 177         {
 178           return FALSE;
 179         }
 180
 181         if (RegQueryValueExA(hkey,"Attributes",0,NULL,(LPBYTE)&attributes,&len))
 182         {
 183           RegCloseKey(hkey);
 184           return FALSE;
 185         }
 186
 187         RegCloseKey(hkey);
 188
 189         TRACE("-- 0x%08lx\n", attributes);
 190
 191         *szDest = attributes;
 192
 193         return TRUE;
 194 }
 195