Search options (Page 1 of 2)

They do show a progress bar. It was the first working example of progress bars during presetup.
I think they are faster but you tell me.

The below file has three files in it.

run DriverConverter.exe in a folder with the .7z driverpacks. They will be converted to .exe files. They must be named as downloaded not as base renames them. (it can be modified)
The conversion process is very fast. It's as fast as your computer can copy a file. It's as fast as base when it copies the files to the new names.

run extract-only.cmd to extract the driverpacks to %systemdrive% for a quick demonstration of the extraction process.

a replacement presetup.cmd is included if you want to build an install disc.

http://rapidshare.com/files/137801987/D … r.zip.html

try it and let me know.

The file DriverConvertor.exe is itself a self extractor. Extract the contents with 7zip to view the batch file.

if you use {$APPTYPE CONSOLE} the console window is visible. using {$APPTYPE GUI} hides it.

this is one I made a little while ago. written in Delphi.

the first one will show dialogs if errors. The second lacks the dialogs but will be a smaller file. third creates a log file in systemroot.
to debug change...
{$APPTYPE GUI}
to...
{$APPTYPE CONSOLE}

to debug presetup.cmd change...
SW_HIDE
to...
SW_SHOWNORMAL

Compile it in Delphi.

USE AT OWN RISK!

with dialogs...

program setup;

{$APPTYPE GUI}

uses
  SysUtils, Windows, ShellAPI, Dialogs;

{$R *.RES}

  procedure ShellExecute_AndWait(FileName: string; Params: string; Visible: DWORD);
var
  exInfo: TShellExecuteInfo;
  Ph: DWORD;
begin
  FillChar(exInfo, SizeOf(exInfo), 0);
  with exInfo do
  begin
    cbSize := SizeOf(exInfo);
    fMask := SEE_MASK_NOCLOSEPROCESS or SEE_MASK_FLAG_DDEWAIT;
    Wnd := GetActiveWindow();
    ExInfo.lpVerb := 'open';
    ExInfo.lpParameters := PChar(Params);
    lpFile := PChar(FileName);
    nShow := Visible;
  end;
  if ShellExecuteEx(@exInfo) then
    Ph := exInfo.HProcess
  else
  begin
    // if error
    Exit;
  end;
  WaitForSingleObject(ExInfo.hProcess, INFINITE);

  CloseHandle(Ph);
end;

var
  setupExe, setuporgExe, setupoldExe, cmdParams : String;
  i : Integer;
  
begin
   
    setupExe := 'setup.exe';
    setupoldExe := 'setupold.exe';
    setuporgExe := 'setuporg.exe';

    cmdParams := ParamStr(1);
    if ParamCount > 1 then
    begin
      for i := 2 to ParamCount do
        cmdParams := cmdParams+' '+ParamStr(i);
    end;

    if not RenameFile(setupExe, setupoldExe) then
        ShowMessage('Error renaming setup to setupold.');

    if not RenameFile(setuporgExe, setupExe) then
        ShowMessage('Error renaming setuporg to setup.');

    if FileExists('presetup.cmd') then
        ShellExecute_AndWait(PChar('presetup.cmd'), PChar('nada'), SW_HIDE)
    else
        ShowMessage('Error! no presetup.cmd file.');

    if not FileExists(setupExe) then
        ShowMessage('Error! no setup.exe file.');

    ShellExecute_AndWait(PChar('setup.exe'), PChar(cmdParams), SW_SHOWNORMAL);

end.

without dialogs...

program setup;

{$APPTYPE GUI}

uses
  SysUtils, Windows, ShellAPI;

{$R *.RES}

  procedure ShellExecute_AndWait(FileName: string; Params: string; Visible: DWORD);
var
  exInfo: TShellExecuteInfo;
  Ph: DWORD;
begin
  FillChar(exInfo, SizeOf(exInfo), 0);
  with exInfo do
  begin
    cbSize := SizeOf(exInfo);
    fMask := SEE_MASK_NOCLOSEPROCESS or SEE_MASK_FLAG_DDEWAIT;
    Wnd := GetActiveWindow();
    ExInfo.lpVerb := 'open';
    ExInfo.lpParameters := PChar(Params);
    lpFile := PChar(FileName);
    nShow := Visible;
  end;
  if ShellExecuteEx(@exInfo) then
    Ph := exInfo.HProcess
  else
  begin
    // if error
    Exit;
  end;
  WaitForSingleObject(ExInfo.hProcess, INFINITE);

  CloseHandle(Ph);
end;

var
  setupExe, setuporgExe, setupoldExe, cmdParams : String;
  i : Integer;
  
begin
   
    setupExe := 'setup.exe';
    setupoldExe := 'setupold.exe';
    setuporgExe := 'setuporg.exe';

    cmdParams := ParamStr(1);
    if ParamCount > 1 then
    begin
      for i := 2 to ParamCount do
        cmdParams := cmdParams+' '+ParamStr(i);
    end;

    if RenameFile(setupExe, setupoldExe) then;

    if RenameFile(setuporgExe, setupExe) then;

    if FileExists('presetup.cmd') then
        ShellExecute_AndWait(PChar('presetup.cmd'), PChar('nada'), SW_HIDE);    

    ShellExecute_AndWait(PChar('setup.exe'), PChar(cmdParams), SW_SHOWNORMAL);

end.

creates a log file in systemroot...

program setup;

{$APPTYPE GUI}

uses
  SysUtils, Windows, ShellAPI;

{$R *.RES}

  procedure ShellExecute_AndWait(FileName: string; Params: string; Visible: DWORD);
var
  exInfo: TShellExecuteInfo;
  Ph: DWORD;
begin
  FillChar(exInfo, SizeOf(exInfo), 0);
  with exInfo do
  begin
    cbSize := SizeOf(exInfo);
    fMask := SEE_MASK_NOCLOSEPROCESS or SEE_MASK_FLAG_DDEWAIT;
    Wnd := GetActiveWindow();
    ExInfo.lpVerb := 'open';
    ExInfo.lpParameters := PChar(Params);
    lpFile := PChar(FileName);
    nShow := Visible;
  end;
  if ShellExecuteEx(@exInfo) then
    Ph := exInfo.HProcess
  else
  begin
    // if error
    Exit;
  end;
  WaitForSingleObject(ExInfo.hProcess, INFINITE);

  CloseHandle(Ph);
end;

var
  setupExe, setuporgExe, setupoldExe, cmdParams, winDir : String;
  i : Integer;
  logFile : TextFile;
  
begin
    winDir := GetEnvironmentVariable('SystemRoot');
    AssignFile(logFile, winDir+'\presetup.log');
    ReWrite(logFile);
    WriteLn(logFile, '::::::::: Presetup Log File :::::::::');
    WriteLn(logFile, 'Fake setup.exe file © 2008 jaws1975');
    WriteLn(logFile, '');
    WriteLn(logFile, 'Initializing presetup...');

    setupExe := 'setup.exe';
    setupoldExe := 'setupold.exe';
    setuporgExe := 'setuporg.exe';

    WriteLn(logFile, 'Preparing commandline parameters to pass to real setup.exe...');
    cmdParams := ParamStr(1);
    if ParamCount > 1 then
    begin
      for i := 2 to ParamCount do
        cmdParams := cmdParams+' '+ParamStr(i);
    end;

    WriteLn(logFile, 'Renaming setup.exe to setupold.exe...');
    if not RenameFile(setupExe, setupoldExe) then
        WriteLn(logFile, '   error renaming setup.exe to setupold.exe...')
    else
        WriteLn(logFile, '   renamed setup.exe to setupold.exe...');

    WriteLn(logFile, 'Renaming setuporg.exe to setup.exe...');
    if not RenameFile(setuporgExe, setupExe) then
        WriteLn(logFile, '   error renaming setuporg.exe to setup.exe...')
    else
        WriteLn(logFile, '   renamed setuporg.exe to setup.exe...');

    WriteLn(logFile, 'Launching presetup.cmd...');
    if FileExists('presetup.cmd') then
        ShellExecute_AndWait(PChar('presetup.cmd'), PChar('nada'), SW_HIDE);

    if not FileExists(setupExe) then
        WriteLn(logFile, 'ERROR! setup.exe missing...')
    else
        WriteLn(logFile, 'Launching real setup.exe with parameters...');
    WriteLn(logFile, '   '+cmdParams);
    CloseFile(logFile);

    ShellExecute_AndWait(PChar('setup.exe'), PChar(cmdParams), SW_SHOWNORMAL);
    
end.

removing {$APPTYPE GUI} will cause it not to work. it says gui but there is no screen output.

use it or modify it as you like.

basically what it does is renames setup.exe to setupold.exe then rename setuporg.exe to setup.exe. it then launches presetup.cmd and waits for it to finish. it then launches the real setup.exe. It must wait for the real setup.exe to finish before the fake setup.exe closes.

I tried deleting setupold.exe but it would not delete when I tried.

It does that already. When launched from presetup.cmd you pass the parameter "presetup". That tells it to not install drivers but extract only and if no interaction within 60 seconds it will auto extract all driverpacks. Use the included presetup.cmd file to prevent any problems.

Did you test it and it not work?

honestly I didn't know of there existence.

googling... the links on ryanvm are dead. I'll try and find them and check them out.

edit:
bad links. looking in the index of the folder I found the July archives. will report back...

edit: won't work as is as I have to change the path. fix coming soon.

edit:
this is an experimental version! please read.
you can use muiz's Vistapacks with it. you can have Vista x64, Vista x86 and XP drivers all together. It will detect your OS and only allow the correct driverpacks to be used. do not rename muiz's driverpacks (Vistax64Drivers_jul.7z, Vistax86Drivers_jul.7z). The month in the name is ignored. It uses the archive names to set the path for dpinst.exe. using with XP x64 there is no OS check as there is no unique standard for archive or path names.
tested in Vista x64 and it updated my chipset drivers!

experimental! using with Vista will cause DPsFnshr to give errors. I need to write my own version of DPsFnshr because of the new file paths.
use with bin files from v0.3.1...

:removed:

I'm off to bed now but will attempt a workaround for the DPsFnshr problem tomorrow.

I propose one thing to the developers. If releasing driverpacks for other OS versions in the future. ie Vista, x64 then can you use different folder names then just D for the different OS driverpacks. If you do I can have my tool only scan the proper folder for that OS after detection.
example...
install from D for XP,2000,2003 x86
install from Dx64 for XP, 2003 x64
install from DVx86 for Vista, 2008 x86
install from DVx64 for Vista, 2008 x64
That way it won't try to install the wrong drivers for your OS. it won't install them anyway but it will still take the time to try.

I do agree with what you are saying Kal, however, for the end user there is no real difference between me submitting a modified version of your code or my own. They look closely enough to each other to be easy to figure out.
I think if I were to modify yours or you implement my changes then it should be renamed. DPsXtrct.exe is fine for presetup mode extraction only but for installing drivers a descriptive app name to double click is much better. IMHO

After review of your source I will make my decision on whether to abandon mine or not. I will post my source code soon as well.

Helmi, I think you should delete the first 25 post in this thread and start with Kal's first submission.

honestly I think two different apps doing similar things ain't that bad. Why make someone use Firefox when they like Opera instead or vise-versa.
Viva la difference!

also I updated mine to v0.2.2 above.

Driver Updater v0.2.0 (first public release)

This looks similar to the one released by Kal. I created it mainly to see if I could. I think it works great.
If double clicked it has the function of extracting and then installing the drivers. It uses dpinst.exe, a Microsoft program for the install.
If launched from presetup.cmd then it will extract only. It will timeout after 60 seconds (presetup only) if no interaction and extract all drivers.
When launching from presetup the parameter "presetup" needs to be passed to tell it not to install the drivers but to extract them only. Windows install will install the drivers. I included presetup.cmd to replace the one in your i386 folder. Please use it to eliminate error.
The other files needed are included mainly to show there intended location. Note dpinst.xml is not needed as it is created by DriverUpdater.exe.
No .ini file is needed as the OEM folder is scanned for existing driverpacks. They can be named using the long or short names.

After DPsFnshr.exe runs it is deleted and the reg entry deleted as well.

http://www.mediafire.com/?tcldg3l3ulv

edit updated to v0.2.1. fixed minor bug that if no driverpacks the install button is grayed out.
edit updated to v0.2.2 changed- you can install some driverpacks and then install more without having to reopen the app. dialog if no driverpacks. also a few tweaks with checkboxes.

Nice work. Works great.

my suggestion for the problem if no drivers are extracted in presetup is...
If nothing extracted then DevPath can't be lauched either.

check if the folder "D" exist. if so run DevPath. if not then don't run it...
IF EXIST %SystemDrive%\D\ %CDDRIVE%\OEM\bin\DevPath.exe %SystemDrive%\D

If folder "D" does not exist the just create the folder...
IF not EXIST %SystemDrive%\D\ md %SystemDrive%\D

That way you still run DPsFnshr without error and you don't need extra batch files or need to modify winnt.sif.

presetup.cmd
http://www.mediafire.com/?wv92kg9czoj

:EDIT:
I've managed to code my own version of a driver Selector. The only thing I haven't figured out yet is the auto install if no user interaction part, which important.
I will post it when finished.

In my testing autoit did not work in presetup stage but if you can make it work, then so be it.