Rnd - Revision history

Lloigor: moved Rnd, Rnd64 to Rnd: Removed Rnd64 due to updated calculation not fitting 64bit random result (need an operation resulting in a 128bit number).

2011-12-07T19:45:08Z

moved Rnd, Rnd64 to Rnd: Removed Rnd64 due to updated calculation not fitting 64bit random result (need an operation resulting in a 128bit number).

â† Older revision

Revision as of 19:45, 7 December 2011

Lloigor: better calculation, removed rnd64 (doesnt work with new calculation)

2011-12-07T19:36:33Z

better calculation, removed rnd64 (doesnt work with new calculation)

â† Older revision		Revision as of 19:36, 7 December 2011
Line 22:		Line 22:
	ExecWait 'notepad "${tempfile}"'		ExecWait 'notepad "${tempfile}"'
	Delete "${tempfile}"</highlight-nsis>		Delete "${tempfile}"</highlight-nsis>
	== ~~Functions~~ ==		== Function ==
	<highlight-nsis>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;		<highlight-nsis>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	;; Generate a random number using the RtlGenRandom api		;; Generate a random number using the RtlGenRandom api
Line 29:		Line 29:
	;; P3 :in: Maximum value		;; P3 :in: Maximum value
	;; min/max P2 and P3 values = -2 147 483 647 / 2 147 483 647		;; min/max P2 and P3 values = -2 147 483 647 / 2 147 483 647
	;; max ~~interval~~ = 2 147 483 ~~648~~ (31-bit)		;; max range = 2 147 483 647 (31-bit)
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;		;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	!define Rnd "!insertmacro _Rnd"		!define Rnd "!insertmacro _Rnd"
Line 45:		Line 45:
	Push "$4" ;; random value buffer		Push "$4" ;; random value buffer

	IntOp $3 $1 - $0		IntOp $3 $1 - $0 ;; calculate range
	IntOp $3 $3 + 1		IntOp $3 $3 + 1
	System::Call '*(i) i .r4'		System::Call '*(l) i .r4'
	System::Call 'advapi32::SystemFunction036(i r4, i 4)' ;; RtlGenRandom		System::Call 'advapi32::SystemFunction036(i r4, i 4)' ;; RtlGenRandom
	System::Call '*$4(i .r1)'		System::Call '*$4(l .r1)'
	System::Free $4		System::Free $4
	~~IntOp $1 $1 & 0x7FFFFFFF ;; no negative value for modulus operation~~		;; fit value within range
	~~IntOp $1 $1 % $3~~ ;; fit value within range		System::Int64Op $1 * $3
	~~IntOp $0~~ $1 + $~~0 ;; index with minimum value~~

	~~Pop $4~~
	Pop $3		Pop $3
	~~Pop $1~~		System::Int64Op $3 / 0xFFFFFFFF
	~~Exch $0~~
	~~FunctionEnd</highlight-nsis>~~
	~~<highlight-nsis>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;~~
	~~;; Generate a random 64-bit number using the RtlGenRandom api~~
	~~;; P1 :out: Random number~~
	~~;; P2 :in: Minimum value~~
	~~;; P3 :in: Maximum value~~
	~~;; min/max P2 and P3 values = -9 223 372 036 854 775 807 / 9 223 372 036 854 775 807~~
	~~;; max interval = 9 223 372 036 854 775 808 (63-bit)~~
	~~;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;~~
	~~!define Rnd64 "!insertmacro _Rnd64"~~
	~~!macro _Rnd64 _RetVal_ _Min_ _Max_~~
	~~Push "${_Max_}"~~
	~~Push "${_Min_}"~~
	~~Call Rnd64~~
	~~Pop ${_RetVal_}~~
	~~!macroend~~
	~~Function Rnd64~~
	~~Exch $0 ;; Min / return value~~
	~~Exch~~
	~~Exch $1 ;; Max / random value~~
	~~Push "$3" ;; Max - Min range~~
	~~Push "$4" ;; random value buffer~~

	System::Int64Op $~~1 - $0~~
	Pop $3		Pop $3
	~~System::Int64Op~~ $~~3 + 1~~		IntOp $0 $3 + $0 ;; index with minimum value
	~~Pop~~ $3
	~~System::Call '*(l) i .r4'~~
	~~System::Call 'advapi32::SystemFunction036(i r4, i 8)' ;; RtlGenRandom~~
	~~System::Call '*$4(l .r1)'~~
	~~System::Free $4~~
	~~System::Int64Op $1 & 0x7FFFFFFFFFFFFFFF ;; no negative value for modulus operation~~
	~~Pop $1~~
	~~System::Int64Op $1 % $3 ;; fit value within range~~
	~~Pop $1~~
	~~System::Int64Op $1~~ + $0 ;; index with minimum value
	~~Pop $0~~

	Pop $4		Pop $4

Lloigor: /* Description */

2011-12-07T16:38:37Z

Description

â† Older revision		Revision as of 16:38, 7 December 2011
Line 5:		Line 5:
	Generates a random number within a range using the RtlGenRandom api.		Generates a random number within a range using the RtlGenRandom api.

	It can be used as is, or as a random seed generator for other functions, like http://nsis.sourceforge.net/Random. The Microsoft C Runtime Library makes use of this function in its implementation of "rand_s".		It can be used as is, or as a random seed generator for other functions, like http://nsis.sourceforge.net/Random. The Microsoft C Runtime Library makes use of this function (RtlGenRandom) in its implementation of "rand_s".


	== Example ==		== Example ==

Lloigor at 16:36, 7 December 2011

2011-12-07T16:36:33Z

â† Older revision		Revision as of 16:36, 7 December 2011
Line 30:		Line 30:
	;; P3 :in: Maximum value		;; P3 :in: Maximum value
	;; min/max P2 and P3 values = -2 147 483 647 / 2 147 483 647		;; min/max P2 and P3 values = -2 147 483 647 / 2 147 483 647
	;; max interval = 2 147 483 ~~647~~ (31-bit)		;; max interval = 2 147 483 648 (31-bit)
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;		;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	!define Rnd "!insertmacro _Rnd"		!define Rnd "!insertmacro _Rnd"
Line 67:		Line 67:
	;; P3 :in: Maximum value		;; P3 :in: Maximum value
	;; min/max P2 and P3 values = -9 223 372 036 854 775 807 / 9 223 372 036 854 775 807		;; min/max P2 and P3 values = -9 223 372 036 854 775 807 / 9 223 372 036 854 775 807
	;; max interval = 9 223 372 036 854 775 ~~807~~ (63-bit)		;; max interval = 9 223 372 036 854 775 808 (63-bit)
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;		;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	!define Rnd64 "!insertmacro _Rnd64"		!define Rnd64 "!insertmacro _Rnd64"

Lloigor at 16:25, 7 December 2011

2011-12-07T16:25:59Z

â† Older revision		Revision as of 16:25, 7 December 2011
Line 3:		Line 3:

	==Description ==		==Description ==
	Generates a random number within a range using the RtlGenRandom api.		Generates a random number within a range using the RtlGenRandom api.

			It can be used as is, or as a random seed generator for other functions, like http://nsis.sourceforge.net/Random. The Microsoft C Runtime Library makes use of this function in its implementation of "rand_s".


	== Example ==		== Example ==

209.195.88.178 at 14:00, 5 December 2011

2011-12-05T14:00:19Z

â† Older revision		Revision as of 14:00, 5 December 2011
Line 39:		Line 39:
	Exch $0 ;; Min / return value		Exch $0 ;; Min / return value
	Exch		Exch
	Exch $1 ;; Max / ~~temp var~~		Exch $1 ;; Max / random value
	Push "$3" ;; ~~difference between~~ Max ~~and~~ Min		Push "$3" ;; Max - Min range
	Push "$4" ;; random value		Push "$4" ;; random value buffer

	IntOp $3 $1 - $0		IntOp $3 $1 - $0
Line 49:		Line 49:
	System::Call '*$4(i .r1)'		System::Call '*$4(i .r1)'
	System::Free $4		System::Free $4
	IntOp $1 $1 & 0x7FFFFFFF ;; no negative value		IntOp $1 $1 & 0x7FFFFFFF ;; no negative value for modulus operation
	IntOp $1 $1 % $3 ;; fit value within range		IntOp $1 $1 % $3 ;; fit value within range
	IntOp $0 $1 + $0 ;; index with minimum value		IntOp $0 $1 + $0 ;; index with minimum value
Line 76:		Line 76:
	Exch $0 ;; Min / return value		Exch $0 ;; Min / return value
	Exch		Exch
	Exch $1 ;; Max / ~~temp var~~		Exch $1 ;; Max / random value
	Push "$3" ;; ~~difference between~~ Max ~~and~~ Min		Push "$3" ;; Max - Min range
	Push "$4" ;; random value		Push "$4" ;; random value buffer

	System::Int64Op $1 - $0		System::Int64Op $1 - $0
Line 88:		Line 88:
	System::Call '*$4(l .r1)'		System::Call '*$4(l .r1)'
	System::Free $4		System::Free $4
	System::Int64Op $1 & 0x7FFFFFFFFFFFFFFF ;; no negative value		System::Int64Op $1 & 0x7FFFFFFFFFFFFFFF ;; no negative value for modulus operation
	Pop $1		Pop $1
	System::Int64Op $1 % $3 ;; fit value within range		System::Int64Op $1 % $3 ;; fit value within range

209.195.89.100: /* Functions */

2011-12-03T11:48:43Z

Functions

â† Older revision		Revision as of 11:48, 3 December 2011
Line 27:		Line 27:
	;; P3 :in: Maximum value		;; P3 :in: Maximum value
	;; min/max P2 and P3 values = -2 147 483 647 / 2 147 483 647		;; min/max P2 and P3 values = -2 147 483 647 / 2 147 483 647
	;; max interval = 2 147 483 647		;; max interval = 2 147 483 647 (31-bit)
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;		;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	!define Rnd "!insertmacro _Rnd"		!define Rnd "!insertmacro _Rnd"
Line 64:		Line 64:
	;; P3 :in: Maximum value		;; P3 :in: Maximum value
	;; min/max P2 and P3 values = -9 223 372 036 854 775 807 / 9 223 372 036 854 775 807		;; min/max P2 and P3 values = -9 223 372 036 854 775 807 / 9 223 372 036 854 775 807
	;; max interval = 9 223 372 036 854 775 807		;; max interval = 9 223 372 036 854 775 807 (63-bit)
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;		;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	!define Rnd64 "!insertmacro _Rnd64"		!define Rnd64 "!insertmacro _Rnd64"

209.195.89.100: /* Functions */

2011-12-03T00:57:58Z

Functions

â† Older revision		Revision as of 00:57, 3 December 2011
Line 22:		Line 22:
	== Functions ==		== Functions ==
	<highlight-nsis>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;		<highlight-nsis>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	;; Generate a random number ~~within a range~~ using the RtlGenRandom api		;; Generate a random number using the RtlGenRandom api
	;; P1 :out: Random number		;; P1 :out: Random number
	;; P2 :in: Minimum value		;; P2 :in: Minimum value
Line 59:		Line 59:
	FunctionEnd</highlight-nsis>		FunctionEnd</highlight-nsis>
	<highlight-nsis>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;		<highlight-nsis>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	;; Generate a random 64-bit number ~~within a range~~ using the RtlGenRandom api		;; Generate a random 64-bit number using the RtlGenRandom api
	;; P1 :out: Random number		;; P1 :out: Random number
	;; P2 :in: Minimum value		;; P2 :in: Minimum value

209.195.89.100: /* Functions */

2011-12-03T00:56:14Z

Functions

â† Older revision		Revision as of 00:56, 3 December 2011
Line 22:		Line 22:
	== Functions ==		== Functions ==
	<highlight-nsis>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;		<highlight-nsis>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	;; ~~Gets~~ a random number within a range ~~with~~ the RtlGenRandom api		;; Generate a random number within a range using the RtlGenRandom api
	;; P1 :out: Random number		;; P1 :out: Random number
	;; P2 :in: Minimum value		;; P2 :in: Minimum value
Line 49:		Line 49:
	System::Call '*$4(i .r1)'		System::Call '*$4(i .r1)'
	System::Free $4		System::Free $4
	IntOp $1 $1 & 0x7FFFFFFF ;; ~~eliminate the possibilily of a~~ negative value		IntOp $1 $1 & 0x7FFFFFFF ;; no negative value
	IntOp $1 $1 % $3 ;; fit value within range		IntOp $1 $1 % $3 ;; fit value within range
	IntOp $0 $1 + $0 ;; index with minimum value		IntOp $0 $1 + $0 ;; index with minimum value
Line 59:		Line 59:
	FunctionEnd</highlight-nsis>		FunctionEnd</highlight-nsis>
	<highlight-nsis>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;		<highlight-nsis>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	;; ~~Gets~~ a random number within a range ~~with~~ the RtlGenRandom api ~~(Int64)~~		;; Generate a random 64-bit number within a range using the RtlGenRandom api
	;; P1 :out: Random number		;; P1 :out: Random number
	;; P2 :in: Minimum value		;; P2 :in: Minimum value
Line 88:		Line 88:
	System::Call '*$4(l .r1)'		System::Call '*$4(l .r1)'
	System::Free $4		System::Free $4
	System::Int64Op $1 & 0x7FFFFFFFFFFFFFFF ;; ~~eliminate the possibilily of a~~ negative value		System::Int64Op $1 & 0x7FFFFFFFFFFFFFFF ;; no negative value
	Pop $1		Pop $1
	System::Int64Op $1 % $3 ;; fit value within range		System::Int64Op $1 % $3 ;; fit value within range

209.195.89.100: /* Functions */

2011-12-02T22:22:07Z

Functions

â† Older revision		Revision as of 22:22, 2 December 2011
Line 49:		Line 49:
	System::Call '*$4(i .r1)'		System::Call '*$4(i .r1)'
	System::Free $4		System::Free $4
	IntOp $1 $1 & 0x7FFFFFFF ;; eliminate ~~possible~~ negative value		IntOp $1 $1 & 0x7FFFFFFF ;; eliminate the possibilily of a negative value
	IntOp $1 $1 % $3 ;; fit value within range		IntOp $1 $1 % $3 ;; fit value within range
	IntOp $0 $1 + $0 ;; index with minimum value		IntOp $0 $1 + $0 ;; index with minimum value
Line 88:		Line 88:
	System::Call '*$4(l .r1)'		System::Call '*$4(l .r1)'
	System::Free $4		System::Free $4
	System::Int64Op $1 & 0x7FFFFFFFFFFFFFFF ;; eliminate ~~possible~~ negative value		System::Int64Op $1 & 0x7FFFFFFFFFFFFFFF ;; eliminate the possibilily of a negative value
	Pop $1		Pop $1
	System::Int64Op $1 % $3 ;; fit value within range		System::Int64Op $1 % $3 ;; fit value within range