123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962 |
- /* Virtual File System switch code
- Copyright (C) 1995, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
- 2007 Free Software Foundation, Inc.
-
- Written by: 1995 Miguel de Icaza
- 1995 Jakub Jelinek
- 1998 Pavel Machek
-
- 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.
-
- 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
- GNU Library General Public License for more details.
- You should have received a copy of the GNU Library General Public
- License along with this program; if not, write to the Free Software
- Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */
- /* Warning: funtions like extfs_lstat() have right to destroy any
- * strings you pass to them. This is acutally ok as you g_strdup what
- * you are passing to them, anyway; still, beware. */
- /* Namespace: exports *many* functions with vfs_ prefix; exports
- parse_ls_lga and friends which do not have that prefix. */
- #include <config.h>
- #include <stdio.h>
- #include <stdlib.h> /* For atol() */
- #include <stdarg.h>
- #include <string.h>
- #include <errno.h>
- #include <sys/types.h>
- #include <signal.h>
- #include <ctype.h> /* is_digit() */
- #include "../src/global.h"
- #include "../src/tty.h" /* enable/disable interrupt key */
- #include "../src/wtools.h" /* message() */
- #include "../src/main.h" /* print_vfs_message */
- #include "utilvfs.h"
- #include "gc.h"
- #include "vfs.h"
- #ifdef USE_NETCODE
- # include "tcputil.h"
- #endif
- #include "ftpfs.h"
- #include "mcfs.h"
- #include "smbfs.h"
- #include "local.h"
- /* They keep track of the current directory */
- static struct vfs_class *current_vfs;
- static char *current_dir;
- struct vfs_openfile {
- int handle;
- struct vfs_class *vclass;
- void *fsinfo;
- };
- static GSList *vfs_openfiles;
- #define VFS_FIRST_HANDLE 100
- static struct vfs_class *localfs_class;
- /* Create new VFS handle and put it to the list */
- static int
- vfs_new_handle (struct vfs_class *vclass, void *fsinfo)
- {
- static int vfs_handle_counter = VFS_FIRST_HANDLE;
- struct vfs_openfile *h;
- h = g_new (struct vfs_openfile, 1);
- h->handle = vfs_handle_counter++;
- h->fsinfo = fsinfo;
- h->vclass = vclass;
- vfs_openfiles = g_slist_prepend (vfs_openfiles, h);
- return h->handle;
- }
- /* Function to match handle, passed to g_slist_find_custom() */
- static gint
- vfs_cmp_handle (gconstpointer a, gconstpointer b)
- {
- if (!a)
- return 1;
- return ((struct vfs_openfile *) a)->handle != (long) b;
- }
- /* Find VFS class by file handle */
- static inline struct vfs_class *
- vfs_op (int handle)
- {
- GSList *l;
- struct vfs_openfile *h;
- l = g_slist_find_custom (vfs_openfiles, (void *) (long) handle,
- vfs_cmp_handle);
- if (!l)
- return NULL;
- h = (struct vfs_openfile *) l->data;
- if (!h)
- return NULL;
- return h->vclass;
- }
- /* Find private file data by file handle */
- static inline void *
- vfs_info (int handle)
- {
- GSList *l;
- struct vfs_openfile *h;
- l = g_slist_find_custom (vfs_openfiles, (void *) (long) handle,
- vfs_cmp_handle);
- if (!l)
- return NULL;
- h = (struct vfs_openfile *) l->data;
- if (!h)
- return NULL;
- return h->fsinfo;
- }
- /* Free open file data for given file handle */
- static inline void
- vfs_free_handle (int handle)
- {
- GSList *l;
- l = g_slist_find_custom (vfs_openfiles, (void *) (long) handle,
- vfs_cmp_handle);
- vfs_openfiles = g_slist_delete_link (vfs_openfiles, l);
- }
- static struct vfs_class *vfs_list;
- int
- vfs_register_class (struct vfs_class *vfs)
- {
- if (vfs->init) /* vfs has own initialization function */
- if (!(*vfs->init)(vfs)) /* but it failed */
- return 0;
- vfs->next = vfs_list;
- vfs_list = vfs;
- return 1;
- }
- /* Return VFS class for the given prefix */
- static struct vfs_class *
- vfs_prefix_to_class (char *prefix)
- {
- struct vfs_class *vfs;
- /* Avoid last class (localfs) that would accept any prefix */
- for (vfs = vfs_list; vfs->next; vfs = vfs->next) {
- if (vfs->which) {
- if ((*vfs->which) (vfs, prefix) == -1)
- continue;
- return vfs;
- }
- if (vfs->prefix
- && !strncmp (prefix, vfs->prefix, strlen (vfs->prefix)))
- return vfs;
- }
- return NULL;
- }
- /* Strip known vfs suffixes from a filename (possible improvement: strip
- suffix from last path component).
- Returns a malloced string which has to be freed. */
- char *
- vfs_strip_suffix_from_filename (const char *filename)
- {
- struct vfs_class *vfs;
- char *semi;
- char *p;
- if (!filename)
- vfs_die ("vfs_strip_suffix_from_path got NULL: impossible");
- p = g_strdup (filename);
- if (!(semi = strrchr (p, '#')))
- return p;
- /* Avoid last class (localfs) that would accept any prefix */
- for (vfs = vfs_list; vfs->next; vfs = vfs->next) {
- if (vfs->which) {
- if ((*vfs->which) (vfs, semi + 1) == -1)
- continue;
- *semi = '\0'; /* Found valid suffix */
- return p;
- }
- if (vfs->prefix
- && !strncmp (semi + 1, vfs->prefix, strlen (vfs->prefix))) {
- *semi = '\0'; /* Found valid suffix */
- return p;
- }
- }
- return p;
- }
- static inline int
- path_magic (const char *path)
- {
- struct stat buf;
- if (!stat(path, &buf))
- return 0;
- return 1;
- }
- /*
- * Splits path '/p1#op/inpath' into inpath,op; returns which vfs it is.
- * What is left in path is p1. You still want to g_free(path), you DON'T
- * want to free neither *inpath nor *op
- */
- struct vfs_class *
- vfs_split (char *path, char **inpath, char **op)
- {
- char *semi;
- char *slash;
- struct vfs_class *ret;
- if (!path)
- vfs_die("Cannot split NULL");
-
- semi = strrchr (path, '#');
- if (!semi || !path_magic(path))
- return NULL;
- slash = strchr (semi, PATH_SEP);
- *semi = 0;
- if (op)
- *op = NULL;
- if (inpath)
- *inpath = NULL;
- if (slash)
- *slash = 0;
- if ((ret = vfs_prefix_to_class (semi+1))){
- if (op)
- *op = semi + 1;
- if (inpath)
- *inpath = slash ? slash + 1 : NULL;
- return ret;
- }
- if (slash)
- *slash = PATH_SEP;
- ret = vfs_split (path, inpath, op);
- *semi = '#';
- return ret;
- }
- static struct vfs_class *
- _vfs_get_class (char *path)
- {
- char *semi;
- char *slash;
- struct vfs_class *ret;
- g_return_val_if_fail(path, NULL);
- semi = strrchr (path, '#');
- if (!semi || !path_magic (path))
- return NULL;
-
- slash = strchr (semi, PATH_SEP);
- *semi = 0;
- if (slash)
- *slash = 0;
-
- ret = vfs_prefix_to_class (semi+1);
- if (slash)
- *slash = PATH_SEP;
- if (!ret)
- ret = _vfs_get_class (path);
- *semi = '#';
- return ret;
- }
- struct vfs_class *
- vfs_get_class (const char *pathname)
- {
- struct vfs_class *vfs;
- char *path = g_strdup (pathname);
- vfs = _vfs_get_class (path);
- g_free (path);
- if (!vfs)
- vfs = localfs_class;
- return vfs;
- }
- static int
- ferrno (struct vfs_class *vfs)
- {
- return vfs->ferrno ? (*vfs->ferrno)(vfs) : E_UNKNOWN;
- /* Hope that error message is obscure enough ;-) */
- }
- int
- mc_open (const char *filename, int flags, ...)
- {
- int mode;
- void *info;
- va_list ap;
- char *file = vfs_canon (filename);
- struct vfs_class *vfs = vfs_get_class (file);
- /* Get the mode flag */
- if (flags & O_CREAT) {
- va_start (ap, flags);
- mode = va_arg (ap, int);
- va_end (ap);
- } else
- mode = 0;
-
- if (!vfs->open) {
- g_free (file);
- errno = -EOPNOTSUPP;
- return -1;
- }
- info = (*vfs->open) (vfs, file, flags, mode); /* open must be supported */
- g_free (file);
- if (!info){
- errno = ferrno (vfs);
- return -1;
- }
- return vfs_new_handle (vfs, info);
- }
- #define MC_NAMEOP(name, inarg, callarg) \
- int mc_##name inarg \
- { \
- struct vfs_class *vfs; \
- int result; \
- char *mpath = vfs_canon (path); \
- vfs = vfs_get_class (mpath); \
- result = vfs->name ? (*vfs->name)callarg : -1; \
- g_free (mpath); \
- if (result == -1) \
- errno = vfs->name ? ferrno (vfs) : E_NOTSUPP; \
- return result; \
- }
- MC_NAMEOP (chmod, (const char *path, mode_t mode), (vfs, mpath, mode))
- MC_NAMEOP (chown, (const char *path, uid_t owner, gid_t group), (vfs, mpath, owner, group))
- MC_NAMEOP (utime, (const char *path, struct utimbuf *times), (vfs, mpath, times))
- MC_NAMEOP (readlink, (const char *path, char *buf, int bufsiz), (vfs, mpath, buf, bufsiz))
- MC_NAMEOP (unlink, (const char *path), (vfs, mpath))
- MC_NAMEOP (symlink, (const char *name1, const char *path), (vfs, name1, mpath))
- MC_NAMEOP (mkdir, (const char *path, mode_t mode), (vfs, mpath, mode))
- MC_NAMEOP (rmdir, (const char *path), (vfs, mpath))
- MC_NAMEOP (mknod, (const char *path, mode_t mode, dev_t dev), (vfs, mpath, mode, dev))
- #define MC_HANDLEOP(name, inarg, callarg) \
- int mc_##name inarg \
- { \
- struct vfs_class *vfs; \
- int result; \
- if (handle == -1) \
- return -1; \
- vfs = vfs_op (handle); \
- result = vfs->name ? (*vfs->name)callarg : -1; \
- if (result == -1) \
- errno = vfs->name ? ferrno (vfs) : E_NOTSUPP; \
- return result; \
- }
- MC_HANDLEOP(read, (int handle, void *buffer, int count), (vfs_info (handle), buffer, count) )
- MC_HANDLEOP (write, (int handle, const void *buf, int nbyte), (vfs_info (handle), buf, nbyte))
- #define MC_RENAMEOP(name) \
- int mc_##name (const char *fname1, const char *fname2) \
- { \
- struct vfs_class *vfs; \
- int result; \
- char *name2, *name1 = vfs_canon (fname1); \
- vfs = vfs_get_class (name1); \
- name2 = vfs_canon (fname2); \
- if (vfs != vfs_get_class (name2)){ \
- errno = EXDEV; \
- g_free (name1); \
- g_free (name2); \
- return -1; \
- } \
- result = vfs->name ? (*vfs->name)(vfs, name1, name2) : -1; \
- g_free (name1); \
- g_free (name2); \
- if (result == -1) \
- errno = vfs->name ? ferrno (vfs) : E_NOTSUPP; \
- return result; \
- }
- MC_RENAMEOP (link)
- MC_RENAMEOP (rename)
- int
- mc_ctl (int handle, int ctlop, void *arg)
- {
- struct vfs_class *vfs = vfs_op (handle);
- return vfs->ctl ? (*vfs->ctl)(vfs_info (handle), ctlop, arg) : 0;
- }
- int
- mc_setctl (const char *path, int ctlop, void *arg)
- {
- struct vfs_class *vfs;
- int result;
- char *mpath;
- if (!path)
- vfs_die("You don't want to pass NULL to mc_setctl.");
-
- mpath = vfs_canon (path);
- vfs = vfs_get_class (mpath);
- result = vfs->setctl ? (*vfs->setctl)(vfs, mpath, ctlop, arg) : 0;
- g_free (mpath);
- return result;
- }
- int
- mc_close (int handle)
- {
- struct vfs_class *vfs;
- int result;
- if (handle == -1 || !vfs_info (handle))
- return -1;
-
- vfs = vfs_op (handle);
- if (handle < 3)
- return close (handle);
- if (!vfs->close)
- vfs_die ("VFS must support close.\n");
- result = (*vfs->close)(vfs_info (handle));
- vfs_free_handle (handle);
- if (result == -1)
- errno = ferrno (vfs);
-
- return result;
- }
- DIR *
- mc_opendir (const char *dirname)
- {
- int handle, *handlep;
- void *info;
- struct vfs_class *vfs;
- char *dname;
- dname = vfs_canon (dirname);
- vfs = vfs_get_class (dname);
- info = vfs->opendir ? (*vfs->opendir)(vfs, dname) : NULL;
- g_free (dname);
- if (!info){
- errno = vfs->opendir ? ferrno (vfs) : E_NOTSUPP;
- return NULL;
- }
- handle = vfs_new_handle (vfs, info);
- handlep = g_new (int, 1);
- *handlep = handle;
- return (DIR *) handlep;
- }
- struct dirent *
- mc_readdir (DIR *dirp)
- {
- int handle;
- struct vfs_class *vfs;
- struct dirent *result = NULL;
- if (!dirp) {
- errno = EFAULT;
- return NULL;
- }
- handle = *(int *) dirp;
- vfs = vfs_op (handle);
- if (vfs->readdir)
- result = (*vfs->readdir) (vfs_info (handle));
- if (!result)
- errno = vfs->readdir ? ferrno (vfs) : E_NOTSUPP;
- return result;
- }
- int
- mc_closedir (DIR *dirp)
- {
- int handle = *(int *) dirp;
- struct vfs_class *vfs = vfs_op (handle);
- int result;
- result = vfs->closedir ? (*vfs->closedir)(vfs_info (handle)) : -1;
- vfs_free_handle (handle);
- g_free (dirp);
- return result;
- }
- int mc_stat (const char *filename, struct stat *buf) {
- struct vfs_class *vfs;
- int result;
- char *path;
- path = vfs_canon (filename); vfs = vfs_get_class (path);
- result = vfs->stat ? (*vfs->stat) (vfs, path, buf) : -1;
- g_free (path);
- if (result == -1)
- errno = vfs->name ? ferrno (vfs) : E_NOTSUPP;
- return result;
- }
- int mc_lstat (const char *filename, struct stat *buf) {
- struct vfs_class *vfs;
- int result;
- char *path;
- path = vfs_canon (filename); vfs = vfs_get_class (path);
- result = vfs->lstat ? (*vfs->lstat) (vfs, path, buf) : -1;
- g_free (path);
- if (result == -1)
- errno = vfs->name ? ferrno (vfs) : E_NOTSUPP;
- return result;
- }
- int mc_fstat (int handle, struct stat *buf) {
- struct vfs_class *vfs;
- int result;
- if (handle == -1)
- return -1;
- vfs = vfs_op (handle);
- result = vfs->fstat ? (*vfs->fstat) (vfs_info (handle), buf) : -1;
- if (result == -1)
- errno = vfs->name ? ferrno (vfs) : E_NOTSUPP;
- return result;
- }
- /*
- * Return current directory. If it's local, reread the current directory
- * from the OS. You must g_strdup() whatever this function returns.
- */
- static const char *
- _vfs_get_cwd (void)
- {
- char *p;
- struct stat my_stat, my_stat2;
- if (!_vfs_get_class (current_dir)) {
- p = g_get_current_dir ();
- if (!p) /* One of the directories in the path is not readable */
- return current_dir;
- /* Otherwise check if it is O.K. to use the current_dir */
- if (!cd_symlinks || mc_stat (p, &my_stat)
- || mc_stat (current_dir, &my_stat2)
- || my_stat.st_ino != my_stat2.st_ino
- || my_stat.st_dev != my_stat2.st_dev) {
- g_free (current_dir);
- current_dir = p;
- return p;
- } /* Otherwise we return current_dir below */
- g_free (p);
- }
- return current_dir;
- }
- static void
- vfs_setup_wd (void)
- {
- current_dir = g_strdup (PATH_SEP_STR);
- _vfs_get_cwd ();
- if (strlen (current_dir) > MC_MAXPATHLEN - 2)
- vfs_die ("Current dir too long.\n");
- current_vfs = vfs_get_class (current_dir);
- }
- /*
- * Return current directory. If it's local, reread the current directory
- * from the OS. Put directory to the provided buffer.
- */
- char *
- mc_get_current_wd (char *buffer, int size)
- {
- const char *cwd = _vfs_get_cwd ();
- g_strlcpy (buffer, cwd, size);
- return buffer;
- }
- /*
- * Return current directory without any OS calls.
- */
- char *
- vfs_get_current_dir (void)
- {
- return current_dir;
- }
- off_t mc_lseek (int fd, off_t offset, int whence)
- {
- struct vfs_class *vfs;
- int result;
- if (fd == -1)
- return -1;
- vfs = vfs_op (fd);
- result = vfs->lseek ? (*vfs->lseek)(vfs_info (fd), offset, whence) : -1;
- if (result == -1)
- errno = vfs->lseek ? ferrno (vfs) : E_NOTSUPP;
- return result;
- }
- /*
- * remove //, /./ and /../
- */
- #define ISSLASH(a) (!a || (a == '/'))
- char *
- vfs_canon (const char *path)
- {
- if (!path)
- vfs_die("Cannot canonicalize NULL");
- /* Relative to current directory */
- if (*path != PATH_SEP){
- char *local, *result;
- local = concat_dir_and_file (current_dir, path);
- result = vfs_canon (local);
- g_free (local);
- return result;
- }
- /*
- * So we have path of following form:
- * /p1/p2#op/.././././p3#op/p4. Good luck.
- */
- {
- char *result = g_strdup (path);
- canonicalize_pathname (result);
- return result;
- }
- }
- /*
- * VFS chdir.
- * Return 0 on success, -1 on failure.
- */
- int
- mc_chdir (const char *path)
- {
- char *new_dir;
- struct vfs_class *old_vfs, *new_vfs;
- vfsid old_vfsid;
- int result;
- new_dir = vfs_canon (path);
- new_vfs = vfs_get_class (new_dir);
- if (!new_vfs->chdir) {
- g_free (new_dir);
- return -1;
- }
- result = (*new_vfs->chdir) (new_vfs, new_dir);
- if (result == -1) {
- errno = ferrno (new_vfs);
- g_free (new_dir);
- return -1;
- }
- old_vfsid = vfs_getid (current_vfs, current_dir);
- old_vfs = current_vfs;
- /* Actually change directory */
- g_free (current_dir);
- current_dir = new_dir;
- current_vfs = new_vfs;
- /* This function uses the new current_dir implicitly */
- vfs_stamp_create (old_vfs, old_vfsid);
- /* Sometimes we assume no trailing slash on cwd */
- if (*current_dir) {
- char *p;
- p = strchr (current_dir, 0) - 1;
- if (*p == PATH_SEP && p > current_dir)
- *p = 0;
- }
- return 0;
- }
- /* Return 1 is the current VFS class is local */
- int
- vfs_current_is_local (void)
- {
- return (current_vfs->flags & VFSF_LOCAL) != 0;
- }
- /* Return flags of the VFS class of the given filename */
- int
- vfs_file_class_flags (const char *filename)
- {
- struct vfs_class *vfs;
- char *fname;
- fname = vfs_canon (filename);
- vfs = vfs_get_class (fname);
- g_free (fname);
- return vfs->flags;
- }
- static char *
- mc_def_getlocalcopy (const char *filename)
- {
- char *tmp;
- int fdin, fdout, i;
- char buffer[8192];
- struct stat mystat;
- fdin = mc_open (filename, O_RDONLY | O_LINEAR);
- if (fdin == -1)
- return NULL;
- fdout = vfs_mkstemps (&tmp, "vfs", filename);
- if (fdout == -1)
- goto fail;
- while ((i = mc_read (fdin, buffer, sizeof (buffer))) > 0) {
- if (write (fdout, buffer, i) != i)
- goto fail;
- }
- if (i == -1)
- goto fail;
- i = mc_close (fdin);
- fdin = -1;
- if (i == -1)
- goto fail;
- if (close (fdout) == -1) {
- fdout = -1;
- goto fail;
- }
- if (mc_stat (filename, &mystat) != -1) {
- chmod (tmp, mystat.st_mode);
- }
- return tmp;
- fail:
- if (fdout != -1)
- close (fdout);
- if (fdin != -1)
- mc_close (fdin);
- g_free (tmp);
- return NULL;
- }
- char *
- mc_getlocalcopy (const char *pathname)
- {
- char *result;
- char *path = vfs_canon (pathname);
- struct vfs_class *vfs = vfs_get_class (path);
- result = vfs->getlocalcopy ? (*vfs->getlocalcopy)(vfs, path) :
- mc_def_getlocalcopy (path);
- g_free (path);
- if (!result)
- errno = ferrno (vfs);
- return result;
- }
- static int
- mc_def_ungetlocalcopy (struct vfs_class *vfs, const char *filename,
- const char *local, int has_changed)
- {
- int fdin = -1, fdout = -1, i;
- if (has_changed) {
- char buffer[8192];
- if (!vfs->write)
- goto failed;
- fdin = open (local, O_RDONLY);
- if (fdin == -1)
- goto failed;
- fdout = mc_open (filename, O_WRONLY | O_TRUNC);
- if (fdout == -1)
- goto failed;
- while ((i = read (fdin, buffer, sizeof (buffer))) > 0) {
- if (mc_write (fdout, buffer, i) != i)
- goto failed;
- }
- if (i == -1)
- goto failed;
- if (close (fdin) == -1) {
- fdin = -1;
- goto failed;
- }
- fdin = -1;
- if (mc_close (fdout) == -1) {
- fdout = -1;
- goto failed;
- }
- }
- unlink (local);
- return 0;
- failed:
- message (1, _("Changes to file lost"), "%s", filename);
- if (fdout != -1)
- mc_close (fdout);
- if (fdin != -1)
- close (fdin);
- unlink (local);
- return -1;
- }
- int
- mc_ungetlocalcopy (const char *pathname, const char *local, int has_changed)
- {
- int return_value = 0;
- char *path = vfs_canon (pathname);
- struct vfs_class *vfs = vfs_get_class (path);
- return_value = vfs->ungetlocalcopy ?
- (*vfs->ungetlocalcopy)(vfs, path, local, has_changed) :
- mc_def_ungetlocalcopy (vfs, path, local, has_changed);
- g_free (path);
- return return_value;
- }
- void
- vfs_init (void)
- {
- /* localfs needs to be the first one */
- init_localfs();
- /* fallback value for vfs_get_class() */
- localfs_class = vfs_list;
- init_extfs ();
- init_sfs ();
- init_tarfs ();
- init_cpiofs ();
- #ifdef USE_EXT2FSLIB
- init_undelfs ();
- #endif /* USE_EXT2FSLIB */
- #ifdef USE_NETCODE
- tcp_init();
- init_ftpfs ();
- init_fish ();
- #ifdef WITH_SMBFS
- init_smbfs ();
- #endif /* WITH_SMBFS */
- #ifdef WITH_MCFS
- init_mcfs ();
- #endif /* WITH_MCFS */
- #endif /* USE_NETCODE */
- vfs_setup_wd ();
- }
- void
- vfs_shut (void)
- {
- struct vfs_class *vfs;
- vfs_gc_done ();
- g_free (current_dir);
- for (vfs = vfs_list; vfs; vfs = vfs->next)
- if (vfs->done)
- (*vfs->done) (vfs);
- g_slist_free (vfs_openfiles);
- }
- /*
- * These ones grab information from the VFS
- * and handles them to an upper layer
- */
- void
- vfs_fill_names (fill_names_f func)
- {
- struct vfs_class *vfs;
- for (vfs=vfs_list; vfs; vfs=vfs->next)
- if (vfs->fill_names)
- (*vfs->fill_names) (vfs, func);
- }
- /*
- * Returns vfs path corresponding to given url. If passed string is
- * not recognized as url, g_strdup(url) is returned.
- */
- static const struct {
- const char *name;
- size_t name_len;
- const char *substitute;
- } url_table[] = { {"ftp://", 6, "/#ftp:"},
- {"mc://", 5, "/#mc:"},
- {"smb://", 6, "/#smb:"},
- {"sh://", 5, "/#sh:"},
- {"ssh://", 6, "/#sh:"},
- {"a:", 2, "/#a"}
- };
- char *
- vfs_translate_url (const char *url)
- {
- size_t i;
- for (i = 0; i < sizeof (url_table)/sizeof (url_table[0]); i++)
- if (strncmp (url, url_table[i].name, url_table[i].name_len) == 0)
- return g_strconcat (url_table[i].substitute, url + url_table[i].name_len, (char*) NULL);
- return g_strdup (url);
- }
- int vfs_file_is_local (const char *filename)
- {
- return vfs_file_class_flags (filename) & VFSF_LOCAL;
- }
|