File 0001-Add-data-based-content-type-guessing-for-w... of Package mingw32-glib2

Overview Repositories Revisions Requests Users Attributes Meta

File 0001-Add-data-based-content-type-guessing-for-win32.patch of Package mingw32-glib2 (Revision f9683b9e945f4563c7377d2714d215de)

Currently displaying revision f9683b9e945f4563c7377d2714d215de , Show latest

From b188b8c915e9f28b2840e2b1a5c795f59f135f5a Mon Sep 17 00:00:00 2001
From: Hib Eris <hib@hiberis.nl>
Date: Sun, 6 Nov 2011 10:31:34 +0100
Subject: [PATCH] Add data based content type guessing for win32

Fixes #664043
---
 gio/gcontenttype.c |   85 ++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 files changed, 85 insertions(+), 0 deletions(-)

diff --git a/gio/gcontenttype.c b/gio/gcontenttype.c
index ce8ab6c..e3b2969 100644
--- a/gio/gcontenttype.c
+++ b/gio/gcontenttype.c
@@ -51,6 +51,7 @@
 #ifdef G_OS_WIN32
 
 #include <windows.h>
+#include <shlwapi.h>
 
 static char *
 get_registry_classes_key (const char    *subdir,
@@ -315,6 +316,51 @@ g_content_type_from_mime_type (const gchar *mime_type)
   return content_type;
 }
 
+static HMODULE
+_g_win32_load_system_library_W (LPCWSTR library)
+{
+  WCHAR path[MAX_PATH];
+  UINT l;
+
+  l = GetSystemDirectoryW (path, MAX_PATH);
+  if (G_UNLIKELY (l == 0 || l >= MAX_PATH))
+    return NULL;
+
+  if (G_UNLIKELY (!PathAppendW (path, library)))
+    return NULL;
+
+  return LoadLibraryW (path);
+}
+
+typedef HRESULT (WINAPI *t_FindMimeFromData) (LPBC pBC,
+                                              LPCWSTR pwzUrl,
+                                              LPVOID pBuffer,
+                                              DWORD cbSize,
+                                              LPCWSTR pwzMimeProposed,
+                                              DWORD dwMimeFlags,
+                                              LPWSTR *ppwzMimeOut,
+                                              DWORD dwReserved);
+
+static t_FindMimeFromData
+find_FindMimeFromData (void)
+{
+  HMODULE urlmon = _g_win32_load_system_library_W (L"urlmon.dll");
+  if (!urlmon)
+    return NULL;
+
+  return (t_FindMimeFromData) GetProcAddress (urlmon, "FindMimeFromData");
+}
+
+static t_FindMimeFromData*
+get_FindMimeFromData (void)
+{
+  static GOnce my_once = G_ONCE_INIT;
+
+  g_once (&my_once, find_FindMimeFromData, NULL);
+
+  return my_once.retval;
+}
+
 gchar *
 g_content_type_guess (const gchar  *filename,
                       const guchar *data,
@@ -342,6 +388,45 @@ g_content_type_guess (const gchar  *filename,
   if (type)
     return type;
 
+  if (data)
+    {
+      t_FindMimeFromData p_FindMimeFromData = get_FindMimeFromData ();
+
+      if (p_FindMimeFromData)
+        {
+          LPWSTR pwzMimeOut;
+
+          DWORD cbSize = data_size < 256 ?  data_size : 256;
+          LPVOID pBuffer = (LPVOID) g_malloc (cbSize);
+          memcpy (pBuffer, data, cbSize);
+          HRESULT hr = (p_FindMimeFromData)(
+            NULL,         /* LPBC pBC, */
+            NULL,         /* LPCWSTR pwzUrl, */
+            pBuffer,      /* LPVOID pBuffer, */
+            cbSize,       /* DWORD cbSize, */
+            NULL,         /* LPCWSTR pwzMimeProposed, */
+            FMFD_DEFAULT, /* DWORD dwMimeFlags, */
+            &pwzMimeOut,  /* LPWSTR *ppwzMimeOut, */
+            0             /* DWORD dwReserved */
+          );
+          g_free (pBuffer);
+
+          if (hr == S_OK)
+            {
+              gchar *mime_type;
+
+              mime_type = g_utf16_to_utf8 (pwzMimeOut, -1, NULL, NULL, NULL);
+              type = g_content_type_from_mime_type (mime_type);
+
+              g_free (mime_type);
+              CoTaskMemFree(pwzMimeOut);
+
+              if (type)
+                return type;
+            }
+        }
+    }
+
   if (data && looks_like_text (data, data_size))
     return g_strdup (".txt");
 
-- 
1.7.4.1

Places

File 0001-Add-data-based-content-type-guessing-for-win32.patch of Package mingw32-glib2 (Revision f9683b9e945f4563c7377d2714d215de)

Places