Laboratoire ICAR » Plateforme TXM

Unicode True

; IsServerOS checks if the installer is running on a server version of Windows (2000, 2003, 2008, etc.)

; IsDomainController checks if the server is a domain controller

; AtLeastBuild <number> checks if the installer is running on a Windows version with a minimum build number.

; AtMostBuild <number> checks if the installer is running on a Windows version with a maximum build number.

; AtLeastWaaS <name> and AtMostWaaS <name> checks Windows 10 "friendly names" against the build number.

;   8.1

;   2012R2

;   10

;   Note: Windows 8.1 and later will be detected as Windows 8 unless ManifestSupportedOS is set correctly!

;

;     ${AndIf} ${AtMostWinME}

!define _WINVER_VERXBIT  0x00000001 ; Used to boost $__WINVERV

!define _WINVER_MASKVMAJ 0x7F000000 ; $__WINVERV mask

!define _WINVER_MASKVMIN 0x00FF0000 ; $__WINVERV mask

!define _WINVER_NTMASK   0x7FFFFFFF ; $__WINVERV mask used by AtMost/AtLeast

!define _WINVER_NTBIT    0x80000000 ; $__WINVERV bit used by Is and $__WINVERSP bit used by IsNT

!define _WINVER_NTSRVBIT 0x40000000 ; $__WINVERSP bit for !VER_NT_WORKSTATION

!define _WINVER_NTDCBIT  0x20000000 ; $__WINVERSP bit for VER_NT_DOMAIN_CONTROLLER

!define _WINVER_MASKVBLD 0x0000FFFF ; $__WINVERSP mask for OS build number

!define _WINVER_MASKSP   0x000F0000 ; $__WINVERSP mask for OS service pack

;define WINVER_NT3.51               ;3.51.1057

!define WINVER_8.1_NT    0x86030000 ;6.03.9600

!define WINVER_8.1       0x06030000 ;6.03.9600

!define WINVER_2012R2_NT 0x86030001 ;6.03.9600

!define WINVER_2012R2    0x06030001 ;6.03.9600

!define WINVER_10_NT     0x8A000000 ;10.0.10240

!define WINVER_10        0x0A000000 ;10.0.10240

!define WINVER_2016_NT   0x8A000001 ;10.0.14393

!define WINVER_2016      0x0A000001 ;10.0.14393

  !define /redef /math WINVER_NT4 ${WINVER_NT4} | ${_WINVER_VERXBIT}

!define OSVERSIONINFOW_SIZE   276

!define OSVERSIONINFOEXW_SIZE 284

!define /ifndef VER_PLATFORM_WIN32_NT 2

!define /ifndef VER_NT_WORKSTATION       1

!define /ifndef VER_NT_DOMAIN_CONTROLLER 2

!define /ifndef VER_NT_SERVER            3

    System::Call kernel32::GetVersionEx(pr0)i.r3

  # a plugin call will lock the Unicode mode, it is now safe to set the struct size

  !ifdef NSIS_UNICODE

  !define /redef OSVERSIONINFO_SIZE ${OSVERSIONINFOW_SIZE}

  !define /redef OSVERSIONINFOEX_SIZE ${OSVERSIONINFOEXW_SIZE}

  !else

  !define /redef OSVERSIONINFO_SIZE ${OSVERSIONINFOA_SIZE}

  !define /redef OSVERSIONINFOEX_SIZE ${OSVERSIONINFOEXA_SIZE}

  !endif

  System::Call '*(&i${OSVERSIONINFOEX_SIZE})p.r0'

  !insertmacro __WinVer_Call_GetVersionEx ${OSVERSIONINFOEX_SIZE}

    !insertmacro __WinVer_Call_GetVersionEx ${OSVERSIONINFO_SIZE}

!ifndef NSIS_UNICODE

!if "${NSIS_PTR_SIZE}" <= 4

!endif #~ 32-bit

!endif #~ ANSI

    IntCmp $R0 ${OSVERSIONINFOEX_SIZE} "" _winver_sp_noex _winver_sp_noex

      IntCmp $0 ${VER_NT_WORKSTATION} _winver_nt_notsrv

        IntCmp $0 ${VER_NT_DOMAIN_CONTROLLER} "" _winver_nt_notdc _winver_nt_notdc

          IntOp $__WINVERSP $__WINVERSP | ${_WINVER_NTDCBIT}

        _winver_nt_notdc:

      _winver_nt_notsrv:

      ## For IsServerOS to support < NT4SP6, we need to check the registry

      IntOp $__WINVERV $__WINVERV | ${_WINVER_VERXBIT} ; change NT 4.0.reserved.0 to 4.0.reserved.1

  !insertmacro __WinVer_DefineOSTest ${Test} 8.1    '${Suffix}'

  !insertmacro __WinVer_DefineOSTest ${Test} 2012R2 '${Suffix}'

  !insertmacro __WinVer_DefineOSTest ${Test} 10     '${Suffix}'

  !insertmacro __WinVer_DefineOSTest ${Test} 2016   '${Suffix}'

!macro __WinVer_LL_IsBitSet _v _b _t _f

  IntOp $_LOGICLIB_TEMP ${_v} & ${_b}

!define IsNT `$__WINVERSP _WinVer_LL_IsBitSet ${_WINVER_NTBIT}`

!define IsServerOS `$__WINVERSP _WinVer_LL_IsBitSet ${_WINVER_NTSRVBIT}`

!define IsDomainController `$__WINVERSP _WinVer_LL_IsBitSet ${_WINVER_NTDCBIT}`

!macro _WinVer_BuildNumCheck op num _t _f

  !insertmacro _LOGICLIB_TEMP

  ${WinVerGetBuild} $_LOGICLIB_TEMP

  !insertmacro _${op} $_LOGICLIB_TEMP ${num} `${_t}` `${_f}`

!macroend

!define AtLeastBuild `U>= WinVer_BuildNumCheck `

!define AtMostBuild `U<= WinVer_BuildNumCheck `

# Windows as a Service macros

!macro WinVer_WaaS id build fu codename marketingname

  !if "${id}" == ${fu}

    !define WinVer_WaaS_Build ${build}

  !else if "${id}" == "${codename}"

    !define WinVer_WaaS_Build ${build}

  !else if "${id}" == "${marketingname}"

    !define WinVer_WaaS_Build ${build}

  !endif

!macroend

!macro _WinVer_WaaS op id _t _f

  !insertmacro WinVer_WaaS "${id}" 10240 1507 "Threshold"   "RTM" ; 10240.16384

  !insertmacro WinVer_WaaS "${id}" 10586 1511 "Threshold 2" "November Update" ; 10586.0?

  !insertmacro WinVer_WaaS "${id}" 14393 1607 "Redstone"    "Anniversary Update" ; 14393.10

  !insertmacro WinVer_WaaS "${id}" 15063 1703 "Redstone 2"  "Creators Update" ; 15063.13

  !insertmacro WinVer_WaaS "${id}" 16299 1709 "Redstone 3"  "Fall Creators Update" ; 16299.19

  !insertmacro WinVer_WaaS "${id}" 17134 1803 "Redstone 4"  "April 2018 Update" ; 17134.1

  !insertmacro WinVer_WaaS "${id}" 17763 1809 "Redstone 5"  "October 2018 Update" ; 17763.1

  !insertmacro WinVer_WaaS "${id}" 18362 1903 "19H1"        "May 2019 Update" ; 18362.116

  !insertmacro WinVer_WaaS "${id}" 18363 1909 "19H2"        "November 2019 Update" ; 18363.418

  !insertmacro WinVer_WaaS "${id}" 19041 2004 "20H1"        "May 2020 Update" ; 19041.264?

  !ifmacrodef WinVerExternal_WaaS_MapToBuild

    !insertmacro WinVerExternal_WaaS_MapToBuild ${op} "${id}" WinVer_WaaS_Build

  !endif

  !define /IfNDef WinVer_WaaS_Build 0

  !if "${WinVer_WaaS_Build}" <= 9600

    !error 'WinVer: Unknown WaaS name: ${id}'

  !endif

  !insertmacro _WinVer_BuildNumCheck ${op} ${WinVer_WaaS_Build} `${_t}` `${_f}`

  !undef WinVer_WaaS_Build

!macroend

!define AtLeastWaaS `U>= WinVer_WaaS `

!define AtMostWaaS `U<= WinVer_WaaS `

!verbose push 3

# CallArtificialFunction, see WinVer.nsh and *Func.nsh for usage examples

!macro CallArtificialFunctionHelper TYPE NAME

  !verbose pop

  Call :.${NAME}${TYPE}

  !ifndef ${NAME}${TYPE}_DEFINED

    !verbose push 2

    Goto ${NAME}${TYPE}_DONE

    !define ${NAME}${TYPE}_DEFINED

    !verbose pop

    .${NAME}${TYPE}:

      Return

    ${NAME}${TYPE}_DONE:

  !verbose push 2

!macro CallArtificialFunction NAME

  !verbose push 2

  !ifdef __UNINSTALL__

    !insertmacro CallArtificialFunctionHelper uninst ${NAME}

    !insertmacro CallArtificialFunctionHelper inst ${NAME}

  !verbose pop

!define CallArtificialFunction `!insertmacro CallArtificialFunction`

!macro CallArtificialFunction2 NAME ; Retained for v2.4x..v3.0b0 compatibility

  ${CallArtificialFunction} ${NAME}

!macroend

!define CallArtificialFunction2 `!insertmacro CallArtificialFunction`

!define Int32Op '!insertmacro Int32Op '

!define Int64Op '!insertmacro Int64Op '

!define IntPtrOp '!insertmacro IntPtrOp '

!macro Int32Op r a o b

IntOp `${r}` `${a}` `${o}` ${b}

!macroend

!macro Int64Op r a o b

!echo "Int64Op ${r}=${a}${o}${b}"

!verbose push 2

System::Int64Op `${a}` `${o}` ${b}

Pop ${r}

!macroend

!macro IntPtrOp r a o b

IntPtrOp `${r}` `${a}` `${o}` `${b}`

!macroend

!define Int32Cmp '!insertmacro Int32Cmp '

!define Int64Cmp '!insertmacro Int64Cmp '

!define IntPtrCmp '!insertmacro IntPtrCmp '

!macro Int32Cmp a b jeek jles jgtr

IntCmp `${a}` `${b}` `${jeek}` `${jles}` `${jgtr}`

!macroend

!macro Int64Cmp a b jeek jles jgtr

!if ${NSIS_PTR_SIZE} <= 4

!ifmacrondef _LOGICLIB_TEMP

!include LogicLib.nsh

!endif

!echo "Int64Cmp ${a}:${b} =${jeek}, <${jles}, >${jgtr}"

!verbose push 2

${IfThen} ${a} L= ${b} ${|} Goto ${jeek} ${|}

!insertmacro _L< ${a} ${b} `${jles}` `${jgtr}`

!verbose pop

!else

Int64Cmp `${a}` `${b}` `${jeek}` `${jles}` `${jgtr}`

!endif

!macroend

!macro IntPtrCmp a b jeek jles jgtr

IntPtrCmp `${a}` `${b}` `${jeek}` `${jles}` `${jgtr}`

!macroend

!define Int32CmpU '!insertmacro Int32CmpU '

!define Int64CmpU '!insertmacro Int64CmpU '

!define IntPtrCmpU '!insertmacro IntPtrCmpU '

!macro Int32CmpU a b jeek jles jgtr

IntCmpU `${a}` `${b}` `${jeek}` `${jles}` `${jgtr}`

!macroend

!macro Int64CmpUHelper

; This macro performs "$_LOGICLIB_TEMP = a < b ? -1 : a > b ? 1 : 0" but System::Int64Op does not support unsigned operations so we have to perform multiple steps

!ifmacrondef _LOGICLIB_TEMP

!include LogicLib.nsh

!endif

!insertmacro _LOGICLIB_TEMP

Exch $2 ; b

Exch

Exch $1 ; a

; if (a == b) return 0;

; if (a < 0)

; {

;   if (b >= 0) return 1

; }

; else

; {

;   if (b < 0) return -1

; }

; return a < b ? -1 : 1

System::Int64Op $1 ^ $2 ; Using xor so $_LOGICLIB_TEMP ends up as 0 when they are equal

Pop $_LOGICLIB_TEMP

StrCmp $_LOGICLIB_TEMP 0 ret ; NOTE: Must use StrCmp, IntCmp fails on "0x8000000000000001 Z> 1"

System::Int64Op $1 < 0

Pop $_LOGICLIB_TEMP

StrCmp $_LOGICLIB_TEMP 0 checkNegOther

System::Int64Op $2 < 0 ; System::Int64Op does not support the >= operator so we invert the operation

Pop $_LOGICLIB_TEMP

StrCmp $_LOGICLIB_TEMP 0 retPos finalCmp

retPos:

StrCpy $_LOGICLIB_TEMP "1"

Goto ret

checkNegOther:

System::Int64Op $2 < 0

Pop $_LOGICLIB_TEMP

StrCmp $_LOGICLIB_TEMP 0 finalCmp retNeg

retNeg:

StrCpy $_LOGICLIB_TEMP "-1"

Goto ret

finalCmp:

System::Int64Op $1 < $2

Pop $_LOGICLIB_TEMP

StrCmp $_LOGICLIB_TEMP 0 retPos retNeg

ret:

Pop $1

Pop $2

!macroend

!macro Int64CmpU a b jeek jles jgtr

!if ${NSIS_PTR_SIZE} <= 4

!echo "Int64CmpU ${a}:${b} =${jeek}, <${jles}, >${jgtr}"

!verbose push 2

Push `${a}`

Push `${b}`

!insertmacro CallArtificialFunction Int64CmpUHelper

IntCmp $_LOGICLIB_TEMP 0 `${jeek}` `${jles}` `${jgtr}`

!verbose pop

!else

Int64CmpU `${a}` `${b}` `${jeek}` `${jles}` `${jgtr}`

!endif

!macroend

!macro IntPtrCmpU a b jeek jles jgtr

IntPtrCmpU `${a}` `${b}` `${jeek}` `${jles}` `${jgtr}`

!macroend

!define MakeARPInstallDate "!insertmacro MakeARPInstallDate "

!macro MakeARPInstallDate _outvar

System::Call 'KERNEL32::GetDateFormat(i0x409,i0,p0,t"yyyyMMdd",t.s,i${NSIS_MAX_STRLEN})'

Pop ${_outvar}

!macroend

!define /IfNDef SPI_GETHIGHCONTRAST 0x42

!define /IfNDef HCF_HIGHCONTRASTON 0x01

!define /IfNDef /math SYSSIZEOF_HIGHCONTRAST 8 + ${NSIS_PTR_SIZE}

!define IsHighContrastModeActive '"" IsHighContrastModeActive ""'

!macro _IsHighContrastModeActive _lhs _rhs _t _f

!ifmacrondef _LOGICLIB_TEMP

!include LogicLib.nsh

!endif

!insertmacro _LOGICLIB_TEMP

Push $1

System::Call '*(i${SYSSIZEOF_HIGHCONTRAST},i0,p)p.r1'

System::Call 'USER32::SystemParametersInfo(i${SPI_GETHIGHCONTRAST},i${SYSSIZEOF_HIGHCONTRAST},pr1,i0)'

System::Call '*$1(i,i.s)'

Pop $_LOGICLIB_TEMP

System::Free $1

Pop $1

!insertmacro _& $_LOGICLIB_TEMP ${HCF_HIGHCONTRASTON} `${_t}` `${_f}`

!macroend

!endif # !___UTIL__NSH___

!verbose pop

Header file to create language files that can be

Copyright 2008-2020 Joost Verburg, Anders Kjersem

  can be called from the script to include a language file.

    parameter, the default language file to load missing strings from.

* There are two types of language header files:

  - NSIS multi-lang support; these must start with the LANGFILE macro and 

    provide strings for features like MUI and MultiUser. If you are adding 

    support for a new language to NSIS you should make a copy of English.nsh 

    and translate this .nsh along with the .nlf.

  - Custom installer strings; these must start with the LANGFILE_EXT macro and 

    contain translated versions of 

    custom strings used in a particular installer.

    This is useful if you want to put the translations for each language in 

    their own separate file.

* Example:

  ; Setup.nsi

  !include "MUI.nsh"

  !insertmacro MUI_PAGE_INSTFILES

  !insertmacro MUI_LANGUAGE "Danish"

  !insertmacro LANGFILE_INCLUDE "DanishExtra.nsh"

  !insertmacro MUI_LANGUAGE "Swedish"

  !insertmacro LANGFILE_INCLUDE "SwedishExtra.nsh"

  Section

  MessageBox MB_OK "$(myCustomString)"

  SectionEnd

  ; SwedishExtra.nsh

  !insertmacro LANGFILE_EXT Swedish

  ${LangFileString} myCustomString "Bork bork"

  ;Called from script: include a language file

  !define /redef LangFileString "!insertmacro LANGFILE_LANGSTRING"

  ;Called from script: include a language file

  !define LANGFILE_PRIV_INCLUDEISFALLBACK "${FILENAME_DEFAULT}"

  !undef LANGFILE_PRIV_INCLUDEISFALLBACK

  !define /redef LangFileString "!insertmacro LANGFILE_LANGSTRING"

!macro LANGFILE NLFID ENGNAME NATIVENAME NATIVEASCIINAME

  ; NLFID: Must match the name of the .nlf file

  ; ENGNAME: English name of language, "=" if it is the same as NLFID

  ; NATIVENAME: Native name of language. (In Unicode)

  ; NATIVEASCIINAME: Native name of language using only ASCII, "=" if it is the same as NATIVENAME

  ; Example: LANGFILE "Swedish" = "Svenska" = (This is the same as LANGFILE "Swedish" "Swedish" "Svenska" "Svenska")

  ; For more examples, see French.nsh, Greek.nsh and PortugueseBR.nsh

    !define LANGFILE_IDNAME "${NLFID}"

    ; ModernUI or the .nsi can change LANGFILE_LANGDLL_FMT if desired

    !ifndef LANGFILE_LANGDLL_FMT

      !ifndef NSIS_UNICODE

        !define LANGFILE_LANGDLL_FMT "%ENGNAME% / %NATIVEASCIINAME%"

      !endif

      !define /ifndef LANGFILE_LANGDLL_FMT "%NATIVENAME%"

    !ifndef "LANGFILE_${NLFID}_NAME"

      !if "${ENGNAME}" == "="

        !define /redef ENGNAME "${NLFID}"

      !endif

      !if "${NATIVEASCIINAME}" == "="

        !define /redef NATIVEASCIINAME "${NATIVENAME}"

      !endif

      !define "LANGFILE_${NLFID}_ENGLISHNAME" "${ENGNAME}"

      !ifdef NSIS_UNICODE

        !define "LANGFILE_${NLFID}_NAME" "${NATIVENAME}"

      !else

        !define "LANGFILE_${NLFID}_NAME" "${NATIVEASCIINAME}"

      !endif

      !searchreplace LANGFILE_${NLFID}_LANGDLL "${LANGFILE_LANGDLL_FMT}" %NATIVEASCIINAME% "${NATIVEASCIINAME}"

      !searchreplace LANGFILE_${NLFID}_LANGDLL "${LANGFILE_${NLFID}_LANGDLL}" %NATIVENAME% "${NATIVENAME}"

      !searchreplace LANGFILE_${NLFID}_LANGDLL "${LANGFILE_${NLFID}_LANGDLL}" %ENGNAME% "${ENGNAME}"

    !endif

    !ifdef LANGFILE_PRIV_INCLUDEISFALLBACK

      !warning 'LangString "${NAME}" for language ${LANGFILE_IDNAME} is missing, using fallback from "${LANGFILE_PRIV_INCLUDEISFALLBACK}"'

    !endif

; RunningX64 checks if the installer is running on a 64-bit OS.

; IsWow64 checks if the installer is a 32-bit application running on a 64-bit OS.

;     MessageBox MB_OK "Running on 64-bit Windows"

; IsNative* checks the OS native CPU architecture.

;

;   ${If} ${IsNativeAMD64}

;     ; Install AMD64 64-bit driver/library

;   ${ElseIf} ${IsNativeARM64}

;     ; Install ARM64 64-bit driver/library

;   ${ElseIf} ${IsNativeIA32}

;     ; Install i386 32-bit driver/library

;   ${Else}

;     Abort "Unsupported CPU architecture!"

;   ${EndIf}

;

;   ${If} ${IsNativeAMD64}

;       File "amd64\myapp.exe"

;   ${ElseIf} ${IsNativeIA32}

;   ${OrIf} ${IsWow64}

;       File "x86\myapp.exe"

;   ${Else}

;       Abort "Unsupported CPU architecture!"

;   ${EndIf}

;

;   File something.bin # extracts to C:\Windows\System32

;   File something.bin # extracts to C:\Windows\SysWOW64

!define IsWow64 `"" IsWow64 ""`

!macro _IsWow64 _a _b _t _f

  System::Call kernel32::GetCurrentProcess()p.s

  System::Call kernel32::IsWow64Process2(ps,*i0s,*i) ; [Win10.1511+] 0 if not WOW64

  Push |

  System::Call kernel32::IsWow64Process(p-1,*i0s) ; [WinXP+] FALSE for a 32-bit application on ARM64!

  System::Int64Op

!macro _RunningX64 _a _b _t _f 

  !if ${NSIS_PTR_SIZE} > 4

    !insertmacro LogicLib_JumpToBranch `${_t}` `${_f}`

  !else

    !insertmacro _IsWow64 `${_a}` `${_b}` `${_t}` `${_f}`

  !endif

!macroend

!define GetNativeMachineArchitecture "!insertmacro GetNativeMachineArchitecture "

!macro GetNativeMachineArchitecture outvar

  !define GetNativeMachineArchitecture_lbl lbl_GNMA_${__COUNTER__}

  System::Call kernel32::GetCurrentProcess()p.s

  System::Call kernel32::IsWow64Process2(ps,*i,*i0s)

  Pop ${outvar}

  IntCmp ${outvar} 0 "" ${GetNativeMachineArchitecture_lbl}_done ${GetNativeMachineArchitecture_lbl}_done

    !if "${NSIS_PTR_SIZE}" <= 4

    !if "${NSIS_CHAR_SIZE}" <= 1

    System::Call 'USER32::CharNextW(w"")p.s'

    Pop ${outvar}

    IntPtrCmpU ${outvar} 0 "" ${GetNativeMachineArchitecture_lbl}_oldnt ${GetNativeMachineArchitecture_lbl}_oldnt

      StrCpy ${outvar} 332 ; Always IMAGE_FILE_MACHINE_I386 on Win9x

      Goto ${GetNativeMachineArchitecture_lbl}_done

    ${GetNativeMachineArchitecture_lbl}_oldnt:

    !endif

    !endif

    System::Call '*0x7FFE002E(&i2.s)'

    Pop ${outvar}

  ${GetNativeMachineArchitecture_lbl}_done:

  !undef GetNativeMachineArchitecture_lbl

!macroend

!macro _IsNativeMachineArchitecture _ignore _arc _t _f

  !insertmacro _LOGICLIB_TEMP

  ${GetNativeMachineArchitecture} $_LOGICLIB_TEMP

  !insertmacro _= $_LOGICLIB_TEMP ${_arc} `${_t}` `${_f}`

!define IsNativeMachineArchitecture `"" IsNativeMachineArchitecture `

!define IsNativeIA32 '${IsNativeMachineArchitecture} 332' ; Intel x86

!define IsNativeAMD64 '${IsNativeMachineArchitecture} 34404' ; x86-64/x64

!define IsNativeARM64 '${IsNativeMachineArchitecture} 43620'

!macro DisableX64FSRedirection

  System::Call kernel32::Wow64EnableWow64FsRedirection(i0)

!macroend

!define EnableX64FSRedirection "!insertmacro EnableX64FSRedirection"

!ifdef NSIS_UNICODE

  InstallOptions::make_unicode "$PLUGINSDIR\${FILE}"

!endif

!ifdef NSIS_UNICODE

  InstallOptions::make_unicode "$PLUGINSDIR\${FILENAME}"

!endif

!verbose push 2

!define /ifndef WS_EX_DLGMODALFRAME  0x00000001

!define /ifndef WS_EX_NOPARENTNOTIFY 0x00000004

!define /ifndef WS_EX_TOPMOST        0x00000008

!define /ifndef WS_EX_ACCEPTFILES    0x00000010

!define /ifndef WS_EX_TRANSPARENT    0x00000020

!define /ifndef WS_EX_MDICHILD       0x00000040

!define /ifndef WS_EX_TOOLWINDOW     0x00000080

!define /ifndef WS_EX_WINDOWEDGE     0x00000100

!define /ifndef WS_EX_CLIENTEDGE     0x00000200

!define /ifndef WS_EX_CONTEXTHELP    0x00000400

!define /ifndef WS_EX_RIGHT          0x00001000

!define /ifndef WS_EX_LEFT           0x00000000

!define /ifndef WS_EX_RTLREADING     0x00002000

!define /ifndef WS_EX_LTRREADING     0x00000000

!define /ifndef WS_EX_LEFTSCROLLBAR  0x00004000

!define /ifndef WS_EX_RIGHTSCROLLBAR 0x00000000

!define /ifndef WS_EX_CONTROLPARENT  0x00010000

!define /ifndef WS_EX_STATICEDGE     0x00020000

!define /ifndef WS_EX_APPWINDOW      0x00040000

!define /ifndef WS_CHILD             0x40000000

!define /ifndef WS_VISIBLE           0x10000000

!define /ifndef WS_DISABLED          0x08000000

!define /ifndef WS_CLIPSIBLINGS      0x04000000

!define /ifndef WS_CLIPCHILDREN      0x02000000

!define /ifndef WS_MAXIMIZE          0x01000000

!define /ifndef WS_VSCROLL           0x00200000

!define /ifndef WS_HSCROLL           0x00100000

!define /ifndef WS_GROUP             0x00020000

!define /ifndef WS_TABSTOP           0x00010000

!define ES_SAVESEL           0x00008000

!define ACS_CENTER      0x0001

!define ACS_TRANSPARENT 0x0002 ;  The parent of the animation control must not have the WS_CLIPCHILDREN style

!define ACS_AUTOPLAY    0x0004

!define ACS_TIMER       0x0008 ; < CC6

!define TBS_AUTOTICKS        0x0001

!define TBS_VERT             0x0002

!define TBS_HORZ             0x0000

!define TBS_TOP              0x0004

!define TBS_BOTTOM           0x0000

!define TBS_LEFT             0x0004

!define TBS_RIGHT            0x0000

!define TBS_BOTH             0x0008

!define TBS_NOTICKS          0x0010

!define TBS_ENABLESELRANGE   0x0020

!define TBS_FIXEDLENGTH      0x0040

!define TBS_NOTHUMB          0x0080

!define TBS_TOOLTIPS         0x0100 ; IE3

!define TBS_REVERSED         0x0200 ; IE5

!define TBS_DOWNISLEFT       0x0400 ; _WIN32_IE >= 0x0501

!define TBS_NOTIFYBEFOREMOVE 0x0800 ; IE6?

!define TBS_TRANSPARENTBKGND 0x1000 ; Vista

!define UDS_WRAP        0x0001

!define UDS_SETBUDDYINT 0x0002

!define UDS_ALIGNRIGHT  0x0004

!define UDS_ALIGNLEFT   0x0008

!define UDS_AUTOBUDDY   0x0010

!define UDS_ARROWKEYS   0x0020

!define UDS_HORZ        0x0040

!define UDS_NOTHOUSANDS 0x0080

!define UDS_HOTTRACK    0x0100 ; 98+

!define MCS_DAYSTATE        0x0001

!define MCS_MULTISELECT     0x0002

!define MCS_WEEKNUMBERS     0x0004

!define MCS_NOTODAYCIRCLE   0x0008

!define MCS_NOTODAY         0x0010 ; IE4+?

!define MCS_NOTRAILINGDATES  0x0040 ; Vista+

!define MCS_SHORTDAYSOFWEEK  0x0080 ; Vista+

!define MCS_NOSELCHANGEONNAV 0x0100 ; Vista+

!define DTS_UPDOWN          0x01

!define DTS_SHOWNONE        0x02

!define DTS_SHORTDATEFORMAT 0x00

!define DTS_LONGDATEFORMAT  0x04

!define DTS_SHORTDATECENTURYFORMAT 0x0C

!define DTS_TIMEFORMAT      0x09

!define DTS_APPCANPARSE     0x10

!define DTS_RIGHTALIGN      0x20

!define /ifndef LR_DEFAULTCOLOR     0x0000

!define /ifndef LR_MONOCHROME       0x0001

!define /ifndef LR_COLOR            0x0002

!define /ifndef LR_COPYRETURNORG    0x0004

!define /ifndef LR_COPYDELETEORG    0x0008

!define /ifndef LR_LOADFROMFILE     0x0010

!define /ifndef LR_LOADTRANSPARENT  0x0020

!define /ifndef LR_DEFAULTSIZE      0x0040

!define /ifndef LR_VGACOLOR         0x0080

!define /ifndef LR_LOADMAP3DCOLORS  0x1000

!define /ifndef LR_CREATEDIBSECTION 0x2000

!define /ifndef LR_COPYFROMRESOURCE 0x4000

!define /ifndef LR_SHARED           0x8000

!define /ifndef IMAGE_BITMAP        0

!define /ifndef IMAGE_ICON          1

!define /ifndef IMAGE_CURSOR        2

!define /ifndef IMAGE_ENHMETAFILE   3

!define /ifndef GWL_STYLE           -16

!define /ifndef GWL_EXSTYLE         -20

#define /ifndef ICC_LISTVIEW_CLASSES 0x0001 ; SysListView32 and SysHeader32

#define /ifndef ICC_TREEVIEW_CLASSES 0x0002 ; SysTabControl32 and tooltips_class32

#define /ifndef ICC_BAR_CLASSES      0x0004 ; ToolbarWindow32, msctls_statusbar32, msctls_trackbar32 and tooltips_class32

#define /ifndef ICC_TAB_CLASSES      0x0008 ; SysTabControl32 and tooltips_class32

#define /ifndef ICC_UPDOWN_CLASS     0x0010 ; msctls_updown32

#define /ifndef ICC_PROGRESS_CLASS   0x0020 ; msctls_progress32

#define /ifndef ICC_HOTKEY_CLASS     0x0040 ; msctls_hotkey32

#define /ifndef ICC_ANIMATE_CLASS    0x0080 ; SysAnimate32

#define /ifndef ICC_WIN95_CLASSES    0x00FF

!define /ifndef ICC_DATE_CLASSES     0x0100 ; CC4.70+ (NT4+/IE3.1+/Win95 OSR2) SysDateTimePick32, SysMonthCal32 and CC6.10+(Vista+) DropDown

!define /ifndef ICC_USEREX_CLASSES   0x0200 ; CC4.??+ (NT4+/IE3.?+/Win95 OSR2) ComboBoxEx32

!define /ifndef ICC_COOL_CLASSES     0x0400 ; CC4.70+ (NT4+/IE3.1+/Win95 OSR2) ReBarWindow32

!define /ifndef ICC_INTERNET_CLASSES 0x0800 ; CC4.71+ (IE4+) SysIPAddress32

!define /ifndef ICC_PAGESCROLLER_CLASS 0x1000 ; CC4.71+ (IE4+) SysPager

!define /ifndef ICC_NATIVEFNTCTL_CLASS 0x2000 ; CC4.71+ (IE4+) NativeFontCtl

!define /ifndef ICC_STANDARD_CLASSES 0x4000 ; WinXP+ Button, Static, Edit, ListBox, ComboBox, ComboLBox, ScrollBar and ReaderModeCtl

!define /ifndef ICC_LINK_CLASS       0x8000 ; WinXP+ SysLink

!define __NSD_MLText_CLASS EDIT

!define __NSD_MLText_STYLE ${DEFAULT_STYLES}|${WS_TABSTOP}|${ES_AUTOHSCROLL}|${ES_AUTOVSCROLL}|${ES_MULTILINE}|${ES_WANTRETURN}|${WS_HSCROLL}|${WS_VSCROLL}

!define __NSD_MLText_EXSTYLE ${WS_EX_WINDOWEDGE}|${WS_EX_CLIENTEDGE}

!define __NSD_RichEdit_CLASS_10  "RICHEDIT"    ; 1.0 (Riched32.dll) Win95/NT4

!define __NSD_RichEdit_CLASS_20A "RICHEDIT20A" ; 2.0 (Riched20.dll) Win98/NT4 (NSIS makes sure this is registered even on Windows 95)

!define __NSD_RichEdit_CLASS_20W "RICHEDIT20W"

!define __NSD_RichEdit_CLASS_41W "RICHEDIT50W" ; 4.1 (MsftEdit.DLL) WinXP.SP1

!ifdef NSIS_UNICODE

!define /ifndef __NSD_RichEdit_CLASS ${__NSD_RichEdit_CLASS_20W}

!else

!define /ifndef __NSD_RichEdit_CLASS ${__NSD_RichEdit_CLASS_20A}

!endif

!define __NSD_RichEdit_STYLE ${DEFAULT_STYLES}|${WS_TABSTOP}|${ES_AUTOHSCROLL}|${ES_AUTOVSCROLL}|${ES_MULTILINE}|${ES_WANTRETURN}|${ES_SAVESEL}|${WS_HSCROLL}|${WS_VSCROLL}

!define __NSD_RichEdit_EXSTYLE ${WS_EX_WINDOWEDGE}|${WS_EX_CLIENTEDGE}

!define __NSD_SortedListBox_CLASS LISTBOX

!define __NSD_SortedListBox_STYLE ${__NSD_ListBox_STYLE}|${LBS_SORT}

!define __NSD_SortedListBox_EXSTYLE ${__NSD_ListBox_EXSTYLE}

!define __NSD_Animation_CLASS SysAnimate32

!define __NSD_Animation_STYLE ${DEFAULT_STYLES}|${ACS_TRANSPARENT}|${ACS_AUTOPLAY}

!define __NSD_Animation_EXSTYLE 0

!define __NSD_HTrackBar_CLASS msctls_trackbar32

!define __NSD_HTrackBar_STYLE ${DEFAULT_STYLES}|${TBS_HORZ}|${TBS_AUTOTICKS}|${TBS_TOOLTIPS}

!define __NSD_HTrackBar_EXSTYLE 0

!define __NSD_VTrackBar_CLASS msctls_trackbar32

!define __NSD_VTrackBar_STYLE ${DEFAULT_STYLES}|${TBS_VERT}|${TBS_AUTOTICKS}|${TBS_TOOLTIPS}

!define __NSD_VTrackBar_EXSTYLE 0

!define __NSD_UpDown_CLASS msctls_updown32

!define __NSD_UpDown_STYLE ${DEFAULT_STYLES}|${UDS_SETBUDDYINT}|${UDS_ARROWKEYS}|${UDS_NOTHOUSANDS}|${UDS_ALIGNRIGHT}

!define __NSD_UpDown_EXSTYLE 0

!define __NSD_AutoUpDown_CLASS msctls_updown32

!define __NSD_AutoUpDown_STYLE ${__NSD_UpDown_STYLE}|${UDS_AUTOBUDDY}

!define __NSD_AutoUpDown_EXSTYLE ${__NSD_UpDown_EXSTYLE}

!define __NSD_HotKey_CLASS msctls_hotkey32

!define __NSD_HotKey_STYLE ${DEFAULT_STYLES}

!define __NSD_HotKey_EXSTYLE ${WS_EX_WINDOWEDGE}|${WS_EX_CLIENTEDGE}

!define __NSD_Calendar_CLASS SysMonthCal32

!define __NSD_Calendar_STYLE ${DEFAULT_STYLES}|${WS_TABSTOP}

!define __NSD_Calendar_EXSTYLE 0

!define __NSD_DatePicker_CLASS SysDateTimePick32

!define __NSD_DatePicker_STYLE ${DEFAULT_STYLES}|${WS_TABSTOP}

!define __NSD_DatePicker_EXSTYLE ${WS_EX_WINDOWEDGE}|${WS_EX_CLIENTEDGE}

!define __NSD_TimePicker_CLASS SysDateTimePick32

!define __NSD_TimePicker_STYLE ${DEFAULT_STYLES}|${WS_TABSTOP}|${DTS_TIMEFORMAT}

!define __NSD_TimePicker_EXSTYLE ${WS_EX_WINDOWEDGE}|${WS_EX_CLIENTEDGE}

!define __NSD_IPAddress_CLASS SysIPAddress32 ; IE4+/CC4.71+

!define __NSD_IPAddress_STYLE ${DEFAULT_STYLES}|${WS_TABSTOP}

!define __NSD_IPAddress_EXSTYLE 0

!define __NSD_NetAddress_CLASS msctls_netaddress ; Vista+

!define __NSD_NetAddress_STYLE ${DEFAULT_STYLES}|${WS_TABSTOP}

!define __NSD_NetAddress_EXSTYLE ${WS_EX_WINDOWEDGE}|${WS_EX_CLIENTEDGE}

!insertmacro __NSD_DefineControl MLText

!insertmacro __NSD_DefineControl RichEdit

!insertmacro __NSD_DefineControl SortedListBox

!insertmacro __NSD_DefineControl Animation

!insertmacro __NSD_DefineControl HTrackBar

!insertmacro __NSD_DefineControl VTrackBar

!insertmacro __NSD_DefineControl UpDown

!insertmacro __NSD_DefineControl AutoUpDown

!insertmacro __NSD_DefineControl HotKey

!insertmacro __NSD_DefineControl Calendar

!insertmacro __NSD_DefineControl DatePicker

!insertmacro __NSD_DefineControl TimePicker

!insertmacro __NSD_DefineControl IPAddress

!insertmacro __NSD_DefineControl NetAddress

	!define NSD_On${EVENT} `!insertmacro __NSD_OnControlEvent ${EVENT} `

	!define NSD_On${EVENT} `!insertmacro __NSD_OnDialogEvent ${EVENT} `

!define NSD_Return "!insertmacro NSD_Return "

!macro NSD_Return val

StrCpy $_OUTDIR ${val}

SetSilent silent

Return

!macroend

!define __NSD_MkCtlCmd "!insertmacro __NSD_MkCtlCmd "

!macro __NSD_MkCtlCmd msg wp lp hCtl

SendMessage ${hCtl} ${${msg}} ${wp} ${lp}

!macroend

!define __NSD_MkCtlCmd_WP "!insertmacro __NSD_MkCtlCmd_WP "

!macro __NSD_MkCtlCmd_WP msg lp hCtl wp

SendMessage ${hCtl} ${${msg}} ${wp} ${lp}

!macroend

!define __NSD_MkCtlCmd_LP "!insertmacro __NSD_MkCtlCmd_LP "

!macro __NSD_MkCtlCmd_LP msg wp hCtl lp

SendMessage ${hCtl} ${${msg}} ${wp} ${lp}

!macroend

!define __NSD_MkCtlCmd_WPLP "!insertmacro __NSD_MkCtlCmd_WPLP "

!macro __NSD_MkCtlCmd_WPLP msg hCtl wp lp

SendMessage ${hCtl} ${${msg}} ${wp} ${lp}

!macroend

!define __NSD_MkCtlCmd_RV "!insertmacro __NSD_MkCtlCmd_RV "

!macro __NSD_MkCtlCmd_RV msg wp lp hCtl VAR

SendMessage ${hCtl} ${${msg}} ${wp} ${lp} ${VAR}

!macroend

!define NSD_InitCommonControlsEx "!insertmacro __NSD_InitCommonControlsEx "

!macro __NSD_InitCommonControlsEx ICC

!pragma warning push

!pragma warning disable 7070 ; Invalid number

!if ${ICC} <> 0

!define /ReDef /IntFmt NSD_InitCommonControlsEx_TEMP "0x%X" ${ICC}

System::Call 'COMCTL32::InitCommonControlsEx(*l${NSD_InitCommonControlsEx_TEMP}00000008)'

!undef NSD_InitCommonControlsEx_TEMP

!else

System::Int64Op ${ICC} << 32

System::Int64Op 8 | 

System::Call 'COMCTL32::InitCommonControlsEx(*ls)' ; INITCOMMONCONTROLSEX as UINT64

!endif

!pragma warning pop

!macroend

!define NSD_InitCommonControl_IPAddress `${NSD_InitCommonControlsEx} ${ICC_INTERNET_CLASSES}`

!define NSD_InitCommonControl_NetAddress `System::Call SHELL32::InitNetworkAddressControl()i`

!define NSD_InitCommonControl_SysLink `${NSD_InitCommonControlsEx} ${ICC_LINK_CLASS}`

!define NSD_CreateTimer `!insertmacro _NSD_CreateTimer `

!define NSD_KillTimer `!insertmacro _NSD_KillTimer `

!macroend

!define NSD_AddStyle "!insertmacro _NSD_GWLAddFlags ${GWL_STYLE} "

!define NSD_AddExStyle "!insertmacro _NSD_GWLAddFlags ${GWL_EXSTYLE} "

!macro _NSD_GWLAddFlags GWL HWND DATA

	System::Call "user32::GetWindowLong(p${HWND},i${GWL})p.s"

	System::Int64Op "${DATA}" |

	System::Call "user32::SetWindowLong(p${HWND},p${GWL},ps)"

!define NSD_RemoveStyle "!insertmacro _NSD_GWLRemoveFlags ${GWL_STYLE} " 

!define NSD_RemoveExStyle "!insertmacro _NSD_GWLRemoveFlags ${GWL_EXSTYLE} "

!macro _NSD_GWLRemoveFlags GWL HWND DATA

System::Call "user32::GetWindowLong(p${HWND},i${GWL})p.s"

System::Int64Op "${DATA}" ~ & ; Perform ~ and prepare the stack for &

System::Int64Op ; Perform &

System::Call "user32::SetWindowLong(p${HWND},i${GWL},ps)"

!macroend 

!define NSD_GetStyle "!insertmacro _NSD_GWLGetFlags ${GWL_STYLE} "

!define NSD_GetExStyle "!insertmacro _NSD_GWLGetFlags ${GWL_EXSTYLE} "

!macro _NSD_GWLGetFlags GWL HWND RET

System::Call "user32::GetWindowLong(p${HWND},i${GWL})p.s"

Pop ${RET}

!macroend

!macro __NSD_GetStyleBit GWL BIT HWND RET

!insertmacro _NSD_GWLGetFlags ${GWL} ${HWND} ${RET}

IntOp ${RET} ${RET} & ${BIT}

!macroend

!define NSD_SetFocus `!insertmacro __NSD_SetFocus `

!macro __NSD_SetFocus HWND

	System::Call "user32::SetFocus(p${HWND})"

!macroend

!define NSD_GetText "!insertmacro __NSD_GetText "

!macro __NSD_GetText CONTROL VAR

	System::Call user32::GetWindowText(p${CONTROL},t.s,i${NSIS_MAX_STRLEN})

	Pop ${VAR}

!define NSD_SetText "!insertmacro __NSD_SetText "

!macro __NSD_SetText CONTROL TEXT

	SendMessage ${CONTROL} ${WM_SETTEXT} 0 `STR:${TEXT}`

!macroend

### Edit ###

!define NSD_Edit_GetTextLimit `${__NSD_MkCtlCmd_RV} EM_GETLIMITTEXT 0 0 `

!define NSD_Edit_SetTextLimit `${__NSD_MkCtlCmd_WP} EM_SETLIMITTEXT 0 `

!define NSD_Edit_SetPasswordChar `${__NSD_MkCtlCmd_WP} EM_SETPASSWORDCHAR 0 `

!define NSD_Edit_GetReadOnly `!insertmacro __NSD_GetStyleBit ${GWL_STYLE} ${ES_READONLY} ` ; Non-zero if read-only

!define NSD_Edit_SetReadOnly `${__NSD_MkCtlCmd_WP} EM_SETREADONLY 0 ` ; Toggles the ES_READONLY style

!define NSD_Edit_GetModify `${__NSD_MkCtlCmd_RV} EM_GETMODIFY 0 0 `

!define NSD_Edit_SetModify `${__NSD_MkCtlCmd_WP} EM_SETMODIFY 0 `

!define NSD_Edit_EmptyUndoBuffer `${__NSD_MkCtlCmd} EM_EMPTYUNDOBUFFER 0 0 `

!define NSD_Edit_CanUndo `${__NSD_MkCtlCmd_RV} EM_CANUNDO 0 0 `

!define NSD_Edit_ScrollCaret `${__NSD_MkCtlCmd} EM_SCROLLCARET 0 0 `

!define NSD_Edit_LineScroll `${__NSD_MkCtlCmd_WPLP} EM_LINESCROLL `

!define NSD_Edit_SetSel `${__NSD_MkCtlCmd_WPLP} EM_SETSEL ` ; WP:Start LP:End

!define NSD_Edit_SetCueBannerText "!insertmacro __NSD_Edit_SetCueBannerText " ; CC6+

!macro __NSD_Edit_SetCueBannerText CONTROL SHOWWHENFOCUSED TEXT

!if ${NSIS_CHAR_SIZE} > 1

	SendMessage ${CONTROL} ${EM_SETCUEBANNER} ${SHOWWHENFOCUSED} `STR:${TEXT}`

!else

	System::Call 'USER32::SendMessage(p${CONTROL},i${EM_SETCUEBANNER},p${SHOWWHENFOCUSED},ws)' `${TEXT}` ; Must be PWSTR

!endif

!define NSD_Edit_GetLineCount `${__NSD_MkCtlCmd_RV} EM_GETLINECOUNT 0 0 `

!define NSD_Edit_GetLine "!insertmacro __NSD_Edit_GetLine "

!macro __NSD_Edit_GetLine CONTROL LINEINDEX OUTPUT

	System::Call '*(&i2 ${NSIS_MAX_STRLEN},&t${NSIS_MAX_STRLEN})p.s'

	System::Call 'USER32::SendMessage(p${CONTROL},i${EM_GETLINE},p${LINEINDEX},pss)'

	System::Call 'KERNEL32::lstrcpyn(t.s,pss,i${NSIS_MAX_STRLEN})'

	Pop ${OUTPUT}

	System::Free

!macroend

!define NSD_SetTextLimit `${NSD_Edit_SetTextLimit} ` ; Legacy alias

### RichEdit ###

!define NSD_RichEd_SetTextLimit `${__NSD_MkCtlCmd_LP} EM_EXLIMITTEXT 0 `

!define NSD_RichEd_GetEventMask `${__NSD_MkCtlCmd_RV} EM_GETEVENTMASK 0 0 `

!define NSD_RichEd_SetEventMask `${__NSD_MkCtlCmd_LP} EM_SETEVENTMASK 0 ` ; LP:ENM_*

!define NSD_RichEd_SetSystemBackgroundColor `${__NSD_MkCtlCmd} EM_SETBKGNDCOLOR 1 0 ` ; COLOR_WINDOW

!define NSD_RichEd_SetCustomBackgroundColor `${__NSD_MkCtlCmd_LP} EM_SETBKGNDCOLOR 0 ` ; LP:COLORREF

!define NSD_RichEd_SetHideSelection `${__NSD_MkCtlCmd_WP} EM_HIDESELECTION 0 ` ; WP(BOOL):HideSelWithoutFocus (Toggles ES_NOHIDESEL & TXTBIT_HIDESELECTION)

### CheckBox ###

!define NSD_GetState `!insertmacro __NSD_GetState `

!macro __NSD_GetState CONTROL VAR

	SendMessage ${CONTROL} ${BM_GETCHECK} 0 0 ${VAR}

!define NSD_SetState `!insertmacro __NSD_SetState `

!macro __NSD_SetState CONTROL STATE

	SendMessage ${CONTROL} ${BM_SETCHECK} ${STATE} 0

!macroend

!define NSD_Check `!insertmacro __NSD_Check `

!macro __NSD_Check CONTROL

	${NSD_SetState} ${CONTROL} ${BST_CHECKED}

!macroend

!define NSD_Uncheck `!insertmacro __NSD_Uncheck `

!macro __NSD_Uncheck CONTROL

	${NSD_SetState} ${CONTROL} ${BST_UNCHECKED}

!define NSD_GetChecked `!insertmacro __NSD_GetState `

!define NSD_SetChecked `!insertmacro __NSD_SetState `

### ComboBox ###

!define NSD_CB_AddString "!insertmacro _NSD_CB_AddString "

!macro _NSD_CB_AddString CONTROL STRING

	SendMessage ${CONTROL} ${CB_ADDSTRING} 0 `STR:${STRING}`

!define NSD_CB_InsertString "!insertmacro _NSD_CB_InsertString "

!macro _NSD_CB_InsertString CONTROL INDEX STRING

SendMessage ${CONTROL} ${CB_INSERTSTRING} ${INDEX} `STR:${STRING}`

!macroend

!define NSD_CB_PrependString "!insertmacro _NSD_CB_PrependString "

!macro _NSD_CB_PrependString CONTROL STRING

SendMessage ${CONTROL} ${CB_INSERTSTRING} 0 `STR:${STRING}`

!macroend