diff --git a/common/broxton/Makefile.inc b/common/broxton/Makefile.inc
new file mode 100644
index 0000000..247fca1
--- /dev/null
+++ b/common/broxton/Makefile.inc
@@ -0,0 +1,4 @@
+gfxinit-y += hw-gfx-gma-plls.adb
+gfxinit-y += hw-gfx-gma-plls.ads
+gfxinit-y += hw-gfx-gma-power_and_clocks.ads
+gfxinit-y += hw-gfx-gma-spll.ads
diff --git a/common/broxton/hw-gfx-gma-plls.adb b/common/broxton/hw-gfx-gma-plls.adb
new file mode 100644
index 0000000..a2e26e4
--- /dev/null
+++ b/common/broxton/hw-gfx-gma-plls.adb
@@ -0,0 +1,58 @@
+--
+-- Copyright (C) 2017 secunet Security Networks AG
+--
+-- This program is free software; you can redistribute it and/or modify
+-- it under the terms of the GNU General Public License as published by
+-- the Free Software Foundation; either version 2 of the License, or
+-- (at your option) any later version.
+--
+-- This program 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 General Public License for more details.
+--
+
+with HW.Debug;
+with GNAT.Source_Info;
+
+package body HW.GFX.GMA.PLLs
+with
+   Refined_State => (State => null)
+is
+
+   procedure Alloc
+     (Port_Cfg : in     Port_Config;
+      PLL      :    out T;
+      Success  :    out Boolean)
+   is
+   begin
+      pragma Debug (Debug.Put_Line (GNAT.Source_Info.Enclosing_Entity));
+
+      case Port_Cfg.Port is
+         when DIGI_A => PLL := DPLL_A;
+         when DIGI_B => PLL := DPLL_B;
+         when DIGI_C => PLL := DPLL_C;
+         when others => PLL := Invalid_PLL;
+      end case;
+
+      Success := PLL /= Invalid_PLL;
+   end Alloc;
+
+   procedure Free (PLL : T) is
+   begin
+      null; -- FIXME
+   end Free;
+
+   procedure All_Off is
+   begin
+      pragma Debug (Debug.Put_Line (GNAT.Source_Info.Enclosing_Entity));
+
+      null; -- FIXME
+   end All_Off;
+
+   function Register_Value (PLL : T) return Word32 is
+   begin
+      return 0;   -- FIXME
+   end Register_Value;
+
+end HW.GFX.GMA.PLLs;
diff --git a/common/broxton/hw-gfx-gma-plls.ads b/common/broxton/hw-gfx-gma-plls.ads
new file mode 100644
index 0000000..195b2f3
--- /dev/null
+++ b/common/broxton/hw-gfx-gma-plls.ads
@@ -0,0 +1,46 @@
+--
+-- Copyright (C) 2017 secunet Security Networks AG
+--
+-- This program is free software; you can redistribute it and/or modify
+-- it under the terms of the GNU General Public License as published by
+-- the Free Software Foundation; either version 2 of the License, or
+-- (at your option) any later version.
+--
+-- This program 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 General Public License for more details.
+--
+
+private package HW.GFX.GMA.PLLs
+with
+   Abstract_State => (State with Part_Of => GMA.State)
+is
+
+   -- Broxton DDI PHY PLLs are tied to the port.
+   -- So the allocation will be a stub.
+
+   -- XXX: Types should be private (but that triggers a bug in SPARK GPL 2016)
+   type T is (Invalid_PLL, DPLL_A, DPLL_B, DPLL_C);
+   Invalid : constant T := Invalid_PLL;
+
+   procedure Initialize is null
+   with
+      Global => (Output => State);
+
+   procedure Alloc
+     (Port_Cfg : in     Port_Config;
+      PLL      :    out T;
+      Success  :    out Boolean);
+
+   pragma Warnings (GNATprove, Off, "subprogram ""*"" has no effect");
+   procedure Free (PLL : T);
+
+   procedure All_Off;
+   pragma Warnings (GNATprove, On, "subprogram ""*"" has no effect");
+
+   pragma Warnings (GNATprove, Off, "unused variable ""PLL""");
+   function Register_Value (PLL : T) return Word32;
+   pragma Warnings (GNATprove, On, "unused variable ""PLL""");
+
+end HW.GFX.GMA.PLLs;
diff --git a/common/broxton/hw-gfx-gma-power_and_clocks.ads b/common/broxton/hw-gfx-gma-power_and_clocks.ads
new file mode 100644
index 0000000..253d537
--- /dev/null
+++ b/common/broxton/hw-gfx-gma-power_and_clocks.ads
@@ -0,0 +1,26 @@
+--
+-- Copyright (C) 2016-2017 secunet Security Networks AG
+--
+-- This program is free software; you can redistribute it and/or modify
+-- it under the terms of the GNU General Public License as published by
+-- the Free Software Foundation; either version 2 of the License, or
+-- (at your option) any later version.
+--
+-- This program 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 General Public License for more details.
+--
+
+private package HW.GFX.GMA.Power_And_Clocks is
+
+   procedure Pre_All_Off is null;
+   procedure Post_All_Off is null;
+
+   procedure Initialize is null;
+
+   procedure Power_Set_To (Configs : Pipe_Configs) is null;
+   procedure Power_Up (Old_Configs, New_Configs : Pipe_Configs) is null;
+   procedure Power_Down (Old_Configs, Tmp_Configs, New_Configs : Pipe_Configs) is null;
+
+end HW.GFX.GMA.Power_And_Clocks;
diff --git a/common/broxton/hw-gfx-gma-spll.ads b/common/broxton/hw-gfx-gma-spll.ads
new file mode 100644
index 0000000..571dde9
--- /dev/null
+++ b/common/broxton/hw-gfx-gma-spll.ads
@@ -0,0 +1,24 @@
+--
+-- Copyright (C) 2016 secunet Security Networks AG
+--
+-- This program is free software; you can redistribute it and/or modify
+-- it under the terms of the GNU General Public License as published by
+-- the Free Software Foundation; either version 2 of the License, or
+-- (at your option) any later version.
+--
+-- This program 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 General Public License for more details.
+--
+
+package HW.GFX.GMA.SPLL is
+
+   -- Just for a common interface with Haswell's DDI.
+   -- There is no SPLL (no FDI) on Broxton.
+
+   procedure On is null;
+
+   procedure Off is null;
+
+end HW.GFX.GMA.SPLL;