Tag: windows

Docker Desktop for Windows on Server 2019 Essentials

Post author By sskaje
Post date October 30, 2019
No Comments on Docker Desktop for Windows on Server 2019 Essentials

By @sskaje
Link: https://sskaje.me/2019/10/docker-desktop-for-windows-on-server-2019-essentials/

Docker Desktop for Windows reports incompatible with Windows Server 2019 Essentials.

Logs indicates that hyper-v is required.

Here is a bat enabling all hyper-v related feature on Windows.

pushd "%~dp0"
dir /b %SystemRoot%\servicing\Packages\*Hyper-V*.mum >hyper-v.txt
for /f %%i in ('findstr /i . hyper-v.txt 2^>nul') do dism /online /norestart /add-package:"%SystemRoot%\servicing\Packages\%%i"
del hyper-v.txt
Dism /online /enable-feature /featurename:Microsoft-Hyper-V -All /LimitAccess /ALL
pause

pushd "%~dp0"

dir /b %SystemRoot%\servicing\Packages\*Hyper-V*.mum >hyper-v.txt

for /f %%i in ('findstr /i . hyper-v.txt 2^>nul') do dism /online /norestart /add-package:"%SystemRoot%\servicing\Packages\%%i"

del hyper-v.txt

Dism /online /enable-feature /featurename:Microsoft-Hyper-V -All /LimitAccess /ALL

pause

Also, Container

pushd "%~dp0"
dir /b %SystemRoot%\servicing\Packages\*containers*.mum >containers.txt
for /f %%i in ('findstr /i . containers.txt 2^>nul') do dism /online /norestart /add-package:"%SystemRoot%\servicing\Packages\%%i"
del containers.txt
Dism /online /enable-feature /featurename:Containers -All /LimitAccess /ALL
pause

pushd "%~dp0"

dir /b %SystemRoot%\servicing\Packages\*containers*.mum >containers.txt

for /f %%i in ('findstr /i . containers.txt 2^>nul') do dism /online /norestart /add-package:"%SystemRoot%\servicing\Packages\%%i"

del containers.txt

Dism /online /enable-feature /featurename:Containers -All /LimitAccess /ALL

pause

But I tried Docker EE on Windows Server 2019 Essentials, still not working.

https://forums.docker.com/t/installing-docker-on-windows-10-home/11722/25

Docker Desktop for Windows on Server 2019 Essentials by @sskaje: https://sskaje.me/2019/10/docker-desktop-for-windows-on-server-2019-essentials/

Tags docker, windows, windows server

Windows

VMware Windows 10 Guest Shared Folder Fixer

Post author By sskaje
Post date August 14, 2016
No Comments on VMware Windows 10 Guest Shared Folder Fixer

By @sskaje
Link: https://sskaje.me/2016/08/vmware-windows-10-guest-shared-folder-fixer/

Windows 10 Shared folder hang in VMware Fusion.
According to @steve goddard, this is caused by Microsoft upgrades destroying registry settings.

I wrote a VBScript check and fix the registry.

github project: https://github.com/sskaje/vmware_windows_10_shared_folder_fixer

'
' VMware Fusion/Workstation Shared Folder Fixer
' 
' Author: sskaje
'
'

' Ask for Administrator Access
If Not WScript.Arguments.Named.Exists("elevate") Then
  CreateObject("Shell.Application").ShellExecute WScript.FullName _
    , WScript.ScriptFullName & " /elevate", "", "runas", 1
  WScript.Quit
End If

' Registry related variables
Dim objShell, regNetworkProviderOrder, regValueType, currentValue, vmhgfs, comma
regNetworkProviderOrder = "HKLM\SYSTEM\CurrentControlSet\Control\NetworkProvider\Order\ProviderOrder"
regValueType = "REG_SZ"
vmhgfs = "vmhgfs"
comma = ","

Set objShell = WScript.CreateObject("WScript.Shell")
currentValue = objShell.RegRead(regNetworkProviderOrder)

Dim searchPos, needWriteBack
searchPos = InStr(currentValue, vmhgfs)
needWriteBack = False

If searchPos = 0 Then 
	' If vmhgfs is not found in registry value, prepend 
	currentValue = vmhgfs + comma + currentValue
	needWriteBack = True
ElseIf searchPos <> 1 Then 
	' If vmhgfs is not at the beginning, move it there
	needWriteBack = True
	
	Dim providerSets, x
	providerSets = Split(currentValue, comma)
	currentValue = vmhgfs
	For Each x in providerSets
		Do
			If x = vmhgfs Then Exit Do					' Skip if current is vmhgfs
			If x = "" Then Exit Do						' Skip if current is empty string
			currentValue = currentValue + comma + x		' Append to new value
		Loop While False
	Next
' Else ' If vmhgfs is at the beginning, skip 
End If


If needWriteBack = True Then
	' Write Registry
	objShell.RegWrite regNetworkProviderOrder, currentValue, regValueType
End If

WScript.Echo "Registry has been fixed. Please try Shared Folder."

' VMware Fusion/Workstation Shared Folder Fixer

' Author: sskaje

' Ask for Administrator Access

If Not WScript.Arguments.Named.Exists("elevate") Then

CreateObject("Shell.Application").ShellExecute WScript.FullName _

, WScript.ScriptFullName & " /elevate", "", "runas", 1

WScript.Quit

End If

' Registry related variables

Dim objShell, regNetworkProviderOrder, regValueType, currentValue, vmhgfs, comma

regNetworkProviderOrder = "HKLM\SYSTEM\CurrentControlSet\Control\NetworkProvider\Order\ProviderOrder"

regValueType = "REG_SZ"

vmhgfs = "vmhgfs"

comma = ","

Set objShell = WScript.CreateObject("WScript.Shell")

currentValue = objShell.RegRead(regNetworkProviderOrder)

Dim searchPos, needWriteBack

searchPos = InStr(currentValue, vmhgfs)

needWriteBack = False

If searchPos = 0 Then

' If vmhgfs is not found in registry value, prepend

currentValue = vmhgfs + comma + currentValue

needWriteBack = True

ElseIf searchPos <> 1 Then

' If vmhgfs is not at the beginning, move it there

needWriteBack = True

Dim providerSets, x

providerSets = Split(currentValue, comma)

currentValue = vmhgfs

For Each x in providerSets

If x = vmhgfs Then Exit Do ' Skip if current is vmhgfs

If x = "" Then Exit Do ' Skip if current is empty string

currentValue = currentValue + comma + x ' Append to new value

Loop While False

' Else ' If vmhgfs is at the beginning, skip

End If

If needWriteBack = True Then

' Write Registry

objShell.RegWrite regNetworkProviderOrder, currentValue, regValueType

End If

WScript.Echo "Registry has been fixed. Please try Shared Folder."

VMware Windows 10 Guest Shared Folder Fixer by @sskaje: https://sskaje.me/2016/08/vmware-windows-10-guest-shared-folder-fixer/

Tags fusion, shared folder, vmware, vmware fusion, windows, windows 10

Windows

Click Button and Read Text from Other Program on Windows

Post author By sskaje
Post date May 26, 2016
No Comments on Click Button and Read Text from Other Program on Windows

By @sskaje
Link: https://sskaje.me/2016/05/click-button-read-text-program-windows/

I have a protected application on windows, normally my clients have to run that program, click a button, copy some text from another text control, upload to somewhere…

I need to find a solution simulate button click and read the text control.

There are two buttons, generate and exit, and a text control.

Here is what I did in C++, build under Windows XP + Visual C++ 6.0/7.0 in CLI.

1 Run the program.

	STARTUPINFO si;
	PROCESS_INFORMATION pi;
	ZeroMemory(&si, sizeof(si));
	ZeroMemory(&pi, sizeof(pi));
	
	if (!CreateProcess(
		NULL,
		(LPTSTR)  "GetResult.exe",
		NULL,
		NULL,
		false,
		CREATE_NO_WINDOW,
		NULL,
		NULL,
		&si,
		&pi
	)) {
		DWORD errval = GetLastError();
		cout << "CreateProcess Failed: " << errval << endl;
		return 2;
	}

	Sleep(500);

STARTUPINFO si;

PROCESS_INFORMATION pi;

ZeroMemory(&si, sizeof(si));

ZeroMemory(&pi, sizeof(pi));

if (!CreateProcess(

NULL,

(LPTSTR) "GetResult.exe",

NULL,

false,

CREATE_NO_WINDOW,

NULL,

&si,

&pi

)) {

DWORD errval = GetLastError();

cout << "CreateProcess Failed: " << errval << endl;

return 2;

}

Sleep(500);

Sleep is required here, to ensure that you can find correct control.

2 Find controls

	int ctrlBtnGet = 0x01;
	int ctrlTxtResult = 0x03e8;
	int ctrlBtnExit = 0x02;

	HWND wGetWindow = FindWindow(0, "Window Title");	
	HWND wBtnGet = GetDlgItem(wGetWindow, ctrlBtnGet);
	HWND wBtnExit = GetDlgItem(wGetWindow, ctrlBtnExit);	
	HWND wTxtResult = GetDlgItem(wGetWindow, ctrlTxtResult);

int ctrlBtnGet = 0x01;

int ctrlTxtResult = 0x03e8;

int ctrlBtnExit = 0x02;

HWND wGetWindow = FindWindow(0, "Window Title");

HWND wBtnGet = GetDlgItem(wGetWindow, ctrlBtnGet);

HWND wBtnExit = GetDlgItem(wGetWindow, ctrlBtnExit);

HWND wTxtResult = GetDlgItem(wGetWindow, ctrlTxtResult);

These CtrlID can be read by many *Spy app on windows.

3 Perform click and read from text control

In my case, Sleep is also required after BM_CLICK was sent to target program, otherwise I may have to click more than once.
So, I wrote a loop

	int max_retry = 5;
	
	int retry = 0;
	
	int length;
	char buf[2048] = {0};
	
	do {
		SendMessage(wBtnGet, BM_CLICK, 0, 0);
		Sleep(300);
	
		length = (int) SendMessage(wTxtResult, WM_GETTEXTLENGTH, 0, 0);
		
		if (length > 0) {
			SendMessage(wTxtResult, WM_GETTEXT, sizeof(buf) / sizeof(buf[0]), (LPARAM) buf);
			printf("%s\n", buf);
			break;
		}
		
	} while (++retry < max_retry);

int max_retry = 5;

int retry = 0;

int length;

char buf[2048] = {0};

do {

SendMessage(wBtnGet, BM_CLICK, 0, 0);

Sleep(300);

length = (int) SendMessage(wTxtResult, WM_GETTEXTLENGTH, 0, 0);

if (length > 0) {

SendMessage(wTxtResult, WM_GETTEXT, sizeof(buf) / sizeof(buf[0]), (LPARAM) buf);

printf("%s\n", buf);

break;

}

} while (++retry < max_retry);

I tried GetDlgItemText and GetWindowText, neither of these two works to get text from the control.
WM_GETTEXTLENGTH and then WM_GETTEXT is the best choice so far as I know.

4 Click Exit

	SendMessage(wBtnExit, BM_CLICK, 0, 0);

1	SendMessage(wBtnExit, BM_CLICK, 0, 0);

Click Button and Read Text from Other Program on Windows by @sskaje: https://sskaje.me/2016/05/click-button-read-text-program-windows/

Tags BM_CLICK, SendMessage, windows, WM_GETTEXT, WM_GETTEXTLENGTH

OS X 笔记

Create Windows 7/8 Bootable USB Drive on OS X

Post author By sskaje
Post date February 27, 2014
No Comments on Create Windows 7/8 Bootable USB Drive on OS X

By @sskaje
Link: https://sskaje.me/2014/02/create-windows-7-8-bootable-usb-drive-on-osx/

This note works for Windows (e.g. Windows 7, Windows 8, …), Linux … ISO image only, and all commands in Terminal.

If you’re interested in using Disk Utility, try this: Create OS X Mavericks Bootable USB Drive from AppStore Release, but DON’T forget to unmount partitions.

To launch a Terminal, simply open Spotlight and type Terminal, in most cases, you can see Terminal listed after ‘Ter‘.

For Windows 7/8 or later, Boot Camp Assistant is the BEST tool.
In ‘Select Tasks‘, CHECK ‘Create a Windows 7 or later version disk’ and UNCHECK all others.
In ‘Create Bootable USB Drive for Windows Installation‘, choose the right usb destination disk.

Create Windows 7/8 Bootable USB Drive on OS X by @sskaje: https://sskaje.me/2014/02/create-windows-7-8-bootable-usb-drive-on-osx/

Tags 10.9, apple, bootable, linux, mavericks, OS X, usb, windows