Как я могу проверить свободное место во время автоматической установки NullSoft? - PullRequest
Новая
       14

Как я могу проверить свободное место во время автоматической установки NullSoft?

2 голосов
/ 13 июня 2009

В режиме установки без вывода сообщений пользователя не спрашивают о цели установки с PageEx directory, и, следовательно, функции DirVerify и GetInstDirError никогда не называются.

Это также применимо к установкам, которые жестко задают цель установки (плохая идея) по той же причине, что и выше: PageEx directory никогда не вызывается.

Ответы [ 3 ]

2 голосов
/ 13 июня 2009

Ваш пример кода в порядке, но вызов $ {DriveSpace} в Win9x может не удаться. Я также убрал необходимость указания идентификатора раздела 

!define APPNAME "CalcEnoughSpace"
name "${APPNAME}"
outfile "$%temp%\${APPNAME}.exe"
ShowInstDetails show
RequestExecutionLevel user
installdir "$Temp"
AllowRootDirInstall true

!include Sections.nsh
!include LogicLib.nsh

Function .onInit
push $instdir
call VerifyFreeSpace
pop $0
${If} $0 < 1
    MessageBox mb_iconstop "Not enough free space!"
${EndIf}
FunctionEnd

page instfiles

Section !a
AddSize 10000
SectionEnd
Section /o b
AddSize 10000
SectionEnd

SectionGroup grp
Section c
AddSize 10000
SectionEnd
SectionGroupEnd



Function VerifyFreeSpace
System::Store s
pop $0 ;path to check
Push 0 ;default to no
System::Call 'kernel32::GetDiskFreeSpaceEx(tr0,*l.r1,*l,*l)i.r2'
${If} $2 < 1 
    StrCpy $0 $0 3
    System::Call 'kernel32::GetDiskFreeSpace(tr0,*i.r1,*i.r2,*i.r3,*i)i.r4'
    IntCmpU $4 0 ret 
    IntOp $1 $1 * $2
    System::Int64Op $1 * $3
    pop $1  
${EndIf}
System::Int64Op $1 / 1024 ;to kb
pop $1
StrCpy $4 0 ;size
StrCpy $2 0 ;section idx
loop:
    ClearErrors
    SectionGetFlags $2 $3
    IfErrors testspace
    IntOp $3 $3 & ${SF_SELECTED}
    ${If} $3 <> 0
        SectionGetSize $2 $3
        IntOp $4 $4 + $3
        ${EndIf}
    IntOp $2 $2 + 1
    goto loop
testspace:
pop $2 ;throw away default return value
System::Int64Op $1 > $4
ret:
System::Store l
FunctionEnd

Я провел только ограниченное тестирование, надеюсь, ошибок нет:)

1 голос
/ 13 июня 2009

Я написал функцию под названием CheckFreeSpace в NSIS для этого. К сожалению, он имеет следующие ограничения:

  • Чтобы вычислить размер всех разделов в вашей установке, вы должны изменить CheckFreeSpace, чтобы добавить каждый раздел, зная каждую переменную, в которую записан каждый идентификатор раздела. Я не могу найти способ перебора всех разделов, которые будут установлены с использованием NSIS.
  • Установочный диск должен быть вычислен, поскольку ${DriveSpace} требует буквы диска, а не пути к произвольному каталогу. Буквенная строка диска вычисляется с StrCpy $instdrive $INSTDIR 3. Если переменная $INSTDIR является относительным путем или не начинается со строки, такой как C:\, произойдет сбой.
  • Если установка не может быть продолжена, выдается MessageBox. Вы можете подавить MessageBox, добавив /SD IDOK в конце оператора, но тогда пользователь не будет проинформирован о сбое установки: я не могу найти способ отправки в stdout из NSIS. Возможно, достаточно кода возврата из установщика?
  • Если свободного места на диске очень мало (например, 10 КБ), программа установки не будет работать вообще; в нем нет места для распаковки временных библиотек DLL в каталог \tmp.

Кроме того, в моей реализации ниже, CheckFreeSpace имеет жестко заданное значение для свободного места после установки. Очевидно, что это может быть параметризовано.

Вот пример программы установки: 

!include FileFunc.nsh
!insertmacro DriveSpace

Name "CheckFreeSpace"
OutFile "C:\CheckFreeSpace.exe"

InstallDir C:\tmp\checkfreespace

Page instfiles

Section "install_section" install_section_id
    Call CheckFreeSpace

    CreateDirectory $INSTDIR
    SetOutPath $INSTDIR
    File "C:\installme.bat"

    WriteUninstaller "$INSTDIR\Uninstall.exe"

    DetailPrint "Installation Successful."
SectionEnd

Section "Uninstall"

    RMDIR /r "$INSTDIR"

SectionEnd

Function CheckFreeSpace

    var /GLOBAL installsize
    var /GLOBAL adjustedinstallsize
    var /GLOBAL freespace
    var /GLOBAL instdrive

    ; Verify that we have sufficient space for the install

    ; SectionGetSize returns the size of each section in kilobyte.
    SectionGetSize ${install_section_id} $installsize

    ; Adjust the required install size by 10mb, as a minimum amount
    ; of free space left after installation.
    IntOp $adjustedinstallsize $installsize + 10240

    ; Compute the drive that is the installation target; the
    ; ${DriveSpace} macro will not accept a path, it must be a drive.
    StrCpy $instdrive $INSTDIR 3

    ; Compute drive space free in kilobyte
    ${DriveSpace} $instdrive "/D=F /S=K" $freespace

    DetailPrint "Determined installer needs $adjustedinstallsize kb ($installsize kb) while $freespace kb is free"

    IntCmp $adjustedinstallsize $freespace spaceok spaceok

    MessageBox MB_OK|MB_ICONSTOP "Insufficient space for installation. Please free space for installation directory $INSTDIR and try again."
    DetailPrint "Insufficient space for installation. Installer needs $adjustedinstallsize kb, but freespace is only $freespace kb."
    Abort "Insufficient space for installation."

  spaceok:
    DetailPrint "Installation target space is sufficient"

FunctionEnd
0 голосов
/ 07 августа 2009

У вас есть пример скрипта для автоматической установки?

...