]> Pileus Git - ~andy/gtk/blobdiff - gtk/gtkfilesystemwin32.c
Fix typo. The gtk.immodules file had never been included in my
[~andy/gtk] / gtk / gtkfilesystemwin32.c
index 310d7b12f16d9cd7fa74df97d70b5013643b2363..9062888df06041ae2fed6acf5c66ef7afa012871 100644 (file)
@@ -1,6 +1,7 @@
 /* GTK - The GIMP Toolkit
  * gtkfilesystemwin32.c: Default implementation of GtkFileSystem for Windows
  * Copyright (C) 2003, Red Hat, Inc.
+ * Copyright (C) 2004, Hans Breuer
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Lesser General Public
@@ -19,6 +20,7 @@
  */
 
 #include <config.h>
+#include "gtkalias.h"
 #include "gtkfilesystem.h"
 #include "gtkfilesystemwin32.h"
 #include "gtkintl.h"
 #error "The implementation is win32 only."
 #endif /* G_OS_WIN32 */
 
+#ifndef G_IS_DIR_SEPARATOR
+#define G_IS_DIR_SEPARATOR(c) ((c) == G_DIR_SEPARATOR || (c) == '/')
+#endif
+
 typedef struct _GtkFileSystemWin32Class GtkFileSystemWin32Class;
 
 #define GTK_FILE_SYSTEM_WIN32_CLASS(klass)     (G_TYPE_CHECK_CLASS_CAST ((klass), GTK_TYPE_FILE_SYSTEM_WIN32, GtkFileSystemWin32Class))
@@ -173,7 +179,8 @@ static gboolean       gtk_file_folder_win32_list_children    (GtkFileFolder
 static gchar *        filename_from_path                     (const GtkFilePath        *path);
 static GtkFilePath *  filename_to_path                       (const gchar              *filename);
 
-static gboolean       filename_is_root                       (const char               *filename);
+static gboolean       filename_is_drive_root                 (const char               *filename);
+static gboolean       filename_is_some_root                  (const char               *filename);
 static GtkFileInfo *  filename_get_info                      (const gchar              *filename,
                                                              GtkFileInfoType           types,
                                                              GError                  **error);
@@ -416,9 +423,9 @@ gtk_file_system_win32_create_folder (GtkFileSystem     *file_system,
 
   filename = filename_from_path (path);
   g_return_val_if_fail (filename != NULL, FALSE);
-  
-  result = mkdir (filename, 0777) != 0;
-  
+
+  result = mkdir (filename, 0777) == 0;
+
   if (!result)
     {
       gchar *filename_utf8 = g_filename_to_utf8 (filename, -1, NULL, NULL, NULL);
@@ -430,7 +437,7 @@ gtk_file_system_win32_create_folder (GtkFileSystem     *file_system,
                   g_strerror (errno));
       g_free (filename_utf8);
     }
-  else if (!filename_is_root (filename))
+  else if (!filename_is_drive_root (filename))
     {
       parent = g_path_get_dirname (filename);
       if (parent)
@@ -565,10 +572,13 @@ gtk_file_system_win32_get_parent (GtkFileSystem     *file_system,
                                  GtkFilePath      **parent,
                                  GError           **error)
 {
-  gchar *filename = filename_from_path (path);
+  const char *filename;
+
+  filename = gtk_file_path_get_string (path);
   g_return_val_if_fail (filename != NULL, FALSE);
+  g_return_val_if_fail (g_path_is_absolute (filename), FALSE);
 
-  if (filename_is_root (filename))
+  if (filename_is_some_root (filename))
     {
       *parent = NULL;
     }
@@ -579,8 +589,6 @@ gtk_file_system_win32_get_parent (GtkFileSystem     *file_system,
       g_free (parent_filename);
     }
 
-  g_free (filename);
-
   return TRUE;
 }
 
@@ -630,14 +638,27 @@ static void
 canonicalize_filename (gchar *filename)
 {
   gchar *p, *q;
+  gchar *past_root;
   gboolean last_was_slash = FALSE;
 
+#if 0
+  printf("canonicalize_filename: %s ", filename);
+#endif
+
   p = filename;
   q = filename;
 
+  if (g_ascii_isalpha (*filename) &&
+      filename[1] == ':' &&
+      G_IS_DIR_SEPARATOR (filename[2]))
+    past_root = filename + 3;
+  else
+    past_root = filename + 1;
+  
+
   while (*p)
     {
-      if (*p == G_DIR_SEPARATOR)
+      if (G_IS_DIR_SEPARATOR (*p))
        {
          if (!last_was_slash)
            *q++ = G_DIR_SEPARATOR;
@@ -648,7 +669,7 @@ canonicalize_filename (gchar *filename)
        {
          if (last_was_slash && *p == '.')
            {
-             if (*(p + 1) == G_DIR_SEPARATOR ||
+             if (G_IS_DIR_SEPARATOR (*(p + 1)) ||
                  *(p + 1) == '\0')
                {
                  if (*(p + 1) == '\0')
@@ -657,14 +678,14 @@ canonicalize_filename (gchar *filename)
                  p += 1;
                }
              else if (*(p + 1) == '.' &&
-                      (*(p + 2) == G_DIR_SEPARATOR ||
+                      (G_IS_DIR_SEPARATOR (*(p + 2)) ||
                        *(p + 2) == '\0'))
                {
-                 if (q > filename + 1)
+                 if (q > past_root)
                    {
                      q--;
-                     while (q > filename + 1 &&
-                            *(q - 1) != G_DIR_SEPARATOR)
+                     while (q > past_root &&
+                            !G_IS_DIR_SEPARATOR (*(q - 1)))
                        q--;
                    }
 
@@ -689,10 +710,13 @@ canonicalize_filename (gchar *filename)
       p++;
     }
 
-  if (q > filename + 1 && *(q - 1) == G_DIR_SEPARATOR)
+  if (q > past_root && G_IS_DIR_SEPARATOR (*(q - 1)))
     q--;
 
   *q = '\0';
+#if 0
+  printf(" => %s\n", filename);
+#endif
 }
 
 static gboolean
@@ -704,14 +728,23 @@ gtk_file_system_win32_parse (GtkFileSystem     *file_system,
                             GError           **error)
 {
   const char *base_filename;
-  gchar *last_slash;
+  gchar *last_backslash, *last_slash;
   gboolean result = FALSE;
 
+#if 0
+  printf("gtk_file_system_win32_parse: base_path=%s str=%s\n",(char*)base_path,str);
+#endif
+
   base_filename = gtk_file_path_get_string (base_path);
   g_return_val_if_fail (base_filename != NULL, FALSE);
   g_return_val_if_fail (g_path_is_absolute (base_filename), FALSE);
   
-  last_slash = strrchr (str, G_DIR_SEPARATOR);
+  last_backslash = strrchr (str, G_DIR_SEPARATOR);
+  last_slash = strrchr (str, '/');
+  if (last_slash == NULL ||
+      (last_backslash != NULL && last_backslash > last_slash))
+    last_slash = last_backslash;
+
   if (!last_slash)
     {
       *folder = gtk_file_path_copy (base_path);
@@ -725,7 +758,19 @@ gtk_file_system_win32_parse (GtkFileSystem     *file_system,
       GError *tmp_error = NULL;
 
       if (last_slash == str)
-       folder_part = g_strdup ("/");
+       {
+         if (g_ascii_isalpha (base_filename[0]) &&
+             base_filename[1] == ':')
+           folder_part = g_strdup_printf ("%c:%c", base_filename[0],
+                                          G_DIR_SEPARATOR);
+         else
+           folder_part = g_strdup (G_DIR_SEPARATOR_S);
+       }
+      else if (g_ascii_isalpha (str[0]) &&
+              str[1] == ':' &&
+              G_IS_DIR_SEPARATOR (str[2]))
+       folder_part = g_filename_from_utf8 (str, last_slash - str + 1,
+                                           NULL, NULL, &tmp_error);
       else
        folder_part = g_filename_from_utf8 (str, last_slash - str,
                                            NULL, NULL, &tmp_error);
@@ -741,7 +786,7 @@ gtk_file_system_win32_parse (GtkFileSystem     *file_system,
        }
       else
        {
-         if (folder_part[1] == ':')
+         if (g_path_is_absolute (folder_part))
            folder_path = folder_part;
          else
            {
@@ -760,6 +805,10 @@ gtk_file_system_win32_parse (GtkFileSystem     *file_system,
        }
     }
 
+#if 0
+  printf("gtk_file_system_win32_parse:returning folder=%s file_part=%s\n",(*folder?(char*)*folder:"NULL"),*file_part);
+#endif
+
   return result;
 }
 
@@ -781,18 +830,22 @@ static GtkFilePath *
 gtk_file_system_win32_uri_to_path (GtkFileSystem     *file_system,
                                   const gchar       *uri)
 {
+  GtkFilePath *path = NULL;
   gchar *filename = g_filename_from_uri (uri, NULL, NULL);
   if (filename)
-    return gtk_file_path_new_steal (filename);
-  else
-    return NULL;
+    {
+      path = filename_to_path (filename);
+      g_free (filename);
+    }
+
+  return path;
 }
 
 static GtkFilePath *
 gtk_file_system_win32_filename_to_path (GtkFileSystem *file_system,
                                        const gchar   *filename)
 {
-  return gtk_file_path_new_dup (filename);
+  return filename_to_path (filename);
 }
 
 static gboolean
@@ -886,53 +939,97 @@ extract_icon (const char* filename)
   GdkPixbuf *pixbuf = NULL;
   WORD iicon;
   HICON hicon;
+  char filename_copy[MAX_PATH];
   
   if (!filename || !filename[0])
     return NULL;
 
-  hicon = ExtractAssociatedIcon (GetModuleHandle (NULL), filename, &iicon);
+  /* the ugly ExtractAssociatedIcon modifies filename in place - at least on win98 */
+  strcpy(filename_copy, filename);
+  hicon = ExtractAssociatedIcon (GetModuleHandle (NULL), filename_copy, &iicon);
   if (hicon > (HICON)1)
     {
       ICONINFO ii;
 
       if (GetIconInfo (hicon, &ii))
         {
-          SIZE   size;
-          GdkPixmap *pixmap;
-          GdkGC *gc;
-          HDC    hdc;
-
-          if (!GetBitmapDimensionEx (ii.hbmColor, &size))
-            g_warning ("GetBitmapDimensionEx failed.");
-
-         if (size.cx < 1) size.cx = 32;
-         if (size.cy < 1) size.cy = 32;
-           
-          pixmap = gdk_pixmap_new (NULL, size.cx, size.cy, 
-                                  gdk_screen_get_system_visual (gdk_screen_get_default ())->depth);
-          gc = gdk_gc_new (pixmap);
-          hdc = gdk_win32_hdc_get (GDK_DRAWABLE (pixmap), gc, 0);
-
-          if (!DrawIcon (hdc, 0, 0, hicon))
-            g_warning ("DrawIcon failed");
-
-          gdk_win32_hdc_release (GDK_DRAWABLE (pixmap), gc, 0);
-
-          pixbuf = gdk_pixbuf_get_from_drawable (
-                    NULL, pixmap, 
-                    gdk_screen_get_system_colormap (gdk_screen_get_default ()),
-                    0, 0, 0, 0, size.cx, size.cy);
-          g_object_unref (pixmap);
-          g_object_unref (gc);
+         struct
+         {
+           BITMAPINFOHEADER bi;
+           RGBQUAD colors[2];
+         } bmi;
+         HDC hdc;
+
+         memset (&bmi, 0, sizeof (bmi));
+         bmi.bi.biSize = sizeof (bmi.bi);
+         hdc = CreateCompatibleDC (NULL);
+
+          if (GetDIBits (hdc, ii.hbmColor, 0, 1, NULL, (BITMAPINFO *)&bmi, DIB_RGB_COLORS))
+           {
+               gchar *pixels, *bits;
+               gint rowstride, x, y, w = bmi.bi.biWidth, h = bmi.bi.biHeight;
+               gboolean no_alpha;
+
+               bmi.bi.biBitCount = 32;
+               bmi.bi.biCompression = BI_RGB;
+               bmi.bi.biHeight = -h;
+               pixbuf = gdk_pixbuf_new (GDK_COLORSPACE_RGB, TRUE, 8, w, h);
+               bits = g_malloc0 (4 * w * h);
+
+               /* color data */
+               if (!GetDIBits (hdc, ii.hbmColor, 0, h, bits, (BITMAPINFO *)&bmi, DIB_RGB_COLORS))
+                 g_warning(G_STRLOC ": Failed to get dibits");
+
+               pixels = gdk_pixbuf_get_pixels (pixbuf);
+               rowstride = gdk_pixbuf_get_rowstride (pixbuf);
+               no_alpha = TRUE;
+               for (y = 0; y < h; y++)
+                 {
+                   for (x = 0; x < w; x++)
+                     {
+                         pixels[2] = bits[(x+y*w) * 4];
+                         pixels[1] = bits[(x+y*w) * 4 + 1];
+                         pixels[0] = bits[(x+y*w) * 4 + 2];
+                         pixels[3] = bits[(x+y*w) * 4 + 3];
+                         if (no_alpha && pixels[3] > 0) no_alpha = FALSE;
+                         pixels += 4;
+                     }
+                   pixels += (w * 4 - rowstride);
+                 }
+               /* mask */
+               if (no_alpha) {
+                 if (!GetDIBits (hdc, ii.hbmMask, 0, h, bits, (BITMAPINFO *)&bmi, DIB_RGB_COLORS))
+                   g_warning(G_STRLOC ": Failed to get dibits");
+                 pixels = gdk_pixbuf_get_pixels (pixbuf);
+                 for (y = 0; y < h; y++)
+                   {
+                     for (x = 0; x < w; x++)
+                       {
+                         pixels[3] = 255 - bits[(x + y * w) * 4];
+                         pixels += 4;
+                       }
+                     pixels += (w * 4 - rowstride);
+                   }
+               
+                 /* release temporary resources */
+                 g_free (bits);
+                 if (!DeleteObject (ii.hbmColor) || !DeleteObject (ii.hbmMask))
+                   g_warning(G_STRLOC ": Leaking Icon Bitmaps ?");
+               }
+           }
+         else
+           g_warning(G_STRLOC ": GetDIBits () failed, %s", g_win32_error_message (GetLastError ()));
+
+         DeleteDC (hdc);
         }
       else
-        g_print ("GetIconInfo failed: %s\n", g_win32_error_message (GetLastError ())); 
+        g_warning(G_STRLOC ": GetIconInfo failed: %s\n", g_win32_error_message (GetLastError ())); 
 
       if (!DestroyIcon (hicon))
-        g_warning ("DestroyIcon failed");
+        g_warning(G_STRLOC ": DestroyIcon failed");
     }
   else
-    g_print ("ExtractAssociatedIcon failed: %s\n", g_win32_error_message (GetLastError ()));
+    g_warning (G_STRLOC ":ExtractAssociatedIcon(%s) failed: %s", filename, g_win32_error_message (GetLastError ()));
 
   return pixbuf;
 }
@@ -985,10 +1082,13 @@ gtk_file_system_win32_render_icon (GtkFileSystem     *file_system,
   const char* filename = gtk_file_path_get_string (path);
 
   /* handle drives with stock icons */
-  if (filename_is_root (filename))
+  if (filename_is_drive_root (filename))
     {
-      gchar *filename2 = g_strconcat(filename, "\\", NULL);
-      DWORD dt = GetDriveType (filename2);
+      gchar filename2[] = "?:\\";
+      DWORD dt;
+
+      filename2[0] = filename[0];
+      dt = GetDriveType (filename2);
 
       switch (dt)
         {
@@ -998,20 +1098,20 @@ gtk_file_system_win32_render_icon (GtkFileSystem     *file_system,
         case DRIVE_CDROM :
           icon_set = gtk_style_lookup_icon_set (widget->style, GTK_STOCK_CDROM);
           break;
-        case DRIVE_FIXED : /* need a hard disk icon */
+        case DRIVE_FIXED :
           icon_set = gtk_style_lookup_icon_set (widget->style, GTK_STOCK_HARDDISK);
           break;
         default :
           break;
         }
-      g_free (filename2);
     }
   else if (g_file_test (filename, G_FILE_TEST_IS_DIR))
     {
-      if (0 == strcmp (g_get_home_dir(), filename))
+      const gchar *home = g_get_home_dir ();
+      if (home != NULL && 0 == strcmp (home, filename))
         icon_set = gtk_style_lookup_icon_set (widget->style, GTK_STOCK_HOME);
       else
-        icon_set = gtk_style_lookup_icon_set (widget->style, GTK_STOCK_OPEN);
+        icon_set = gtk_style_lookup_icon_set (widget->style, GTK_STOCK_DIRECTORY);
     }
   else if (g_file_test (filename, G_FILE_TEST_IS_EXECUTABLE))
     {
@@ -1180,7 +1280,7 @@ gtk_file_folder_win32_get_info (GtkFileFolder     *folder,
   
   if (!path)
     {
-      g_return_val_if_fail (filename_is_root (folder_win32->filename), NULL);
+      g_return_val_if_fail (filename_is_some_root (folder_win32->filename), NULL);
 
       /* ??? */
       info = filename_get_info (folder_win32->filename, folder_win32->types, error);
@@ -1276,7 +1376,7 @@ filename_get_info (const gchar     *filename,
 
   info = gtk_file_info_new ();
 
-  if (filename_is_root (filename))
+  if (filename_is_some_root (filename))
     {
       if (types & GTK_FILE_INFO_DISPLAY_NAME)
        gtk_file_info_set_display_name (info, filename);
@@ -1377,13 +1477,18 @@ filename_to_path (const char *filename)
 }
 
 static gboolean
-filename_is_root (const char *filename)
+filename_is_drive_root (const char *filename)
 {
-  guint len = strlen(filename);
+  guint len = strlen (filename);
 
   /* accept both forms */
 
-  return (   (len == 2 && filename[1] == ':')
-          || (len == 3 && filename[1] == ':' && (filename[2] == '\\' || filename[2] == '/')));
+  return (len == 3 && filename[1] == ':' && G_IS_DIR_SEPARATOR (filename[2]));
 }
 
+static gboolean
+filename_is_some_root (const char *filename)
+{
+  return (G_IS_DIR_SEPARATOR (filename[0]) && filename[1] == '\0') ||
+         filename_is_drive_root (filename);
+}