void
UrlWrapper::ArgvReceived(int32 argc, char** argv)
{
if (argc <= 1)
return;
const char* failc = " || read -p 'Press any key'";
const char* pausec = " ; read -p 'Press any key'";
char* args[] = { (char *)"/bin/sh", (char *)"-c", NULL, NULL};
status_t err;
BUrl url(argv[1]);
BString full = BUrl(url).SetProtocol(BString()).UrlString();
BString proto = url.Protocol();
BString host = url.Host();
BString port = BString() << url.Port();
BString user = url.UserInfo();
BString pass = url.Password();
BString path = url.Path();
if (!url.IsValid()) {
fprintf(stderr, "malformed url: '%s'\n", url.UrlString().String());
return;
}
// XXX: debug
PRINT(("PROTO='%s'\n", proto.String()));
PRINT(("HOST='%s'\n", host.String()));
PRINT(("PORT='%s'\n", port.String()));
PRINT(("USER='******'\n", user.String()));
PRINT(("PASS='******'\n", pass.String()));
PRINT(("PATH='%s'\n", path.String()));
if (proto == "about") {
app_info info;
BString sig;
// BUrl could get an accessor for the full - proto part...
sig = host << "/" << path;
BMessage msg(B_ABOUT_REQUESTED);
if (be_roster->GetAppInfo(sig.String(), &info) == B_OK) {
BMessenger msgr(sig.String());
msgr.SendMessage(&msg);
return;
}
if (be_roster->Launch(sig.String(), &msg) == B_OK)
return;
be_roster->Launch("application/x-vnd.Haiku-About");
return;
}
if (proto == "telnet") {
BString cmd("telnet ");
if (url.HasUserInfo())
cmd << "-l " << user << " ";
cmd << host;
if (url.HasPort())
cmd << " " << port;
PRINT(("CMD='%s'\n", cmd.String()));
cmd << failc;
args[2] = (char*)cmd.String();
be_roster->Launch(kTerminalSig, 3, args);
return;
}
// see draft:
// http://tools.ietf.org/wg/secsh/draft-ietf-secsh-scp-sftp-ssh-uri/
if (proto == "ssh") {
BString cmd("ssh ");
if (url.HasUserInfo())
cmd << "-l " << user << " ";
if (url.HasPort())
cmd << "-oPort=" << port << " ";
cmd << host;
PRINT(("CMD='%s'\n", cmd.String()));
cmd << failc;
args[2] = (char*)cmd.String();
be_roster->Launch(kTerminalSig, 3, args);
// TODO: handle errors
return;
}
if (proto == "ftp") {
BString cmd("ftp ");
cmd << proto << "://";
/*
if (user.Length())
cmd << "-l " << user << " ";
cmd << host;
*/
cmd << full;
PRINT(("CMD='%s'\n", cmd.String()));
cmd << failc;
args[2] = (char*)cmd.String();
be_roster->Launch(kTerminalSig, 3, args);
// TODO: handle errors
return;
}
if (proto == "sftp") {
BString cmd("sftp ");
//cmd << url;
if (url.HasPort())
cmd << "-oPort=" << port << " ";
if (url.HasUserInfo())
cmd << user << "@";
cmd << host;
if (url.HasPath())
cmd << ":" << path;
PRINT(("CMD='%s'\n", cmd.String()));
cmd << failc;
args[2] = (char*)cmd.String();
be_roster->Launch(kTerminalSig, 3, args);
// TODO: handle errors
return;
}
if (proto == "finger") {
BString cmd("/bin/finger ");
if (url.HasUserInfo())
cmd << user;
if (url.HasHost() == 0)
host = "127.0.0.1";
cmd << "@" << host;
PRINT(("CMD='%s'\n", cmd.String()));
cmd << pausec;
args[2] = (char*)cmd.String();
be_roster->Launch(kTerminalSig, 3, args);
// TODO: handle errors
return;
}
if (proto == "http" || proto == "https" /*|| proto == "ftp"*/) {
BString cmd("/bin/wget ");
//cmd << url;
cmd << proto << "://";
if (url.HasUserInfo())
cmd << user << "@";
cmd << full;
PRINT(("CMD='%s'\n", cmd.String()));
cmd << pausec;
args[2] = (char*)cmd.String();
be_roster->Launch(kTerminalSig, 3, args);
// TODO: handle errors
return;
}
if (proto == "file") {
BMessage m(B_REFS_RECEIVED);
entry_ref ref;
_DecodeUrlString(path);
if (get_ref_for_path(path.String(), &ref) < B_OK)
return;
m.AddRef("refs", &ref);
be_roster->Launch(kTrackerSig, &m);
return;
}
// XXX:TODO: split options
if (proto == "query") {
// mktemp ?
BString qname("/tmp/query-url-temp-");
qname << getpid() << "-" << system_time();
BFile query(qname.String(), O_CREAT|O_EXCL);
// XXX: should check for failure
BString s;
int32 v;
_DecodeUrlString(full);
// TODO: handle options (list of attrs in the column, ...)
v = 'qybF'; // QuerY By Formula XXX: any #define for that ?
query.WriteAttr("_trk/qryinitmode", B_INT32_TYPE, 0LL, &v, sizeof(v));
s = "TextControl";
query.WriteAttr("_trk/focusedView", B_STRING_TYPE, 0LL, s.String(),
s.Length()+1);
s = full;
PRINT(("QUERY='%s'\n", s.String()));
query.WriteAttr("_trk/qryinitstr", B_STRING_TYPE, 0LL, s.String(),
s.Length()+1);
query.WriteAttr("_trk/qrystr", B_STRING_TYPE, 0LL, s.String(),
s.Length()+1);
s = "application/x-vnd.Be-query";
query.WriteAttr("BEOS:TYPE", 'MIMS', 0LL, s.String(), s.Length()+1);
BEntry e(qname.String());
entry_ref er;
if (e.GetRef(&er) >= B_OK)
be_roster->Launch(&er);
return;
}
if (proto == "sh") {
BString cmd(full);
if (_Warn(url.UrlString()) != B_OK)
return;
PRINT(("CMD='%s'\n", cmd.String()));
cmd << pausec;
args[2] = (char*)cmd.String();
be_roster->Launch(kTerminalSig, 3, args);
// TODO: handle errors
return;
}
if (proto == "beshare") {
team_id team;
BMessenger msgr(kBeShareSig);
// if no instance is running, or we want a specific server, start it.
if (!msgr.IsValid() || url.HasHost()) {
be_roster->Launch(kBeShareSig, (BMessage*)NULL, &team);
msgr = BMessenger(NULL, team);
}
if (url.HasHost()) {
BMessage mserver('serv');
mserver.AddString("server", host);
msgr.SendMessage(&mserver);
}
if (url.HasPath()) {
BMessage mquery('quer');
mquery.AddString("query", path);
msgr.SendMessage(&mquery);
}
// TODO: handle errors
return;
}
if (proto == "icq" || proto == "msn") {
// TODO
team_id team;
be_roster->Launch(kIMSig, (BMessage*)NULL, &team);
BMessenger msgr(NULL, team);
if (url.HasHost()) {
BMessage mserver(B_REFS_RECEIVED);
mserver.AddString("server", host);
msgr.SendMessage(&mserver);
}
// TODO: handle errors
return;
}
if (proto == "mms" || proto == "rtp" || proto == "rtsp") {
args[0] = (char*)url.UrlString().String();
be_roster->Launch(kVLCSig, 1, args);
return;
}
if (proto == "nfs") {
BString parameter(host);
_DecodeUrlString(path);
if (url.HasPort())
parameter << ":" << port;
//XXX: should not always be absolute! FIXME
parameter << ":/" << path;
BString prettyPath(path);
prettyPath.Remove(0, prettyPath.FindLast("/") + 1);
if (path == "" || path == "/")
prettyPath = "root";
prettyPath << " on " << host;
prettyPath.Prepend("/");
if (mkdir(prettyPath.String(), 0755) < 0) {
perror("mkdir");
return;
}
dev_t volume;
uint32 flags = 0;
fprintf(stderr, "parms:'%s'\n", parameter.String());
volume = fs_mount_volume(prettyPath.String(), NULL, "nfs4", flags,
parameter.String());
if (volume < B_OK) {
fprintf(stderr, "fs_mount_volume: %s\n", strerror(volume));
return;
}
BMessage m(B_REFS_RECEIVED);
entry_ref ref;
if (get_ref_for_path(prettyPath.String(), &ref) < B_OK)
return;
m.AddRef("refs", &ref);
be_roster->Launch(kTrackerSig, &m);
return;
}
if (proto == "doi") {
BString url("http://dx.doi.org/");
BString mimetype;
url << full;
BUrl u(url.String());
args[0] = const_cast<char*>("urlwrapper"); //XXX
args[1] = (char*)u.UrlString().String();
args[2] = NULL;
mimetype = kURLHandlerSigBase;
mimetype += u.Protocol();
err = be_roster->Launch(mimetype.String(), 1, args + 1);
if (err != B_OK && err != B_ALREADY_RUNNING)
err = be_roster->Launch(kAppSig, 1, args + 1);
// TODO: handle errors
return;
}
/*
More ?
cf. http://en.wikipedia.org/wiki/URI_scheme
cf. http://www.iana.org/assignments/uri-schemes.html
Audio: (SoundPlay specific, identical to http:// to a shoutcast server)
vnc: ?
irc: ?
im: http://tools.ietf.org/html/rfc3860
svn: handled by checkitout
cvs: handled by checkitout
git: handled by checkitout
rsync: handled by checkitout - http://tools.ietf.org/html/rfc5781
smb: cifsmount ?
nfs: mount_nfs ? http://tools.ietf.org/html/rfc2224
ipp: http://tools.ietf.org/html/rfc3510
mailto: ? Mail & Beam both handle it already (not fully though).
imap: to describe mail accounts ? http://tools.ietf.org/html/rfc5092
pop: http://tools.ietf.org/html/rfc2384
mid: cid: as per RFC 2392
http://www.rfc-editor.org/rfc/rfc2392.txt query MAIL:cid
message:<MID> http://daringfireball.net/2007/12/message_urls_leopard_mail
itps: pcast: podcast: s//http/ + parse xml to get url to mp3 stream...
audio: s//http:/ + default MediaPlayer
-- see http://forums.winamp.com/showthread.php?threadid=233130
gps: ? I should submit an RFC for that one :)
webcal: (is http: to .ics file)
data: (but it's dangerous)
*/
}
char *PathResolver::normalizeFilename( const char *path )
{
switch (path[0])
{
case '<': // Input
return prettyPath(mstrcat(project_root, path+1));
case '>': // Output
return prettyPath(mstrcat(out_root, path+1));
case '~': // Output
return prettyPath(mstrcat(getenv("HOME"), path+1));
case '@': // Auto path
{
/***** Expand the path *****/
char *p = mstrdup(path);
char *pf = p;
if ( p[1] != '/' ) p[0] = '!';
else p++;
char *b = normalizeFilename(p);
free(pf);
char *n = NULL;
size_t olen = strlen(out_root);
size_t plen = strlen(project_root);
size_t blen = strlen(b);
if (!strncmp(b, out_root, olen))
{
n = b; // Already in the out directory.
}
else if (!strncmp(b, project_root, plen))
{
n = myalloc(blen - plen + olen + 1);
strcpy(n, out_root);
strcpy(n+olen, b+plen);
free(b);
}
else // Outside of our directories
{
n = myalloc(olen + blen + 1);
strcpy(n, out_root);
strcpy(n+olen, b);
free(b);
}
return prettyPath(n);
}
case '*': // System path
{
path = mstrdup(path);
DIR *cwd = opendir(".");
char *pathdir = mstrdup(getenv("PATH"));
char *nt = pathdir; // NULL-terminator
bool moredirs = true;
const char *exename = path + 1;
while ( moredirs )
{
/*** NULL-terminate the end of the next dir ***/
pathdir = nt;
while ( *nt != '\0' && *nt != ':' )
nt++;
if (!*nt)
moredirs = false;
*(nt++) = '\0';
/*** Check for executable ***/
chdir(pathdir);
FILE *e = fopen(exename, "r");
if (e) // Found it.
{
char *n = mstrcat(pathdir, '/', exename);
fchdir(dirfd(cwd));
closedir(cwd);
return prettyPath(n);
}
}
fchdir(dirfd(cwd));
closedir(cwd);
}
msg::error("System path \"%s\" not found.", path);
exit(EX_DATAERR);
case '/': // Already absolute
return prettyPath(mstrdup(path));
}
// Regular relative path
if ( *path == '!' ) path++; // We didn't want the first character
// to be looked at.
char *n = getcwd(NULL, 0);
int cwdlen = strlen(n);
n = (char*)realloc(n, (cwdlen+2+strlen(path))*sizeof(char));
if ( cwdlen > 1 )
{
n[cwdlen] = '/' ;
n[cwdlen+1] = '\0';
}
strcat(n, path);
return prettyPath(n);
}
