[gnome-builder/wip/libide: 117/237] libide: start creating IdeLanguage for file

[Christian Hergert <chergert src gnome org>]

commit b232fbae9d1d84948a3dbc14f8bb5beb3a110a70
Author: Christian Hergert <christian hergert me>
Date:   Wed Feb 11 21:11:49 2015 -0800

    libide: start creating IdeLanguage for file

 libide/ide-file.c |   81 +++++++++++++++++++++++++++++++++++++++++++++++++++--
 libide/ide.c      |    7 ++++
 2 files changed, 85 insertions(+), 3 deletions(-)
---
diff --git a/libide/ide-file.c b/libide/ide-file.c
index 20172cb..fa7cfc6 100644
--- a/libide/ide-file.c
+++ b/libide/ide-file.c
@@ -17,12 +17,15 @@
  */
 
 #include <glib/gi18n.h>
+#include <gtksourceview/gtksource.h>
 
 #include "ide-file.h"
+#include "ide-language.h"
 
 typedef struct
 {
-  GFile *file;
+  GFile       *file;
+  IdeLanguage *language;
 } IdeFilePrivate;
 
 enum
@@ -61,11 +64,83 @@ ide_file_equal (IdeFile *self,
   return g_file_equal (priv1->file, priv2->file);
 }
 
+static void
+ide_file_create_language (IdeFile *self)
+{
+  IdeFilePrivate *priv = ide_file_get_instance_private (self);
+
+  g_assert (IDE_IS_FILE (self));
+
+  if (g_once_init_enter (&priv->language))
+    {
+      GtkSourceLanguageManager *manager;
+      GtkSourceLanguage *srclang;
+      IdeLanguage *language = NULL;
+      const gchar *lang_id = NULL;
+      g_autoptr(gchar) content_type = NULL;
+      g_autoptr(gchar) filename = NULL;
+      IdeContext *context;
+      gboolean uncertain = TRUE;
+
+      context = ide_object_get_context (IDE_OBJECT (self));
+      filename = g_file_get_basename (priv->file);
+      content_type = g_content_type_guess (filename, NULL, 0, &uncertain);
+
+      if (uncertain)
+        g_clear_pointer (&content_type, g_free);
+
+      manager = gtk_source_language_manager_get_default ();
+      srclang = gtk_source_language_manager_guess_language (manager, filename, content_type);
+
+      if (srclang)
+        {
+          g_autoptr(gchar) ext_name = NULL;
+          GIOExtension *extension;
+          GIOExtensionPoint *point;
+
+          lang_id = gtk_source_language_get_id (srclang);
+          ext_name = g_strdup_printf (IDE_LANGUAGE_EXTENSION_POINT".%s", lang_id);
+          point = g_io_extension_point_lookup (IDE_LANGUAGE_EXTENSION_POINT);
+          extension = g_io_extension_point_get_extension_by_name (point, ext_name);
+
+          if (extension)
+            {
+              GType type_id;
+
+              type_id = g_io_extension_get_type (extension);
+
+              if (g_type_is_a (type_id, IDE_TYPE_LANGUAGE))
+                language = g_object_new (type_id,
+                                         "context", context,
+                                         "id", lang_id,
+                                         NULL);
+              else
+                g_warning (_("Type \"%s\" is not an IdeLanguage."),
+                           g_type_name (type_id));
+            }
+        }
+
+      if (!language)
+        language = g_object_new (IDE_TYPE_LANGUAGE,
+                                 "context", context,
+                                 "id", lang_id,
+                                 NULL);
+
+      g_once_init_leave (&priv->language, language);
+    }
+}
+
 IdeLanguage *
 ide_file_get_language (IdeFile *self)
 {
-  g_warning ("TODO: get language from file");
-  return NULL;
+  IdeFilePrivate *priv = ide_file_get_instance_private (self);
+
+  g_return_val_if_fail (IDE_IS_FILE (self), NULL);
+
+  if (!priv->language)
+    ide_file_create_language (self);
+
+  return priv->language;
 }
 
 GFile *
diff --git a/libide/ide.c b/libide/ide.c
index f4bdded..6aaeed7 100644
--- a/libide/ide.c
+++ b/libide/ide.c
@@ -23,6 +23,7 @@
 #include "ide.h"
 
 #include "ide-autotools-build-system.h"
+#include "ide-c-language.h"
 #include "ide-clang-service.h"
 #include "ide-directory-build-system.h"
 #include "ide-directory-vcs.h"
@@ -59,6 +60,7 @@ ide_init_ctor (void)
   g_type_ensure (IDE_TYPE_VCS);
 
   g_io_extension_point_register (IDE_BUILD_SYSTEM_EXTENSION_POINT);
+  g_io_extension_point_register (IDE_LANGUAGE_EXTENSION_POINT);
   g_io_extension_point_register (IDE_SERVICE_EXTENSION_POINT);
   g_io_extension_point_register (IDE_VCS_EXTENSION_POINT);
 
@@ -71,6 +73,11 @@ ide_init_ctor (void)
                                   IDE_BUILD_SYSTEM_EXTENSION_POINT".directory",
                                   -200);
 
+  g_io_extension_point_implement (IDE_LANGUAGE_EXTENSION_POINT,
+                                  IDE_TYPE_C_LANGUAGE,
+                                  IDE_LANGUAGE_EXTENSION_POINT".c",
+                                  0);
+
   g_io_extension_point_implement (IDE_SERVICE_EXTENSION_POINT,
                                   IDE_TYPE_CLANG_SERVICE,
                                   IDE_SERVICE_EXTENSION_POINT".clang",