1 // SPDX-License-Identifier: GPL-2.0-only 2 /* 3 * Copyright 2012 Red Hat 4 * 5 * Authors: Matthew Garrett 6 * Dave Airlie 7 */ 8 9 #include <linux/module.h> 10 #include <linux/pci.h> 11 #include <linux/vmalloc.h> 12 13 #include <drm/drm_aperture.h> 14 #include <drm/drm_drv.h> 15 #include <drm/drm_file.h> 16 #include <drm/drm_ioctl.h> 17 #include <drm/drm_managed.h> 18 #include <drm/drm_module.h> 19 #include <drm/drm_pciids.h> 20 21 #include "mgag200_drv.h" 22 23 int mgag200_modeset = -1; 24 MODULE_PARM_DESC(modeset, "Disable/Enable modesetting"); 25 module_param_named(modeset, mgag200_modeset, int, 0400); 26 27 /* 28 * DRM driver 29 */ 30 31 DEFINE_DRM_GEM_FOPS(mgag200_driver_fops); 32 33 static const struct drm_driver mgag200_driver = { 34 .driver_features = DRIVER_ATOMIC | DRIVER_GEM | DRIVER_MODESET, 35 .fops = &mgag200_driver_fops, 36 .name = DRIVER_NAME, 37 .desc = DRIVER_DESC, 38 .date = DRIVER_DATE, 39 .major = DRIVER_MAJOR, 40 .minor = DRIVER_MINOR, 41 .patchlevel = DRIVER_PATCHLEVEL, 42 DRM_GEM_SHMEM_DRIVER_OPS, 43 }; 44 45 /* 46 * DRM device 47 */ 48 49 static bool mgag200_has_sgram(struct mga_device *mdev) 50 { 51 struct drm_device *dev = &mdev->base; 52 struct pci_dev *pdev = to_pci_dev(dev->dev); 53 u32 option; 54 int ret; 55 56 ret = pci_read_config_dword(pdev, PCI_MGA_OPTION, &option); 57 if (drm_WARN(dev, ret, "failed to read PCI config dword: %d\n", ret)) 58 return false; 59 60 return !!(option & PCI_MGA_OPTION_HARDPWMSK); 61 } 62 63 static int mgag200_regs_init(struct mga_device *mdev) 64 { 65 struct drm_device *dev = &mdev->base; 66 struct pci_dev *pdev = to_pci_dev(dev->dev); 67 u32 option, option2; 68 u8 crtcext3; 69 int ret; 70 71 ret = drmm_mutex_init(dev, &mdev->rmmio_lock); 72 if (ret) 73 return ret; 74 75 switch (mdev->type) { 76 case G200_PCI: 77 case G200_AGP: 78 if (mgag200_has_sgram(mdev)) 79 option = 0x4049cd21; 80 else 81 option = 0x40499121; 82 option2 = 0x00008000; 83 break; 84 case G200_SE_A: 85 case G200_SE_B: 86 option = 0x40049120; 87 if (mgag200_has_sgram(mdev)) 88 option |= PCI_MGA_OPTION_HARDPWMSK; 89 option2 = 0x00008000; 90 break; 91 case G200_WB: 92 case G200_EW3: 93 option = 0x41049120; 94 option2 = 0x0000b000; 95 break; 96 case G200_EV: 97 option = 0x00000120; 98 option2 = 0x0000b000; 99 break; 100 case G200_EH: 101 case G200_EH3: 102 option = 0x00000120; 103 option2 = 0x0000b000; 104 break; 105 default: 106 option = 0; 107 option2 = 0; 108 } 109 110 if (option) 111 pci_write_config_dword(pdev, PCI_MGA_OPTION, option); 112 if (option2) 113 pci_write_config_dword(pdev, PCI_MGA_OPTION2, option2); 114 115 /* BAR 1 contains registers */ 116 mdev->rmmio_base = pci_resource_start(pdev, 1); 117 mdev->rmmio_size = pci_resource_len(pdev, 1); 118 119 if (!devm_request_mem_region(dev->dev, mdev->rmmio_base, 120 mdev->rmmio_size, "mgadrmfb_mmio")) { 121 drm_err(dev, "can't reserve mmio registers\n"); 122 return -ENOMEM; 123 } 124 125 mdev->rmmio = pcim_iomap(pdev, 1, 0); 126 if (mdev->rmmio == NULL) 127 return -ENOMEM; 128 129 RREG_ECRT(0x03, crtcext3); 130 crtcext3 |= MGAREG_CRTCEXT3_MGAMODE; 131 WREG_ECRT(0x03, crtcext3); 132 133 return 0; 134 } 135 136 static void mgag200_g200_interpret_bios(struct mga_device *mdev, 137 const unsigned char *bios, 138 size_t size) 139 { 140 static const char matrox[] = {'M', 'A', 'T', 'R', 'O', 'X'}; 141 static const unsigned int expected_length[6] = { 142 0, 64, 64, 64, 128, 128 143 }; 144 struct drm_device *dev = &mdev->base; 145 const unsigned char *pins; 146 unsigned int pins_len, version; 147 int offset; 148 int tmp; 149 150 /* Test for MATROX string. */ 151 if (size < 45 + sizeof(matrox)) 152 return; 153 if (memcmp(&bios[45], matrox, sizeof(matrox)) != 0) 154 return; 155 156 /* Get the PInS offset. */ 157 if (size < MGA_BIOS_OFFSET + 2) 158 return; 159 offset = (bios[MGA_BIOS_OFFSET + 1] << 8) | bios[MGA_BIOS_OFFSET]; 160 161 /* Get PInS data structure. */ 162 163 if (size < offset + 6) 164 return; 165 pins = bios + offset; 166 if (pins[0] == 0x2e && pins[1] == 0x41) { 167 version = pins[5]; 168 pins_len = pins[2]; 169 } else { 170 version = 1; 171 pins_len = pins[0] + (pins[1] << 8); 172 } 173 174 if (version < 1 || version > 5) { 175 drm_warn(dev, "Unknown BIOS PInS version: %d\n", version); 176 return; 177 } 178 if (pins_len != expected_length[version]) { 179 drm_warn(dev, "Unexpected BIOS PInS size: %d expected: %d\n", 180 pins_len, expected_length[version]); 181 return; 182 } 183 if (size < offset + pins_len) 184 return; 185 186 drm_dbg_kms(dev, "MATROX BIOS PInS version %d size: %d found\n", 187 version, pins_len); 188 189 /* Extract the clock values */ 190 191 switch (version) { 192 case 1: 193 tmp = pins[24] + (pins[25] << 8); 194 if (tmp) 195 mdev->model.g200.pclk_max = tmp * 10; 196 break; 197 case 2: 198 if (pins[41] != 0xff) 199 mdev->model.g200.pclk_max = (pins[41] + 100) * 1000; 200 break; 201 case 3: 202 if (pins[36] != 0xff) 203 mdev->model.g200.pclk_max = (pins[36] + 100) * 1000; 204 if (pins[52] & 0x20) 205 mdev->model.g200.ref_clk = 14318; 206 break; 207 case 4: 208 if (pins[39] != 0xff) 209 mdev->model.g200.pclk_max = pins[39] * 4 * 1000; 210 if (pins[92] & 0x01) 211 mdev->model.g200.ref_clk = 14318; 212 break; 213 case 5: 214 tmp = pins[4] ? 8000 : 6000; 215 if (pins[123] != 0xff) 216 mdev->model.g200.pclk_min = pins[123] * tmp; 217 if (pins[38] != 0xff) 218 mdev->model.g200.pclk_max = pins[38] * tmp; 219 if (pins[110] & 0x01) 220 mdev->model.g200.ref_clk = 14318; 221 break; 222 default: 223 break; 224 } 225 } 226 227 static void mgag200_g200_init_refclk(struct mga_device *mdev) 228 { 229 struct drm_device *dev = &mdev->base; 230 struct pci_dev *pdev = to_pci_dev(dev->dev); 231 unsigned char __iomem *rom; 232 unsigned char *bios; 233 size_t size; 234 235 mdev->model.g200.pclk_min = 50000; 236 mdev->model.g200.pclk_max = 230000; 237 mdev->model.g200.ref_clk = 27050; 238 239 rom = pci_map_rom(pdev, &size); 240 if (!rom) 241 return; 242 243 bios = vmalloc(size); 244 if (!bios) 245 goto out; 246 memcpy_fromio(bios, rom, size); 247 248 if (size != 0 && bios[0] == 0x55 && bios[1] == 0xaa) 249 mgag200_g200_interpret_bios(mdev, bios, size); 250 251 drm_dbg_kms(dev, "pclk_min: %ld pclk_max: %ld ref_clk: %ld\n", 252 mdev->model.g200.pclk_min, mdev->model.g200.pclk_max, 253 mdev->model.g200.ref_clk); 254 255 vfree(bios); 256 out: 257 pci_unmap_rom(pdev, rom); 258 } 259 260 static void mgag200_g200se_init_unique_id(struct mga_device *mdev) 261 { 262 struct drm_device *dev = &mdev->base; 263 264 /* stash G200 SE model number for later use */ 265 mdev->model.g200se.unique_rev_id = RREG32(0x1e24); 266 267 drm_dbg(dev, "G200 SE unique revision id is 0x%x\n", 268 mdev->model.g200se.unique_rev_id); 269 } 270 271 static struct mga_device * 272 mgag200_device_create(struct pci_dev *pdev, enum mga_type type, unsigned long flags) 273 { 274 struct mga_device *mdev; 275 struct drm_device *dev; 276 int ret; 277 278 mdev = devm_drm_dev_alloc(&pdev->dev, &mgag200_driver, struct mga_device, base); 279 if (IS_ERR(mdev)) 280 return mdev; 281 dev = &mdev->base; 282 283 pci_set_drvdata(pdev, dev); 284 285 mdev->flags = flags; 286 mdev->type = type; 287 288 ret = mgag200_regs_init(mdev); 289 if (ret) 290 return ERR_PTR(ret); 291 292 if (mdev->type == G200_PCI || mdev->type == G200_AGP) 293 mgag200_g200_init_refclk(mdev); 294 else if (IS_G200_SE(mdev)) 295 mgag200_g200se_init_unique_id(mdev); 296 297 ret = mgag200_mm_init(mdev); 298 if (ret) 299 return ERR_PTR(ret); 300 301 ret = mgag200_modeset_init(mdev); 302 if (ret) 303 return ERR_PTR(ret); 304 305 return mdev; 306 } 307 308 /* 309 * PCI driver 310 */ 311 312 static const struct pci_device_id mgag200_pciidlist[] = { 313 { PCI_VENDOR_ID_MATROX, 0x520, PCI_ANY_ID, PCI_ANY_ID, 0, 0, G200_PCI }, 314 { PCI_VENDOR_ID_MATROX, 0x521, PCI_ANY_ID, PCI_ANY_ID, 0, 0, G200_AGP }, 315 { PCI_VENDOR_ID_MATROX, 0x522, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 316 G200_SE_A | MGAG200_FLAG_HW_BUG_NO_STARTADD}, 317 { PCI_VENDOR_ID_MATROX, 0x524, PCI_ANY_ID, PCI_ANY_ID, 0, 0, G200_SE_B }, 318 { PCI_VENDOR_ID_MATROX, 0x530, PCI_ANY_ID, PCI_ANY_ID, 0, 0, G200_EV }, 319 { PCI_VENDOR_ID_MATROX, 0x532, PCI_ANY_ID, PCI_ANY_ID, 0, 0, G200_WB }, 320 { PCI_VENDOR_ID_MATROX, 0x533, PCI_ANY_ID, PCI_ANY_ID, 0, 0, G200_EH }, 321 { PCI_VENDOR_ID_MATROX, 0x534, PCI_ANY_ID, PCI_ANY_ID, 0, 0, G200_ER }, 322 { PCI_VENDOR_ID_MATROX, 0x536, PCI_ANY_ID, PCI_ANY_ID, 0, 0, G200_EW3 }, 323 { PCI_VENDOR_ID_MATROX, 0x538, PCI_ANY_ID, PCI_ANY_ID, 0, 0, G200_EH3 }, 324 {0,} 325 }; 326 327 MODULE_DEVICE_TABLE(pci, mgag200_pciidlist); 328 329 static enum mga_type mgag200_type_from_driver_data(kernel_ulong_t driver_data) 330 { 331 return (enum mga_type)(driver_data & MGAG200_TYPE_MASK); 332 } 333 334 static unsigned long mgag200_flags_from_driver_data(kernel_ulong_t driver_data) 335 { 336 return driver_data & MGAG200_FLAG_MASK; 337 } 338 339 static int 340 mgag200_pci_probe(struct pci_dev *pdev, const struct pci_device_id *ent) 341 { 342 kernel_ulong_t driver_data = ent->driver_data; 343 enum mga_type type = mgag200_type_from_driver_data(driver_data); 344 unsigned long flags = mgag200_flags_from_driver_data(driver_data); 345 struct mga_device *mdev; 346 struct drm_device *dev; 347 int ret; 348 349 ret = drm_aperture_remove_conflicting_pci_framebuffers(pdev, &mgag200_driver); 350 if (ret) 351 return ret; 352 353 ret = pcim_enable_device(pdev); 354 if (ret) 355 return ret; 356 357 mdev = mgag200_device_create(pdev, type, flags); 358 if (IS_ERR(mdev)) 359 return PTR_ERR(mdev); 360 dev = &mdev->base; 361 362 ret = drm_dev_register(dev, 0); 363 if (ret) 364 return ret; 365 366 drm_fbdev_generic_setup(dev, 0); 367 368 return 0; 369 } 370 371 static void mgag200_pci_remove(struct pci_dev *pdev) 372 { 373 struct drm_device *dev = pci_get_drvdata(pdev); 374 375 drm_dev_unregister(dev); 376 } 377 378 static struct pci_driver mgag200_pci_driver = { 379 .name = DRIVER_NAME, 380 .id_table = mgag200_pciidlist, 381 .probe = mgag200_pci_probe, 382 .remove = mgag200_pci_remove, 383 }; 384 385 drm_module_pci_driver_if_modeset(mgag200_pci_driver, mgag200_modeset); 386 387 MODULE_AUTHOR(DRIVER_AUTHOR); 388 MODULE_DESCRIPTION(DRIVER_DESC); 389 MODULE_LICENSE("GPL"); 390