Get size on disk - Revision history

Anders: Use ReserveFile /plugin

2013-05-24T18:32:35Z

Use ReserveFile /plugin

â† Older revision		Revision as of 18:32, 24 May 2013
Line 9:		Line 9:
	Name "SOD Tool"		Name "SOD Tool"
	Unicode true		Unicode true
	~~ManifestSupportedOS all~~
	RequestExecutionLevel user		RequestExecutionLevel user
	#RequestExecutionLevel admin ; More files may be found in system folders		#RequestExecutionLevel admin ; More files may be found in system folders
Line 16:		Line 15:
	!include "${LOCAL}macros.nsh"		!include "${LOCAL}macros.nsh"
	Icon "${LOCAL}arrows.ico"		Icon "${LOCAL}arrows.ico"
	ReserveFile "~~${NSISDIR}\Plugins\x86-unicode\~~Math.dll" ; Doesn't seem to like "!include"		ReserveFile /plugin "Math.dll" ; Doesn't seem to like "!include"
	!include "LogicLib.nsh"		!include "LogicLib.nsh"
	ShowInstDetails show		ShowInstDetails show
Line 696:		Line 695:
	Macros behavior modified in order to detect the file system to deal with FAT, FAT12, FAT16 and FAT32 volumes. Also checking root path, possibly Win2K error. (March 8, 2013)		Macros behavior modified in order to detect the file system to deal with FAT, FAT12, FAT16 and FAT32 volumes. Also checking root path, possibly Win2K error. (March 8, 2013)

	Re-Compiled with NSIS 3 new release~~, ManifestSupportedOS all attribute added~~. (May 24, 2013)		Re-Compiled with NSIS 3 new release. (May 24, 2013)
	[[Category:Code Examples]]		[[Category:Code Examples]]

Bnicer: Size On Disk (SOD) utility

2013-05-24T15:55:43Z

Size On Disk (SOD) utility

â† Older revision		Revision as of 15:55, 24 May 2013
Line 8:		Line 8:

	Name "SOD Tool"		Name "SOD Tool"
			Unicode true
			ManifestSupportedOS all
	RequestExecutionLevel user		RequestExecutionLevel user
	#RequestExecutionLevel admin ; More files may be found in system folders		#RequestExecutionLevel admin ; More files may be found in system folders
Line 14:		Line 16:
	!include "${LOCAL}macros.nsh"		!include "${LOCAL}macros.nsh"
	Icon "${LOCAL}arrows.ico"		Icon "${LOCAL}arrows.ico"
	ReserveFile "${NSISDIR}\Plugins\Math.dll" ; Doesn't seem to like "!include"		ReserveFile "${NSISDIR}\Plugins\x86-unicode\Math.dll" ; Doesn't seem to like "!include"
	!include "LogicLib.nsh"		!include "LogicLib.nsh"
	ShowInstDetails show		ShowInstDetails show
Line 693:		Line 695:

	Macros behavior modified in order to detect the file system to deal with FAT, FAT12, FAT16 and FAT32 volumes. Also checking root path, possibly Win2K error. (March 8, 2013)		Macros behavior modified in order to detect the file system to deal with FAT, FAT12, FAT16 and FAT32 volumes. Also checking root path, possibly Win2K error. (March 8, 2013)

			Re-Compiled with NSIS 3 new release, ManifestSupportedOS all attribute added. (May 24, 2013)
	[[Category:Code Examples]]		[[Category:Code Examples]]

Bnicer: Size On Disk (SOD) utility

2013-04-28T21:03:24Z

Size On Disk (SOD) utility

â† Older revision		Revision as of 21:03, 28 April 2013
Line 665:		Line 665:

	Both downloads are compiled in unicode, so SOD Tool can read Russian file names.		Both downloads are compiled in unicode, so SOD Tool can read Russian file names.

			<span style="font-size: 110%"><b>Errors:</b></span>

			On failing to obtain the size of a file <em>GetSizeOnDisk</em> does nothing much. You can edit the line that says,
			<highlight-nsis>
			FileOpen $9 '$R8\$R7' r
			IfErrors +3
			</highlight-nsis>
			changing the instruction to,
			<highlight-nsis>
			FileOpen $9 '$R8\$R7' r
			IfErrors FileFunc_GetSize_error
			</highlight-nsis>
			It sets an error flag and will abort the macro, if an error is encountered opening a file for reading.

	<span style="font-size: 110%"><b>History:</b></span>		<span style="font-size: 110%"><b>History:</b></span>

Bnicer: Size On Disk (SOD) utility

2013-03-08T01:30:57Z

Size On Disk (SOD) utility

â† Older revision		Revision as of 01:30, 8 March 2013
Line 678:		Line 678:
	String formatting improvements, functions simplified (SOD II) and small revisions in macros header made. (Feb. 23, 2013)		String formatting improvements, functions simplified (SOD II) and small revisions in macros header made. (Feb. 23, 2013)

	Macros behavior modified in order to detect the file system to deal with FAT, FAT12, FAT16 and FAT32 volumes. Also checking root path, possibly Win2K error. (March 8, ~~1213~~)		Macros behavior modified in order to detect the file system to deal with FAT, FAT12, FAT16 and FAT32 volumes. Also checking root path, possibly Win2K error. (March 8, 2013)
	[[Category:Code Examples]]		[[Category:Code Examples]]

Bnicer: Size On Disk (SOD) utility

2013-03-08T01:15:14Z

Size On Disk (SOD) utility

@@ Line 255: / Line 255: @@
 ; If neither 'SOD' nor a cluster size is specified, $var4 returns 0
 ; even where compressed and/or sparse files exist
 !macro GetSizeOnDisk_
@@ Line 285: / Line 289: @@
 	ClearErrors
-	StrCmp $R1 '' FileFunc_GetSize_path FileFunc_GetSize_sod
+	StrCmp $R1 '' FileFunc_GetSize_path
-	FileFunc_GetSize_sod:
+	StrCpy $5 $0
 	StrCmp $R1 'SOD' 0 FileFunc_GetSize_path
-	System::Call 'kernel32::GetDiskFreeSpace(tr0,*i0r2,*i0r3,,)'
+	System::Call 'kernel32::GetDiskFreeSpace(t "$5\",*i0r2,*i0r3,,)'
 	IntOp $R1 $2 * $3
 	FileFunc_GetSize_path:
@@ Line 546: / Line 587: @@
 ; GetClusterSize
-; Syntax: ${GetClusterSize} $inputpath $outputvariable
+; Allocation unit size on NTFS, exFAT and reFS formatted volumes
 ; Result: 512, 1024, ..., 4096, ..., 131072, ...
@@ Line 565: / Line 607: @@
 	Push $1
 	Push $2
-	System::Call 'kernel32::GetDiskFreeSpace(tr0,*i0r1,*i0r2,,)'
+	Push $3
 	IntOp $0 $1 * $2
 	Pop $2
 	Pop $1
@@ Line 604: / Line 677: @@
 String formatting improvements, functions simplified (SOD II) and small revisions in macros header made. (Feb. 23, 2013)
 [[Category:Code Examples]]

Bnicer: Size On Disk (SOD) utility

2013-02-23T23:44:29Z

Size On Disk (SOD) utility

Show changes

Bnicer: Size On Disk (SOD) utility

2013-02-22T16:48:54Z

Size On Disk (SOD) utility

Show changes

Bnicer: Size On Disk (SOD) utility

2013-02-20T01:55:44Z

Size On Disk (SOD) utility

â† Older revision		Revision as of 01:55, 20 February 2013
Line 536:		Line 536:

	<attach>SODTool.zip</attach>		<attach>SODTool.zip</attach>

			Update: Source files are little-endian UCS-2 with BOM encoded and compiled in unicode. An ansi-compiled version didn't read Russian file names. (20. Feb, 2013)
	[[Category:Code Examples]]		[[Category:Code Examples]]

Bnicer: Size On Disk (SOD) utility

2013-02-19T17:28:32Z

Size On Disk (SOD) utility

â† Older revision		Revision as of 17:28, 19 February 2013
Line 74:		Line 74:
	StrCpy $FOLDERS $2		StrCpy $FOLDERS $2
	StrCpy $SIZE_M $3		StrCpy $SIZE_M $3
	${GetSizeOnDisk} "$NSIS" "/S=0B" "$BLOCK" $0 $1 $2 $3		${GetSizeOnDisk} "$NSIS" "/S=0B" "$BLOCK" $0 $1 $2 $9
	Math::Script "r4 = ff($0 / 1024.0, 16 +0); r5 = ff(r4 / 1024.0, 16 +2)"		Math::Script "r4 = ff($0 / 1024.0, 16 +0); r5 = ff(r4 / 1024.0, 16 +2)"
	StrCpy $SOD_B $0		StrCpy $SOD_B $0
Line 81:		Line 81:
	; uninstaller		; uninstaller
	IfFileExists "$NSIS\uninst-nsis.exe" 0 done		IfFileExists "$NSIS\uninst-nsis.exe" 0 done
	${GetSizeOnDisk} "$NSIS" "/M=uninst-nsis.exe /S=0B" "" $0 $1 $2 $3		${GetSizeOnDisk} "$NSIS" "/M=uninst-nsis.exe /S=0B /G=0" "" $0 $1 $2 $3
	Math::Script "r6 = ff($0 / 1024.0, 16 +1)"		Math::Script "r6 = ff($0 / 1024.0, 16 +1)"
	StrCpy $SIZE_UN_B $0		StrCpy $SIZE_UN_B $0
	StrCpy $SIZE_UN_K $6		StrCpy $SIZE_UN_K $6
	${GetSizeOnDisk} "$NSIS" "/M=uninst-nsis.exe /S=0B" "$BLOCK" $0 $1 $2 $3		${GetSizeOnDisk} "$NSIS" "/M=uninst-nsis.exe /S=0B /G=0" "$BLOCK" $0 $1 $2 $3
	Math::Script "r7 = ff($0 / 1024.0, 16 +1)"		Math::Script "r7 = ff($0 / 1024.0, 16 +1)"
	StrCpy $SOD_UN_B $0		StrCpy $SOD_UN_B $0
Line 118:		Line 118:
	DetailPrint "SOD: $SOD_UN_K KB ($SOD_UN_B bytes)"		DetailPrint "SOD: $SOD_UN_K KB ($SOD_UN_B bytes)"
	DetailPrint ""		DetailPrint ""
	DetailPrint "$FILES files $FOLDERS folders $SOD_K Kb"		DetailPrint "$FILES files \| $FOLDERS folders \| $SOD_K Kb \| $9 compressed/sparse file(s)"
	DetailPrint ""		DetailPrint ""
	Goto completed		Goto completed

Bnicer: Size On Disk (SOD) utility

2013-02-18T02:29:19Z

Size On Disk (SOD) utility

â† Older revision		Revision as of 02:29, 18 February 2013
Line 68:		Line 68:
	IfFileExists "$NSIS" 0 done		IfFileExists "$NSIS" 0 done
	${GetClusterSize} $BLOCK		${GetClusterSize} $BLOCK
	${GetSizeOnDisk} "$NSIS" "/S=0B" "" $0 $1 $2		${GetSizeOnDisk} "$NSIS" "/S=0B" "" $0 $1 $2 $3
	Math::Script "r3 = ff($0 / 1024 / 1024.0, 16 +2"		Math::Script "r3 = ff($0 / 1024 / 1024.0, 16 +2"
	StrCpy $SIZE_B $0		StrCpy $SIZE_B $0
Line 74:		Line 74:
	StrCpy $FOLDERS $2		StrCpy $FOLDERS $2
	StrCpy $SIZE_M $3		StrCpy $SIZE_M $3
	${GetSizeOnDisk} "$NSIS" "/S=0B" "$BLOCK" $0 $1 $2		${GetSizeOnDisk} "$NSIS" "/S=0B" "$BLOCK" $0 $1 $2 $3
	Math::Script "r4 = ff($0 / 1024.0, 16 +0); r5 = ff(r4 / 1024.0, 16 +2)"		Math::Script "r4 = ff($0 / 1024.0, 16 +0); r5 = ff(r4 / 1024.0, 16 +2)"
	StrCpy $SOD_B $0		StrCpy $SOD_B $0
Line 81:		Line 81:
	; uninstaller		; uninstaller
	IfFileExists "$NSIS\uninst-nsis.exe" 0 done		IfFileExists "$NSIS\uninst-nsis.exe" 0 done
	${GetSizeOnDisk} "$NSIS" "/M=uninst-nsis.exe /S=0B" "" $0 $1 $2		${GetSizeOnDisk} "$NSIS" "/M=uninst-nsis.exe /S=0B" "" $0 $1 $2 $3
	Math::Script "r6 = ff($0 / 1024.0, 16 +1)"		Math::Script "r6 = ff($0 / 1024.0, 16 +1)"
	StrCpy $SIZE_UN_B $0		StrCpy $SIZE_UN_B $0
	StrCpy $SIZE_UN_K $6		StrCpy $SIZE_UN_K $6
	${GetSizeOnDisk} "$NSIS" "/M=uninst-nsis.exe /S=0B" "$BLOCK" $0 $1 $2		${GetSizeOnDisk} "$NSIS" "/M=uninst-nsis.exe /S=0B" "$BLOCK" $0 $1 $2 $3
	Math::Script "r7 = ff($0 / 1024.0, 16 +1)"		Math::Script "r7 = ff($0 / 1024.0, 16 +1)"
	StrCpy $SOD_UN_B $0		StrCpy $SOD_UN_B $0
Line 171:		Line 171:
	!macroend		!macroend

	!macro GetSizeOnDiskCall _PATH _OPTIONS _FILESYSTEM _RESULT1 _RESULT2 _RESULT3		!macro GetSizeOnDiskCall _PATH _OPTIONS _FILESYSTEM _RESULT1 _RESULT2 _RESULT3 _RESULT4
	!verbose push		!verbose push
	!verbose ${_FILEFUNC_VERBOSE}		!verbose ${_FILEFUNC_VERBOSE}
	Push `${_PATH}`		Push `${_PATH}`
	Push `${_OPTIONS}`		Push `${_OPTIONS}`
	Push `${_FILESYSTEM}` ; block size		Push `${_FILESYSTEM}` ; volume block size
	${CallArtificialFunction} GetSizeOnDisk_		${CallArtificialFunction} GetSizeOnDisk_
	Pop ${_RESULT1}		Pop ${_RESULT1}
	Pop ${_RESULT2}		Pop ${_RESULT2}
	Pop ${_RESULT3}		Pop ${_RESULT3}
			Pop ${_RESULT4}
	!verbose pop		!verbose pop
	!macroend		!macroend
Line 207:		Line 208:

	; For documentation, see the NSIS user manual: E.1.3 GetSize		; For documentation, see the NSIS user manual: E.1.3 GetSize
	; ~~Three~~ values are returned		; Four (not three) values are returned

	; $var1 ; Result1: Size/Size on disk		; $var1 ; Result1: Size/Size on disk
	; $var2 ; Result2: Sum of files		; $var2 ; Result2: Sum of files
	; $var3 ; Result3: Sum of directories		; $var3 ; Result3: Sum of directories
			; $var4 ; Result4: Sum of compressed/sparse files

	; Example: ${GetSizeOnDisk} "$INSTDIR" "/S=0K" "4096" $0 $1 $2		; Example: ${GetSizeOnDisk} "$INSTDIR" "/S=0K" "4096" $0 $1 $2 $3
			; DetailPrint "$1 files \| $2 folders \| $0 Kb \| $3 compressed or sparse file(s)"

	; Specifying 4096 (~~logical~~ size) toggles the result		; Specifying 4096 (e.g. NTFS block size) toggles the result
	; Output is size on disk, if used, or size ~~in bytes~~, if left empty ""		; Output is size on disk, if used, or size, if left empty ""
			; and $var4 (compressed/sparse files) returns 0

	!macro GetSizeOnDisk_		!macro GetSizeOnDisk_
Line 256:		Line 260:
	IfFileExists '$0\.' 0 FileFunc_GetSize_error		IfFileExists '$0\.' 0 FileFunc_GetSize_error

	StrCpy $3 ''		; replace
			StrCpy $3 0
			; end replace
	StrCpy $4 ''		StrCpy $4 ''
	StrCpy $5 ''		StrCpy $5 ''
Line 374:		Line 380:
	System::Call 'kernel32::GetFileAttributes(t "$R8\$R7")i .R2'		System::Call 'kernel32::GetFileAttributes(t "$R8\$R7")i .R2'
	StrCmp $R2 -1 FileFunc_GetSize_fileopen		StrCmp $R2 -1 FileFunc_GetSize_fileopen
	IntOp $R0 $R2 & 0x0800		IntOp $R0 $R2 & 0x0800 ; compressed
	IntCmp $R0 0 0 0 +3		IntCmp $R0 0 0 0 FileFunc_GetSize_GetCompressed
	IntOp $R0 $R2 & 0x0200		IntOp $R0 $R2 & 0x0200 ; sparse file
	IntCmp $R0 0 FileFunc_GetSize_fileopen		IntCmp $R0 0 FileFunc_GetSize_fileopen
			FileFunc_GetSize_GetCompressed:
	System::Call 'kernel32::GetCompressedFileSize(t "$R8\$R7", i)i .R6'		System::Call 'kernel32::GetCompressedFileSize(t "$R8\$R7", i)i .R6'
	IntCmp $R6 4096 +2 0 +2		IntCmp $R6 4096 +2 0 +2
	StrCpy $R6 4096		StrCpy $R6 4096
			IntOp $3 $3 + 1 ; location contains compressed or sparse files
	goto FileFunc_GetSize_fileclose		goto FileFunc_GetSize_fileclose
	FileFunc_GetSize_fileopen:		FileFunc_GetSize_fileopen:
Line 462:		Line 470:
	StrCpy $1 ''		StrCpy $1 ''
	StrCpy $2 ''		StrCpy $2 ''
			; insert code
			StrCpy $3 ''
			; end insert

	FileFunc_GetSize_end:		FileFunc_GetSize_end:
Line 481:		Line 492:
	Pop $5		Pop $5
	Pop $4		Pop $4
	~~Pop~~ $3		; replace
			Exch $3
			Exch 3
			; end replace
	Exch $2		Exch $2
	Exch		Exch