- Timestamp:
- Aug 2, 2000, 10:18:25 PM (25 years ago)
- Location:
- trunk/src
- Files:
-
- 9 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/src/ole32/ole2impl.cpp
r3176 r3942 1 /* $Id: ole2impl.cpp,v 1. 1 2000-03-21 00:28:32 davidrExp $ */1 /* $Id: ole2impl.cpp,v 1.2 2000-08-02 20:18:22 bird Exp $ */ 2 2 /* 3 3 * Ole 2 Create functions implementation … … 5 5 * Copyright (C) 1999-2000 Abey George 6 6 */ 7 /* 8 * 7 /* 8 * 9 9 * Project Odin Software License can be found in LICENSE.TXT 10 * 10 * 11 11 */ 12 /* 12 /* 13 13 * Ported from Wine 20/03/00 14 * 14 * 15 15 * Copyright 1999 David J. Raison 16 16 * … … 25 25 #define MAX_CLIPFORMAT_NAME 80 26 26 27 /****************************************************************************** 28 * Function : OleQueryCreateFromData [OLE32.117] 29 * Author : Abey George 27 /** 28 * [OLE32.117] 30 29 * Checks whether an object can become an embedded object. 31 30 * the clipboard or OLE drag and drop. 32 * Returns : S_OK - Format that supports Embedded object creation are present. 33 * OLE_E_STATIC - Format that supports static object creation are present. 34 * S_FALSE - No acceptable format is available. 31 * @author Abey George 32 * @returns S_OK - Format that supports Embedded object creation are present. 33 * OLE_E_STATIC - Format that supports static object creation are present. 34 * S_FALSE - No acceptable format is available. 35 35 */ 36 36 … … 72 72 } 73 73 74 /****************************************************************************** 75 * Function : OleCreateFromData [OLE32.92] 76 * Author : Abey George 74 /** 77 75 * Creates an embedded object from data transfer object retrieved from 78 76 * the clipboard or OLE drag and drop. 79 * Returns : S_OK - Embedded object was created successfully. 80 * OLE_E_STATIC - OLE can create only a static object 81 * DV_E_FORMATETC - No acceptable format is available (only error return code) 82 * TODO : CF_FILENAME, CF_EMBEDEDOBJECT formats. Parameter renderopt is currently ignored. 77 * [OLE32.92] 78 * @author Abey George 79 * @returns S_OK - Embedded object was created successfully. 80 * OLE_E_STATIC - OLE can create only a static object 81 * DV_E_FORMATETC - No acceptable format is available (only error return code) 82 * @remark TODO : CF_FILENAME, CF_EMBEDEDOBJECT formats. Parameter renderopt is currently ignored. 83 83 */ 84 84 -
trunk/src/rpcrt4/string.cpp
r3317 r3942 1 /* $Id: string.cpp,v 1. 2 2000-04-04 19:49:03 davidrExp $ */1 /* $Id: string.cpp,v 1.3 2000-08-02 20:18:23 bird Exp $ */ 2 2 /* 3 3 * RPCRT4 library … … 5 5 * 6 6 * 2000/02/05 7 * 7 * 8 8 * Copyright 2000 David J. Raison 9 * 9 * 10 10 * Project Odin Software License can be found in LICENSE.TXT 11 * 11 * 12 12 */ 13 13 … … 19 19 RPCRTAPI RPC_STATUS RPC_ENTRY 20 20 RpcStringFreeA ( 21 IN OUT unsigned char __RPC_FAR * __RPC_FAR * String 21 IN OUT unsigned char __RPC_FAR * __RPC_FAR * String OPTIONAL 22 22 ) 23 23 { 24 24 dprintf(("RPCRT4: %s", __FUNCTION__)); 25 25 26 26 HeapFree(GetProcessHeap(), 0, *String); 27 27 28 28 return RPC_S_OK; 29 29 } … … 39 39 { 40 40 dprintf(("RPCRT4: %s", __FUNCTION__)); 41 41 42 42 HeapFree(GetProcessHeap(), 0, *String); 43 43 44 44 return RPC_S_OK; 45 45 } -
trunk/src/shlwapi/ordinal.cpp
r3688 r3942 1 /* $Id: ordinal.cpp,v 1. 3 2000-06-12 11:35:13 phallerExp $ */1 /* $Id: ordinal.cpp,v 1.4 2000-08-02 20:18:23 bird Exp $ */ 2 2 3 3 /* … … 123 123 /***************************************************************************** 124 124 * Name : SHLWAPI_3 125 * Purpose : 126 * Parameters: 127 * Variables : 128 * Result : 129 * Remark : 130 * Status : UNTESTED125 * Purpose : 126 * Parameters: 127 * Variables : 128 * Result : 129 * Remark : 130 * Status : STUB UNTESTED 131 131 * 132 132 * Author : Patrick Haller [Sun, 2000/06/10 04:02] … … 141 141 return TRUE; 142 142 143 #if 0 143 #if 0 144 144 if (lpPath == NULL) return FALSE; 145 145 if (PathIsUNCServerA(lpPath)) return FALSE; 146 146 if (PathIsUNCServerShareA(lpPath)) return FALSE; 147 147 148 148 if (lpFile == NULL) 149 149 return PathFileExistsA(lpPath); … … 156 156 return FALSE; 157 157 } 158 158 159 159 return FALSE; 160 160 #endif … … 164 164 /***************************************************************************** 165 165 * Name : SHLWAPI_4 166 * Purpose : 167 * Parameters: 168 * Variables : 169 * Result : 170 * Remark : 171 * Status : UNTESTED166 * Purpose : 167 * Parameters: 168 * Variables : 169 * Result : 170 * Remark : 171 * Status : STUB UNTESTED 172 172 * 173 173 * Author : Patrick Haller [Sun, 2000/06/10 04:02] … … 179 179 { 180 180 dprintf(("not properly implemented")); 181 181 182 182 return TRUE; 183 183 … … 186 186 if (PathIsUNCServerW(lpPath)) return FALSE; 187 187 if (PathIsUNCServerShareW(lpPath)) return FALSE; 188 188 189 189 if (lpFile == NULL) 190 190 return PathFileExtensionW(lpPath); … … 197 197 return FALSE; 198 198 } 199 199 200 200 return FALSE; 201 201 #endif … … 219 219 LPSTR, lpDirectories, 220 220 DWORD, dwUnknown) 221 221 222 222 { 223 223 dprintf(("not implemented")); … … 243 243 DWORD, arg1, 244 244 DWORD, arg2) 245 245 246 246 { 247 247 dprintf(("not implemented")); … … 270 270 LPVOID lpMap; 271 271 DWORD dwResult; 272 272 273 273 dprintf(("not implemented")); 274 274 275 275 // create mapping 276 276 hMap = CreateFileMappingA(-1, … … 282 282 if (hMap == NULL) 283 283 return FALSE; 284 284 285 285 // now map the thing 286 286 lpMap = MapViewOfFile(hMap, … … 294 294 return FALSE; 295 295 } 296 296 297 297 /* @@@PH copy someting into the shared segment */ 298 298 299 299 UnmapViewOfFile(lpMap); 300 300 dwResult = SHLWAPI_11(hMap, … … 327 327 HANDLE hHandle; 328 328 LPVOID lpBase; 329 329 330 330 hHandle = SHLWAPI_11(hMap, 331 331 arg1, … … 339 339 0); 340 340 CloseHandle(hHandle); 341 341 342 342 if (lpBase == NULL) 343 343 return NULL; … … 348 348 349 349 /***************************************************************************** 350 * Name : 351 * Purpose : 352 * Parameters: 353 * Variables : 354 * Result : 355 * Remark : 356 * Status : UNTESTED350 * Name : 351 * Purpose : 352 * Parameters: 353 * Variables : 354 * Result : 355 * Remark : 356 * Status : COMPLETELY IMPLEMENTED UNTESTED 357 357 * 358 358 * Author : Patrick Haller [Sun, 2000/06/09 04:47] … … 368 368 /***************************************************************************** 369 369 * Name : ??? 370 * Purpose : 371 * Parameters: 372 * Variables : 373 * Result : 374 * Remark : 375 * Status : UNTESTED370 * Purpose : 371 * Parameters: 372 * Variables : 373 * Result : 374 * Remark : 375 * Status : COMPLETELY IMPLEMENTED UNTESTED 376 376 * 377 377 * Author : Patrick Haller [Sun, 2000/06/09 04:47] … … 383 383 { 384 384 HANDLE hHandle; 385 385 386 386 hHandle = SHLWAPI_11(hMap, 387 387 arg1, … … 394 394 395 395 /***************************************************************************** 396 * Name : 396 * Name : 397 397 * Purpose : Duplicate the handle to the shell shared segment 398 * Parameters: 399 * Variables : 400 * Result : 398 * Parameters: 399 * Variables : 400 * Result : 401 401 * Remark : SHLWAPI.11 - wrong implementation, check again 402 402 * Status : UNTESTED STUB … … 413 413 { 414 414 dprintf(("not implemented, explorer.exe will trap now")); 415 415 416 416 DWORD dwMyPID = GetCurrentProcessId(); 417 417 HANDLE hProcess; … … 419 419 HANDLE hTargetProcessHandle = dwProcessDest; 420 420 BOOL fResult; 421 421 422 422 // open desired process 423 423 if (dwMyPID == dwProcessDest) … … 427 427 FALSE, 428 428 dwProcessDest); 429 429 430 430 // verify result 431 431 if (hProcess == NULL) 432 432 return 0; 433 433 434 434 // duplicate handle 435 435 fResult = DuplicateHandle(hProcess, … … 441 441 dwFlag | 0x02); 442 442 //CloseHandle() 443 443 444 444 return fResult; 445 445 } … … 471 471 * Name : ??? 472 472 * Purpose : Unknown (used by explorer.exe) 473 * Parameters: 473 * Parameters: 474 474 * Variables : 475 475 * Result : Unknown … … 609 609 * Result : 610 610 * Remark : SHLWAPI.19 611 * Status : UNTESTED611 * Status : COMPLETELY IMPLEMENTED ? UNTESTED 612 612 * 613 613 * Author : Patrick Haller [Sun, 2000/06/09 04:47] … … 690 690 /***************************************************************************** 691 691 * Name : SHLWAPI_23 692 * Purpose : 693 * Parameters: 692 * Purpose : 693 * Parameters: 694 694 * Variables : 695 695 * Result : returns strlen(str) … … 706 706 { 707 707 char xguid[80]; 708 708 709 709 TRACE("(%s %p 0x%08x)stub\n", debugstr_guid(guid), str, cmax); 710 710 711 711 if (WINE_StringFromCLSID(guid,xguid)) return 0; 712 712 if (strlen(xguid)>=cmax) return 0; … … 735 735 /***************************************************************************** 736 736 * Name : SHLWAPI_28 737 * Purpose : 738 * Parameters: 739 * Variables : 740 * Result : 737 * Purpose : 738 * Parameters: 739 * Variables : 740 * Result : 741 741 * Remark : 742 742 * Status : UNTESTED STUB … … 757 757 * Name : SHLWAPI_30 758 758 * Purpose : Check for whitespace in ascii and unicode ? 759 * Parameters: 760 * Variables : 761 * Result : 762 * Remark : 763 * Status : UNTESTED759 * Parameters: 760 * Variables : 761 * Result : 762 * Remark : 763 * Status : COMPLETELY IMPLEMENTED ? UNTESTED 764 764 * 765 765 * Author : Patrick Haller [Sun, 2000/06/10 04:02] … … 788 788 * Result : case-sensitive comparsion result between the two strings 789 789 * Remark : SHLWAPI.158 790 * Status : UNTESTED790 * Status : COMPLETELY IMPLEMENTED UNTESTED 791 791 * 792 792 * Author : Patrick Haller [Sun, 2000/06/10 04:02] … … 809 809 * Result : case-insensitive comparsion result between the two strings 810 810 * Remark : SHLWAPI.158 811 * Status : UNTESTED811 * Status : COMPLETELY IMPLEMENTED UNTESTED 812 812 * 813 813 * Author : Patrick Haller [Sun, 2000/06/10 04:02] … … 821 821 WCHAR ch2; 822 822 int res; 823 823 824 824 for (; 825 825 826 826 *lpStr1 != 0; 827 827 828 828 lpStr1++, 829 829 lpStr2++) … … 831 831 ch1 = *lpStr1; 832 832 ch2 = *lpStr2; 833 833 834 834 /* ignore case of characters */ 835 835 if ( (ch1 >= 'A') && (ch1 <= 'Z')) ch1 += 0x20; 836 836 if ( (ch2 >= 'A') && (ch2 <= 'Z')) ch1 += 0x20; 837 837 838 838 /* compare characters */ 839 839 res = ch1 - ch2; … … 841 841 return res; 842 842 } 843 843 844 844 /* OK, strings compared til end of string1 */ 845 845 return 0; … … 849 849 /***************************************************************************** 850 850 * Name : DWORD SHLWAPI_160 851 * Purpose : 852 * Parameters: 853 * Variables : 854 * Result : 851 * Purpose : 852 * Parameters: 853 * Variables : 854 * Result : 855 855 * Remark : SHLWAPI.160 856 856 * Status : UNTESTED STUB … … 876 876 { 877 877 IUnknown *lpUnknown; 878 878 879 879 if (lplpUnknown == NULL) 880 880 return 0; 881 881 882 882 lpUnknown = *lplpUnknown; 883 883 if (lpUnknown == NULL) 884 884 return 0; 885 885 886 886 *lplpUnknown = NULL; // kill object pointer 887 887 888 888 // and still call the object's release method 889 889 return IUnknown_Release(lpUnknown); … … 899 899 * Result : lpStr + 2 or NULL 900 900 * Remark : SHLWAPI.170 901 * Status : UNTESTED901 * Status : COMPLETELY IMPLEMENTED UNTESTED 902 902 * 903 903 * Author : Patrick Haller [Sun, 2000/06/10 04:02] … … 919 919 * Name : SHLWAPI_185 920 920 * Purpose : some M$ nag screen ? 921 * Parameters: 922 * Variables : 923 * Result : 921 * Parameters: 922 * Variables : 923 * Result : 924 924 * Remark : SHLWAPI.185 925 * Status : UNTESTED925 * Status : COMPLETELY IMPLEMENTED UNTESTED 926 926 * 927 927 * Author : Patrick Haller [Sun, 2000/06/10 04:02] … … 938 938 BOOL fDontShow; 939 939 WCHAR szValueNameW[256]; 940 940 941 941 fDontShow = SHRegGetBoolUSValueA("Software\\Microsoft\\Windows\\CurrentVersion\\" 942 942 "Explorer\\DontShowMeThisDialogAgain", … … 946 946 if (fDontShow == FALSE) 947 947 return dwDefault; 948 948 949 949 int iLength1 = lstrlenA(lpStr1)+1; 950 950 HLOCAL hLocal1 = LocalAlloc(LMEM_ZEROINIT, … … 952 952 if (hLocal1 == NULL) 953 953 return dwDefault; 954 954 955 955 int iLength2 = lstrlenA(lpStr2)+1; 956 956 HLOCAL hLocal2 = LocalAlloc(LMEM_ZEROINIT, … … 961 961 return dwDefault; 962 962 } 963 963 964 964 #if 0 965 965 // convert all ascii values to Unicode … … 967 967 SHLWAPI_215(lpStr2, (LPWSTR)hLocal2, iLength2); 968 968 SHLWAPI_215(lpstrValueName, szValueNameW, 256); 969 969 970 970 // do something 971 971 dwDefault = SHLWAPI_191(arg0, … … 975 975 szValueNameW); 976 976 #endif 977 977 978 978 if (hLocal1) 979 979 LocalFree(hLocal1); 980 980 981 981 if (hLocal2) 982 982 LocalFree(hLocal2); 983 983 984 984 return dwDefault; 985 985 } … … 989 989 * Name : SHLWAPI_191 990 990 * Purpose : display some M$ nag screen if enabled 991 * Parameters: 992 * Variables : 993 * Result : 991 * Parameters: 992 * Variables : 993 * Result : 994 994 * Remark : SHLWAPI.191 995 * Status : UNTESTED995 * Status : COMPLETELY IMPLEMENTED ? UNTESTED 996 996 * 997 997 * Author : Patrick Haller [Sun, 2000/06/10 04:02] … … 1013 1013 if (rc == FALSE) 1014 1014 return dwDefault; 1015 1015 1016 1016 static HINSTANCE hShellInstance; // @@@PH where to put / initialize? 1017 1017 1018 1018 #if 0 1019 1019 struct … … 1024 1024 DWORD s4; 1025 1025 } sInit; 1026 1026 1027 1027 sInit.s1 = "software..."; 1028 1028 sInit.s2 = arg1; 1029 1029 sInit.s3 = arg2; 1030 1030 sInit.s4 = arg3; 1031 1031 1032 1032 return DialogBoxParamW(hShellInstance, 1033 1033 0x1200, // some template … … 1050 1050 HDC hdc; 1051 1051 DWORD ret; 1052 1052 1053 1053 hdc = GetDC(0); 1054 1054 ret = GetDeviceCaps(hdc, BITSPIXEL) * GetDeviceCaps(hdc, PLANES); … … 1061 1061 * Name : BOOL SHLWAPI_197 1062 1062 * Purpose : Set text background? 1063 * Parameters: 1064 * Variables : 1065 * Result : 1063 * Parameters: 1064 * Variables : 1065 * Result : 1066 1066 * Remark : SHLWAPI.197 1067 * Status : UNTESTED1067 * Status : COMPLETELY IMPLEMENTED ? UNTESTED 1068 1068 * 1069 1069 * Author : Patrick Haller [Sun, 2000/06/10 04:02] … … 1077 1077 COLORREF crOld; 1078 1078 BOOL res; 1079 1079 1080 1080 crOld = SetBkColor(hdc, crColor); 1081 1081 res = ExtTextOutA(hdc, … … 1088 1088 0); 1089 1089 SetBkColor(hdc, crOld); 1090 1090 1091 1091 return res; 1092 1092 } … … 1119 1119 strcpy( lpstrName,"shell."); 1120 1120 WINE_StringFromCLSID(guid, lpstrName + strlen(lpstrName)); 1121 1121 1122 1122 FIXME("(%s) stub\n", lpstrName); 1123 1123 return CreateSemaphoreA(NULL,0, 0x7fffffff, lpstrName); … … 1135 1135 { 1136 1136 LONG oldCount; 1137 1137 1138 1138 FIXME("(0x%08x) stub\n",handle); 1139 1139 1140 1140 ReleaseSemaphore( handle, 1, &oldCount); 1141 1141 WaitForSingleObject( handle, 0 ); … … 1152 1152 { 1153 1153 WNDCLASSW wndClass; 1154 1154 1155 1155 if (GetClassInfoW(lpWndClass->hInstance, 1156 1156 (LPWSTR)lpWndClass->lpszClassName, … … 1165 1165 * Name : SHLWAPI_240 1166 1166 * Purpose : universal window procedure 1167 * Parameters: 1168 * Variables : 1169 * Result : 1167 * Parameters: 1168 * Variables : 1169 * Result : 1170 1170 * Remark : SHLWAPI.240 1171 * Status : UNTESTED1171 * Status : COMPLETELY IMPLEMENTED ? UNTESTED 1172 1172 * 1173 1173 * Author : Patrick Haller [Sun, 2000/06/10 04:02] … … 1201 1201 * Name : SHLWAPI_243 1202 1202 * Purpose : does something critical, even with performance counters 1203 * Parameters: 1204 * Variables : 1205 * Result : 1203 * Parameters: 1204 * Variables : 1205 * Result : 1206 1206 * Remark : SHLWAPI.243 1207 * Status : UNTESTED1207 * Status : STUB UNTESTED 1208 1208 * 1209 1209 * Author : Patrick Haller [Sun, 2000/06/10 04:02] … … 1262 1262 /************************************************************************* 1263 1263 * SHLWAPI_276 [SHLWAPI] 1264 1264 1265 * dynamically load SHELL32.DllGetVersion 1265 1266 * … … 1314 1315 * Name : SHLWAPI_364 1315 1316 * Purpose : call lstrcpynA 1316 * Parameters: 1317 * Variables : 1318 * Result : 1317 * Parameters: 1318 * Variables : 1319 * Result : 1319 1320 * Remark : SHLWAPI.364 1320 * Status : UNTESTED1321 * 1322 * Author : 1321 * Status : COMPLETELY IMPLEMENTED ? UNTESTED 1322 * 1323 * Author : 1323 1324 *****************************************************************************/ 1324 1325 … … 1332 1333 lpStr1, 1333 1334 nLength); 1334 1335 1335 1336 return 1; 1336 1337 } … … 1340 1341 * Name : DWORD SHLWAPI_376 1341 1342 * Purpose : Try to determine user interface language 1342 * Parameters: 1343 * Variables : 1344 * Result : 1343 * Parameters: 1344 * Variables : 1345 * Result : 1345 1346 * Remark : SHLWAPI.366 1346 * Status : UNTESTED1347 * Status : PARTIALLY IMPLEMENTED UNTESTED 1347 1348 * 1348 1349 * Author : Patrick Haller [Sun, 2000/06/10 04:02] … … 1358 1359 * - etc. 1359 1360 */ 1360 1361 1361 1362 return 0x0409; // @@@PH maybe this is 'nuf for now. 1362 1363 } … … 1374 1375 static BOOL flagSHLWAPI_377Initialized = FALSE; 1375 1376 static BOOL flagInternetExplorerCheckVersion = FALSE; 1376 1377 1377 1378 dprintf(("not (properly) implemented.\n")); 1378 1379 1379 1380 char szModuleName[260]; // MAXPATHLEN 1380 1381 HMODULE hModLanguage; 1381 1382 1382 1383 // initialize this subsystem 1383 1384 if (flagSHLWAPI_377Initialized == FALSE) 1384 1385 { 1385 1386 flagSHLWAPI_377Initialized = TRUE; 1386 1387 1387 1388 flagInternetExplorerCheckVersion = 1388 1389 SHRegGetBoolUSValueA("Software\\Microsoft\\Internet Explorer\\International", … … 1391 1392 1); 1392 1393 } 1393 1394 1394 1395 if (lpstrModule == NULL) // Garbage in - garbage out 1395 1396 return 0; 1396 1397 1397 1398 if (0 == GetModuleFileNameA(hModule, 1398 1399 szModuleName, … … 1410 1411 } 1411 1412 1412 1413 1413 1414 return hModLanguage; 1414 1415 } … … 1418 1419 * Name : DWORD SHLWAPI_437 1419 1420 * Purpose : Determine product version and options 1420 * Parameters: 1421 * Variables : 1422 * Result : 1421 * Parameters: 1422 * Variables : 1423 * Result : 1423 1424 * Remark : SHLWAPI.437 1424 1425 * Status : UNTESTED … … 1439 1440 static BOOL flagIsProductDatacenter = FALSE; 1440 1441 static OSVERSIONINFOA osVersionInfo; 1441 1442 1442 1443 HKEY hKeyOptions; 1443 1444 DWORD dwKeyType; 1444 1445 char szBuffer[260]; // MAX_PATH_LEN 1445 1446 DWORD dwDataLength; 1446 1447 1447 1448 dprintf(("not (properly) implemented.\n")); 1448 1449 1449 1450 if (flagProductOptionsInitialized == FALSE) 1450 1451 { 1451 1452 // set to TRUE regardless of subsequent errors 1452 1453 flagProductOptionsInitialized = TRUE; 1453 1454 1454 1455 // initialize required structures 1455 1456 osVersionInfo.dwOSVersionInfoSize = 0x9c; … … 1459 1460 GetVersionExA(&osVersionInfo); 1460 1461 } 1461 1462 1462 1463 LONG rc = RegOpenKeyExA(HKEY_LOCAL_MACHINE, 1463 1464 REG_PRODUCTOPTIONS, … … 1479 1480 if (StrStrIA(szBuffer, REG_OPTIONS_DATACENTER) != 0) 1480 1481 flagIsProductDatacenter = TRUE; 1481 1482 1482 1483 RegCloseKey(hKeyOptions); 1483 1484 } 1484 1485 } 1485 1486 1486 1487 // OK, now to the usual work ... 1487 1488 switch (nFunction) … … 1493 1494 else 1494 1495 return 0; 1495 1496 1496 1497 // is platform NT 1497 1498 case 1: … … 1500 1501 else 1501 1502 return 0; 1502 1503 1503 1504 // is platform Windows 95/98/xx ? 1504 1505 case 2: … … 1509 1510 else 1510 1511 return 0; 1511 1512 1512 1513 // is platform NT4 or better? 1513 1514 case 3: … … 1518 1519 else 1519 1520 return 0; 1520 1521 1521 1522 // is platform Win2000 or better? 1522 1523 case 4: … … 1527 1528 else 1528 1529 return 0; 1529 1530 1530 1531 // at least Windows 4.10 ? 1531 1532 case 5: … … 1538 1539 if (osVersionInfo.dwMinorVersion >= 10) 1539 1540 return 1; 1540 1541 1541 1542 return 0; 1542 1543 1543 1544 // is platform Windows98 GA ? 1544 1545 case 6: … … 1550 1551 else 1551 1552 return 0; 1552 1553 1553 1554 // is platform some specific CSD ? 1554 1555 case 7: … … 1559 1560 else 1560 1561 return 0; 1561 1562 1562 1563 case 9: 1563 1564 //@@@PH incorrect … … 1568 1569 else 1569 1570 return 0; 1570 1571 1571 1572 case 10: 1572 1573 //@@@PH incorrect … … 1575 1576 else 1576 1577 return 0; 1577 1578 1578 1579 case 11: 1579 1580 //@@@PH incorrect … … 1582 1583 else 1583 1584 return 0; 1584 1585 1585 1586 // @@@PH: Oops, wazzup there ? 1586 1587 case 12: 1587 1588 return GetSystemMetrics(4096); 1588 1589 } 1589 1590 1590 1591 return 0; 1591 1592 } … … 1594 1595 /***************************************************************************** 1595 1596 * Name : SHIsLowMemoryMachine 1596 * Purpose : 1597 * Purpose : 1597 1598 * Parameters: BOOL fRetest - TRUE if testing shall be repeated 1598 1599 * - FALSE if cached result is to be used … … 1601 1602 * 1 - machine is memory-constrained 1602 1603 * Remark : SHLWAPI.584 1603 * Status : UNTESTED1604 * Status : COMPLETELY IMPLEMENTED ? UNTESTED 1604 1605 * 1605 1606 * Author : Patrick Haller [Mon, 2000/06/11 02:02] … … 1612 1613 static int flagIsLowMemoryMachine = -1; 1613 1614 ULONG ulMem; 1614 1615 1615 1616 // use cached result? 1616 1617 if ( (fRetest == TRUE) || … … 1623 1624 else 1624 1625 ulMem = 0x0800000; // ascii operation mode 1625 1626 1626 1627 // enough memory? 1627 1628 if (memBuffer.dwTotalPhys <= ulMem) … … 1630 1631 flagIsLowMemoryMachine = 0; 1631 1632 } 1632 1633 1633 1634 return flagIsLowMemoryMachine; 1634 1635 } -
trunk/src/shlwapi/pathcpp.cpp
r3562 r3942 1 /* $Id: pathcpp.cpp,v 1. 2 2000-05-19 12:10:04 sandervlExp $ */1 /* $Id: pathcpp.cpp,v 1.3 2000-08-02 20:18:23 bird Exp $ */ 2 2 3 3 /* … … 51 51 * Result : unknown 52 52 * Remark : SHLWAPI.PathSkipRootA 53 * Status : UNTESTED53 * Status : COMPLETELY IMPLEMENTED ? UNTESTED 54 54 * 55 55 * Author : Patrick Haller [Mon, 2000/01/31 23:02] … … 87 87 * Result : unknown 88 88 * Remark : SHLWAPI.PathSkipRootW 89 * Status : UNTESTED89 * Status : STUB UNTESTED 90 90 * 91 91 * Author : Patrick Haller [Mon, 2000/01/31 23:02] -
trunk/src/shlwapi/reg.cpp
r3688 r3942 1 /* $Id: reg.cpp,v 1. 3 2000-06-12 11:35:14 phallerExp $ */1 /* $Id: reg.cpp,v 1.4 2000-08-02 20:18:23 bird Exp $ */ 2 2 3 3 /* … … 41 41 /***************************************************************************** 42 42 * Name : DWORD SHRegCreateUSKeyA 43 * Purpose : 44 * Parameters: 45 * Variables : 46 * Result : 43 * Purpose : 44 * Parameters: 45 * Variables : 46 * Result : 47 47 * Remark : SHLWAPI.594 SHLWAPI.SHRegCreateUSKeyA 48 * Status : UNTESTED48 * Status : STUB UNTESTED 49 49 * 50 50 * Author : Patrick Haller [Wed, 1999/12/29 23:02] … … 65 65 /***************************************************************************** 66 66 * Name : DWORD SHRegCreateUSKeyW 67 * Purpose : 68 * Parameters: 69 * Variables : 70 * Result : 67 * Purpose : 68 * Parameters: 69 * Variables : 70 * Result : 71 71 * Remark : SHLWAPI.595 SHLWAPI.SHRegCreateUSKeyW 72 * Status : UNTESTED72 * Status : STUB UNTESTED 73 73 * 74 74 * Author : Patrick Haller [Wed, 1999/12/29 23:02] … … 83 83 { 84 84 char szBuffer[256]; 85 85 86 86 // convert unicode to ascii 87 87 if (0 == WideCharToMultiByte(0, … … 94 94 0)) 95 95 return GetLastError(); 96 96 97 97 return SHRegCreateUSKeyA(szBuffer, 98 98 arg1, … … 175 175 * Result : unknown 176 176 * Remark : SHLWAPI.SHRegGetBoolUSValueA 177 * Status : UNTESTED177 * Status : COMPLETELY IMPLEMENTED ? UNTESTED 178 178 * 179 179 * Author : Patrick Haller [Wed, 1999/12/29 23:02] … … 189 189 DWORD dwLength = sizeof(szBuffer); 190 190 LONG rc; 191 191 192 192 dprintf(("subkey=%s, value=%s\n", 193 193 pszSubKey, 194 194 pszValue)); 195 195 196 196 rc = SHRegGetUSValueA(pszSubKey, 197 197 pszValue, … … 204 204 if (rc != ERROR_SUCCESS) 205 205 return rc; 206 206 207 207 if (lstrcmpiA("YES", 208 208 szBuffer) == 0) … … 220 220 szBuffer) == 0) 221 221 return 0; 222 223 222 223 224 224 return ERROR_SUCCESS; /* return success */ 225 225 } … … 233 233 * Result : unknown 234 234 * Remark : SHLWAPI.SHRegGetBoolUSValueW 235 * Status : UNTESTED235 * Status : STUB UNTESTED 236 236 * 237 237 * Author : Patrick Haller [Wed, 1999/12/29 23:02] … … 255 255 /***************************************************************************** 256 256 * Name : DWORD SHRegSetUSValueA 257 * Purpose : 258 * Parameters: 259 * Variables : 260 * Result : 257 * Purpose : 258 * Parameters: 259 * Variables : 260 * Result : 261 261 * Remark : SHLWAPI.SHRegSetUSValueA SHLWAPI.615 262 * Status : UNTESTED262 * Status : STUB UNTESTED 263 263 * 264 264 * Author : Patrick Haller [Wed, 1999/12/29 23:02] … … 274 274 { 275 275 LONG rc; 276 276 277 277 #if 0 278 278 rc = SHRegCreateUSKeyA(hKey, … … 291 291 } 292 292 #endif 293 293 294 294 return rc; 295 295 } … … 300 300 /***************************************************************************** 301 301 * Name : DWORD SHRegSetUSValueW 302 * Purpose : 303 * Parameters: 304 * Variables : 305 * Result : 302 * Purpose : 303 * Parameters: 304 * Variables : 305 * Result : 306 306 * Remark : SHLWAPI.SHRegSetUSValueW SHLWAPI.616 307 * Status : UNTESTED307 * Status : STUB UNTESTED 308 308 * 309 309 * Author : Patrick Haller [Wed, 1999/12/29 23:02] … … 319 319 { 320 320 LONG rc; 321 321 322 322 #if 0 323 323 rc = SHRegCreateUSKeyW(hKey, … … 336 336 } 337 337 #endif 338 338 339 339 return rc; 340 340 } -
trunk/src/shlwapi/string.cpp
r3700 r3942 1 /* $Id: string.cpp,v 1. 5 2000-06-13 18:14:21 phallerExp $ */1 /* $Id: string.cpp,v 1.6 2000-08-02 20:18:24 bird Exp $ */ 2 2 3 3 /* … … 71 71 /***************************************************************************** 72 72 * Name : ChrCmpIA 73 * Purpose : 74 * Parameters: 75 * Variables : 76 * Result : 77 * Remark : 78 * Status : UNTESTED73 * Purpose : 74 * Parameters: 75 * Variables : 76 * Result : 77 * Remark : 78 * Status : PARTIALLY IMPLEMENTED UNTESTED 79 79 * 80 80 * Author : Patrick Haller [Wed, 1999/12/29 09:00] … … 86 86 { 87 87 // Note: IsDBCSLeadByte ignored ! 88 88 89 89 if ( (ch1 >= 'A') && (ch1 <= 'Z') ) ch1 |= 0x20; 90 90 if ( (ch2 >= 'A') && (ch2 <= 'Z') ) ch2 |= 0x20; 91 91 92 92 return ch1 - ch2; 93 93 } … … 375 375 * the string if successful, or NULL otherwise. 376 376 * Remark : SHELL32. 377 * Status : UNTESTED UNKNOWN377 * Status : COMPLETELY IMPLEMENTED UNTESTED UNKNOWN 378 378 * 379 379 * Author : Patrick Haller [Wed, 1999/12/29 09:00] … … 408 408 * the string if successful, or NULL otherwise. 409 409 * Remark : SHELL32. 410 * Status : UNTESTED UNKNOWN410 * Status : COMPLETELY IMPLEMENTED UNTESTED UNKNOWN 411 411 * 412 412 * Author : Patrick Haller [Wed, 1999/12/29 09:00] … … 441 441 * substring if successful, or NULL otherwise. 442 442 * Remark : SHELL32. 443 * Status : UNTESTED UNKNOWN443 * Status : COMPLETELY IMPLEMENTED UNTESTED UNKNOWN 444 444 * 445 445 * Author : Patrick Haller [Wed, 1999/12/29 09:00] … … 487 487 * substring if successful, or NULL otherwise. 488 488 * Remark : SHELL32. 489 * Status : UNTESTED UNKNOWN489 * Status : COMPLETELY IMPLEMENTED UNTESTED UNKNOWN 490 490 * 491 491 * Author : Patrick Haller [Wed, 1999/12/29 09:00] … … 578 578 } 579 579 lstrcpynA (pszBuf, buf, cchBuf); 580 return pszBuf; 580 return pszBuf; 581 581 } 582 582 … … 600 600 } 601 601 lstrcpynAtoW (pszBuf, buf, cchBuf); 602 return pszBuf; 602 return pszBuf; 603 603 } 604 604 … … 607 607 * Name : StrCpyA 608 608 * Purpose : copy a string 609 * Parameters: 610 * Variables : 611 * Result : 609 * Parameters: 610 * Variables : 611 * Result : 612 612 * Remark : not exported ? 613 * Status : UNTESTED 614 * 615 * Author : 613 * Status : UNTESTED 614 * 615 * Author : 616 616 *****************************************************************************/ 617 617 … … 628 628 * Name : StrCpyW 629 629 * Purpose : copy a wide-character string 630 * Parameters: 631 * Variables : 632 * Result : 630 * Parameters: 631 * Variables : 632 * Result : 633 633 * Remark : SHLWAPI.642 634 * Status : UNTESTED635 * 636 * Author : 634 * Status : COMPLETELY IMPLEMENTED UNTESTED 635 * 636 * Author : 637 637 *****************************************************************************/ 638 638 … … 649 649 * Name : StrDupA 650 650 * Purpose : duplicate a string on the local heap 651 * Parameters: 652 * Variables : 653 * Result : 651 * Parameters: 652 * Variables : 653 * Result : 654 654 * Remark : SHLWAPI.644 655 * Status : UNTESTED656 * 657 * Author : 655 * Status : COMPLETELY IMPLEMENTED UNTESTED 656 * 657 * Author : 658 658 *****************************************************************************/ 659 659 … … 667 667 StrCpyA((LPSTR)hLocal, 668 668 lpStr); 669 669 670 670 return (LPSTR)hLocal; 671 671 } … … 675 675 * Name : StrDupW 676 676 * Purpose : duplicate a wide-characters string on the local heap 677 * Parameters: 678 * Variables : 679 * Result : 677 * Parameters: 678 * Variables : 679 * Result : 680 680 * Remark : SHLWAPI.645 681 * Status : UNTESTED682 * 683 * Author : 681 * Status : COMPLETELY IMPLEMENTED UNTESTED 682 * 683 * Author : 684 684 *****************************************************************************/ 685 685 … … 693 693 StrCpyW((LPWSTR)hLocal, 694 694 lpStr); 695 695 696 696 return (LPWSTR)hLocal; 697 697 } -
trunk/src/shlwapi/url.cpp
r3849 r3942 1 /* $Id: url.cpp,v 1. 4 2000-07-18 18:00:01bird Exp $ */1 /* $Id: url.cpp,v 1.5 2000-08-02 20:18:24 bird Exp $ */ 2 2 3 3 /* … … 139 139 * second flag guarantees that, if no valid scheme can be 140 140 * determined, the function will apply the default scheme to the URL. 141 * Status : UNTESTED141 * Status : PARTIALLY IMPLEMENTED UNTESTED 142 142 * 143 143 * Author : Patrick Haller [Thu, 2000/04/20 19:46] … … 161 161 162 162 163 /** 164 * @status partially 165 */ 163 166 ODINFUNCTION4(HRESULT, UrlApplySchemeW, 164 167 LPCWSTR, pszIn, … … 254 257 255 258 259 /** 260 * @status stub 261 */ 256 262 ODINFUNCTION4(HRESULT, UrlCanonicalizeW, 257 263 LPCWSTR, pszUrl, … … 321 327 * Other errors A standard OLE error value is returned. 322 328 * Remark : SHLWAPI. 323 * Status : UNTESTED329 * Status : STUB UNTESTED 324 330 * 325 331 * Author : Patrick Haller [Tue, 2000/04/25 02:02] … … 339 345 340 346 347 /** 348 * @status stub 349 */ 341 350 ODINFUNCTION5(HRESULT, UrlCombineW, 342 351 LPCWSTR, pszBase, … … 370 379 * with UrlCanonicalize. Then, compare the canonicalized URLs with 371 380 * UrlCompare. 372 * Status : UNTESTED381 * Status : PARTIALLY IMPLEMENTED UNTESTED 373 382 * 374 383 * Author : Patrick Haller [Tue, 2000/04/25 02:02] … … 386 395 } 387 396 397 /** 398 * @status stub 399 */ 388 400 ODINFUNCTION3(int, UrlCompareW, 389 401 LPCWSTR, pszURL1, … … 410 422 * returns S_OK if successful or a standard OLE error value if not. 411 423 * Remark : SHLWAPI. 412 * Status : UNTESTED424 * Status : STUB UNTESTED 413 425 * 414 426 * Author : Patrick Haller [Tue, 2000/04/25 02:02] … … 427 439 428 440 441 /** 442 * @status stub 443 */ 429 444 ODINFUNCTION4(HRESULT,UrlCreateFromPathW, 430 445 LPCWSTR,pszPath, … … 490 505 * during transport across the internet. This functions converts 491 506 * unsafe characters into their equivalent "%xy" escape sequences. 492 * Status : UNTESTED507 * Status : STUB UNTESTED 493 508 * 494 509 * Author : Patrick Haller [Tue, 2000/04/25 02:02] … … 507 522 508 523 524 /** 525 * @status stub 526 */ 509 527 ODINFUNCTION4(HRESULT, UrlEscapeW, 510 528 LPCWSTR, pszURL, … … 531 549 * character. If a file URL has a query string, the returned 532 550 * string includes the query string. 533 * Status : UNTESTED551 * Status : STUB UNTESTED 534 552 * 535 553 * Author : Patrick Haller [Tue, 2000/04/25 02:02] … … 545 563 546 564 565 /** 566 * @status stub 567 */ 547 568 ODINFUNCTION1(LPCWSTR, UrlGetLocationW, 548 569 LPCWSTR, pszURL) … … 590 611 * the buffer must be able to contain, including the terminating 591 612 * NULL character. Otherwise, an OLE error value is returned. 592 * Status : UNTESTED613 * Status : STUB UNTESTED 593 614 * 594 615 * Author : Patrick Haller [Tue, 2000/04/25 02:02] … … 608 629 609 630 631 /** 632 * @status stub 633 */ 610 634 ODINFUNCTION5(HRESULT, UrlGetPartW, 611 635 LPCWSTR, pszIn, … … 638 662 * pbHash = (LPBYTE)&dwHashedValue, where dwHashedValue is a 639 663 * DWORD buffer. 640 * Status : UNTESTED664 * Status : STUB UNTESTED 641 665 * 642 666 * Author : Patrick Haller [Tue, 2000/04/25 02:02] … … 654 678 655 679 680 /** 681 * @status stub 682 */ 656 683 ODINFUNCTION3(HRESULT,UrlHashW, 657 684 LPCWSTR,pszURL, … … 685 712 * or FALSE otherwise. 686 713 * Remark : SHLWAPI. 687 * Status : UNTESTED714 * Status : STUB UNTESTED 688 715 * 689 716 * Author : Patrick Haller [Tue, 2000/04/25 02:02] … … 700 727 701 728 729 /** 730 * @status stub 731 */ 702 732 ODINFUNCTION2(BOOL, UrlIsW, 703 733 LPCWSTR, pszUrl, … … 718 748 * A No History URL is a URL that browsers typically do not 719 749 * include in their navigation history. 720 * Status : UNTESTED750 * Status : STUB UNTESTED 721 751 * 722 752 * Author : Patrick Haller [Tue, 2000/04/25 02:02] … … 730 760 731 761 762 /** 763 * @status stub 764 */ 732 765 ODINFUNCTION1(BOOL, UrlIsNoHistoryW, 733 766 LPCWSTR,pszURL) … … 749 782 * URL. Opaque URLs cannot be separated into the standard 750 783 * URL heirarchy. 751 * Status : UNTESTED784 * Status : STUB UNTESTED 752 785 * 753 786 * Author : Patrick Haller [Tue, 2000/04/25 02:02] … … 761 794 762 795 796 /** 797 * @status stub 798 */ 763 799 ODINFUNCTION1(BOOL, UrlIsOpaqueW, 764 800 LPCWSTR,pszURL) … … 814 850 * Remark : SHLWAPI.UrlUnEscape 815 851 * An escape sequence has the form "%xy". 816 * Status : UNTESTED852 * Status : STUB UNTESTED 817 853 * 818 854 * Author : Patrick Haller [Tue, 2000/04/25 02:02] … … 831 867 832 868 869 /** 870 * @status stub 871 */ 833 872 ODINFUNCTION4(HRESULT,UrlUnescapeW, 834 873 LPWSTR, pszURL, -
trunk/src/user32/user32.cpp
r3662 r3942 1 /* $Id: user32.cpp,v 1.8 3 2000-06-07 14:51:28 sandervlExp $ */1 /* $Id: user32.cpp,v 1.84 2000-08-02 20:18:24 bird Exp $ */ 2 2 3 3 /* … … 1209 1209 * see GetOEMCP. 1210 1210 * Remark : 1211 * Status : UNTESTED1211 * Status : COMPLETELY IMPLEMENTED UNTESTED 1212 1212 * 1213 1213 * Author : Patrick Haller [Thu, 1998/02/26 11:55] -
trunk/src/user32/window.cpp
r3766 r3942 1 /* $Id: window.cpp,v 1.7 1 2000-06-28 18:11:19 sandervlExp $ */1 /* $Id: window.cpp,v 1.72 2000-08-02 20:18:25 bird Exp $ */ 2 2 /* 3 3 * Win32 window apis for OS/2 … … 367 367 if(hwndNewParent == HWND_DESKTOP) { 368 368 hwndNewParent = GetDesktopWindow(); 369 } 369 } 370 370 else { 371 371 parent = Win32BaseWindow::GetWindowFromHandle(hwndNewParent); … … 1081 1081 /* If the atom doesn't exist, then no class */ 1082 1082 /* with this name exists either. */ 1083 if (!(atom = GlobalFindAtomA( lpszClass ))) 1083 if (!(atom = GlobalFindAtomA( lpszClass ))) 1084 1084 { 1085 1085 SetLastError(ERROR_CANNOT_FIND_WND_CLASS); … … 1209 1209 /*********************************************************************** 1210 1210 * DeferWindowPos (USER32.128) 1211 * 1211 * 1212 1212 * TODO: SvL: Does this need to be thread safe? 1213 1213 * … … 1356 1356 * If the function fails, the return value is zero 1357 1357 * Remark : 1358 * Status : FULLY IMPLEMENTED AND TESTED1358 * Status : COMPLETELY IMPLEMENTED AND TESTED 1359 1359 * 1360 1360 * Author : Rene Pronk [Sun, 1999/08/08 23:30]
Note:
See TracChangeset
for help on using the changeset viewer.