如何从终端安全地向R应用程序提供密码? [英] Way to securely give a password to R application from the terminal?

问题描述

R是否具有允许用户安全地提供密码的功能，例如Python的getpass模块?

Does R have a function that allows a user to provide a password securely, such as Python's getpass module?

(请参见 http://docs.python.org/library/getpass.html举例说明我的意思

(see http://docs.python.org/library/getpass.html for an example of what I mean)

推荐答案

问题是R没有控制它运行的终端的功能(类似于Rncurses)；可能是由于可移植性问题.
不久前，我在同一个问题上苦苦挣扎，最后使用TclTk获得了一个函数:

The problem is that R does not have functions to control the terminal it is running in (something like Rncurses); probably this is due to portability issues.
Some time ago I was struggling with the same problem and I ended up with a function using TclTk:

getPass<-function(){  
  require(tcltk);  
  wnd<-tktoplevel();tclVar("")->passVar;  
  #Label  
  tkgrid(tklabel(wnd,text="Enter password:"));  
  #Password box  
  tkgrid(tkentry(wnd,textvariable=passVar,show="*")->passBox);  
  #Hitting return will also submit password  
  tkbind(passBox,"<Return>",function() tkdestroy(wnd));  
  #OK button  
  tkgrid(tkbutton(wnd,text="OK",command=function() tkdestroy(wnd)));  
  #Wait for user to click OK  
  tkwait.window(wnd);  
  password<-tclvalue(passVar);  
  return(password);  
}  

当然，它不能在非GUI环境中使用.

Of course it won't work in non-GUI environments.

这篇关于如何从终端安全地向R应用程序提供密码?的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！