Download a file from the internet

[Matthias Merkel]

I've been trying to figure this out for a few hours now but wasn't able to find a way to download a file from the internet. Does anyone know how that would be possible to do?

[jj2007]

Like this?

include \masm32\MasmBasic\MasmBasic.inc         ; download
  Init
  FileWrite "test.html", FileRead$("http://masm32.com/board/index.php?board=1.0")
  ShEx "test.html"   ; show it in your browser
EndOfCode

[Matthias Merkel]

That is awesome! Thank you so much.

[aw27]

 

You can also do it in pure VB.Net and have lots of fun too:

Code: [Select]

        Using client As System.Net.WebClient = New System.Net.WebClient()
            client.DownloadFile("http://masm32.com/board/index.php?board=1.0", "test.html")
        End Using


[Matthias Merkel]

You can also do it in pure VB.Net and have lots of fun too:

Code: [Select]

        Using client As System.Net.WebClient = New System.Net.WebClient()
            client.DownloadFile("http://masm32.com/board/index.php?board=1.0", "test.html")
        End Using


The question was about ASM though.

[aw27]

The important thing is that you are happy with what you have learnt about ASM.

[felipe]

 

Welcome to the forum Matthias Merkel.   

[Matthias Merkel]

Welcome to the forum Matthias Merkel.   

Thanks

[Vortex]

Hi Matthias Merkel,

Here is a quick example :

Code: [Select]

.386
.model flat,stdcall
option casemap:none

include     \masm32\include\windows.inc
include     \masm32\include\kernel32.inc
include     \masm32\include\urlmon.inc

includelib  \masm32\lib\kernel32.lib
includelib  \masm32\lib\urlmon.lib

.data

szURL       db 'http://vortex.masmcode.com/files/Wcrt0_7.zip',0
FileName    db 'TinyCRT.zip',0

.code

start:

    invoke  URLDownloadToFile,0,ADDR szURL,\
            ADDR FileName,0,0

    invoke  ExitProcess,0

END start
The trick is to use the API function URLDownloadToFile.

[hutch--]

I wonder if anyone knows how to construct the callback for the last argument to get download progress. The API works fine in 64 bit but it has a COM interface for the callback that I have no data on at all. Other than that, is there any viable alternatives for win64 (win7 up) that can both do the download AND have progress information ?

This in 64 bit works fine.

invoke URLDownloadToFile,0,url,targ,0,0       ; pCB

[Matthias Merkel]

Hi Matthias Merkel,

Here is a quick example :

Code: [Select]

.386
.model flat,stdcall
option casemap:none

include     \masm32\include\windows.inc
include     \masm32\include\kernel32.inc
include     \masm32\include\urlmon.inc

includelib  \masm32\lib\kernel32.lib
includelib  \masm32\lib\urlmon.lib

.data

szURL       db 'http://vortex.masmcode.com/files/Wcrt0_7.zip',0
FileName    db 'TinyCRT.zip',0

.code

start:

    invoke  URLDownloadToFile,0,ADDR szURL,\
            ADDR FileName,0,0

    invoke  ExitProcess,0

END start
The trick is to use the API function URLDownloadToFile.

The huge issue with that way is that it's detected by a lot of antivirus vendors as malware: https://www.virustotal.com/#/file/4785d45664ef436c1f2cbd11e9dd46a358aee36f323fd213101c289b5632b523/detection

[aw27]

Other than that, is there any viable alternatives for win64 (win7 up) that can both do the download AND have progress information ?

I prefer InternetOpenUrl, HttpQueryInfo, InternetReadFile. HttpQueryInfo gives you the number of bytes to read.

[aw27]

The huge issue with that way is that it's detected by a lot of antivirus vendors as malware

The antivirus are particularly dumb and many of them hate polink.

[jj2007]

The huge issue with that way is that it's detected by a lot of antivirus vendors as malware

Yes indeed. Try the attached version, btw with progress indicator in the statusbar (Jotti:  2/18 scanners reported malware). Here is the source:

Code: [Select]

GuiParas equ "Downloading a file is easy"
include \masm32\MasmBasic\Res\MbGui.asm
GuiControl Edit, "edit"
GuiControl Status, "statusbar"
Download "http://masm32.com/board/index.php?topic=6771.msg72451#msg72451", cb:MyCallback, msg:hWnd_
Event Message
  .if uMsg==WM_DOWNLOADFINISHED
SetWin$ hEdit="Download finished"+CrLf$+NoTag$(wParam)
MsgBox 0, "Save contents to test.html?", "Hi", MB_YESNOCANCEL
If_ eax==IDYES Then <mcs FileWrite "test.html", wParam : ShEx "test.html">
  .endif
EndOfEvents
  MyCallback:
  SetWin$ hStatus=Str$("%i bytes\ndownloaded - hold Shift to stop it", edx) ; currrent state in edx
  invoke GetKeyState, VK_SHIFT
  test ah, ah ; stop download if Sign? flag set
  retn
GuiEnd

[caballero]

The huge issue with that way is that it's detected by a lot of antivirus vendors as malware

Yes indeed. Try the attached version, btw with progress indicator in the statusbar (Jotti:  2/18 scanners reported malware). Here is the source:

Code: [Select]

GuiParas equ "Downloading a file is easy"
include \masm32\MasmBasic\Res\MbGui.asm
GuiControl Edit, "edit"
GuiControl Status, "statusbar"
Download "http://masm32.com/board/index.php?topic=6771.msg72451#msg72451", cb:MyCallback, msg:hWnd_
Event Message
  .if uMsg==WM_DOWNLOADFINISHED
SetWin$ hEdit="Download finished"+CrLf$+NoTag$(wParam)
MsgBox 0, "Save contents to test.html?", "Hi", MB_YESNOCANCEL
If_ eax==IDYES Then <mcs FileWrite "test.html", wParam : ShEx "test.html">
  .endif
EndOfEvents
  MyCallback:
  SetWin$ hStatus=Str$("%i bytes\ndownloaded - hold Shift to stop it", edx) ; currrent state in edx
  invoke GetKeyState, VK_SHIFT
  test ah, ah ; stop download if Sign? flag set
  retn
GuiEnd

Wow, it is a quite good example, where are the masm sources?