Import Upstream version 2.72.4

gio/glocalvfs.c

@@ -0,0 +1,227 @@
+/* GIO - GLib Input, Output and Streaming Library
+ * 
+ * Copyright (C) 2006-2007 Red Hat, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
+ *
+ * This library 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
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General
+ * Public License along with this library; if not, see <http://www.gnu.org/licenses/>.
+ *
+ * Author: Alexander Larsson <alexl@redhat.com>
+ */
+
+#include "config.h"
+#include "glocalvfs.h"
+#include "glocalfile.h"
+#include "giomodule.h"
+#include "giomodule-priv.h"
+#include "gvfs.h"
+#include <gio/gdummyfile.h>
+#include <sys/types.h>
+#ifdef G_OS_UNIX
+#include "glib-unix.h"
+#include <pwd.h>
+#endif
+#include <string.h>
+
+
+struct _GLocalVfs
+{
+  GVfs parent;
+};
+
+struct _GLocalVfsClass
+{
+  GVfsClass parent_class;
+  
+};
+
+#define g_local_vfs_get_type _g_local_vfs_get_type
+G_DEFINE_TYPE_WITH_CODE (GLocalVfs, g_local_vfs, G_TYPE_VFS,
+			 _g_io_modules_ensure_extension_points_registered ();
+			 g_io_extension_point_implement (G_VFS_EXTENSION_POINT_NAME,
+							 g_define_type_id,
+							 "local",
+							 0))
+static void
+g_local_vfs_finalize (GObject *object)
+{
+  /* must chain up */
+  G_OBJECT_CLASS (g_local_vfs_parent_class)->finalize (object);
+}
+
+static void
+g_local_vfs_init (GLocalVfs *vfs)
+{
+}
+
+/**
+ * g_local_vfs_new:
+ *
+ * Returns a new #GVfs handle for a local vfs.
+ *
+ * Returns: a new #GVfs handle.
+ **/
+GVfs *
+_g_local_vfs_new (void)
+{
+  return g_object_new (G_TYPE_LOCAL_VFS, NULL);
+}
+
+static GFile *
+g_local_vfs_get_file_for_path (GVfs       *vfs,
+                               const char *path)
+{
+  if (*path == '\0')
+    return _g_dummy_file_new (path);
+  else
+    return _g_local_file_new (path);
+}
+
+static GFile *
+g_local_vfs_get_file_for_uri (GVfs       *vfs,
+                              const char *uri)
+{
+  char *path;
+  GFile *file;
+  char *stripped_uri, *hash;
+  
+  if (strchr (uri, '#') != NULL)
+    {
+      stripped_uri = g_strdup (uri);
+      hash = strchr (stripped_uri, '#');
+      *hash = 0;
+    }
+  else
+    stripped_uri = (char *)uri;
+      
+  path = g_filename_from_uri (stripped_uri, NULL, NULL);
+
+  if (stripped_uri != uri)
+    g_free (stripped_uri);
+  
+  if (path != NULL)
+    file = _g_local_file_new (path);
+  else
+    file = _g_dummy_file_new (uri);
+
+  g_free (path);
+
+  return file;
+}
+
+static const gchar * const *
+g_local_vfs_get_supported_uri_schemes (GVfs *vfs)
+{
+  static const gchar * uri_schemes[] = { "file", NULL };
+
+  return uri_schemes;
+}
+
+static GFile *
+g_local_vfs_parse_name (GVfs       *vfs,
+                        const char *parse_name)
+{
+  GFile *file;
+  char *filename;
+  char *user_prefix;
+  const char *user_end;
+  char *rest;
+  
+  g_return_val_if_fail (G_IS_VFS (vfs), NULL);
+  g_return_val_if_fail (parse_name != NULL, NULL);
+
+  if (g_ascii_strncasecmp ("file:", parse_name, 5) == 0)
+    filename = g_filename_from_uri (parse_name, NULL, NULL);
+  else
+    {
+      if (*parse_name == '~')
+	{
+#ifdef G_OS_UNIX
+	  const char *user_start;
+	  user_start = parse_name + 1;
+#endif
+	  parse_name ++;
+	  
+	  while (*parse_name != 0 && *parse_name != '/')
+	    parse_name++;
+	  
+	  user_end = parse_name;
+
+#ifdef G_OS_UNIX
+	  if (user_end == user_start)
+	    user_prefix = g_strdup (g_get_home_dir ());
+	  else
+	    {
+              struct passwd *passwd_file_entry;
+              char *user_name;
+
+              user_name = g_strndup (user_start, user_end - user_start);
+              passwd_file_entry = g_unix_get_passwd_entry (user_name, NULL);
+              g_free (user_name);
+
+              if (passwd_file_entry != NULL &&
+                  passwd_file_entry->pw_dir != NULL)
+                user_prefix = g_strdup (passwd_file_entry->pw_dir);
+              else
+                user_prefix = g_strdup (g_get_home_dir ());
+
+              g_free (passwd_file_entry);
+	    }
+#else
+	  user_prefix = g_strdup (g_get_home_dir ());
+#endif
+
+	  rest = NULL;
+	  if (*user_end != 0)
+	    rest = g_filename_from_utf8 (user_end, -1, NULL, NULL, NULL);
+	  
+	  filename = g_build_filename (user_prefix, rest, NULL);
+	  g_free (rest);
+	  g_free (user_prefix);
+	}
+      else
+	filename = g_filename_from_utf8 (parse_name, -1, NULL, NULL, NULL);
+    }
+  
+  if (filename == NULL)
+    filename = g_strdup (parse_name);
+    
+  file = _g_local_file_new (filename);
+  g_free (filename);
+
+  return file;
+}
+
+static gboolean
+g_local_vfs_is_active (GVfs *vfs)
+{
+  return TRUE;
+}
+
+static void
+g_local_vfs_class_init (GLocalVfsClass *class)
+{
+  GObjectClass *object_class;
+  GVfsClass *vfs_class;
+  
+  object_class = (GObjectClass *) class;
+
+  object_class->finalize = g_local_vfs_finalize;
+
+  vfs_class = G_VFS_CLASS (class);
+
+  vfs_class->is_active = g_local_vfs_is_active;
+  vfs_class->get_file_for_path = g_local_vfs_get_file_for_path;
+  vfs_class->get_file_for_uri = g_local_vfs_get_file_for_uri;
+  vfs_class->get_supported_uri_schemes = g_local_vfs_get_supported_uri_schemes;
+  vfs_class->parse_name = g_local_vfs_parse_name;
+}