External License file: Difference between revisions

From NSIS Wiki
Jump to navigationJump to search
m (Wikipedia python library)
 
(+ change editbox limits to afford larger license)
 
(11 intermediate revisions by 7 users not shown)
Line 1: Line 1:
{{PageAuthor|Takhir}}
== Description ==
== Description ==
'''Requires:''' [[System]] plug-in.
'''Requires:''' [[System plug-in]].


MUI License page "show" function replaces current license text (Dummy.txt added during compilation) with (runtime) License.txt file content.  
MUI License page "show" function replaces current license text (Dummy.txt added during compilation) with (runtime) License.txt file content. RTF can be used as well.


== The Script ==
== The Script ==
Line 23: Line 25:
; Interface
; Interface


   !include "MUI.nsh"
   !include "MUI2.nsh"
   !insertmacro MUI_PAGE_WELCOME
   !insertmacro MUI_PAGE_WELCOME
   !define MUI_PAGE_CUSTOMFUNCTION_SHOW addLicense
   !define MUI_PAGE_CUSTOMFUNCTION_SHOW addLicense
Line 40: Line 42:
;--------------------------------
;--------------------------------
; Installer Functions
; Installer Functions
!define stSTAT '(i,&i2,&i2,&i2,&i2,&i2,&i2,i,i,i,i,i) i'
;$0 - allocated buffer pointer
;$1 - file size
;$2 - License window handle (RichEdit)
;$4 - syscall result value
Function fileSize
  System::Call '*${stSTAT} .r0' ; allocates memory for STAT struct and writes address to $0
  System::Call 'msvcrt.dll::_stat(t "$EXEDIR\${LIC_NAME}", i r0) i .r1'
  IntCmp $1 -1 exit
  System::Call "*$0${stSTAT}(,,,,,,,,.r1,,,)"
exit:
  System::Free $0 ; free allocated memory
FunctionEnd


Function addLicense
Function addLicense


   Call fileSize
   ClearErrors
  FileOpen $0 $EXEDIR\${LIC_NAME} r
  IfErrors exit
  System::Call 'kernel32::GetFileSize(i r0, i 0) i .r1'
   IntOp $1 $1 + 1 ; for terminating zero
   IntOp $1 $1 + 1 ; for terminating zero
   FindWindow $2 "#32770" "" $HWNDPARENT
   System::Alloc $1
   GetDlgItem $2 $2 1000
   Pop $2
   System::Call 'msvcrt.dll::calloc(i $1, i 1) i .r0'
   System::Call 'kernel32::ReadFile(i r0, i r2, i r1, *i .r3, i 0)'
   System::Call 'msvcrt.dll::_open(t "$EXEDIR\${LIC_NAME}", i 0x8000) i .r3'
   FileClose $0
   System::Call 'msvcrt.dll::_read(i r3, i r0, i r1) i .r4'
  FindWindow $0 "#32770" "" $HWNDPARENT
   System::Call 'msvcrt.dll::_close(i r3)'
   GetDlgItem $0 $0 1000
   SendMessage $2 ${WM_SETTEXT} 0 $0 $4
   SendMessage $0 ${EM_SETLIMITTEXT} $1 0
   System::Call 'msvcrt.dll::free(i r0)'
   SendMessage $0 ${WM_SETTEXT} 0 $2
   System::Free $2
exit:


FunctionEnd
FunctionEnd
</highlight-nsis>
</highlight-nsis>


 
[[Category:User Interface Functions]]
Page author: Takhir

Latest revision as of 09:18, 16 September 2008

Author: Takhir (talk, contrib)


Description

Requires: System plug-in.

MUI License page "show" function replaces current license text (Dummy.txt added during compilation) with (runtime) License.txt file content. RTF can be used as well.

The Script

;--------------------------------
; Base names definition
 
  !define LIC_NAME "License.txt"
  !define APP_NAME "License Test"
 
 
;--------------------------------
; General Attributes
 
  Name "${APP_NAME}"
  OutFile "${APP_NAME}.exe"
 
 
;--------------------------------
; Interface
 
  !include "MUI2.nsh"
  !insertmacro MUI_PAGE_WELCOME
  !define MUI_PAGE_CUSTOMFUNCTION_SHOW addLicense
  !insertmacro MUI_PAGE_LICENSE Dummy.txt
  !insertmacro MUI_LANGUAGE "English"
 
 
;--------------------------------
; Installer Sections
 
Section "Dummy Section" SecDummy
 
SectionEnd
 
 
;--------------------------------
; Installer Functions
 
Function addLicense
 
   ClearErrors
   FileOpen $0 $EXEDIR\${LIC_NAME} r
   IfErrors exit
   System::Call 'kernel32::GetFileSize(i r0, i 0) i .r1'
   IntOp $1 $1 + 1 ; for terminating zero
   System::Alloc $1
   Pop $2
   System::Call 'kernel32::ReadFile(i r0, i r2, i r1, *i .r3, i 0)'
   FileClose $0
   FindWindow $0 "#32770" "" $HWNDPARENT
   GetDlgItem $0 $0 1000
   SendMessage $0 ${EM_SETLIMITTEXT} $1 0
   SendMessage $0 ${WM_SETTEXT} 0 $2
   System::Free $2
exit:
 
FunctionEnd