gio/glocalvfs.c

   1 /* GIO - GLib Input, Output and Streaming Library
   2  *
   3  * Copyright (C) 2006-2007 Red Hat, Inc.
   4  *
   5  * SPDX-License-Identifier: LGPL-2.1-or-later
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General
  18  * Public License along with this library; if not, see <http://www.gnu.org/licenses/>.
  19  *
  20  * Author: Alexander Larsson <alexl@redhat.com>
  21  */
  22
  23 #include "config.h"
  24 #include "glocalvfs.h"
  25 #include "glocalfile.h"
  26 #include "giomodule.h"
  27 #include "giomodule-priv.h"
  28 #include "gvfs.h"
  29 #include <gio/gdummyfile.h>
  30 #include <sys/types.h>
  31 #ifdef G_OS_UNIX
  32 #include "glib-unix.h"
  33 #include <pwd.h>
  34 #endif
  35 #include <string.h>
  36
  37
  38 struct _GLocalVfs
  39 {
  40   GVfs parent;
  41 };
  42
  43 struct _GLocalVfsClass
  44 {
  45   GVfsClass parent_class;
  46
  47 };
  48
  49 #define g_local_vfs_get_type _g_local_vfs_get_type
  50 G_DEFINE_TYPE_WITH_CODE (GLocalVfs, g_local_vfs, G_TYPE_VFS,
  51                          _g_io_modules_ensure_extension_points_registered ();
  52                          g_io_extension_point_implement (G_VFS_EXTENSION_POINT_NAME,
  53                                                          g_define_type_id,
  54                                                          "local",
  55                                                          0))
  56 static void
  57 g_local_vfs_finalize (GObject *object)
  58 {
  59   /* must chain up */
  60   G_OBJECT_CLASS (g_local_vfs_parent_class)->finalize (object);
  61 }
  62
  63 static void
  64 g_local_vfs_init (GLocalVfs *vfs)
  65 {
  66 }
  67
  68 /**
  69  * g_local_vfs_new:
  70  *
  71  * Returns a new #GVfs handle for a local vfs.
  72  *
  73  * Returns: a new #GVfs handle.
  74  **/
  75 GVfs *
  76 _g_local_vfs_new (void)
  77 {
  78   return g_object_new (G_TYPE_LOCAL_VFS, NULL);
  79 }
  80
  81 static GFile *
  82 g_local_vfs_get_file_for_path (GVfs       *vfs,
  83                                const char *path)
  84 {
  85   if (*path == '\0')
  86     return _g_dummy_file_new (path);
  87   else
  88     return _g_local_file_new (path);
  89 }
  90
  91 static GFile *
  92 g_local_vfs_get_file_for_uri (GVfs       *vfs,
  93                               const char *uri)
  94 {
  95   char *path;
  96   GFile *file;
  97   char *stripped_uri, *hash, *question_mark;
  98
  99   /* As per https://url.spec.whatwg.org/#file-state, file: URIs can contain
 100    * query and fragment sections. We ignore them in order to get only the file
 101    * path. Compliance to this part of the WhatWG spec doesn’t necessarily mean
 102    * we comply with the entire spec. */
 103   if (strchr (uri, '#') != NULL)
 104     {
 105       stripped_uri = g_strdup (uri);
 106       hash = strchr (stripped_uri, '#');
 107       *hash = 0;
 108     }
 109   else if (strchr (uri, '?') != NULL)
 110     {
 111       stripped_uri = g_strdup (uri);
 112       question_mark = strchr (stripped_uri, '?');
 113       *question_mark = 0;
 114     }
 115   else
 116     stripped_uri = (char *)uri;
 117
 118   path = g_filename_from_uri (stripped_uri, NULL, NULL);
 119
 120   if (stripped_uri != uri)
 121     g_free (stripped_uri);
 122
 123   if (path != NULL)
 124     file = _g_local_file_new (path);
 125   else
 126     file = _g_dummy_file_new (uri);
 127
 128   g_free (path);
 129
 130   return file;
 131 }
 132
 133 static const gchar * const *
 134 g_local_vfs_get_supported_uri_schemes (GVfs *vfs)
 135 {
 136   static const gchar * uri_schemes[] = { "file", NULL };
 137
 138   return uri_schemes;
 139 }
 140
 141 static GFile *
 142 g_local_vfs_parse_name (GVfs       *vfs,
 143                         const char *parse_name)
 144 {
 145   GFile *file;
 146   char *filename;
 147   char *user_prefix;
 148   const char *user_end;
 149   char *rest;
 150
 151   g_return_val_if_fail (G_IS_VFS (vfs), NULL);
 152   g_return_val_if_fail (parse_name != NULL, NULL);
 153
 154   if (g_ascii_strncasecmp ("file:", parse_name, 5) == 0)
 155     filename = g_filename_from_uri (parse_name, NULL, NULL);
 156   else
 157     {
 158       if (*parse_name == '~')
 159         {
 160 #ifdef G_OS_UNIX
 161           const char *user_start;
 162           user_start = parse_name + 1;
 163 #endif
 164           parse_name ++;
 165
 166           while (*parse_name != 0 && *parse_name != '/')
 167             parse_name++;
 168
 169           user_end = parse_name;
 170
 171 #ifdef G_OS_UNIX
 172           if (user_end == user_start)
 173             user_prefix = g_strdup (g_get_home_dir ());
 174           else
 175             {
 176               struct passwd *passwd_file_entry;
 177               char *user_name;
 178
 179               user_name = g_strndup (user_start, user_end - user_start);
 180               passwd_file_entry = g_unix_get_passwd_entry (user_name, NULL);
 181               g_free (user_name);
 182
 183               if (passwd_file_entry != NULL &&
 184                   passwd_file_entry->pw_dir != NULL)
 185                 user_prefix = g_strdup (passwd_file_entry->pw_dir);
 186               else
 187                 user_prefix = g_strdup (g_get_home_dir ());
 188
 189               g_free (passwd_file_entry);
 190             }
 191 #else
 192           user_prefix = g_strdup (g_get_home_dir ());
 193 #endif
 194
 195           rest = NULL;
 196           if (*user_end != 0)
 197             rest = g_filename_from_utf8 (user_end, -1, NULL, NULL, NULL);
 198
 199           filename = g_build_filename (user_prefix, rest, NULL);
 200           g_free (rest);
 201           g_free (user_prefix);
 202         }
 203       else
 204         filename = g_filename_from_utf8 (parse_name, -1, NULL, NULL, NULL);
 205     }
 206
 207   if (filename == NULL)
 208     filename = g_strdup (parse_name);
 209
 210   file = _g_local_file_new (filename);
 211   g_free (filename);
 212
 213   return file;
 214 }
 215
 216 static gboolean
 217 g_local_vfs_is_active (GVfs *vfs)
 218 {
 219   return TRUE;
 220 }
 221
 222 static void
 223 g_local_vfs_class_init (GLocalVfsClass *class)
 224 {
 225   GObjectClass *object_class;
 226   GVfsClass *vfs_class;
 227
 228   object_class = (GObjectClass *) class;
 229
 230   object_class->finalize = g_local_vfs_finalize;
 231
 232   vfs_class = G_VFS_CLASS (class);
 233
 234   vfs_class->is_active = g_local_vfs_is_active;
 235   vfs_class->get_file_for_path = g_local_vfs_get_file_for_path;
 236   vfs_class->get_file_for_uri = g_local_vfs_get_file_for_uri;
 237   vfs_class->get_supported_uri_schemes = g_local_vfs_get_supported_uri_schemes;
 238   vfs_class->parse_name = g_local_vfs_parse_name;
 239 }