reactos/subsys/system/regedit/listview.c

   1 /*
   2  * Regedit listviews
   3  *
   4  * Copyright (C) 2002 Robert Dickenson <robd@reactos.org>
   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 <windows.h>
  22 #include <commctrl.h>
  23 #include <stdlib.h>
  24 #include <tchar.h>
  25 #include <process.h>
  26 #include <stdio.h>
  27
  28 #include "commctrl.h"
  29
  30 #include <windowsx.h>
  31 #include "main.h"
  32
  33
  34 /*******************************************************************************
  35  * Global and Local Variables:
  36  */
  37
  38 static WNDPROC g_orgListWndProc;
  39
  40 #define MAX_LIST_COLUMNS (IDS_LIST_COLUMN_LAST - IDS_LIST_COLUMN_FIRST + 1)
  41 static int default_column_widths[MAX_LIST_COLUMNS] = { 200, 175, 400 };
  42 static int column_alignment[MAX_LIST_COLUMNS] = { LVCFMT_LEFT, LVCFMT_LEFT, LVCFMT_LEFT };
  43
  44
  45 /*******************************************************************************
  46  * Local module support methods
  47  */
  48 static void AddEntryToList(HWND hwndLV, LPTSTR Name, DWORD dwValType, void* ValBuf, DWORD dwCount)
  49 {
  50     LVITEM item;
  51     int index;
  52
  53     item.mask = LVIF_TEXT | LVIF_PARAM;
  54     item.iItem = 0;/*idx;  */
  55     item.iSubItem = 0;
  56     item.state = 0;
  57     item.stateMask = 0;
  58     item.pszText = Name;
  59     item.cchTextMax = _tcslen(item.pszText);
  60     if (item.cchTextMax == 0)
  61         item.pszText = LPSTR_TEXTCALLBACK;
  62     item.iImage = 0;
  63     item.lParam = (LPARAM)dwValType;
  64 /*    item.lParam = (LPARAM)ValBuf; */
  65 #if (_WIN32_IE >= 0x0300)
  66     item.iIndent = 0;
  67 #endif
  68
  69     index = ListView_InsertItem(hwndLV, &item);
  70     if (index != -1) {
  71 /*        LPTSTR pszText = NULL; */
  72         LPTSTR pszText = _T("value");
  73         switch (dwValType) {
  74         case REG_SZ:
  75         case REG_EXPAND_SZ:
  76             ListView_SetItemText(hwndLV, index, 2, ValBuf);
  77             break;
  78         case REG_DWORD:
  79             {
  80                 TCHAR buf[64];
  81                 wsprintf(buf, _T("0x%08X (%d)"), *(DWORD*)ValBuf, *(DWORD*)ValBuf);
  82                 ListView_SetItemText(hwndLV, index, 2, buf);
  83             }
  84 /*            lpsRes = convertHexToDWORDStr(lpbData, dwLen); */
  85             break;
  86         case REG_BINARY:
  87             {
  88                 unsigned int i;
  89                 LPBYTE pData = (LPBYTE)ValBuf;
  90                 LPTSTR strBinary = HeapAlloc(GetProcessHeap(), 0, dwCount * sizeof(TCHAR) * 3 + 1);
  91                 for (i = 0; i < dwCount; i++)
  92                     wsprintf( strBinary + i*3, _T("%02X "), pData[i] );
  93                 strBinary[dwCount * 3] = 0;
  94                 ListView_SetItemText(hwndLV, index, 2, strBinary);
  95                 HeapFree(GetProcessHeap(), 0, strBinary);
  96             }
  97             break;
  98         default:
  99 /*            lpsRes = convertHexToHexCSV(lpbData, dwLen); */
 100             ListView_SetItemText(hwndLV, index, 2, pszText);
 101             break;
 102         }
 103     }
 104 }
 105
 106 static void CreateListColumns(HWND hWndListView)
 107 {
 108     TCHAR szText[50];
 109     int index;
 110     LV_COLUMN lvC;
 111
 112     /* Create columns. */
 113     lvC.mask = LVCF_FMT | LVCF_WIDTH | LVCF_TEXT | LVCF_SUBITEM;
 114     lvC.pszText = szText;
 115
 116     /* Load the column labels from the resource file. */
 117     for (index = 0; index < MAX_LIST_COLUMNS; index++) {
 118         lvC.iSubItem = index;
 119         lvC.cx = default_column_widths[index];
 120         lvC.fmt = column_alignment[index];
 121         LoadString(hInst, IDS_LIST_COLUMN_FIRST + index, szText, sizeof(szText)/sizeof(TCHAR));
 122         if (ListView_InsertColumn(hWndListView, index, &lvC) == -1) {
 123             /* TODO: handle failure condition... */
 124             break;
 125         }
 126     }
 127 }
 128
 129 /* OnGetDispInfo - processes the LVN_GETDISPINFO notification message.  */
 130
 131 static void OnGetDispInfo(NMLVDISPINFO* plvdi)
 132 {
 133     static TCHAR buffer[200];
 134
 135     plvdi->item.pszText = NULL;
 136     plvdi->item.cchTextMax = 0;
 137
 138     switch (plvdi->item.iSubItem) {
 139     case 0:
 140         plvdi->item.pszText = _T("(Default)");
 141         break;
 142     case 1:
 143         switch (plvdi->item.lParam) {
 144         case REG_SZ:
 145             plvdi->item.pszText = _T("REG_SZ");
 146             break;
 147         case REG_EXPAND_SZ:
 148             plvdi->item.pszText = _T("REG_EXPAND_SZ");
 149             break;
 150         case REG_BINARY:
 151             plvdi->item.pszText = _T("REG_BINARY");
 152             break;
 153         case REG_DWORD:
 154             plvdi->item.pszText = _T("REG_DWORD");
 155             break;
 156 /*        case REG_DWORD_LITTLE_ENDIAN: */
 157 /*            plvdi->item.pszText = _T("REG_DWORD_LITTLE_ENDIAN"); */
 158 /*            break; */
 159         case REG_DWORD_BIG_ENDIAN:
 160             plvdi->item.pszText = _T("REG_DWORD_BIG_ENDIAN");
 161             break;
 162         case REG_MULTI_SZ:
 163             plvdi->item.pszText = _T("REG_MULTI_SZ");
 164             break;
 165         case REG_LINK:
 166             plvdi->item.pszText = _T("REG_LINK");
 167             break;
 168         case REG_RESOURCE_LIST:
 169             plvdi->item.pszText = _T("REG_RESOURCE_LIST");
 170             break;
 171         case REG_NONE:
 172             plvdi->item.pszText = _T("REG_NONE");
 173             break;
 174         default:
 175             wsprintf(buffer, _T("unknown(%d)"), plvdi->item.lParam);
 176             plvdi->item.pszText = buffer;
 177             break;
 178         }
 179         break;
 180     case 2:
 181         plvdi->item.pszText = _T("(value not set)");
 182         break;
 183     case 3:
 184         plvdi->item.pszText = _T("");
 185         break;
 186     }
 187 }
 188
 189 #if 0
 190 static int CALLBACK CompareFunc(LPARAM lParam1, LPARAM lParam2, LPARAM lParamSort)
 191 {
 192     TCHAR buf1[1000];
 193     TCHAR buf2[1000];
 194
 195     ListView_GetItemText((HWND)lParamSort, lParam1, 0, buf1, sizeof(buf1));
 196     ListView_GetItemText((HWND)lParamSort, lParam2, 0, buf2, sizeof(buf2));
 197     return _tcscmp(buf1, buf2);
 198 }
 199 #endif
 200
 201 static void ListViewPopUpMenu(HWND hWnd, POINT pt)
 202 {
 203 }
 204
 205 static BOOL _CmdWndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
 206 {
 207         switch (LOWORD(wParam)) {
 208 /*    case ID_FILE_OPEN: */
 209 /*        break; */
 210         default:
 211         return FALSE;
 212         }
 213         return TRUE;
 214 }
 215
 216 static LRESULT CALLBACK ListWndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
 217 {
 218         switch (message) {
 219         case WM_COMMAND:
 220         if (!_CmdWndProc(hWnd, message, wParam, lParam)) {
 221             return CallWindowProc(g_orgListWndProc, hWnd, message, wParam, lParam);
 222         }
 223                 break;
 224     case WM_NOTIFY:
 225         switch (((LPNMHDR)lParam)->code) {
 226         case LVN_GETDISPINFO:
 227             OnGetDispInfo((NMLVDISPINFO*)lParam);
 228             break;
 229         case NM_DBLCLK:
 230             {
 231             NMITEMACTIVATE* nmitem = (LPNMITEMACTIVATE)lParam;
 232             LVHITTESTINFO info;
 233
 234             if (nmitem->hdr.hwndFrom != hWnd) break;
 235 /*            if (nmitem->hdr.idFrom != IDW_LISTVIEW) break;  */
 236 /*            if (nmitem->hdr.code != ???) break;  */
 237 #ifdef _MSC_VER
 238             switch (nmitem->uKeyFlags) {
 239             case LVKF_ALT:     /*  The ALT key is pressed.   */
 240                 /* properties dialog box ? */
 241                 break;
 242             case LVKF_CONTROL: /*  The CTRL key is pressed. */
 243                 /* run dialog box for providing parameters... */
 244                 break;
 245             case LVKF_SHIFT:   /*  The SHIFT key is pressed.    */
 246                 break;
 247             }
 248 #endif
 249             info.pt.x = nmitem->ptAction.x;
 250             info.pt.y = nmitem->ptAction.y;
 251             if (ListView_HitTest(hWnd, &info) != -1) {
 252                 LVITEM item;
 253                 item.mask = LVIF_PARAM;
 254                 item.iItem = info.iItem;
 255                 if (ListView_GetItem(hWnd, &item)) {
 256                 }
 257             }
 258             }
 259             break;
 260
 261         case NM_RCLICK:
 262             {
 263             int idx;
 264             LV_HITTESTINFO lvH;
 265             NM_LISTVIEW* pNm = (NM_LISTVIEW*)lParam;
 266             lvH.pt.x = pNm->ptAction.x;
 267             lvH.pt.y = pNm->ptAction.y;
 268             idx = ListView_HitTest(hWnd, &lvH);
 269             if (idx != -1) {
 270                 POINT pt;
 271                 GetCursorPos(&pt);
 272                 ListViewPopUpMenu(hWnd, pt);
 273                 return idx;
 274             }
 275             }
 276             break;
 277
 278         default:
 279             return CallWindowProc(g_orgListWndProc, hWnd, message, wParam, lParam);
 280         }
 281                 break;
 282         case WM_KEYDOWN:
 283                 if (wParam == VK_TAB) {
 284                         /*TODO: SetFocus(Globals.hDriveBar) */
 285                         /*SetFocus(child->nFocusPanel? child->left.hWnd: child->right.hWnd); */
 286                 }
 287         /* fall thru... */
 288     default:
 289         return CallWindowProc(g_orgListWndProc, hWnd, message, wParam, lParam);
 290         break;
 291         }
 292         return 0;
 293 }
 294
 295
 296 HWND CreateListView(HWND hwndParent, int id)
 297 {
 298     RECT rcClient;
 299     HWND hwndLV;
 300
 301     /* Get the dimensions of the parent window's client area, and create the list view control.  */
 302     GetClientRect(hwndParent, &rcClient);
 303     hwndLV = CreateWindowEx(WS_EX_CLIENTEDGE, WC_LISTVIEW, _T("List View"),
 304         WS_VISIBLE | WS_CHILD | LVS_REPORT,
 305         0, 0, rcClient.right, rcClient.bottom,
 306         hwndParent, (HMENU)id, hInst, NULL);
 307     ListView_SetExtendedListViewStyle(hwndLV,  LVS_EX_FULLROWSELECT);
 308
 309     /* Initialize the image list, and add items to the control.  */
 310 /*
 311     if (!InitListViewImageLists(hwndLV) ||
 312             !InitListViewItems(hwndLV, szName)) {
 313         DestroyWindow(hwndLV);
 314         return FALSE;
 315     }
 316  */
 317     CreateListColumns(hwndLV);
 318         g_orgListWndProc = SubclassWindow(hwndLV, ListWndProc);
 319     return hwndLV;
 320 }
 321
 322 BOOL RefreshListView(HWND hwndLV, HKEY hKey, LPTSTR keyPath)
 323 {
 324     if (hwndLV != NULL) {
 325         ListView_DeleteAllItems(hwndLV);
 326     }
 327
 328     if (hKey != NULL) {
 329         HKEY hNewKey;
 330         LONG errCode = RegOpenKeyEx(hKey, keyPath, 0, KEY_READ, &hNewKey);
 331         if (errCode == ERROR_SUCCESS) {
 332             DWORD max_sub_key_len;
 333             DWORD max_val_name_len;
 334             DWORD max_val_size;
 335             DWORD val_count;
 336             ShowWindow(hwndLV, SW_HIDE);
 337             /* get size information and resize the buffers if necessary */
 338             errCode = RegQueryInfoKey(hNewKey, NULL, NULL, NULL, NULL,
 339                         &max_sub_key_len, NULL, &val_count, &max_val_name_len, &max_val_size, NULL, NULL);
 340
 341 #define BUF_HEAD_SPACE 2 /* TODO: check why this is required with ROS ??? */
 342
 343             if (errCode == ERROR_SUCCESS) {
 344                 TCHAR* ValName = HeapAlloc(GetProcessHeap(), 0, ++max_val_name_len * sizeof(TCHAR) + BUF_HEAD_SPACE);
 345                 DWORD dwValNameLen = max_val_name_len;
 346                 BYTE* ValBuf = HeapAlloc(GetProcessHeap(), 0, ++max_val_size/* + BUF_HEAD_SPACE*/);
 347                 DWORD dwValSize = max_val_size;
 348                 DWORD dwIndex = 0L;
 349                 DWORD dwValType;
 350 /*                if (RegQueryValueEx(hNewKey, NULL, NULL, &dwValType, ValBuf, &dwValSize) == ERROR_SUCCESS) { */
 351 /*                    AddEntryToList(hwndLV, _T("(Default)"), dwValType, ValBuf, dwValSize); */
 352 /*                } */
 353 /*                dwValSize = max_val_size; */
 354                 while (RegEnumValue(hNewKey, dwIndex, ValName, &dwValNameLen, NULL, &dwValType, ValBuf, &dwValSize) == ERROR_SUCCESS) {
 355                     ValBuf[dwValSize] = 0;
 356                     AddEntryToList(hwndLV, ValName, dwValType, ValBuf, dwValSize);
 357                     dwValNameLen = max_val_name_len;
 358                     dwValSize = max_val_size;
 359                     dwValType = 0L;
 360                     ++dwIndex;
 361                 }
 362                 HeapFree(GetProcessHeap(), 0, ValBuf);
 363                 HeapFree(GetProcessHeap(), 0, ValName);
 364             }
 365             /*ListView_SortItemsEx(hwndLV, CompareFunc, hwndLV); */
 366 /*            SendMessage(hwndLV, LVM_SORTITEMSEX, (WPARAM)CompareFunc, (LPARAM)hwndLV); */
 367             ShowWindow(hwndLV, SW_SHOW);
 368             RegCloseKey(hNewKey);
 369         }
 370     }
 371     return TRUE;
 372 }