drivers/gpu/drm/nouveau/nouveau_perf.c - maze/linux - Git at Google

 /*
  * Copyright 2010 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 "drmP.h"

 #include "nouveau_drv.h"
 #include "nouveau_pm.h"

 static void
 legacy_perf_init(struct drm_device *dev)
 {
 	struct drm_nouveau_private *dev_priv = dev->dev_private;
 	struct nvbios *bios = &dev_priv->vbios;
 	struct nouveau_pm_engine *pm = &dev_priv->engine.pm;
 	char *perf, *entry, *bmp = &bios->data[bios->offset];
 	int headerlen, use_straps;

 	if (bmp[5] < 0x5 || bmp[6] < 0x14) {
 		NV_DEBUG(dev, "BMP version too old for perf\n");
 		return;
 	}

 	perf = ROMPTR(bios, bmp[0x73]);
 	if (!perf) {
 		NV_DEBUG(dev, "No memclock table pointer found.\n");
 		return;
 	}

 	switch (perf[0]) {
 	case 0x12:
 	case 0x14:
 	case 0x18:
 		use_straps = 0;
 		headerlen = 1;
 		break;
 	case 0x01:
 		use_straps = perf[1] & 1;
 		headerlen = (use_straps ? 8 : 2);
 		break;
 	default:
 		NV_WARN(dev, "Unknown memclock table version %x.\n", perf[0]);
 		return;
 	}

 	entry = perf + headerlen;
 	if (use_straps)
 		entry += (nv_rd32(dev, NV_PEXTDEV_BOOT_0) & 0x3c) >> 1;

 	sprintf(pm->perflvl[0].name, "performance_level_0");
 	pm->perflvl[0].memory = ROM16(entry[0]) * 20;
 	pm->nr_perflvl = 1;
 }

 static struct nouveau_pm_memtiming *
 nouveau_perf_timing(struct drm_device *dev, struct bit_entry *P,
 		    u16 memclk, u8 *entry, u8 recordlen, u8 entries)
 {
 	struct drm_nouveau_private *dev_priv = dev->dev_private;
 	struct nouveau_pm_engine *pm = &dev_priv->engine.pm;
 	struct nvbios *bios = &dev_priv->vbios;
 	u8 ramcfg;
 	int i;

 	/* perf v2 has a separate "timing map" table, we have to match
 	 * the target memory clock to a specific entry, *then* use
 	 * ramcfg to select the correct subentry
 	 */
 	if (P->version == 2) {
 		u8 *tmap = ROMPTR(bios, P->data[4]);
 		if (!tmap) {
 			NV_DEBUG(dev, "no timing map pointer\n");
 			return NULL;
 		}

 		if (tmap[0] != 0x10) {
 			NV_WARN(dev, "timing map 0x%02x unknown\n", tmap[0]);
 			return NULL;
 		}

 		entry = tmap + tmap[1];
 		recordlen = tmap[2] + (tmap[4] * tmap[3]);
 		for (i = 0; i < tmap[5]; i++, entry += recordlen) {
 			if (memclk >= ROM16(entry[0]) &&
 			    memclk <= ROM16(entry[2]))
 				break;
 		}

 		if (i == tmap[5]) {
 			NV_WARN(dev, "no match in timing map table\n");
 			return NULL;
 		}

 		entry += tmap[2];
 		recordlen = tmap[3];
 		entries   = tmap[4];
 	}

 	ramcfg = (nv_rd32(dev, NV_PEXTDEV_BOOT_0) & 0x0000003c) >> 2;
 	if (bios->ram_restrict_tbl_ptr)
 		ramcfg = bios->data[bios->ram_restrict_tbl_ptr + ramcfg];

 	if (ramcfg >= entries) {
 		NV_WARN(dev, "ramcfg strap out of bounds!\n");
 		return NULL;
 	}

 	entry += ramcfg * recordlen;
 	if (entry[1] >= pm->memtimings.nr_timing) {
 		NV_WARN(dev, "timingset %d does not exist\n", entry[1]);
 		return NULL;
 	}

 	return &pm->memtimings.timing[entry[1]];
 }

 void
 nouveau_perf_init(struct drm_device *dev)
 {
 	struct drm_nouveau_private *dev_priv = dev->dev_private;
 	struct nouveau_pm_engine *pm = &dev_priv->engine.pm;
 	struct nvbios *bios = &dev_priv->vbios;
 	struct bit_entry P;
 	u8 version, headerlen, recordlen, entries;
 	u8 *perf, *entry;
 	int vid, i;

 	if (bios->type == NVBIOS_BIT) {
 		if (bit_table(dev, 'P', &P))
 			return;

 		if (P.version != 1 && P.version != 2) {
 			NV_WARN(dev, "unknown perf for BIT P %d\n", P.version);
 			return;
 		}

 		perf = ROMPTR(bios, P.data[0]);
 		version   = perf[0];
 		headerlen = perf[1];
 		if (version < 0x40) {
 			recordlen = perf[3] + (perf[4] * perf[5]);
 			entries   = perf[2];
 		} else {
 			recordlen = perf[2] + (perf[3] * perf[4]);
 			entries   = perf[5];
 		}
 	} else {
 		if (bios->data[bios->offset + 6] < 0x25) {
 			legacy_perf_init(dev);
 			return;
 		}

 		perf = ROMPTR(bios, bios->data[bios->offset + 0x94]);
 		if (!perf) {
 			NV_DEBUG(dev, "perf table pointer invalid\n");
 			return;
 		}

 		version   = perf[1];
 		headerlen = perf[0];
 		recordlen = perf[3];
 		entries   = perf[2];
 	}

 	entry = perf + headerlen;
 	for (i = 0; i < entries; i++) {
 		struct nouveau_pm_level *perflvl = &pm->perflvl[pm->nr_perflvl];

 		perflvl->timing = NULL;

 		if (entry[0] == 0xff) {
 			entry += recordlen;
 			continue;
 		}

 		switch (version) {
 		case 0x12:
 		case 0x13:
 		case 0x15:
 			perflvl->fanspeed = entry[55];
 			perflvl->voltage = (recordlen > 56) ? entry[56] : 0;
 			perflvl->core = ROM32(entry[1]) * 10;
 			perflvl->memory = ROM32(entry[5]) * 20;
 			break;
 		case 0x21:
 		case 0x23:
 		case 0x24:
 			perflvl->fanspeed = entry[4];
 			perflvl->voltage = entry[5];
 			perflvl->core = ROM16(entry[6]) * 1000;

 			if (dev_priv->chipset == 0x49 ||
 			    dev_priv->chipset == 0x4b)
 				perflvl->memory = ROM16(entry[11]) * 1000;
 			else
 				perflvl->memory = ROM16(entry[11]) * 2000;

 			break;
 		case 0x25:
 			perflvl->fanspeed = entry[4];
 			perflvl->voltage = entry[5];
 			perflvl->core = ROM16(entry[6]) * 1000;
 			perflvl->shader = ROM16(entry[10]) * 1000;
 			perflvl->memory = ROM16(entry[12]) * 1000;
 			break;
 		case 0x30:
 			perflvl->memscript = ROM16(entry[2]);
 		case 0x35:
 			perflvl->fanspeed = entry[6];
 			perflvl->voltage = entry[7];
 			perflvl->core = ROM16(entry[8]) * 1000;
 			perflvl->shader = ROM16(entry[10]) * 1000;
 			perflvl->memory = ROM16(entry[12]) * 1000;
 			/*XXX: confirm on 0x35 */
 			perflvl->unk05 = ROM16(entry[16]) * 1000;
 			break;
 		case 0x40:
 #define subent(n) entry[perf[2] + ((n) * perf[3])]
 			perflvl->fanspeed = 0; /*XXX*/
 			perflvl->voltage = entry[2];
 			if (dev_priv->card_type == NV_50) {
 				perflvl->core = ROM16(subent(0)) & 0xfff;
 				perflvl->shader = ROM16(subent(1)) & 0xfff;
 				perflvl->memory = ROM16(subent(2)) & 0xfff;
 			} else {
 				perflvl->shader = ROM16(subent(3)) & 0xfff;
 				perflvl->core   = perflvl->shader / 2;
 				perflvl->unk0a  = ROM16(subent(4)) & 0xfff;
 				perflvl->memory = ROM16(subent(5)) & 0xfff;
 			}

 			perflvl->core *= 1000;
 			perflvl->shader *= 1000;
 			perflvl->memory *= 1000;
 			perflvl->unk0a *= 1000;
 			break;
 		}

 		/* make sure vid is valid */
 		if (pm->voltage.supported && perflvl->voltage) {
 			vid = nouveau_volt_vid_lookup(dev, perflvl->voltage);
 			if (vid < 0) {
 				NV_DEBUG(dev, "drop perflvl %d, bad vid\n", i);
 				entry += recordlen;
 				continue;
 			}
 		}

 		/* get the corresponding memory timings */
 		if (version > 0x15) {
 			/* last 3 args are for < 0x40, ignored for >= 0x40 */
 			perflvl->timing =
 				nouveau_perf_timing(dev, &P,
 						    perflvl->memory / 1000,
 						    entry + perf[3],
 						    perf[5], perf[4]);
 		}

 		snprintf(perflvl->name, sizeof(perflvl->name),
 			 "performance_level_%d", i);
 		perflvl->id = i;
 		pm->nr_perflvl++;

 		entry += recordlen;
 	}
 }

 void
 nouveau_perf_fini(struct drm_device *dev)
 {
 }
	/*
	* Copyright 2010 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 "drmP.h"

	#include "nouveau_drv.h"
	#include "nouveau_pm.h"

	static void
	legacy_perf_init(struct drm_device *dev)
	{
	struct drm_nouveau_private *dev_priv = dev->dev_private;
	struct nvbios *bios = &dev_priv->vbios;
	struct nouveau_pm_engine *pm = &dev_priv->engine.pm;
	char perf, entry, *bmp = &bios->data[bios->offset];
	int headerlen, use_straps;

	if (bmp[5] < 0x5 \|\| bmp[6] < 0x14) {
	NV_DEBUG(dev, "BMP version too old for perf\n");
	return;
	}

	perf = ROMPTR(bios, bmp[0x73]);
	if (!perf) {
	NV_DEBUG(dev, "No memclock table pointer found.\n");
	return;
	}

	switch (perf[0]) {
	case 0x12:
	case 0x14:
	case 0x18:
	use_straps = 0;
	headerlen = 1;
	break;
	case 0x01:
	use_straps = perf[1] & 1;
	headerlen = (use_straps ? 8 : 2);
	break;
	default:
	NV_WARN(dev, "Unknown memclock table version %x.\n", perf[0]);
	return;
	}

	entry = perf + headerlen;
	if (use_straps)
	entry += (nv_rd32(dev, NV_PEXTDEV_BOOT_0) & 0x3c) >> 1;

	sprintf(pm->perflvl[0].name, "performance_level_0");
	pm->perflvl[0].memory = ROM16(entry[0]) * 20;
	pm->nr_perflvl = 1;
	}

	static struct nouveau_pm_memtiming *
	nouveau_perf_timing(struct drm_device dev, struct bit_entry P,
	u16 memclk, u8 *entry, u8 recordlen, u8 entries)
	{
	struct drm_nouveau_private *dev_priv = dev->dev_private;
	struct nouveau_pm_engine *pm = &dev_priv->engine.pm;
	struct nvbios *bios = &dev_priv->vbios;
	u8 ramcfg;
	int i;

	/* perf v2 has a separate "timing map" table, we have to match
	* the target memory clock to a specific entry, then use
	* ramcfg to select the correct subentry
	*/
	if (P->version == 2) {
	u8 *tmap = ROMPTR(bios, P->data[4]);
	if (!tmap) {
	NV_DEBUG(dev, "no timing map pointer\n");
	return NULL;
	}

	if (tmap[0] != 0x10) {
	NV_WARN(dev, "timing map 0x%02x unknown\n", tmap[0]);
	return NULL;
	}

	entry = tmap + tmap[1];
	recordlen = tmap[2] + (tmap[4] * tmap[3]);
	for (i = 0; i < tmap[5]; i++, entry += recordlen) {
	if (memclk >= ROM16(entry[0]) &&
	memclk <= ROM16(entry[2]))
	break;
	}

	if (i == tmap[5]) {
	NV_WARN(dev, "no match in timing map table\n");
	return NULL;
	}

	entry += tmap[2];
	recordlen = tmap[3];
	entries = tmap[4];
	}

	ramcfg = (nv_rd32(dev, NV_PEXTDEV_BOOT_0) & 0x0000003c) >> 2;
	if (bios->ram_restrict_tbl_ptr)
	ramcfg = bios->data[bios->ram_restrict_tbl_ptr + ramcfg];

	if (ramcfg >= entries) {
	NV_WARN(dev, "ramcfg strap out of bounds!\n");
	return NULL;
	}

	entry += ramcfg * recordlen;
	if (entry[1] >= pm->memtimings.nr_timing) {
	NV_WARN(dev, "timingset %d does not exist\n", entry[1]);
	return NULL;
	}

	return &pm->memtimings.timing[entry[1]];
	}

	void
	nouveau_perf_init(struct drm_device *dev)
	{
	struct drm_nouveau_private *dev_priv = dev->dev_private;
	struct nouveau_pm_engine *pm = &dev_priv->engine.pm;
	struct nvbios *bios = &dev_priv->vbios;
	struct bit_entry P;
	u8 version, headerlen, recordlen, entries;
	u8 perf, entry;
	int vid, i;

	if (bios->type == NVBIOS_BIT) {
	if (bit_table(dev, 'P', &P))
	return;

	if (P.version != 1 && P.version != 2) {
	NV_WARN(dev, "unknown perf for BIT P %d\n", P.version);
	return;
	}

	perf = ROMPTR(bios, P.data[0]);
	version = perf[0];
	headerlen = perf[1];
	if (version < 0x40) {
	recordlen = perf[3] + (perf[4] * perf[5]);
	entries = perf[2];
	} else {
	recordlen = perf[2] + (perf[3] * perf[4]);
	entries = perf[5];
	}
	} else {
	if (bios->data[bios->offset + 6] < 0x25) {
	legacy_perf_init(dev);
	return;
	}

	perf = ROMPTR(bios, bios->data[bios->offset + 0x94]);
	if (!perf) {
	NV_DEBUG(dev, "perf table pointer invalid\n");
	return;
	}

	version = perf[1];
	headerlen = perf[0];
	recordlen = perf[3];
	entries = perf[2];
	}

	entry = perf + headerlen;
	for (i = 0; i < entries; i++) {
	struct nouveau_pm_level *perflvl = &pm->perflvl[pm->nr_perflvl];

	perflvl->timing = NULL;

	if (entry[0] == 0xff) {
	entry += recordlen;
	continue;
	}

	switch (version) {
	case 0x12:
	case 0x13:
	case 0x15:
	perflvl->fanspeed = entry[55];
	perflvl->voltage = (recordlen > 56) ? entry[56] : 0;
	perflvl->core = ROM32(entry[1]) * 10;
	perflvl->memory = ROM32(entry[5]) * 20;
	break;
	case 0x21:
	case 0x23:
	case 0x24:
	perflvl->fanspeed = entry[4];
	perflvl->voltage = entry[5];
	perflvl->core = ROM16(entry[6]) * 1000;

	if (dev_priv->chipset == 0x49 \|\|
	dev_priv->chipset == 0x4b)
	perflvl->memory = ROM16(entry[11]) * 1000;
	else
	perflvl->memory = ROM16(entry[11]) * 2000;

	break;
	case 0x25:
	perflvl->fanspeed = entry[4];
	perflvl->voltage = entry[5];
	perflvl->core = ROM16(entry[6]) * 1000;
	perflvl->shader = ROM16(entry[10]) * 1000;
	perflvl->memory = ROM16(entry[12]) * 1000;
	break;
	case 0x30:
	perflvl->memscript = ROM16(entry[2]);
	case 0x35:
	perflvl->fanspeed = entry[6];
	perflvl->voltage = entry[7];
	perflvl->core = ROM16(entry[8]) * 1000;
	perflvl->shader = ROM16(entry[10]) * 1000;
	perflvl->memory = ROM16(entry[12]) * 1000;
	/XXX: confirm on 0x35 /
	perflvl->unk05 = ROM16(entry[16]) * 1000;
	break;
	case 0x40:
	#define subent(n) entry[perf[2] + ((n) * perf[3])]
	perflvl->fanspeed = 0; /XXX/
	perflvl->voltage = entry[2];
	if (dev_priv->card_type == NV_50) {
	perflvl->core = ROM16(subent(0)) & 0xfff;
	perflvl->shader = ROM16(subent(1)) & 0xfff;
	perflvl->memory = ROM16(subent(2)) & 0xfff;
	} else {
	perflvl->shader = ROM16(subent(3)) & 0xfff;
	perflvl->core = perflvl->shader / 2;
	perflvl->unk0a = ROM16(subent(4)) & 0xfff;
	perflvl->memory = ROM16(subent(5)) & 0xfff;
	}

	perflvl->core *= 1000;
	perflvl->shader *= 1000;
	perflvl->memory *= 1000;
	perflvl->unk0a *= 1000;
	break;
	}

	/* make sure vid is valid */
	if (pm->voltage.supported && perflvl->voltage) {
	vid = nouveau_volt_vid_lookup(dev, perflvl->voltage);
	if (vid < 0) {
	NV_DEBUG(dev, "drop perflvl %d, bad vid\n", i);
	entry += recordlen;
	continue;
	}
	}

	/* get the corresponding memory timings */
	if (version > 0x15) {
	/* last 3 args are for < 0x40, ignored for >= 0x40 */
	perflvl->timing =
	nouveau_perf_timing(dev, &P,
	perflvl->memory / 1000,
	entry + perf[3],
	perf[5], perf[4]);
	}

	snprintf(perflvl->name, sizeof(perflvl->name),
	"performance_level_%d", i);
	perflvl->id = i;
	pm->nr_perflvl++;

	entry += recordlen;
	}
	}

	void
	nouveau_perf_fini(struct drm_device *dev)
	{
	}