31 lines
975 B
Plaintext
31 lines
975 B
Plaintext
include "NSLog.incl"
|
|
|
|
#plist NSAppTransportSecurity @{NSAllowsArbitraryLoads:YES}
|
|
|
|
local fn RunTerminalCommand( cmd as CFStringRef ) as CFStringRef
|
|
CFStringRef outputStr = NULL
|
|
|
|
TaskRef task = fn TaskInit
|
|
TaskSetExecutableURL( task, fn URLFileURLWithPath( @"/bin/zsh" ) )
|
|
CFStringRef cmdStr = fn StringWithFormat( @"%@", cmd )
|
|
CFArrayRef args = fn ArrayWithObjects( @"-c", cmdStr, NULL )
|
|
TaskSetArguments( task, args )
|
|
|
|
PipeRef p = fn PipeInit
|
|
TaskSetStandardOutput( task, p )
|
|
TaskSetStandardError( task, p )
|
|
FileHandleRef fh = fn PipeFileHandleForReading( p )
|
|
|
|
fn TaskLaunch( task, NULL )
|
|
TaskWaitUntilExit( task )
|
|
|
|
ErrorRef err
|
|
CFDataRef dta = fn FileHandleReadDataToEndOfFile( fh, @err )
|
|
if err then NSLog( @"%@", fn ErrorLocalizedDescription( err ) ) : exit fn
|
|
outputStr = fn StringWithData( dta, NSUTF8StringEncoding )
|
|
end fn = outputStr
|
|
|
|
NSLog( @"%@", fn RunTerminalCommand( @"curl ftp://ftp.slackware.com/welcome.msg" ) )
|
|
|
|
HandleEvents
|