| -- |
| -- Copyright (C) 2015-2018 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.Config |
| with |
| Initializes => (Valid_Port, Raw_Clock) |
| is |
| |
| Gen : constant Generation := <<GEN>>; |
| |
| CPU_First : constant CPU_Type := |
| (case Gen is |
| when G45 => G45, |
| when Ironlake => Ironlake, |
| when Haswell => Haswell, |
| when Broxton => Broxton, |
| when Skylake => Skylake); |
| CPU_Last : constant CPU_Type := |
| (case Gen is |
| when G45 => G45, |
| when Ironlake => Ivybridge, |
| when Haswell => Broadwell, |
| when Broxton => Broxton, |
| when Skylake => Skylake); |
| CPU_Var_Last : constant CPU_Variant := |
| (case Gen is |
| when Haswell | Skylake => ULT, |
| when others => Normal); |
| subtype Gen_CPU_Type is CPU_Type range CPU_First .. CPU_Last; |
| subtype Gen_CPU_Variant is CPU_Variant range Normal .. CPU_Var_Last; |
| |
| CPU : constant Gen_CPU_Type := <<CPU>>; |
| |
| CPU_Var : constant Gen_CPU_Variant := <<CPU_VARIANT>>; |
| |
| Internal_Display : constant Internal_Type := <<INTERNAL_PORT>>; |
| |
| Analog_I2C_Port : constant PCH_Port := <<ANALOG_I2C_PORT>>; |
| |
| EDP_Low_Voltage_Swing : constant Boolean := False; |
| |
| DDI_HDMI_Buffer_Translation : constant Integer := -1; |
| |
| Default_MMIO_Base : constant := <<DEFAULT_MMIO_BASE>>; |
| |
| LVDS_Dual_Threshold : constant := 95_000_000; |
| |
| ---------------------------------------------------------------------------- |
| |
| Gen_G45 : constant Boolean := Gen = G45; |
| Gen_Ironlake : constant Boolean := Gen = Ironlake; |
| Gen_Haswell : constant Boolean := Gen = Haswell; |
| Gen_Broxton : constant Boolean := Gen = Broxton; |
| Gen_Skylake : constant Boolean := Gen = Skylake; |
| |
| Up_To_Ironlake : constant Boolean := Gen <= Ironlake; |
| Ironlake_On : constant Boolean := Gen >= Ironlake; |
| Haswell_On : constant Boolean := Gen >= Haswell; |
| Broxton_On : constant Boolean := Gen >= Broxton; |
| Skylake_On : constant Boolean := Gen >= Skylake; |
| |
| CPU_Ironlake : constant Boolean := Gen_Ironlake and then CPU = Ironlake; |
| CPU_Sandybridge : constant Boolean := Gen_Ironlake and then CPU = Sandybridge; |
| CPU_Ivybridge : constant Boolean := Gen_Ironlake and then CPU = Ivybridge; |
| CPU_Haswell : constant Boolean := Gen_Haswell and then CPU = Haswell; |
| CPU_Broadwell : constant Boolean := Gen_Haswell and then CPU = Broadwell; |
| |
| Sandybridge_On : constant Boolean := |
| ((Gen_Ironlake and then CPU >= Sandybridge) or Haswell_On); |
| Ivybridge_On : constant Boolean := |
| ((Gen_Ironlake and then CPU >= Ivybridge) or Haswell_On); |
| Broadwell_On : constant Boolean := |
| ((Gen_Haswell and then CPU >= Broadwell) or Broxton_On); |
| |
| ---------------------------------------------------------------------------- |
| |
| Have_HDMI_Buf_Override : constant Boolean := DDI_HDMI_Buffer_Translation >= 0; |
| Default_MMIO_Base_Set : constant Boolean := Default_MMIO_Base /= 0; |
| |
| Has_Internal_Display : constant Boolean := Internal_Display /= None; |
| Internal_Is_LVDS : constant Boolean := Internal_Display = LVDS; |
| Internal_Is_EDP : constant Boolean := Internal_Display = DP; |
| Have_DVI_I : constant Boolean := Analog_I2C_Port /= PCH_DAC; |
| Has_Presence_Straps : constant Boolean := not Gen_Broxton; |
| Is_ULT : constant Boolean := |
| ((Gen_Haswell or Gen_Skylake) and then CPU_Var = ULT); |
| |
| ----- CPU pipe: -------- |
| Has_Tertiary_Pipe : constant Boolean := Ivybridge_On; |
| Disable_Trickle_Feed : constant Boolean := not Gen_Haswell; |
| Pipe_Enabled_Workaround : constant Boolean := CPU_Broadwell; |
| Has_EDP_Transcoder : constant Boolean := Haswell_On; |
| Use_PDW_For_EDP_Scaling : constant Boolean := CPU_Haswell; |
| Has_Pipe_DDI_Func : constant Boolean := Haswell_On; |
| Has_Trans_Clk_Sel : constant Boolean := Haswell_On; |
| Has_Pipe_MSA_Misc : constant Boolean := Haswell_On; |
| Has_Pipeconf_Misc : constant Boolean := Broadwell_On; |
| Has_Pipeconf_BPC : constant Boolean := not CPU_Haswell; |
| Has_Plane_Control : constant Boolean := Broxton_On; |
| Has_DSP_Linoff : constant Boolean := Up_To_Ironlake; |
| Has_PF_Pipe_Select : constant Boolean := CPU_Ivybridge or CPU_Haswell; |
| Has_Cursor_FBC_Control : constant Boolean := Ivybridge_On; |
| VGA_Plane_Workaround : constant Boolean := CPU_Ivybridge; |
| Has_GMCH_DP_Transcoder : constant Boolean := Gen_G45; |
| Has_GMCH_VGACNTRL : constant Boolean := Gen_G45; |
| Has_GMCH_PFIT_CONTROL : constant Boolean := Gen_G45; |
| |
| ----- Panel power: ----- |
| Has_PP_Write_Protection : constant Boolean := Up_To_Ironlake; |
| Has_PP_Port_Select : constant Boolean := Up_To_Ironlake; |
| Use_PP_VDD_Override : constant Boolean := Up_To_Ironlake; |
| Has_PCH_Panel_Power : constant Boolean := Ironlake_On; |
| |
| ----- PCH/FDI: --------- |
| Has_PCH : constant Boolean := not Gen_Broxton and not Gen_G45; |
| Has_PCH_DAC : constant Boolean := |
| (Gen_Ironlake or (Gen_Haswell and then not Is_ULT)); |
| |
| Has_PCH_Aux_Channels : constant Boolean := Gen_Ironlake or Gen_Haswell; |
| |
| VGA_Has_Sync_Disable : constant Boolean := Up_To_Ironlake; |
| |
| Has_Trans_Timing_Ovrrde : constant Boolean := Sandybridge_On; |
| |
| Has_DPLL_SEL : constant Boolean := Gen_Ironlake; |
| Has_FDI_BPC : constant Boolean := Gen_Ironlake; |
| Has_FDI_Composite_Sel : constant Boolean := CPU_Ivybridge; |
| Has_New_FDI_Sink : constant Boolean := Sandybridge_On; |
| Has_New_FDI_Source : constant Boolean := Ivybridge_On; |
| Has_Trans_DP_Ctl : constant Boolean := CPU_Sandybridge or CPU_Ivybridge; |
| Has_FDI_C : constant Boolean := CPU_Ivybridge; |
| |
| Has_FDI_RX_Power_Down : constant Boolean := Gen_Haswell; |
| |
| Has_GMCH_RawClk : constant Boolean := Gen_G45; |
| |
| ----- DDI: ------------- |
| End_EDP_Training_Late : constant Boolean := Gen_Haswell; |
| Has_Per_DDI_Clock_Sel : constant Boolean := Gen_Haswell; |
| Has_HOTPLUG_CTL : constant Boolean := Gen_Haswell; |
| Has_SHOTPLUG_CTL_A : constant Boolean := |
| ((Gen_Haswell and then Is_ULT) or Skylake_On); |
| |
| Has_DDI_PHYs : constant Boolean := Gen_Broxton; |
| |
| Has_DDI_D : constant Boolean := |
| ((Gen_Haswell or Gen_Skylake) and then not Is_ULT); |
| Has_DDI_E : constant Boolean := -- might be disabled by x4 eDP |
| Has_DDI_D; |
| |
| Has_DDI_Buffer_Trans : constant Boolean := Haswell_On and |
| not Gen_Broxton; |
| Has_Low_Voltage_Swing : constant Boolean := Broxton_On; |
| Has_Iboost_Config : constant Boolean := Skylake_On; |
| |
| Need_DP_Aux_Mutex : constant Boolean := False; -- Skylake & (PSR | GTC) |
| |
| ----- GMBUS: ----------- |
| Ungate_GMBUS_Unit_Level : constant Boolean := Skylake_On; |
| GMBUS_Alternative_Pins : constant Boolean := Gen_Broxton; |
| Has_PCH_GMBUS : constant Boolean := Ironlake_On; |
| |
| ----- Power: ----------- |
| Has_IPS : constant Boolean := |
| (Gen_Haswell and then |
| ((CPU_Haswell and Is_ULT) or CPU_Broadwell)); |
| Has_IPS_CTL_Mailbox : constant Boolean := CPU_Broadwell; |
| |
| Has_Per_Pipe_SRD : constant Boolean := Broadwell_On; |
| |
| ----- GTT: ------------- |
| Has_64bit_GTT : constant Boolean := Broadwell_On; |
| |
| ---------------------------------------------------------------------------- |
| |
| Max_Pipe : constant Pipe_Index := |
| (if Has_Tertiary_Pipe then Tertiary else Secondary); |
| |
| Valid_Port : array (Port_Type) of Boolean := (others => False) |
| with |
| Part_Of => GMA.Config_State; |
| |
| Last_Digital_Port : constant Digital_Port := |
| (if Has_DDI_E then DIGI_E else DIGI_C); |
| |
| ---------------------------------------------------------------------------- |
| |
| type FDI_Per_Port is array (Port_Type) of Boolean; |
| Is_FDI_Port : constant FDI_Per_Port := |
| (Disabled => False, |
| Internal => Gen_Ironlake and Internal_Is_LVDS, |
| DP1 .. HDMI3 => Gen_Ironlake, |
| Analog => Has_PCH_DAC); |
| |
| type FDI_Lanes_Per_Port is array (GPU_Port) of DP_Lane_Count; |
| FDI_Lane_Count : constant FDI_Lanes_Per_Port := |
| (DIGI_D => DP_Lane_Count_2, |
| others => (if Gen_Ironlake then DP_Lane_Count_4 else DP_Lane_Count_2)); |
| |
| FDI_Training : constant FDI_Training_Type := |
| (if CPU_Ironlake then Simple_Training |
| elsif CPU_Sandybridge then Full_Training |
| else Auto_Training); |
| |
| ---------------------------------------------------------------------------- |
| |
| Default_DDI_HDMI_Buffer_Translation : constant DDI_HDMI_Buf_Trans_Range := |
| (if CPU_Haswell then 6 |
| elsif CPU_Broadwell then 7 |
| elsif Broxton_On then 8 |
| else 0); |
| |
| ---------------------------------------------------------------------------- |
| |
| Default_CDClk_Freq : constant Frequency_Type := |
| (if Gen_G45 then 320_000_000 -- unused |
| elsif CPU_Ironlake or Gen_Haswell then 450_000_000 |
| elsif CPU_Sandybridge or CPU_Ivybridge then 400_000_000 |
| elsif Gen_Broxton then 288_000_000 |
| elsif Gen_Skylake then 337_500_000 |
| else Frequency_Type'First); |
| |
| Default_RawClk_Freq : constant Frequency_Type := |
| (if Gen_G45 then 100_000_000 -- unused, depends on FSB |
| elsif Gen_Ironlake then 125_000_000 |
| elsif Gen_Haswell then (if Is_ULT then 24_000_000 else 125_000_000) |
| elsif Gen_Broxton then Frequency_Type'First -- none needed |
| elsif Gen_Skylake then 24_000_000 |
| else Frequency_Type'First); |
| |
| Raw_Clock : Frequency_Type := Default_RawClk_Freq |
| with Part_Of => GMA.Config_State; |
| |
| ---------------------------------------------------------------------------- |
| |
| -- Maximum source width with enabled scaler. This only accounts |
| -- for simple 1:1 pipe:scaler mappings. |
| |
| type Width_Per_Pipe is array (Pipe_Index) of Width_Type; |
| |
| Maximum_Scalable_Width : constant Width_Per_Pipe := |
| (if Gen_G45 then -- TODO: Is this true? |
| (Primary => 4096, |
| Secondary => 2048, |
| Tertiary => Pos32'First) |
| elsif Gen_Ironlake or CPU_Haswell then |
| (Primary => 4096, |
| Secondary => 2048, |
| Tertiary => 2048) |
| else |
| (Primary => 4096, |
| Secondary => 4096, |
| Tertiary => 4096)); |
| |
| -- Maximum X position of hardware cursors |
| Maximum_Cursor_X : constant := (case Gen is |
| when G45 .. Ironlake => 4095, |
| when Haswell .. Skylake => 8191); |
| |
| Maximum_Cursor_Y : constant := 4095; |
| |
| ---------------------------------------------------------------------------- |
| |
| -- FIXME: Unknown for Broxton, Linux' i915 contains a fixme too :-D |
| HDMI_Max_Clock_24bpp : constant Frequency_Type := |
| (if Haswell_On then 300_000_000 else 225_000_000); |
| |
| ---------------------------------------------------------------------------- |
| |
| GTT_PTE_Size : constant := (if Has_64bit_GTT then 8 else 4); |
| |
| Fence_Base : constant := |
| (if not Sandybridge_On then 16#0000_3000# else 16#0010_0000#); |
| |
| Fence_Count : constant := |
| (if not Ivybridge_On then 16 else 32); |
| |
| ---------------------------------------------------------------------------- |
| |
| use type HW.Word16; |
| |
| function Is_Broadwell_H (Device_Id : Word16) return Boolean is |
| (Device_Id = 16#1612# or Device_Id = 16#1622# or Device_Id = 16#162a#); |
| |
| function Is_Skylake_U (Device_Id : Word16) return Boolean is |
| (Device_Id = 16#1906# or Device_Id = 16#1916# or Device_Id = 16#1923# or |
| Device_Id = 16#1926# or Device_Id = 16#1927#); |
| |
| -- Rather catch too much here than too little, |
| -- it's only used to distinguish generations. |
| function Is_GPU (Device_Id : Word16; CPU : CPU_Type; CPU_Var : CPU_Variant) |
| return Boolean is |
| (case CPU is |
| when G45 => (Device_Id and 16#ff02#) = 16#2e02# or |
| (Device_Id and 16#fffe#) = 16#2a42#, |
| when Ironlake => (Device_Id and 16#fff3#) = 16#0042#, |
| when Sandybridge => (Device_Id and 16#ffc2#) = 16#0102#, |
| when Ivybridge => (Device_Id and 16#ffc3#) = 16#0142#, |
| when Haswell => |
| (case CPU_Var is |
| when Normal => (Device_Id and 16#ffc3#) = 16#0402# or |
| (Device_Id and 16#ffc3#) = 16#0d02#, |
| when ULT => (Device_Id and 16#ffc3#) = 16#0a02#), |
| when Broadwell => ((Device_Id and 16#ffc3#) = 16#1602# or |
| (Device_Id and 16#ffcf#) = 16#160b# or |
| (Device_Id and 16#ffcf#) = 16#160d#) and |
| (case CPU_Var is |
| when Normal => Is_Broadwell_H (Device_Id), |
| when ULT => not Is_Broadwell_H (Device_Id)), |
| when Broxton => (Device_Id and 16#fffe#) = 16#5a84#, |
| when Skylake => ((Device_Id and 16#ffc3#) = 16#1902# or |
| (Device_Id and 16#ffcf#) = 16#190b# or |
| (Device_Id and 16#ffcf#) = 16#190d# or |
| (Device_Id and 16#fff9#) = 16#1921#) and |
| (case CPU_Var is |
| when Normal => not Is_Skylake_U (Device_Id), |
| when ULT => Is_Skylake_U (Device_Id))); |
| |
| function Compatible_GPU (Device_Id : Word16) return Boolean is |
| (Is_GPU (Device_Id, CPU, CPU_Var)); |
| |
| end HW.GFX.GMA.Config; |