354 lines
9.0 KiB
C
354 lines
9.0 KiB
C
/*
|
|
* Copyright 2011 Red Hat Inc.
|
|
*
|
|
* Permission is hereby granted, free of charge, to any person obtaining a
|
|
* copy of this software and associated documentation files (the "Software"),
|
|
* to deal in the Software without restriction, including without limitation
|
|
* the rights to use, copy, modify, merge, publish, distribute, sublicense,
|
|
* and/or sell copies of the Software, and to permit persons to whom the
|
|
* Software is furnished to do so, subject to the following conditions:
|
|
*
|
|
* The above copyright notice and this permission notice shall be included in
|
|
* all copies or substantial portions of the Software.
|
|
*
|
|
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
|
* THE COPYRIGHT HOLDER(S) OR AUTHOR(S) BE LIABLE FOR ANY CLAIM, DAMAGES OR
|
|
* OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
|
|
* ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
|
|
* OTHER DEALINGS IN THE SOFTWARE.
|
|
*
|
|
* Authors: Ben Skeggs
|
|
*/
|
|
|
|
#include <drm/drmP.h>
|
|
#include "nouveau_drm.h"
|
|
#include "nouveau_bios.h"
|
|
#include "nouveau_pm.h"
|
|
#include "dispnv04/hw.h"
|
|
|
|
#include <subdev/bios/pll.h>
|
|
#include <subdev/clock.h>
|
|
#include <subdev/timer.h>
|
|
|
|
#include <engine/fifo.h>
|
|
|
|
#define min2(a,b) ((a) < (b) ? (a) : (b))
|
|
|
|
static u32
|
|
read_pll_1(struct drm_device *dev, u32 reg)
|
|
{
|
|
struct nouveau_device *device = nouveau_dev(dev);
|
|
u32 ctrl = nv_rd32(device, reg + 0x00);
|
|
int P = (ctrl & 0x00070000) >> 16;
|
|
int N = (ctrl & 0x0000ff00) >> 8;
|
|
int M = (ctrl & 0x000000ff) >> 0;
|
|
u32 ref = 27000, clk = 0;
|
|
|
|
if (ctrl & 0x80000000)
|
|
clk = ref * N / M;
|
|
|
|
return clk >> P;
|
|
}
|
|
|
|
static u32
|
|
read_pll_2(struct drm_device *dev, u32 reg)
|
|
{
|
|
struct nouveau_device *device = nouveau_dev(dev);
|
|
u32 ctrl = nv_rd32(device, reg + 0x00);
|
|
u32 coef = nv_rd32(device, reg + 0x04);
|
|
int N2 = (coef & 0xff000000) >> 24;
|
|
int M2 = (coef & 0x00ff0000) >> 16;
|
|
int N1 = (coef & 0x0000ff00) >> 8;
|
|
int M1 = (coef & 0x000000ff) >> 0;
|
|
int P = (ctrl & 0x00070000) >> 16;
|
|
u32 ref = 27000, clk = 0;
|
|
|
|
if ((ctrl & 0x80000000) && M1) {
|
|
clk = ref * N1 / M1;
|
|
if ((ctrl & 0x40000100) == 0x40000000) {
|
|
if (M2)
|
|
clk = clk * N2 / M2;
|
|
else
|
|
clk = 0;
|
|
}
|
|
}
|
|
|
|
return clk >> P;
|
|
}
|
|
|
|
static u32
|
|
read_clk(struct drm_device *dev, u32 src)
|
|
{
|
|
switch (src) {
|
|
case 3:
|
|
return read_pll_2(dev, 0x004000);
|
|
case 2:
|
|
return read_pll_1(dev, 0x004008);
|
|
default:
|
|
break;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
nv40_pm_clocks_get(struct drm_device *dev, struct nouveau_pm_level *perflvl)
|
|
{
|
|
struct nouveau_device *device = nouveau_dev(dev);
|
|
u32 ctrl = nv_rd32(device, 0x00c040);
|
|
|
|
perflvl->core = read_clk(dev, (ctrl & 0x00000003) >> 0);
|
|
perflvl->shader = read_clk(dev, (ctrl & 0x00000030) >> 4);
|
|
perflvl->memory = read_pll_2(dev, 0x4020);
|
|
return 0;
|
|
}
|
|
|
|
struct nv40_pm_state {
|
|
u32 ctrl;
|
|
u32 npll_ctrl;
|
|
u32 npll_coef;
|
|
u32 spll;
|
|
u32 mpll_ctrl;
|
|
u32 mpll_coef;
|
|
};
|
|
|
|
static int
|
|
nv40_calc_pll(struct drm_device *dev, u32 reg, struct nvbios_pll *pll,
|
|
u32 clk, int *N1, int *M1, int *N2, int *M2, int *log2P)
|
|
{
|
|
struct nouveau_device *device = nouveau_dev(dev);
|
|
struct nouveau_bios *bios = nouveau_bios(device);
|
|
struct nouveau_clock *pclk = nouveau_clock(device);
|
|
struct nouveau_pll_vals coef;
|
|
int ret;
|
|
|
|
ret = nvbios_pll_parse(bios, reg, pll);
|
|
if (ret)
|
|
return ret;
|
|
|
|
if (clk < pll->vco1.max_freq)
|
|
pll->vco2.max_freq = 0;
|
|
|
|
pclk->pll_calc(pclk, pll, clk, &coef);
|
|
if (ret == 0)
|
|
return -ERANGE;
|
|
|
|
*N1 = coef.N1;
|
|
*M1 = coef.M1;
|
|
if (N2 && M2) {
|
|
if (pll->vco2.max_freq) {
|
|
*N2 = coef.N2;
|
|
*M2 = coef.M2;
|
|
} else {
|
|
*N2 = 1;
|
|
*M2 = 1;
|
|
}
|
|
}
|
|
*log2P = coef.log2P;
|
|
return 0;
|
|
}
|
|
|
|
void *
|
|
nv40_pm_clocks_pre(struct drm_device *dev, struct nouveau_pm_level *perflvl)
|
|
{
|
|
struct nv40_pm_state *info;
|
|
struct nvbios_pll pll;
|
|
int N1, N2, M1, M2, log2P;
|
|
int ret;
|
|
|
|
info = kmalloc(sizeof(*info), GFP_KERNEL);
|
|
if (!info)
|
|
return ERR_PTR(-ENOMEM);
|
|
|
|
/* core/geometric clock */
|
|
ret = nv40_calc_pll(dev, 0x004000, &pll, perflvl->core,
|
|
&N1, &M1, &N2, &M2, &log2P);
|
|
if (ret < 0)
|
|
goto out;
|
|
|
|
if (N2 == M2) {
|
|
info->npll_ctrl = 0x80000100 | (log2P << 16);
|
|
info->npll_coef = (N1 << 8) | M1;
|
|
} else {
|
|
info->npll_ctrl = 0xc0000000 | (log2P << 16);
|
|
info->npll_coef = (N2 << 24) | (M2 << 16) | (N1 << 8) | M1;
|
|
}
|
|
|
|
/* use the second PLL for shader/rop clock, if it differs from core */
|
|
if (perflvl->shader && perflvl->shader != perflvl->core) {
|
|
ret = nv40_calc_pll(dev, 0x004008, &pll, perflvl->shader,
|
|
&N1, &M1, NULL, NULL, &log2P);
|
|
if (ret < 0)
|
|
goto out;
|
|
|
|
info->spll = 0xc0000000 | (log2P << 16) | (N1 << 8) | M1;
|
|
info->ctrl = 0x00000223;
|
|
} else {
|
|
info->spll = 0x00000000;
|
|
info->ctrl = 0x00000333;
|
|
}
|
|
|
|
/* memory clock */
|
|
if (!perflvl->memory) {
|
|
info->mpll_ctrl = 0x00000000;
|
|
goto out;
|
|
}
|
|
|
|
ret = nv40_calc_pll(dev, 0x004020, &pll, perflvl->memory,
|
|
&N1, &M1, &N2, &M2, &log2P);
|
|
if (ret < 0)
|
|
goto out;
|
|
|
|
info->mpll_ctrl = 0x80000000 | (log2P << 16);
|
|
info->mpll_ctrl |= min2(pll.bias_p + log2P, pll.max_p) << 20;
|
|
if (N2 == M2) {
|
|
info->mpll_ctrl |= 0x00000100;
|
|
info->mpll_coef = (N1 << 8) | M1;
|
|
} else {
|
|
info->mpll_ctrl |= 0x40000000;
|
|
info->mpll_coef = (N2 << 24) | (M2 << 16) | (N1 << 8) | M1;
|
|
}
|
|
|
|
out:
|
|
if (ret < 0) {
|
|
kfree(info);
|
|
info = ERR_PTR(ret);
|
|
}
|
|
return info;
|
|
}
|
|
|
|
static bool
|
|
nv40_pm_gr_idle(void *data)
|
|
{
|
|
struct drm_device *dev = data;
|
|
struct nouveau_device *device = nouveau_dev(dev);
|
|
|
|
if ((nv_rd32(device, 0x400760) & 0x000000f0) >> 4 !=
|
|
(nv_rd32(device, 0x400760) & 0x0000000f))
|
|
return false;
|
|
|
|
if (nv_rd32(device, 0x400700))
|
|
return false;
|
|
|
|
return true;
|
|
}
|
|
|
|
int
|
|
nv40_pm_clocks_set(struct drm_device *dev, void *pre_state)
|
|
{
|
|
struct nouveau_device *device = nouveau_dev(dev);
|
|
struct nouveau_fifo *pfifo = nouveau_fifo(device);
|
|
struct nouveau_drm *drm = nouveau_drm(dev);
|
|
struct nv40_pm_state *info = pre_state;
|
|
unsigned long flags;
|
|
struct bit_entry M;
|
|
u32 crtc_mask = 0;
|
|
u8 sr1[2];
|
|
int i, ret = -EAGAIN;
|
|
|
|
/* determine which CRTCs are active, fetch VGA_SR1 for each */
|
|
for (i = 0; i < 2; i++) {
|
|
u32 vbl = nv_rd32(device, 0x600808 + (i * 0x2000));
|
|
u32 cnt = 0;
|
|
do {
|
|
if (vbl != nv_rd32(device, 0x600808 + (i * 0x2000))) {
|
|
nv_wr08(device, 0x0c03c4 + (i * 0x2000), 0x01);
|
|
sr1[i] = nv_rd08(device, 0x0c03c5 + (i * 0x2000));
|
|
if (!(sr1[i] & 0x20))
|
|
crtc_mask |= (1 << i);
|
|
break;
|
|
}
|
|
udelay(1);
|
|
} while (cnt++ < 32);
|
|
}
|
|
|
|
/* halt and idle engines */
|
|
pfifo->pause(pfifo, &flags);
|
|
|
|
if (!nv_wait_cb(device, nv40_pm_gr_idle, dev))
|
|
goto resume;
|
|
|
|
ret = 0;
|
|
|
|
/* set engine clocks */
|
|
nv_mask(device, 0x00c040, 0x00000333, 0x00000000);
|
|
nv_wr32(device, 0x004004, info->npll_coef);
|
|
nv_mask(device, 0x004000, 0xc0070100, info->npll_ctrl);
|
|
nv_mask(device, 0x004008, 0xc007ffff, info->spll);
|
|
mdelay(5);
|
|
nv_mask(device, 0x00c040, 0x00000333, info->ctrl);
|
|
|
|
if (!info->mpll_ctrl)
|
|
goto resume;
|
|
|
|
/* wait for vblank start on active crtcs, disable memory access */
|
|
for (i = 0; i < 2; i++) {
|
|
if (!(crtc_mask & (1 << i)))
|
|
continue;
|
|
nv_wait(device, 0x600808 + (i * 0x2000), 0x00010000, 0x00000000);
|
|
nv_wait(device, 0x600808 + (i * 0x2000), 0x00010000, 0x00010000);
|
|
nv_wr08(device, 0x0c03c4 + (i * 0x2000), 0x01);
|
|
nv_wr08(device, 0x0c03c5 + (i * 0x2000), sr1[i] | 0x20);
|
|
}
|
|
|
|
/* prepare ram for reclocking */
|
|
nv_wr32(device, 0x1002d4, 0x00000001); /* precharge */
|
|
nv_wr32(device, 0x1002d0, 0x00000001); /* refresh */
|
|
nv_wr32(device, 0x1002d0, 0x00000001); /* refresh */
|
|
nv_mask(device, 0x100210, 0x80000000, 0x00000000); /* no auto refresh */
|
|
nv_wr32(device, 0x1002dc, 0x00000001); /* enable self-refresh */
|
|
|
|
/* change the PLL of each memory partition */
|
|
nv_mask(device, 0x00c040, 0x0000c000, 0x00000000);
|
|
switch (nv_device(drm->device)->chipset) {
|
|
case 0x40:
|
|
case 0x45:
|
|
case 0x41:
|
|
case 0x42:
|
|
case 0x47:
|
|
nv_mask(device, 0x004044, 0xc0771100, info->mpll_ctrl);
|
|
nv_mask(device, 0x00402c, 0xc0771100, info->mpll_ctrl);
|
|
nv_wr32(device, 0x004048, info->mpll_coef);
|
|
nv_wr32(device, 0x004030, info->mpll_coef);
|
|
case 0x43:
|
|
case 0x49:
|
|
case 0x4b:
|
|
nv_mask(device, 0x004038, 0xc0771100, info->mpll_ctrl);
|
|
nv_wr32(device, 0x00403c, info->mpll_coef);
|
|
default:
|
|
nv_mask(device, 0x004020, 0xc0771100, info->mpll_ctrl);
|
|
nv_wr32(device, 0x004024, info->mpll_coef);
|
|
break;
|
|
}
|
|
udelay(100);
|
|
nv_mask(device, 0x00c040, 0x0000c000, 0x0000c000);
|
|
|
|
/* re-enable normal operation of memory controller */
|
|
nv_wr32(device, 0x1002dc, 0x00000000);
|
|
nv_mask(device, 0x100210, 0x80000000, 0x80000000);
|
|
udelay(100);
|
|
|
|
/* execute memory reset script from vbios */
|
|
if (!bit_table(dev, 'M', &M))
|
|
nouveau_bios_run_init_table(dev, ROM16(M.data[0]), NULL, 0);
|
|
|
|
/* make sure we're in vblank (hopefully the same one as before), and
|
|
* then re-enable crtc memory access
|
|
*/
|
|
for (i = 0; i < 2; i++) {
|
|
if (!(crtc_mask & (1 << i)))
|
|
continue;
|
|
nv_wait(device, 0x600808 + (i * 0x2000), 0x00010000, 0x00010000);
|
|
nv_wr08(device, 0x0c03c4 + (i * 0x2000), 0x01);
|
|
nv_wr08(device, 0x0c03c5 + (i * 0x2000), sr1[i]);
|
|
}
|
|
|
|
/* resume engines */
|
|
resume:
|
|
pfifo->start(pfifo, &flags);
|
|
kfree(info);
|
|
return ret;
|
|
}
|