[Rd] download.file() yields incomplete files with method="internal"

[Jan.Kleinn at partnerre.com]

Dear all,

as the bug # 7991 is flagged not-reproducible, let me give you some pieces
of code, as I have the same or similar problem. The problem always shows up
with the first example (a small text file) and only sometimes (but without
obvious pattern) with the second example, which is a binary file.

> download.file("ftp://ftp.nhc.noaa.gov/pub/atcf/btk/bal012006.dat",
"C:/temp/bal012006.dat", method = 'internal', mode = 'w', cacheOK = FALSE)
trying URL 'ftp://ftp.nhc.noaa.gov/pub/atcf/btk/bal012006.dat'
ftp data connection made, file length 5110 bytes
opened URL
downloaded 0 bytes

Warning message:
downloaded length 0 != reported length 5110

>
download.file("ftp://ftp.nhc.noaa.gov/pub/atcf/aid_public/aal012006.dat.gz",
 "C:/temp/aal012006.dat.gz", method = 'internal', mode = 'wb', cacheOK =
FALSE)
trying URL 'ftp://ftp.nhc.noaa.gov/pub/atcf/aid_public/aal012006.dat.gz'
ftp data connection made, file length 173760 bytes
opened URL
downloaded 155Kb

Warning message:
downloaded length 159140 != reported length 173760


Finally, is the spec of the system I'm working on:
> version
               _
platform       i386-pc-mingw32
arch           i386
os             mingw32
system         i386, mingw32
status
major          2
minor          3.1
year           2006
month          06
day            01
svn rev        38247
language       R
version.string Version 2.3.1 (2006-06-01)
> win.version()
[1] "Windows XP Professional (build 2600) Service Pack 2.0"


Many thanks in advance and best regards,
Jan