REG MULTI SZ Reader - Revision history

Anders: UNICODE compatible

2009-03-06T20:29:28Z

UNICODE compatible

â† Older revision		Revision as of 20:29, 6 March 2009
Line 34:		Line 34:
	!define REG_MULTI_SZ 7		!define REG_MULTI_SZ 7

	!define RegOpenKeyEx "Advapi32::~~RegOpenKeyExA~~(i, t, i, i, *i) i"		!define RegOpenKeyEx "Advapi32::RegOpenKeyEx(i, t, i, i, *i) i"
	!define RegQueryValueEx "Advapi32::~~RegQueryValueExA~~(i, t, i, i, i, i) i"		!define RegQueryValueEx "Advapi32::RegQueryValueEx(i, t, i, i, i, i) i"
	!define RegCloseKey "Advapi32::~~RegCloseKeyA~~(i) i"		!define RegCloseKey "Advapi32::RegCloseKey(i) i"

	####### Edit this!		####### Edit this!

	!define ROOT_KEY ${~~HKEY_CURRENT_USER~~}		!define ROOT_KEY ${HKEY_LOCAL_MACHINE}
	!define SUB_KEY "~~Software~~\~~Joe Software~~"		!define SUB_KEY "SYSTEM\CurrentControlSet\Control\Lsa"
	!define VALUE "~~Strings~~"		!define VALUE "Security Packages"

	####### Stop editing		####### Stop editing
Line 100:		Line 100:

	IntOp $6 $4 + $2		IntOp $6 $4 + $2


			;REG_MULTI_SZ is double null terminated, change the size so the loop does not have to worry about it
			!ifdef NSIS_UNICODE
			IntOp $6 $6 - 2
			!else
	IntOp $6 $6 - 1		IntOp $6 $6 - 1
			!endif

	loop:		loop:
			System::Call "*$4(&t${NSIS_MAX_STRLEN} .r3)"
	System::Call "*$4(&t${NSIS_MAX_STRLEN} .r3)"		StrLen $5 $3
	~~DetailPrint $3~~		IntOp $5 $5 + 1 ;arnold
	StrLen $5 $3		!ifdef NSIS_UNICODE
	IntOp $4 $4 + $5		IntOp $5 $5 * 2 ;WCHAR
	IntOp $4 $4 + 1		!endif
	IntCmp $4 $6 0 loop		IntOp $4 $4 + $5
			DetailPrint $3
			IntCmp $4 $6 0 loop

	done:		done:

195.127.188.198: support of empty lines as needed to read PendingFileRenameOperations

2007-11-23T11:05:47Z

support of empty lines as needed to read PendingFileRenameOperations

â† Older revision		Revision as of 11:05, 23 November 2007
Line 99:		Line 99:
	StrCpy $4 $1		StrCpy $4 $1

			IntOp $6 $4 + $2
			IntOp $6 $6 - 1

	loop:		loop:

	System::Call "*$4(&t${NSIS_MAX_STRLEN} .r3)"		System::Call "*$4(&t${NSIS_MAX_STRLEN} .r3)"
	~~StrCmp $3 "" done~~
	DetailPrint $3		DetailPrint $3
	StrLen $5 $3		StrLen $5 $3
	IntOp $4 $4 + $5		IntOp $4 $4 + $5
	IntOp $4 $4 + 1		IntOp $4 $4 + 1
	~~Goto~~ loop		IntCmp $4 $6 0 loop

	done:		done:

Kichik: simpler with pointers

2007-07-06T09:20:58Z

simpler with pointers

â† Older revision		Revision as of 09:20, 6 July 2007
Line 20:		Line 20:
	!define HKEY_CURRENT_CONFIG 0x80000005		!define HKEY_CURRENT_CONFIG 0x80000005
	!define HKEY_DYN_DATA 0x80000006		!define HKEY_DYN_DATA 0x80000006

	!define KEY_QUERY_VALUE 0x0001		!define KEY_QUERY_VALUE 0x0001
	!define KEY_ENUMERATE_SUB_KEYS 0x0008		!define KEY_ENUMERATE_SUB_KEYS 0x0008

	!define REG_NONE 0		!define REG_NONE 0
	!define REG_SZ 1		!define REG_SZ 1
Line 33:		Line 33:
	!define REG_LINK 6		!define REG_LINK 6
	!define REG_MULTI_SZ 7		!define REG_MULTI_SZ 7

	!define RegOpenKeyEx "Advapi32::RegOpenKeyExA(i, t, i, i, i) i"		!define RegOpenKeyEx "Advapi32::RegOpenKeyExA(i, t, i, i, *i) i"
	!define RegQueryValueEx "Advapi32::RegQueryValueExA(i, t, i, i, i, i) i"		!define RegQueryValueEx "Advapi32::RegQueryValueExA(i, t, i, i, i, i) i"
	!define RegCloseKey "Advapi32::RegCloseKeyA(i) i"		!define RegCloseKey "Advapi32::RegCloseKeyA(i) i"

	####### Edit this!		####### Edit this!

	!define ROOT_KEY ${HKEY_CURRENT_USER}		!define ROOT_KEY ${HKEY_CURRENT_USER}
	!define SUB_KEY "Software\Joe Software"		!define SUB_KEY "Software\Joe Software"
	!define VALUE "Strings"		!define VALUE "Strings"

	####### Stop editing		####### Stop editing

	Section "Read"		Section "Read"
	StrCpy $0 ""		StrCpy $0 ""
Line 52:		Line 52:
	StrCpy $3 ""		StrCpy $3 ""
	SetPluginUnload alwaysoff		SetPluginUnload alwaysoff
	~~System::Call "*(i) i (0) .r0"~~
	~~System::Call "*(i) i (0) .r1"~~
	~~System::Call "*(i) i (0) .r2"~~
	System::Call "${RegOpenKeyEx}(${ROOT_KEY}, '${SUB_KEY}', \		System::Call "${RegOpenKeyEx}(${ROOT_KEY}, '${SUB_KEY}', \
	0, ${KEY_QUERY_VALUE}\|${KEY_ENUMERATE_SUB_KEYS}, r0) .r3"		0, ${KEY_QUERY_VALUE}\|${KEY_ENUMERATE_SUB_KEYS}, .r0) .r3"

	StrCmp $3 0 goon		StrCmp $3 0 goon
	MessageBox MB_OK\|MB_ICONSTOP "Can't open registry key! ($3)"		MessageBox MB_OK\|MB_ICONSTOP "Can't open registry key! ($3)"
Line 63:		Line 60:
	goon:		goon:

	~~System::Call "*$0(&i4 .r4)"~~		System::Call "${RegQueryValueEx}(r0, '${VALUE}', 0, .r1, 0, .r2) .r3"
	System::Call "${RegQueryValueEx}(r4, '${VALUE}', 0, r1, 0, r2) .r3"

	StrCmp $3 0 read		StrCmp $3 0 read
	MessageBox MB_OK\|MB_ICONSTOP "Can't query registry value! ($3)"		MessageBox MB_OK\|MB_ICONSTOP "Can't query registry value size! ($3)"
	Goto done		Goto done

	read:		read:

	System::Call "*$1~~(&i4 .r3)"~~		StrCmp $1 ${REG_MULTI_SZ} multisz

	~~StrCmp $3~~ ${REG_MULTI_SZ} multisz
	MessageBox MB_OK\|MB_ICONSTOP "Registry value no REG_MULTI_SZ! ($3)"		MessageBox MB_OK\|MB_ICONSTOP "Registry value no REG_MULTI_SZ! ($3)"
	Goto done		Goto done

	multisz:		multisz:

	System::Call "*$2~~(&i4 .r3)"~~		StrCmp $2 0 0 multiszalloc

	~~StrCmp $3~~ 0 0 multiszalloc
	MessageBox MB_OK\|MB_ICONSTOP "Registry value empty! ($3)"		MessageBox MB_OK\|MB_ICONSTOP "Registry value empty! ($3)"
	Goto done		Goto done

	multiszalloc:		multiszalloc:

	~~System::Free $1~~		System::Alloc $2
	System::Alloc $3
	Pop $1		Pop $1

	StrCmp $1 0 0 multiszget		StrCmp $1 0 0 multiszget
	MessageBox MB_OK\|MB_ICONSTOP "Can't allocate enough memory! ($3)"		MessageBox MB_OK\|MB_ICONSTOP "Can't allocate enough memory! ($3)"
	Goto done		Goto done

	multiszget:		multiszget:

	System::Call "${RegQueryValueEx}(r4, '${VALUE}', 0, 0, r1, r2) .r3"		System::Call "${RegQueryValueEx}(r0, '${VALUE}', 0, n, r1, r2) .r3"

	StrCmp $3 0 multiszprocess		StrCmp $3 0 multiszprocess
	MessageBox MB_OK\|MB_ICONSTOP "Can't query registry value! ($3)~~[2]~~"		MessageBox MB_OK\|MB_ICONSTOP "Can't query registry value data! ($3)"
	Goto done		Goto done

	multiszprocess:		multiszprocess:

	StrCpy $4 $1		StrCpy $4 $1

	loop:		loop:

	System::Call "*$4(&t${NSIS_MAX_STRLEN} .r3)"		System::Call "*$4(&t${NSIS_MAX_STRLEN} .r3)"
	StrCmp $3 "" done		StrCmp $3 "" done
Line 117:		Line 108:
	IntOp $4 $4 + 1		IntOp $4 $4 + 1
	Goto loop		Goto loop

	done:		done:

	~~System::Free $2~~
	System::Free $1		System::Free $1

	StrCmp $0 0 noClose		StrCmp $0 0 noClose
	System::Call "${RegCloseKey}(r0)"		System::Call "${RegCloseKey}(r0)"

	noClose:		noClose:

	SetPluginUnload manual		SetPluginUnload manual
	~~System::Free $0~~		SectionEnd</highlight-nsis>
	SectionEnd
	</highlight-nsis>

	[[Category:System Plugin Examples]]		[[Category:System Plugin Examples]]

Instructor: typo: SZ_MULTI_SZ -> REG_MULTI_SZ

2005-07-23T09:51:06Z

typo: SZ_MULTI_SZ -> REG_MULTI_SZ

â† Older revision		Revision as of 09:51, 23 July 2005
Line 75:		Line 75:

	StrCmp $3 ${REG_MULTI_SZ} multisz		StrCmp $3 ${REG_MULTI_SZ} multisz
	MessageBox MB_OK\|MB_ICONSTOP "Registry value no ~~SZ_MULTI_SZ~~! ($3)"		MessageBox MB_OK\|MB_ICONSTOP "Registry value no REG_MULTI_SZ! ($3)"
	Goto done		Goto done

ConversionBot: Adding new author and category links.

2005-06-24T13:36:24Z

Adding new author and category links.

â† Older revision		Revision as of 13:36, 24 June 2005
Line 1:		Line 1:
	{~~\|align=right~~		{{PageAuthor\|KiCHiK}}
	~~\|<small>Author: [[~~{~~{ns:2}}:KiCHiK~~\|KiCHiK~~]] ([[{{ns:3}}:KiCHiK\|talk]], [[{{ns:-1}~~}~~:Contributions/KiCHiK\|contrib]])</small>~~
	\|}
	~~<br style="clear:both;">~~
	== Description ==		== Description ==
	I wrote this script to help rpetges in [http://forums.winamp.com/showthread.php?s=&threadid=131154 this forum thread]. It reads a registry value of the type REG_MULTI_SZ and prints it out. Don't forget to edit where it says "Edit this!" when you test this script. The values must point to a REG_MULTI_SZ value or the example will spit out an error.		I wrote this script to help rpetges in [http://forums.winamp.com/showthread.php?s=&threadid=131154 this forum thread]. It reads a registry value of the type REG_MULTI_SZ and prints it out. Don't forget to edit where it says "Edit this!" when you test this script. The values must point to a REG_MULTI_SZ value or the example will spit out an error.
Line 135:		Line 133:
	</highlight-nsis>		</highlight-nsis>

	[[~~{{ns:14}}~~:System Plugin Examples]]		[[Category:System Plugin Examples]]

ConversionBot: Added category links.

2005-04-30T20:59:58Z

Added category links.

â† Older revision		Revision as of 20:59, 30 April 2005
Line 134:		Line 134:
	SectionEnd		SectionEnd
	</highlight-nsis>		</highlight-nsis>

			[[{{ns:14}}:System Plugin Examples]]

ConversionBot: Updated author links.

2005-04-30T03:02:09Z

Updated author links.

@@ Line 1: / Line 1: @@
 == Description ==
 I wrote this script to help rpetges in [http://forums.winamp.com/showthread.php?s=&threadid=131154 this forum thread]. It reads a registry value of the type REG_MULTI_SZ and prints it out. Don't forget to edit where it says "Edit this!" when you test this script. The values must point to a REG_MULTI_SZ value or the example will spit out an error.
@@ Line 130: / Line 134: @@
 SectionEnd
 </highlight-nsis>

ConversionBot: Updated author and download links, and changed format of some pages.

2005-04-23T12:26:19Z

Updated author and download links, and changed format of some pages.

â† Older revision		Revision as of 12:26, 23 April 2005
Line 131:		Line 131:
	</highlight-nsis>		</highlight-nsis>

	Page author: KiCHiK		Page author: [[User:KiCHiK\|KiCHiK]]

ConversionBot: Wikipedia python library

2005-04-09T19:23:16Z

Wikipedia python library

New page

== Description ==
I wrote this script to help rpetges in [http://forums.winamp.com/showthread.php?s=&threadid=131154 this forum thread]. It reads a registry value of the type REG_MULTI_SZ and prints it out. Don't forget to edit where it says "Edit this!" when you test this script. The values must point to a REG_MULTI_SZ value or the example will spit out an error.

<highlight-nsis>
OutFile "REG_MULTI_SZ Reader.exe"

Name "REG_MULTI_SZ Reader"

ShowInstDetails show

!define HKEY_CLASSES_ROOT 0x80000000
!define HKEY_CURRENT_USER 0x80000001
!define HKEY_LOCAL_MACHINE 0x80000002
!define HKEY_USERS 0x80000003
!define HKEY_PERFORMANCE_DATA 0x80000004
!define HKEY_PERFORMANCE_TEXT 0x80000050
!define HKEY_PERFORMANCE_NLSTEXT 0x80000060
!define HKEY_CURRENT_CONFIG 0x80000005
!define HKEY_DYN_DATA 0x80000006

!define KEY_QUERY_VALUE 0x0001
!define KEY_ENUMERATE_SUB_KEYS 0x0008

!define REG_NONE 0
!define REG_SZ 1
!define REG_EXPAND_SZ 2
!define REG_BINARY 3
!define REG_DWORD 4
!define REG_DWORD_LITTLE_ENDIAN 4
!define REG_DWORD_BIG_ENDIAN 5
!define REG_LINK 6
!define REG_MULTI_SZ 7

!define RegOpenKeyEx "Advapi32::RegOpenKeyExA(i, t, i, i, i) i"
!define RegQueryValueEx "Advapi32::RegQueryValueExA(i, t, i, i, i, i) i"
!define RegCloseKey "Advapi32::RegCloseKeyA(i) i"

####### Edit this!

!define ROOT_KEY ${HKEY_CURRENT_USER}
!define SUB_KEY "Software\Joe Software"
!define VALUE "Strings"

####### Stop editing

Section "Read"
StrCpy $0 ""
StrCpy $1 ""
StrCpy $2 ""
StrCpy $3 ""
SetPluginUnload alwaysoff
System::Call "*(i) i (0) .r0"
System::Call "*(i) i (0) .r1"
System::Call "*(i) i (0) .r2"
System::Call "${RegOpenKeyEx}(${ROOT_KEY}, '${SUB_KEY}', \
0, ${KEY_QUERY_VALUE}|${KEY_ENUMERATE_SUB_KEYS}, r0) .r3"

StrCmp $3 0 goon
MessageBox MB_OK|MB_ICONSTOP "Can't open registry key! ($3)"
Goto done
goon:

System::Call "*$0(&i4 .r4)"
System::Call "${RegQueryValueEx}(r4, '${VALUE}', 0, r1, 0, r2) .r3"

StrCmp $3 0 read
MessageBox MB_OK|MB_ICONSTOP "Can't query registry value! ($3)"
Goto done

read:

System::Call "*$1(&i4 .r3)"

StrCmp $3 ${REG_MULTI_SZ} multisz
MessageBox MB_OK|MB_ICONSTOP "Registry value no SZ_MULTI_SZ! ($3)"
Goto done

multisz:

System::Call "*$2(&i4 .r3)"

StrCmp $3 0 0 multiszalloc
MessageBox MB_OK|MB_ICONSTOP "Registry value empty! ($3)"
Goto done

multiszalloc:

System::Free $1
System::Alloc $3
Pop $1

StrCmp $1 0 0 multiszget
MessageBox MB_OK|MB_ICONSTOP "Can't allocate enough memory! ($3)"
Goto done

multiszget:

System::Call "${RegQueryValueEx}(r4, '${VALUE}', 0, 0, r1, r2) .r3"

StrCmp $3 0 multiszprocess
MessageBox MB_OK|MB_ICONSTOP "Can't query registry value! ($3)[2]"
Goto done

multiszprocess:

StrCpy $4 $1

loop:

System::Call "*$4(&t${NSIS_MAX_STRLEN} .r3)"
StrCmp $3 "" done
DetailPrint $3
StrLen $5 $3
IntOp $4 $4 + $5
IntOp $4 $4 + 1
Goto loop

done:

System::Free $2
System::Free $1

StrCmp $0 0 noClose
System::Call "${RegCloseKey}(r0)"

noClose:

SetPluginUnload manual
System::Free $0
SectionEnd
</highlight-nsis>

Page author: KiCHiK