;ABSTRACT
;   SP12 installation script -
;USAGE
;   Use Inno Setup version 4.2.0 or above to compile this script
;AUTHOR
;   Dimo Dimov

[Setup]
AppName=SP12 AVR Programmer
AppVerName=SP12 AVR Programmer 2.0.7
AppPublisherURL=http://www.xs4all.nl/~sbolt/e-spider_prog.html
AppSupportURL=http://www.xs4all.nl/~sbolt/e-spider_prog.html
AppUpdatesURL=http://www.xs4all.nl/~sbolt/e-spider_prog.html
DefaultDirName={pf}\SP12_AVR
DefaultGroupName=SP12 AVR Programmer
LicenseFile=COPYING.txt
InfoBeforeFile=readme.win
Compression=bzip
;suggested compression was: lzma
SolidCompression=yes
PrivilegesRequired=admin
AlwaysRestart=yes

;[Tasks]
;Name: "desktopicon"; Description: "Create a &desktop icon"; GroupDescription: "Additional icons:"; Flags: unchecked

[Files]
Source: "readme.win"; DestDir: "{app}"; Flags: ignoreversion
Source: "readme.dos"; DestDir: "{app}"; Flags: ignoreversion
Source: "sp12.txt"; DestDir: "{app}"; Flags: ignoreversion
Source: "sp12dev.txt"; DestDir: "{app}"; Flags: ignoreversion
Source: "sp12rc.txt"; DestDir: "{app}"; Flags: ignoreversion
Source: "_sp12dev"; DestDir: "{app}"; Flags: ignoreversion
Source: "_sp12rc"; DestDir: "{app}"; Flags: ignoreversion
Source: "changes.txt"; DestDir: "{app}"; Flags: ignoreversion
Source: "COPYING.txt"; DestDir: "{app}"; Flags: ignoreversion
Source: "dongle.txt"; DestDir: "{app}"; Flags: ignoreversion
Source: "hardware.txt"; DestDir: "{app}"; Flags: ignoreversion
Source: "icp_intr.gif"; DestDir: "{app}"; Flags: ignoreversion
Source: "progrmmr.gif"; DestDir: "{app}"; Flags: ignoreversion
Source: "dongle.gif"; DestDir: "{app}"; Flags: ignoreversion
Source: "sp12.exe"; DestDir: "{app}"; Flags: ignoreversion
Source: "WinNT\giveio.sys"; DestDir: "{sys}\drivers"; MinVersion: 0, 1 ; CopyMode: alwaysskipifsameorolder; Flags: restartreplace sharedfile
Source: "WinNT\instdrv.exe"; DestDir: "{app}"; MinVersion: 0, 1;  AfterInstall: SP12giveioInstall({app}\instdrv.exe)
; NOTE: Don't use "Flags: ignoreversion" on any shared system files

[Icons]
Name: "{group}\SP12 AVR Programmer"; Filename: "{app}\sp12.exe"
Name: "{group}\SP12 AVR Programmer"; Filename: "{app}\sp12.txt"
;Name: "{userdesktop}\SP12 AVR Programmer"; Filename: "{app}\sp12.txt"; Tasks: desktopicon

[Registry]
Root: HKLM; Subkey: "SYSTEM\CurrentControlSet\Control\Session Manager\Environment"; ValueType: expandsz; ValueName: "Path"; ValueData: "{olddata};{app}"; Flags: preservestringtype
Root: HKLM; Subkey: "SYSTEM\CurrentControlSet\Control\Session Manager\Environment"; ValueType: string; ValueName: "SP12"; ValueData: "{app}"; Flags: uninsdeletevalue

;[Run]
;Filename: "{app}\instdrv.exe"; Parameters: " giveio {sys}\drivers\giveio.sys"; StatusMsg: "Launching giveio service..."
;Filename: "PAUSE"; Flags: shellexec

[Code]
procedure SP12giveioInstall(FileName: String);
var ResultCode :Integer;
begin
    If InstExec(FileName, ExpandConstant('giveio {sys}\drivers\giveio.sys'), '', True, False, 0, ResultCode) Then
    begin
      RegWriteDWordValue (HKLM, 'SYSTEM\CurrentControlSet\Services\giveio', 'Start', 2);
    end;
end;