1 /* 2 * Copyright 2012 Red Hat Inc. 3 * 4 * Permission is hereby granted, free of charge, to any person obtaining a 5 * copy of this software and associated documentation files (the 6 * "Software"), to deal in the Software without restriction, including 7 * without limitation the rights to use, copy, modify, merge, publish, 8 * distribute, sub license, and/or sell copies of the Software, and to 9 * permit persons to whom the Software is furnished to do so, subject to 10 * the following conditions: 11 * 12 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 13 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 14 * FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT. IN NO EVENT SHALL 15 * THE COPYRIGHT HOLDERS, AUTHORS AND/OR ITS SUPPLIERS BE LIABLE FOR ANY CLAIM, 16 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR 17 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE 18 * USE OR OTHER DEALINGS IN THE SOFTWARE. 19 * 20 * The above copyright notice and this permission notice (including the 21 * next paragraph) shall be included in all copies or substantial portions 22 * of the Software. 23 * 24 */ 25 /* 26 * Authors: Dave Airlie <airlied@redhat.com> 27 */ 28 29 #include <linux/pci.h> 30 31 #include <drm/drm_atomic_helper.h> 32 #include <drm/drm_crtc_helper.h> 33 #include <drm/drm_drv.h> 34 #include <drm/drm_gem.h> 35 #include <drm/drm_gem_vram_helper.h> 36 #include <drm/drm_managed.h> 37 38 #include "ast_drv.h" 39 40 void ast_set_index_reg_mask(struct ast_private *ast, 41 uint32_t base, uint8_t index, 42 uint8_t mask, uint8_t val) 43 { 44 u8 tmp; 45 ast_io_write8(ast, base, index); 46 tmp = (ast_io_read8(ast, base + 1) & mask) | val; 47 ast_set_index_reg(ast, base, index, tmp); 48 } 49 50 uint8_t ast_get_index_reg(struct ast_private *ast, 51 uint32_t base, uint8_t index) 52 { 53 uint8_t ret; 54 ast_io_write8(ast, base, index); 55 ret = ast_io_read8(ast, base + 1); 56 return ret; 57 } 58 59 uint8_t ast_get_index_reg_mask(struct ast_private *ast, 60 uint32_t base, uint8_t index, uint8_t mask) 61 { 62 uint8_t ret; 63 ast_io_write8(ast, base, index); 64 ret = ast_io_read8(ast, base + 1) & mask; 65 return ret; 66 } 67 68 static void ast_detect_config_mode(struct drm_device *dev, u32 *scu_rev) 69 { 70 struct device_node *np = dev->dev->of_node; 71 struct ast_private *ast = to_ast_private(dev); 72 struct pci_dev *pdev = to_pci_dev(dev->dev); 73 uint32_t data, jregd0, jregd1; 74 75 /* Defaults */ 76 ast->config_mode = ast_use_defaults; 77 *scu_rev = 0xffffffff; 78 79 /* Check if we have device-tree properties */ 80 if (np && !of_property_read_u32(np, "aspeed,scu-revision-id", 81 scu_rev)) { 82 /* We do, disable P2A access */ 83 ast->config_mode = ast_use_dt; 84 drm_info(dev, "Using device-tree for configuration\n"); 85 return; 86 } 87 88 /* Not all families have a P2A bridge */ 89 if (pdev->device != PCI_CHIP_AST2000) 90 return; 91 92 /* 93 * The BMC will set SCU 0x40 D[12] to 1 if the P2 bridge 94 * is disabled. We force using P2A if VGA only mode bit 95 * is set D[7] 96 */ 97 jregd0 = ast_get_index_reg_mask(ast, AST_IO_CRTC_PORT, 0xd0, 0xff); 98 jregd1 = ast_get_index_reg_mask(ast, AST_IO_CRTC_PORT, 0xd1, 0xff); 99 if (!(jregd0 & 0x80) || !(jregd1 & 0x10)) { 100 /* Patch AST2500 */ 101 if (((pdev->revision & 0xF0) == 0x40) 102 && ((jregd0 & AST_VRAM_INIT_STATUS_MASK) == 0)) 103 ast_patch_ahb_2500(ast); 104 105 /* Double check it's actually working */ 106 data = ast_read32(ast, 0xf004); 107 if ((data != 0xFFFFFFFF) && (data != 0x00)) { 108 /* P2A works, grab silicon revision */ 109 ast->config_mode = ast_use_p2a; 110 111 drm_info(dev, "Using P2A bridge for configuration\n"); 112 113 /* Read SCU7c (silicon revision register) */ 114 ast_write32(ast, 0xf004, 0x1e6e0000); 115 ast_write32(ast, 0xf000, 0x1); 116 *scu_rev = ast_read32(ast, 0x1207c); 117 return; 118 } 119 } 120 121 /* We have a P2A bridge but it's disabled */ 122 drm_info(dev, "P2A bridge disabled, using default configuration\n"); 123 } 124 125 static int ast_detect_chip(struct drm_device *dev, bool *need_post) 126 { 127 struct ast_private *ast = to_ast_private(dev); 128 struct pci_dev *pdev = to_pci_dev(dev->dev); 129 uint32_t jreg, scu_rev; 130 131 /* 132 * If VGA isn't enabled, we need to enable now or subsequent 133 * access to the scratch registers will fail. We also inform 134 * our caller that it needs to POST the chip 135 * (Assumption: VGA not enabled -> need to POST) 136 */ 137 if (!ast_is_vga_enabled(dev)) { 138 ast_enable_vga(dev); 139 drm_info(dev, "VGA not enabled on entry, requesting chip POST\n"); 140 *need_post = true; 141 } else 142 *need_post = false; 143 144 145 /* Enable extended register access */ 146 ast_open_key(ast); 147 ast_enable_mmio(dev); 148 149 /* Find out whether P2A works or whether to use device-tree */ 150 ast_detect_config_mode(dev, &scu_rev); 151 152 /* Identify chipset */ 153 if (pdev->revision >= 0x50) { 154 ast->chip = AST2600; 155 drm_info(dev, "AST 2600 detected\n"); 156 } else if (pdev->revision >= 0x40) { 157 ast->chip = AST2500; 158 drm_info(dev, "AST 2500 detected\n"); 159 } else if (pdev->revision >= 0x30) { 160 ast->chip = AST2400; 161 drm_info(dev, "AST 2400 detected\n"); 162 } else if (pdev->revision >= 0x20) { 163 ast->chip = AST2300; 164 drm_info(dev, "AST 2300 detected\n"); 165 } else if (pdev->revision >= 0x10) { 166 switch (scu_rev & 0x0300) { 167 case 0x0200: 168 ast->chip = AST1100; 169 drm_info(dev, "AST 1100 detected\n"); 170 break; 171 case 0x0100: 172 ast->chip = AST2200; 173 drm_info(dev, "AST 2200 detected\n"); 174 break; 175 case 0x0000: 176 ast->chip = AST2150; 177 drm_info(dev, "AST 2150 detected\n"); 178 break; 179 default: 180 ast->chip = AST2100; 181 drm_info(dev, "AST 2100 detected\n"); 182 break; 183 } 184 ast->vga2_clone = false; 185 } else { 186 ast->chip = AST2000; 187 drm_info(dev, "AST 2000 detected\n"); 188 } 189 190 /* Check if we support wide screen */ 191 switch (ast->chip) { 192 case AST2000: 193 ast->support_wide_screen = false; 194 break; 195 default: 196 jreg = ast_get_index_reg_mask(ast, AST_IO_CRTC_PORT, 0xd0, 0xff); 197 if (!(jreg & 0x80)) 198 ast->support_wide_screen = true; 199 else if (jreg & 0x01) 200 ast->support_wide_screen = true; 201 else { 202 ast->support_wide_screen = false; 203 if (ast->chip == AST2300 && 204 (scu_rev & 0x300) == 0x0) /* ast1300 */ 205 ast->support_wide_screen = true; 206 if (ast->chip == AST2400 && 207 (scu_rev & 0x300) == 0x100) /* ast1400 */ 208 ast->support_wide_screen = true; 209 if (ast->chip == AST2500 && 210 scu_rev == 0x100) /* ast2510 */ 211 ast->support_wide_screen = true; 212 if (ast->chip == AST2600) /* ast2600 */ 213 ast->support_wide_screen = true; 214 } 215 break; 216 } 217 218 /* Check 3rd Tx option (digital output afaik) */ 219 ast->tx_chip_types |= AST_TX_NONE_BIT; 220 221 /* 222 * VGACRA3 Enhanced Color Mode Register, check if DVO is already 223 * enabled, in that case, assume we have a SIL164 TMDS transmitter 224 * 225 * Don't make that assumption if we the chip wasn't enabled and 226 * is at power-on reset, otherwise we'll incorrectly "detect" a 227 * SIL164 when there is none. 228 */ 229 if (!*need_post) { 230 jreg = ast_get_index_reg_mask(ast, AST_IO_CRTC_PORT, 0xa3, 0xff); 231 if (jreg & 0x80) 232 ast->tx_chip_types = AST_TX_SIL164_BIT; 233 } 234 235 if ((ast->chip == AST2300) || (ast->chip == AST2400) || (ast->chip == AST2500)) { 236 /* 237 * On AST2300 and 2400, look the configuration set by the SoC in 238 * the SOC scratch register #1 bits 11:8 (interestingly marked 239 * as "reserved" in the spec) 240 */ 241 jreg = ast_get_index_reg_mask(ast, AST_IO_CRTC_PORT, 0xd1, 0xff); 242 switch (jreg) { 243 case 0x04: 244 ast->tx_chip_types = AST_TX_SIL164_BIT; 245 break; 246 case 0x08: 247 ast->dp501_fw_addr = drmm_kzalloc(dev, 32*1024, GFP_KERNEL); 248 if (ast->dp501_fw_addr) { 249 /* backup firmware */ 250 if (ast_backup_fw(dev, ast->dp501_fw_addr, 32*1024)) { 251 drmm_kfree(dev, ast->dp501_fw_addr); 252 ast->dp501_fw_addr = NULL; 253 } 254 } 255 fallthrough; 256 case 0x0c: 257 ast->tx_chip_types = AST_TX_DP501_BIT; 258 } 259 } else if (ast->chip == AST2600) 260 ast_dp_launch(&ast->base, 0); 261 262 /* Print stuff for diagnostic purposes */ 263 if (ast->tx_chip_types & AST_TX_NONE_BIT) 264 drm_info(dev, "Using analog VGA\n"); 265 if (ast->tx_chip_types & AST_TX_SIL164_BIT) 266 drm_info(dev, "Using Sil164 TMDS transmitter\n"); 267 if (ast->tx_chip_types & AST_TX_DP501_BIT) 268 drm_info(dev, "Using DP501 DisplayPort transmitter\n"); 269 270 return 0; 271 } 272 273 static int ast_get_dram_info(struct drm_device *dev) 274 { 275 struct device_node *np = dev->dev->of_node; 276 struct ast_private *ast = to_ast_private(dev); 277 uint32_t mcr_cfg, mcr_scu_mpll, mcr_scu_strap; 278 uint32_t denum, num, div, ref_pll, dsel; 279 280 switch (ast->config_mode) { 281 case ast_use_dt: 282 /* 283 * If some properties are missing, use reasonable 284 * defaults for AST2400 285 */ 286 if (of_property_read_u32(np, "aspeed,mcr-configuration", 287 &mcr_cfg)) 288 mcr_cfg = 0x00000577; 289 if (of_property_read_u32(np, "aspeed,mcr-scu-mpll", 290 &mcr_scu_mpll)) 291 mcr_scu_mpll = 0x000050C0; 292 if (of_property_read_u32(np, "aspeed,mcr-scu-strap", 293 &mcr_scu_strap)) 294 mcr_scu_strap = 0; 295 break; 296 case ast_use_p2a: 297 ast_write32(ast, 0xf004, 0x1e6e0000); 298 ast_write32(ast, 0xf000, 0x1); 299 mcr_cfg = ast_read32(ast, 0x10004); 300 mcr_scu_mpll = ast_read32(ast, 0x10120); 301 mcr_scu_strap = ast_read32(ast, 0x10170); 302 break; 303 case ast_use_defaults: 304 default: 305 ast->dram_bus_width = 16; 306 ast->dram_type = AST_DRAM_1Gx16; 307 if (ast->chip == AST2500) 308 ast->mclk = 800; 309 else 310 ast->mclk = 396; 311 return 0; 312 } 313 314 if (mcr_cfg & 0x40) 315 ast->dram_bus_width = 16; 316 else 317 ast->dram_bus_width = 32; 318 319 if (ast->chip == AST2500) { 320 switch (mcr_cfg & 0x03) { 321 case 0: 322 ast->dram_type = AST_DRAM_1Gx16; 323 break; 324 default: 325 case 1: 326 ast->dram_type = AST_DRAM_2Gx16; 327 break; 328 case 2: 329 ast->dram_type = AST_DRAM_4Gx16; 330 break; 331 case 3: 332 ast->dram_type = AST_DRAM_8Gx16; 333 break; 334 } 335 } else if (ast->chip == AST2300 || ast->chip == AST2400) { 336 switch (mcr_cfg & 0x03) { 337 case 0: 338 ast->dram_type = AST_DRAM_512Mx16; 339 break; 340 default: 341 case 1: 342 ast->dram_type = AST_DRAM_1Gx16; 343 break; 344 case 2: 345 ast->dram_type = AST_DRAM_2Gx16; 346 break; 347 case 3: 348 ast->dram_type = AST_DRAM_4Gx16; 349 break; 350 } 351 } else { 352 switch (mcr_cfg & 0x0c) { 353 case 0: 354 case 4: 355 ast->dram_type = AST_DRAM_512Mx16; 356 break; 357 case 8: 358 if (mcr_cfg & 0x40) 359 ast->dram_type = AST_DRAM_1Gx16; 360 else 361 ast->dram_type = AST_DRAM_512Mx32; 362 break; 363 case 0xc: 364 ast->dram_type = AST_DRAM_1Gx32; 365 break; 366 } 367 } 368 369 if (mcr_scu_strap & 0x2000) 370 ref_pll = 14318; 371 else 372 ref_pll = 12000; 373 374 denum = mcr_scu_mpll & 0x1f; 375 num = (mcr_scu_mpll & 0x3fe0) >> 5; 376 dsel = (mcr_scu_mpll & 0xc000) >> 14; 377 switch (dsel) { 378 case 3: 379 div = 0x4; 380 break; 381 case 2: 382 case 1: 383 div = 0x2; 384 break; 385 default: 386 div = 0x1; 387 break; 388 } 389 ast->mclk = ref_pll * (num + 2) / ((denum + 2) * (div * 1000)); 390 return 0; 391 } 392 393 /* 394 * Run this function as part of the HW device cleanup; not 395 * when the DRM device gets released. 396 */ 397 static void ast_device_release(void *data) 398 { 399 struct ast_private *ast = data; 400 401 /* enable standard VGA decode */ 402 ast_set_index_reg(ast, AST_IO_CRTC_PORT, 0xa1, 0x04); 403 } 404 405 struct ast_private *ast_device_create(const struct drm_driver *drv, 406 struct pci_dev *pdev, 407 unsigned long flags) 408 { 409 struct drm_device *dev; 410 struct ast_private *ast; 411 bool need_post; 412 int ret = 0; 413 414 ast = devm_drm_dev_alloc(&pdev->dev, drv, struct ast_private, base); 415 if (IS_ERR(ast)) 416 return ast; 417 dev = &ast->base; 418 419 pci_set_drvdata(pdev, dev); 420 421 ret = drmm_mutex_init(dev, &ast->ioregs_lock); 422 if (ret) 423 return ERR_PTR(ret); 424 425 ast->regs = pcim_iomap(pdev, 1, 0); 426 if (!ast->regs) 427 return ERR_PTR(-EIO); 428 429 /* 430 * If we don't have IO space at all, use MMIO now and 431 * assume the chip has MMIO enabled by default (rev 0x20 432 * and higher). 433 */ 434 if (!(pci_resource_flags(pdev, 2) & IORESOURCE_IO)) { 435 drm_info(dev, "platform has no IO space, trying MMIO\n"); 436 ast->ioregs = ast->regs + AST_IO_MM_OFFSET; 437 } 438 439 /* "map" IO regs if the above hasn't done so already */ 440 if (!ast->ioregs) { 441 ast->ioregs = pcim_iomap(pdev, 2, 0); 442 if (!ast->ioregs) 443 return ERR_PTR(-EIO); 444 } 445 446 ast_detect_chip(dev, &need_post); 447 448 ret = ast_get_dram_info(dev); 449 if (ret) 450 return ERR_PTR(ret); 451 452 drm_info(dev, "dram MCLK=%u Mhz type=%d bus_width=%d\n", 453 ast->mclk, ast->dram_type, ast->dram_bus_width); 454 455 if (need_post) 456 ast_post_gpu(dev); 457 458 ret = ast_mm_init(ast); 459 if (ret) 460 return ERR_PTR(ret); 461 462 /* map reserved buffer */ 463 ast->dp501_fw_buf = NULL; 464 if (dev->vram_mm->vram_size < pci_resource_len(pdev, 0)) { 465 ast->dp501_fw_buf = pci_iomap_range(pdev, 0, dev->vram_mm->vram_size, 0); 466 if (!ast->dp501_fw_buf) 467 drm_info(dev, "failed to map reserved buffer!\n"); 468 } 469 470 ret = ast_mode_config_init(ast); 471 if (ret) 472 return ERR_PTR(ret); 473 474 ret = devm_add_action_or_reset(dev->dev, ast_device_release, ast); 475 if (ret) 476 return ERR_PTR(ret); 477 478 return ast; 479 } 480