1998-02-27 07:54:42 +03:00
|
|
|
/* Utilities for VFS modules.
|
|
|
|
|
|
|
|
Currently includes login and tcp open socket routines.
|
|
|
|
|
|
|
|
Copyright (C) 1995, 1996 Miguel de Icaza
|
|
|
|
|
1998-09-27 23:27:58 +04:00
|
|
|
This program is free software; you can redistribute it and/or
|
|
|
|
modify it under the terms of the GNU Library General Public License
|
|
|
|
as published by the Free Software Foundation; either version 2 of
|
|
|
|
the License, or (at your option) any later version.
|
1998-02-27 07:54:42 +03:00
|
|
|
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
1998-09-27 23:27:58 +04:00
|
|
|
GNU Library General Public License for more details.
|
1998-02-27 07:54:42 +03:00
|
|
|
|
1998-09-27 23:27:58 +04:00
|
|
|
You should have received a copy of the GNU Library General Public
|
|
|
|
License along with this program; if not, write to the Free Software
|
2000-08-23 02:50:00 +04:00
|
|
|
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
1998-09-27 23:27:58 +04:00
|
|
|
|
2000-05-16 18:59:33 +04:00
|
|
|
/* Namespace: exports vfs_split_url */
|
1998-10-13 02:07:53 +04:00
|
|
|
|
1998-02-27 07:54:42 +03:00
|
|
|
#ifndef test_get_host_and_username
|
|
|
|
#include <config.h>
|
|
|
|
#endif
|
|
|
|
#include <unistd.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <stdarg.h>
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <signal.h>
|
|
|
|
#include <string.h>
|
|
|
|
#include <pwd.h>
|
|
|
|
#include <sys/types.h>
|
|
|
|
#include <netdb.h>
|
|
|
|
#include <sys/socket.h>
|
|
|
|
#include <netinet/in.h>
|
|
|
|
#include <arpa/inet.h>
|
|
|
|
#ifdef USE_TERMNET
|
|
|
|
#include <termnet.h>
|
|
|
|
#endif
|
|
|
|
#include <errno.h>
|
1999-01-21 01:01:11 +03:00
|
|
|
|
|
|
|
#include "utilvfs.h"
|
|
|
|
|
1998-11-21 22:36:01 +03:00
|
|
|
#include "vfs.h"
|
1998-02-27 07:54:42 +03:00
|
|
|
|
|
|
|
/* Extract the hostname and username from the path */
|
|
|
|
/* path is in the form: [user@]hostname:port/remote-dir, e.g.:
|
|
|
|
*
|
|
|
|
* ftp://sunsite.unc.edu/pub/linux
|
|
|
|
* ftp://miguel@sphinx.nuclecu.unam.mx/c/nc
|
|
|
|
* ftp://tsx-11.mit.edu:8192/
|
|
|
|
* ftp://joe@foo.edu:11321/private
|
|
|
|
* ftp://joe:password@foo.se
|
|
|
|
*
|
|
|
|
* If the user is empty, e.g. ftp://@roxanne/private, then your login name
|
|
|
|
* is supplied.
|
|
|
|
*
|
2000-05-16 18:59:33 +04:00
|
|
|
* returns malloced host if host isn't null, user and pass if pass is not null.
|
1998-02-27 07:54:42 +03:00
|
|
|
* returns a malloced strings with the pathname relative to the host.
|
|
|
|
* */
|
|
|
|
|
1998-11-21 22:36:01 +03:00
|
|
|
char *vfs_split_url (char *path, char **host, char **user, int *port, char **pass,
|
|
|
|
int default_port, int flags)
|
1998-02-27 07:54:42 +03:00
|
|
|
{
|
|
|
|
struct passwd *passwd_info;
|
|
|
|
char *dir, *colon, *inner_colon, *at, *rest;
|
|
|
|
char *retval;
|
1999-01-21 01:01:11 +03:00
|
|
|
char *pcopy = g_strdup (path);
|
2000-05-16 18:59:33 +04:00
|
|
|
char *pend = pcopy + strlen (pcopy);
|
1998-11-21 22:36:01 +03:00
|
|
|
int default_is_anon = flags & URL_DEFAULTANON;
|
1998-02-27 07:54:42 +03:00
|
|
|
|
2000-04-10 16:00:43 +04:00
|
|
|
if (pass)
|
|
|
|
*pass = NULL;
|
1998-02-27 07:54:42 +03:00
|
|
|
*port = default_port;
|
|
|
|
*user = NULL;
|
1998-11-22 19:17:42 +03:00
|
|
|
retval = NULL;
|
1998-02-27 07:54:42 +03:00
|
|
|
|
1998-11-21 22:36:01 +03:00
|
|
|
dir = pcopy;
|
1998-11-22 19:17:42 +03:00
|
|
|
if (!(flags & URL_NOSLASH)) {
|
1998-11-21 22:36:01 +03:00
|
|
|
/* locate path component */
|
2000-05-16 18:59:33 +04:00
|
|
|
while (*dir != PATH_SEP && *dir)
|
|
|
|
dir++;
|
1998-11-21 22:36:01 +03:00
|
|
|
if (*dir){
|
1999-01-21 01:01:11 +03:00
|
|
|
retval = g_strdup (dir);
|
1998-11-21 22:36:01 +03:00
|
|
|
*dir = 0;
|
|
|
|
} else
|
1999-01-21 01:01:11 +03:00
|
|
|
retval = g_strdup (PATH_SEP_STR);
|
1998-11-21 22:36:01 +03:00
|
|
|
}
|
1998-02-27 07:54:42 +03:00
|
|
|
|
|
|
|
/* search for any possible user */
|
|
|
|
at = strchr (pcopy, '@');
|
|
|
|
|
|
|
|
/* We have a username */
|
|
|
|
if (at){
|
|
|
|
*at = 0;
|
|
|
|
inner_colon = strchr (pcopy, ':');
|
|
|
|
if (inner_colon){
|
|
|
|
*inner_colon = 0;
|
|
|
|
inner_colon++;
|
2000-05-16 18:59:33 +04:00
|
|
|
if (pass)
|
1999-01-21 01:01:11 +03:00
|
|
|
*pass = g_strdup (inner_colon);
|
1998-02-27 07:54:42 +03:00
|
|
|
}
|
1999-03-30 10:09:56 +04:00
|
|
|
if (*pcopy != 0)
|
1999-01-21 01:01:11 +03:00
|
|
|
*user = g_strdup (pcopy);
|
1998-02-27 07:54:42 +03:00
|
|
|
else
|
|
|
|
default_is_anon = 0;
|
|
|
|
|
|
|
|
if (pend == at+1)
|
|
|
|
rest = at;
|
|
|
|
else
|
|
|
|
rest = at + 1;
|
|
|
|
} else
|
|
|
|
rest = pcopy;
|
|
|
|
|
|
|
|
if (!*user){
|
|
|
|
if (default_is_anon)
|
1999-01-21 01:01:11 +03:00
|
|
|
*user = g_strdup ("anonymous");
|
1998-02-27 07:54:42 +03:00
|
|
|
else {
|
|
|
|
if ((passwd_info = getpwuid (geteuid ())) == NULL)
|
1999-01-21 01:01:11 +03:00
|
|
|
*user = g_strdup ("anonymous");
|
1998-02-27 07:54:42 +03:00
|
|
|
else {
|
1999-01-21 01:01:11 +03:00
|
|
|
*user = g_strdup (passwd_info->pw_name);
|
1998-02-27 07:54:42 +03:00
|
|
|
}
|
|
|
|
endpwent ();
|
|
|
|
}
|
|
|
|
}
|
|
|
|
/* Check if the host comes with a port spec, if so, chop it */
|
|
|
|
colon = strchr (rest, ':');
|
|
|
|
if (colon){
|
|
|
|
*colon = 0;
|
1998-09-13 14:40:43 +04:00
|
|
|
if (sscanf(colon+1, "%d", port)==1) {
|
|
|
|
if (*port <= 0 || *port >= 65536)
|
|
|
|
*port = default_port;
|
|
|
|
} else {
|
2000-04-10 16:00:43 +04:00
|
|
|
while(*(++colon)){
|
1998-09-13 14:40:43 +04:00
|
|
|
switch(*colon) {
|
|
|
|
case 'C': *port = 1;
|
|
|
|
break;
|
|
|
|
case 'r': *port = 2;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
1998-02-27 07:54:42 +03:00
|
|
|
}
|
2000-05-16 18:59:33 +04:00
|
|
|
if (host)
|
|
|
|
*host = g_strdup (rest);
|
1998-02-27 07:54:42 +03:00
|
|
|
|
1999-01-21 01:01:11 +03:00
|
|
|
g_free (pcopy);
|
1998-02-27 07:54:42 +03:00
|
|
|
return retval;
|
|
|
|
}
|
|
|
|
|
|
|
|
#ifdef test_get_host_and_username
|
|
|
|
struct tt {
|
|
|
|
char *url;
|
|
|
|
char *r_host;
|
|
|
|
char *r_user;
|
|
|
|
char *r_pass;
|
|
|
|
char *r_dir;
|
|
|
|
int r_port;
|
|
|
|
};
|
|
|
|
|
|
|
|
struct tt tests [] = {
|
|
|
|
{ "host", "host", "anonymous", NULL, "/", 21 },
|
|
|
|
{ "host/dir", "host", "anonymous", NULL, "/dir", 21 },
|
|
|
|
{ "host:40/", "host", "anonymous", NULL, "/", 40 },
|
|
|
|
{ "host:40/dir", "host", "anonymous", NULL, "/dir", 40 },
|
|
|
|
{ "user@host", "host", "user", NULL, "/", 21 },
|
|
|
|
{ "user@host/dir", "host", "user", NULL, "/dir", 21 },
|
|
|
|
{ "user@host:40/", "host", "user", NULL, "/", 40 },
|
|
|
|
{ "user@host:40/dir", "host", "user", NULL, "/dir", 40 },
|
|
|
|
{ "user:pass@host", "host", "user", "pass", "/", 21 },
|
|
|
|
{ "user:pass@host/dir", "host", "user", "pass", "/dir", 21 },
|
|
|
|
{ "user:pass@host:40", "host", "user", "pass", "/", 40 },
|
|
|
|
{ "user:pass@host:40/dir", "host", "user", "pass", "/dir", 40 },
|
|
|
|
{ "host/a@b", "host", "anonymous", NULL, "/a@b", 21 },
|
|
|
|
{ "host:40/a@b", "host", "anonymous", NULL, "/a@b", 40 },
|
|
|
|
{ "user@host/a@b", "host", "user", NULL, "/a@b", 21 },
|
|
|
|
{ "user@host:40/a@b", "host", "user", NULL, "/a@b", 40 },
|
|
|
|
{ "user:pass@host/a@b", "host", "user", "pass", "/a@b", 21 },
|
|
|
|
{ "user:pass@host:40/a@b", "host", "user", "pass", "/a@b", 40 },
|
|
|
|
{ "host/a:b", "host", "anonymous", NULL, "/a:b", 21 },
|
|
|
|
{ "host:40/a:b", "host", "anonymous", NULL, "/a:b", 40 },
|
|
|
|
{ "user@host/a:b", "host", "user", NULL, "/a:b", 21 },
|
|
|
|
{ "user@host:40/a:b", "host", "user", NULL, "/a:b", 40 },
|
|
|
|
{ "user:pass@host/a:b", "host", "user", "pass", "/a:b", 21 },
|
|
|
|
{ "user:pass@host:40/a:b", "host", "user", "pass", "/a:b", 40 },
|
|
|
|
{ "host/a/b", "host", "anonymous", NULL, "/a/b", 21 },
|
|
|
|
{ "host:40/a/b", "host", "anonymous", NULL, "/a/b", 40 },
|
|
|
|
{ "user@host/a/b", "host", "user", NULL, "/a/b", 21 },
|
|
|
|
{ "user@host:40/a/b", "host", "user", NULL, "/a/b", 40 },
|
|
|
|
{ "user:pass@host/a/b", "host", "user", "pass", "/a/b", 21 },
|
|
|
|
{ "user:pass@host:40/a/b", "host", "user", "pass", "/a/b", 40 },
|
|
|
|
{ NULL }
|
|
|
|
};
|
|
|
|
|
|
|
|
/* tests with implicit login name */
|
|
|
|
struct tt tests2 [] = {
|
|
|
|
{ "@host", "host", "user", NULL, "/", 21 },
|
|
|
|
{ "@host/dir", "host", "user", NULL, "/dir", 21 },
|
|
|
|
{ "@host:40/", "host", "user", NULL, "/", 40 },
|
|
|
|
{ "@host:40/dir", "host", "user", NULL, "/dir", 40 },
|
|
|
|
{ ":pass@host", "host", "user", "pass", "/", 21 },
|
|
|
|
{ ":pass@host/dir", "host", "user", "pass", "/dir", 21 },
|
|
|
|
{ ":pass@host:40", "host", "user", "pass", "/", 40 },
|
|
|
|
{ ":pass@host:40/dir", "host", "user", "pass", "/dir", 40 },
|
|
|
|
{ "@host/a@b", "host", "user", NULL, "/a@b", 21 },
|
|
|
|
{ "@host:40/a@b", "host", "user", NULL, "/a@b", 40 },
|
|
|
|
{ ":pass@host/a@b", "host", "user", "pass", "/a@b", 21 },
|
|
|
|
{ ":pass@host:40/a@b", "host", "user", "pass", "/a@b", 40 },
|
|
|
|
{ "@host/a:b", "host", "user", NULL, "/a:b", 21 },
|
|
|
|
{ "@host:40/a:b", "host", "user", NULL, "/a:b", 40 },
|
|
|
|
{ ":pass@host/a:b", "host", "user", "pass", "/a:b", 21 },
|
|
|
|
{ ":pass@host:40/a:b", "host", "user", "pass", "/a:b", 40 },
|
|
|
|
{ "@host/a/b", "host", "user", NULL, "/a/b", 21 },
|
|
|
|
{ "@host:40/a/b", "host", "user", NULL, "/a/b", 40 },
|
|
|
|
{ ":pass@host/a/b", "host", "user", "pass", "/a/b", 21 },
|
|
|
|
{ ":pass@host:40/a/b", "host", "user", "pass", "/a/b", 40 },
|
|
|
|
{ NULL }
|
|
|
|
};
|
|
|
|
|
|
|
|
main ()
|
|
|
|
{
|
|
|
|
int i, port, err;
|
|
|
|
char *dir, *host, *user, *pass;
|
|
|
|
struct passwd *passwd_info;
|
|
|
|
char *current;
|
|
|
|
|
|
|
|
if ((passwd_info = getpwuid (geteuid ())) == NULL)
|
1999-01-21 01:01:11 +03:00
|
|
|
current = g_strdup ("anonymous");
|
1998-02-27 07:54:42 +03:00
|
|
|
else {
|
1999-01-21 01:01:11 +03:00
|
|
|
current= g_strdup (passwd_info->pw_name);
|
1998-02-27 07:54:42 +03:00
|
|
|
}
|
|
|
|
endpwent ();
|
|
|
|
|
|
|
|
for (i = 0; tests [i].url; i++){
|
|
|
|
err = 0;
|
|
|
|
dir = get_host_and_username (tests [i].url, &host, &user, &port, 21, 1, &pass);
|
|
|
|
|
|
|
|
if (strcmp (dir, tests [i].r_dir))
|
|
|
|
err++, printf ("dir: test %d flunked\n", i);
|
|
|
|
|
|
|
|
if (!err && strcmp (host, tests [i].r_host))
|
|
|
|
err++, printf ("host: test %d flunked\n", i);
|
|
|
|
|
|
|
|
if (!err && strcmp (user, tests [i].r_user))
|
|
|
|
err++, printf ("user: test %d flunked\n", i);
|
|
|
|
|
|
|
|
if (!err && tests [i].r_pass)
|
|
|
|
if (strcmp (dir, tests [i].r_dir))
|
|
|
|
err++, printf ("pass: test %d flunked\n", i);
|
|
|
|
|
|
|
|
if (!err & tests [i].r_port != port)
|
|
|
|
err++, printf ("port: test %d flunked\n", i);
|
|
|
|
|
|
|
|
if (err){
|
|
|
|
printf ("host=[%s] user=[%s] pass=[%s] port=[%d]\n",
|
|
|
|
host, user, pass, port);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
printf ("%d tests ok\nExtra tests:", i);
|
|
|
|
|
|
|
|
for (i = 0; i < 4; i++){
|
|
|
|
dir = get_host_and_username (tests [i].url, &host, &user, &port, 21, 0, &pass);
|
|
|
|
if (strcmp (user, current))
|
|
|
|
printf ("ntest: flunked %d\n", i);
|
|
|
|
}
|
|
|
|
|
|
|
|
printf ("%d tests ok\nTests with implicit login name\n", i);
|
|
|
|
|
|
|
|
for (i = 0; tests2 [i].url; i++){
|
|
|
|
err = 0;
|
|
|
|
dir = get_host_and_username (tests2 [i].url, &host, &user, &port, 21, 1, &pass);
|
|
|
|
|
|
|
|
if (strcmp (dir, tests2 [i].r_dir))
|
|
|
|
err++, printf ("dir: test %d flunked\n", i);
|
|
|
|
|
|
|
|
if (!err && strcmp (host, tests2 [i].r_host))
|
|
|
|
err++, printf ("host: test %d flunked\n", i);
|
|
|
|
|
|
|
|
if (!err && strcmp (user, current))
|
|
|
|
err++, printf ("user: test %d flunked\n", i);
|
|
|
|
|
|
|
|
if (!err && tests2 [i].r_pass)
|
|
|
|
if (strcmp (dir, tests2 [i].r_dir))
|
|
|
|
err++, printf ("pass: test %d flunked\n", i);
|
|
|
|
|
|
|
|
if (!err & tests2 [i].r_port != port)
|
|
|
|
err++, printf ("port: test %d flunked\n", i);
|
|
|
|
|
|
|
|
if (err){
|
|
|
|
printf ("host=[%s] user=[%s] pass=[%s] port=[%d]\n",
|
|
|
|
host, user, pass, port);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
printf ("%d tests ok\n", i);
|
|
|
|
}
|
|
|
|
#endif
|