Re: [Rd] Fwd: file mode lost in file.copy()?

From: Yihui Xie <xie_at_yihui.name>
Date: Mon, 07 Mar 2011 00:17:02 -0600

Great! Thanks a lot!

Regards,
Yihui

--
Yihui Xie <xieyihui_at_gmail.com>
Phone: 515-294-2465 Web: http://yihui.name
Department of Statistics, Iowa State University
2215 Snedecor Hall, Ames, IA



On Sun, Mar 6, 2011 at 10:26 PM, Henrik Bengtsson <hb_at_biostat.ucsf.edu> wrote:

> FYI,
>
> this seems to be a known problem that has been address in the the
> devel version.  From NEWS of R v2.13.0 devel:
>
> NEW FEATURES:
>
> - file.copy() now copies read/write/execute permissions on files (it
> already did so for directories in recursive copies).
>
> Source: http://cran.r-project.org/bin/windows/base/NEWS.R-2.13.0dev.html
>
> /Henrik
>
>
> On Sun, Mar 6, 2011 at 1:08 PM, Yihui Xie <xie_at_yihui.name> wrote:
>> Hi,
>>
>> I was suggested that this question should be reported to r-devel.
>> Could you please make file.copy() preserve the file mode information?
>> I see from the source code that file.copy() is basically
>> file.append():
>>
>>    if (any(okay)) {
>>        okay[okay] <- file.create(to[okay])
>>        if (any(okay))
>>            okay[okay] <- file.append(to[okay], from[okay])
>>    }
>>
>> Maybe something like this should be added to file.copy():
>>
>> Sys.chmod(to[okay], file.info(from[okay])$mode)
>>
>> Thanks!
>>
>> Regards,
>> Yihui
>> --
>> Yihui Xie <xieyihui_at_gmail.com>
>> Phone: 515-294-2465 Web: http://yihui.name
>> Department of Statistics, Iowa State University
>> 2215 Snedecor Hall, Ames, IA
>>
>>
>>
>>
>> ---------- Forwarded message ----------
>> From: Yihui Xie <xie_at_yihui.name>
>> Date: Sat, Mar 5, 2011 at 5:31 PM
>> Subject: file mode lost in file.copy()?
>> To: R Help <r-help_at_r-project.org>
>>
>>
>> Hi,
>>
>> Recently I noticed file.copy() would discard the file mode
>> information. Is this the expected behaviour or a bug for file.copy()?
>>
>>> file.create('testfile')
>> [1] TRUE
>>
>>> file.info('testfile')
>>         size isdir mode               mtime               ctime
>> testfile    0 FALSE  644 2011-03-05 17:06:39 2011-03-05 17:06:39
>>                       atime  uid  gid uname grname
>> testfile 2011-03-05 17:06:40 1000 1000 yihui  yihui
>>
>>> Sys.chmod('testfile', '0755')
>>
>>> file.info('testfile')
>>         size isdir mode               mtime               ctime
>> testfile    0 FALSE  755 2011-03-05 17:06:39 2011-03-05 17:06:59
>>                       atime  uid  gid uname grname
>> testfile 2011-03-05 17:07:00 1000 1000 yihui  yihui
>>
>>> file.copy('testfile', 'testfile2')
>> [1] TRUE
>>
>>> file.info('testfile2')
>>          size isdir mode               mtime               ctime
>> testfile2    0 FALSE  644 2011-03-05 17:07:20 2011-03-05 17:07:20
>>                        atime  uid  gid uname grname
>> testfile2 2011-03-05 17:07:21 1000 1000 yihui  yihui
>>
>>> sessionInfo()
>> R version 2.12.2 (2011-02-25)
>> Platform: x86_64-unknown-linux-gnu (64-bit)
>>
>> locale:
>>  [1] LC_CTYPE=en_US.utf8       LC_NUMERIC=C
>>  [3] LC_TIME=en_US.utf8        LC_COLLATE=en_US.utf8
>>  [5] LC_MONETARY=C             LC_MESSAGES=en_US.utf8
>>  [7] LC_PAPER=en_US.utf8       LC_NAME=C
>>  [9] LC_ADDRESS=C              LC_TELEPHONE=C
>> [11] LC_MEASUREMENT=en_US.utf8 LC_IDENTIFICATION=C
>>
>> attached base packages:
>> [1] stats     graphics  grDevices utils     datasets  methods   base
>>
>>
>> Regards,
>> Yihui
>> --
>> Yihui Xie <xieyihui_at_gmail.com>
>> Phone: 515-294-2465 Web: http://yihui.name
>> Department of Statistics, Iowa State University
>> 2215 Snedecor Hall, Ames, IA
>>
>> ______________________________________________
>> R-devel_at_r-project.org mailing list
>> https://stat.ethz.ch/mailman/listinfo/r-devel
>>
>
______________________________________________ R-devel_at_r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-devel
Received on Mon 07 Mar 2011 - 06:20:46 GMT

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.2.0, at Mon 07 Mar 2011 - 18:30:27 GMT.

Mailing list information is available at https://stat.ethz.ch/mailman/listinfo/r-devel. Please read the posting guide before posting to the list.

list of date sections of archive