drivers/gpu/drm/nouveau/core/subdev/therm/nv50.c

   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 "Software"),
   6  * to deal in the Software without restriction, including without limitation
   7  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
   8  * and/or sell copies of the Software, and to permit persons to whom the
   9  * Software is furnished to do so, subject to the following conditions:
  10  *
  11  * The above copyright notice and this permission notice shall be included in
  12  * all copies or substantial portions of the Software.
  13  *
  14  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  15  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  16  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
  17  * THE COPYRIGHT HOLDER(S) OR AUTHOR(S) BE LIABLE FOR ANY CLAIM, DAMAGES OR
  18  * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
  19  * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
  20  * OTHER DEALINGS IN THE SOFTWARE.
  21  *
  22  * Authors: Ben Skeggs
  23  *          Martin Peres
  24  */
  25
  26 #include "priv.h"
  27
  28 struct nv50_therm_priv {
  29         struct nouveau_therm_priv base;
  30 };
  31
  32 static int
  33 pwm_info(struct nouveau_therm *therm, int *line, int *ctrl, int *indx)
  34 {
  35         if (*line == 0x04) {
  36                 *ctrl = 0x00e100;
  37                 *line = 4;
  38                 *indx = 0;
  39         } else
  40         if (*line == 0x09) {
  41                 *ctrl = 0x00e100;
  42                 *line = 9;
  43                 *indx = 1;
  44         } else
  45         if (*line == 0x10) {
  46                 *ctrl = 0x00e28c;
  47                 *line = 0;
  48                 *indx = 0;
  49         } else {
  50                 nv_error(therm, "unknown pwm ctrl for gpio %d\n", *line);
  51                 return -ENODEV;
  52         }
  53
  54         return 0;
  55 }
  56
  57 int
  58 nv50_fan_pwm_ctrl(struct nouveau_therm *therm, int line, bool enable)
  59 {
  60         u32 data = enable ? 0x00000001 : 0x00000000;
  61         int ctrl, id, ret = pwm_info(therm, &line, &ctrl, &id);
  62         if (ret == 0)
  63                 nv_mask(therm, ctrl, 0x00010001 << line, data << line);
  64         return ret;
  65 }
  66
  67 int
  68 nv50_fan_pwm_get(struct nouveau_therm *therm, int line, u32 *divs, u32 *duty)
  69 {
  70         int ctrl, id, ret = pwm_info(therm, &line, &ctrl, &id);
  71         if (ret)
  72                 return ret;
  73
  74         if (nv_rd32(therm, ctrl) & (1 << line)) {
  75                 *divs = nv_rd32(therm, 0x00e114 + (id * 8));
  76                 *duty = nv_rd32(therm, 0x00e118 + (id * 8));
  77                 return 0;
  78         }
  79
  80         return -EINVAL;
  81 }
  82
  83 int
  84 nv50_fan_pwm_set(struct nouveau_therm *therm, int line, u32 divs, u32 duty)
  85 {
  86         int ctrl, id, ret = pwm_info(therm, &line, &ctrl, &id);
  87         if (ret)
  88                 return ret;
  89
  90         nv_wr32(therm, 0x00e114 + (id * 8), divs);
  91         nv_wr32(therm, 0x00e118 + (id * 8), duty | 0x80000000);
  92         return 0;
  93 }
  94
  95 int
  96 nv50_fan_pwm_clock(struct nouveau_therm *therm)
  97 {
  98         int chipset = nv_device(therm)->chipset;
  99         int crystal = nv_device(therm)->crystal;
 100         int pwm_clock;
 101
 102         /* determine the PWM source clock */
 103         if (chipset > 0x50 && chipset < 0x94) {
 104                 u8 pwm_div = nv_rd32(therm, 0x410c);
 105                 if (nv_rd32(therm, 0xc040) & 0x800000) {
 106                         /* Use the HOST clock (100 MHz)
 107                         * Where does this constant(2.4) comes from? */
 108                         pwm_clock = (100000000 >> pwm_div) * 10 / 24;
 109                 } else {
 110                         /* Where does this constant(20) comes from? */
 111                         pwm_clock = (crystal * 1000) >> pwm_div;
 112                         pwm_clock /= 20;
 113                 }
 114         } else {
 115                 pwm_clock = (crystal * 1000) / 20;
 116         }
 117
 118         return pwm_clock;
 119 }
 120
 121 static void
 122 nv50_sensor_setup(struct nouveau_therm *therm)
 123 {
 124         nv_mask(therm, 0x20010, 0x40000000, 0x0);
 125         mdelay(20); /* wait for the temperature to stabilize */
 126 }
 127
 128 static int
 129 nv50_temp_get(struct nouveau_therm *therm)
 130 {
 131         struct nouveau_therm_priv *priv = (void *)therm;
 132         struct nvbios_therm_sensor *sensor = &priv->bios_sensor;
 133         int core_temp;
 134
 135         core_temp = nv_rd32(therm, 0x20014) & 0x3fff;
 136
 137         /* if the slope or the offset is unset, do no use the sensor */
 138         if (!sensor->slope_div || !sensor->slope_mult ||
 139             !sensor->offset_num || !sensor->offset_den)
 140             return -ENODEV;
 141
 142         core_temp = core_temp * sensor->slope_mult / sensor->slope_div;
 143         core_temp = core_temp + sensor->offset_num / sensor->offset_den;
 144         core_temp = core_temp + sensor->offset_constant - 8;
 145
 146         /* reserve negative temperatures for errors */
 147         if (core_temp < 0)
 148                 core_temp = 0;
 149
 150         return core_temp;
 151 }
 152
 153 static int
 154 nv50_therm_ctor(struct nouveau_object *parent,
 155                 struct nouveau_object *engine,
 156                 struct nouveau_oclass *oclass, void *data, u32 size,
 157                 struct nouveau_object **pobject)
 158 {
 159         struct nv50_therm_priv *priv;
 160         int ret;
 161
 162         ret = nouveau_therm_create(parent, engine, oclass, &priv);
 163         *pobject = nv_object(priv);
 164         if (ret)
 165                 return ret;
 166
 167         priv->base.base.pwm_ctrl = nv50_fan_pwm_ctrl;
 168         priv->base.base.pwm_get = nv50_fan_pwm_get;
 169         priv->base.base.pwm_set = nv50_fan_pwm_set;
 170         priv->base.base.pwm_clock = nv50_fan_pwm_clock;
 171         priv->base.base.temp_get = nv50_temp_get;
 172         priv->base.sensor.program_alarms = nouveau_therm_program_alarms_polling;
 173         nv_subdev(priv)->intr = nv40_therm_intr;
 174
 175         return nouveau_therm_preinit(&priv->base.base);
 176 }
 177
 178 static int
 179 nv50_therm_init(struct nouveau_object *object)
 180 {
 181         struct nouveau_therm *therm = (void *)object;
 182
 183         nv50_sensor_setup(therm);
 184
 185         return _nouveau_therm_init(object);
 186 }
 187
 188 struct nouveau_oclass
 189 nv50_therm_oclass = {
 190         .handle = NV_SUBDEV(THERM, 0x50),
 191         .ofuncs = &(struct nouveau_ofuncs) {
 192                 .ctor = nv50_therm_ctor,
 193                 .dtor = _nouveau_therm_dtor,
 194                 .init = nv50_therm_init,
 195                 .fini = _nouveau_therm_fini,
 196         },
 197 };