2 Copyright (C) 2010-2011 thgreasi@gmail.com
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
23 /* AMD id for the aticonfig */
29 #define _(str) gettext(str)
40 typedef int (*ADL_MAIN_CONTROL_CREATE)(ADL_MAIN_MALLOC_CALLBACK, int);
41 typedef int (*ADL_MAIN_CONTROL_DESTROY)();
42 typedef int (*ADL_ADAPTER_NUMBEROFADAPTERS_GET) (int *);
43 typedef int (*ADL_ADAPTER_ADAPTERINFO_GET) (LPAdapterInfo, int);
44 typedef int (*ADL_ADAPTER_ACTIVE_GET) (int, int*);
45 typedef int (*ADL_OVERDRIVE5_TEMPERATURE_GET) (int, int, ADLTemperature*);
46 typedef int (*ADL_OVERDRIVE5_FANSPEED_GET) (int, int, ADLFanSpeedValue*);
48 static ADL_MAIN_CONTROL_CREATE adl_main_control_create;
49 static ADL_MAIN_CONTROL_DESTROY adl_main_control_destroy;
50 static ADL_ADAPTER_NUMBEROFADAPTERS_GET adl_adapter_numberofadapters_get;
51 static ADL_ADAPTER_ADAPTERINFO_GET adl_adapter_adapterinfo_get;
52 static ADL_ADAPTER_ACTIVE_GET adl_adapter_active_get;
53 static ADL_OVERDRIVE5_TEMPERATURE_GET adl_overdrive5_temperature_get;
54 static ADL_OVERDRIVE5_FANSPEED_GET adl_overdrive5_fanspeed_get;
57 static int adl_main_control_done;
58 static int *active_amd_adapters;
60 /* Memory allocation function */
61 static void __stdcall *adl_main_memory_alloc(int isize)
63 void *lpbuffer = malloc(isize);
67 /* Optional Memory de-allocation function */
68 static void __stdcall adl_main_memory_free(void **lpbuffer)
76 static void *getprocaddress(void *plibrary, const char * name)
78 return dlsym(plibrary, name);
82 Returns the temperature (Celcius) of an AMD/Ati GPU.
84 static double get_temp(struct psensor *sensor)
86 ADLTemperature temperature;
88 temperature.iSize = sizeof(ADLTemperature);
89 temperature.iTemperature = -273;
90 if (ADL_OK != adl_overdrive5_temperature_get(sensor->amd_id,
92 return UNKNOWN_DBL_VALUE;
94 return temperature.iTemperature/1000;
97 static double get_fanspeed(struct psensor *sensor)
99 ADLFanSpeedValue fanspeedvalue;
101 fanspeedvalue.iSize = sizeof(ADLFanSpeedValue);
102 fanspeedvalue.iSpeedType = ADL_DL_FANCTRL_SPEED_TYPE_RPM;
103 fanspeedvalue.iFanSpeed = -1;
104 if (ADL_OK != adl_overdrive5_fanspeed_get(sensor->amd_id,
106 return UNKNOWN_DBL_VALUE;
108 return fanspeedvalue.iFanSpeed;
111 static struct psensor *create_sensor(int id, int values_len)
119 if (id & 1) {/* odd number ids represent fan sensors */
121 sprintf(name, "GPU%dfan", id);
122 sensor_type = SENSOR_TYPE_AMD_FAN;
123 } else {/* even number ids represent temperature sensors */
125 sprintf(name, "GPU%dtemp", id);
126 sensor_type = SENSOR_TYPE_AMD_TEMP;
129 sid = malloc(strlen("AMD") + 1 + strlen(name) + 1);
130 sprintf(sid, "AMD %s", name);
132 s = psensor_create(sid, strdup(name),
133 sensor_type, values_len);
135 s->amd_id = active_amd_adapters[id];
141 Returns the number of AMD/Ati GPU sensors (temperature and fan
144 Return 0 if no AMD/Ati gpus or cannot get information.
148 LPAdapterInfo lpadapterinfo = NULL;
149 int i, inumberadapters, inumberadaptersactive = 0;
150 int lpstatus, iadapterindex;
153 adl_main_control_done = 0;
154 active_amd_adapters = NULL;
155 hdll = dlopen("libatiadlxx.so", RTLD_LAZY|RTLD_GLOBAL);
159 _("ERROR: ADL library not found!\n"));
163 adl_main_control_create = (ADL_MAIN_CONTROL_CREATE)
164 getprocaddress(hdll, "ADL_Main_Control_Create");
165 adl_main_control_destroy = (ADL_MAIN_CONTROL_DESTROY)
166 getprocaddress(hdll, "ADL_Main_Control_Destroy");
167 adl_adapter_numberofadapters_get = (ADL_ADAPTER_NUMBEROFADAPTERS_GET)
168 getprocaddress(hdll, "ADL_Adapter_NumberOfAdapters_Get");
169 adl_adapter_adapterinfo_get = (ADL_ADAPTER_ADAPTERINFO_GET)
170 getprocaddress(hdll, "ADL_Adapter_AdapterInfo_Get");
171 adl_adapter_active_get = (ADL_ADAPTER_ACTIVE_GET)
172 getprocaddress(hdll, "ADL_Adapter_Active_Get");
173 adl_overdrive5_temperature_get = (ADL_OVERDRIVE5_TEMPERATURE_GET)
174 getprocaddress(hdll, "ADL_Overdrive5_Temperature_Get");
175 adl_overdrive5_fanspeed_get = (ADL_OVERDRIVE5_FANSPEED_GET)
176 getprocaddress(hdll, "ADL_Overdrive5_FanSpeed_Get");
177 if (!adl_main_control_create ||
178 !adl_main_control_destroy ||
179 !adl_adapter_numberofadapters_get ||
180 !adl_adapter_adapterinfo_get ||
181 !adl_overdrive5_temperature_get ||
182 !adl_overdrive5_fanspeed_get) {
184 _("ERROR: ADL's API is missing!\n"));
188 /* Initialize ADL. The second parameter is 1, which means:
189 retrieve adapter information only for adapters that
190 are physically present and enabled in the system */
191 if (ADL_OK != adl_main_control_create(adl_main_memory_alloc, 1)) {
193 _("ERROR: ADL Initialization Error!\n"));
196 adl_main_control_done = 1;
198 /* Obtain the number of adapters for the system */
199 if (ADL_OK != adl_adapter_numberofadapters_get(&inumberadapters)) {
201 _("ERROR: Cannot get the number of adapters!\n"));
205 if (!inumberadapters)
208 lpadapterinfo = malloc(sizeof(AdapterInfo) * inumberadapters);
209 memset(lpadapterinfo, '\0', sizeof(AdapterInfo) * inumberadapters);
211 /* Get the AdapterInfo structure for all adapters in the system */
212 adl_adapter_adapterinfo_get(lpadapterinfo,
213 sizeof(AdapterInfo) * inumberadapters);
215 /* Repeat for all available adapters in the system */
216 for (i = 0; i < inumberadapters; i++) {
217 iadapterindex = lpadapterinfo[i].iAdapterIndex;
218 if (ADL_OK != adl_adapter_active_get(iadapterindex, &lpstatus))
220 if (lpstatus != ADL_TRUE)
221 /* count only if the adapter is active */
224 if (!active_amd_adapters) {
225 active_amd_adapters = (int *) malloc(sizeof(int));
226 inumberadaptersactive = 1;
228 ++inumberadaptersactive;
229 active_amd_adapters =
230 (int *) realloc(active_amd_adapters,
231 sizeof(int)*inumberadaptersactive);
233 active_amd_adapters[inumberadaptersactive-1] = iadapterindex;
236 adl_main_memory_free((void **) &lpadapterinfo);
238 /* Each Adapter has one GPU temperature
239 sensor and one fan control sensor */
240 return 2*inumberadaptersactive;
243 void amd_psensor_list_update(struct psensor **sensors)
245 struct psensor **ss, *s;
251 if (s->type == SENSOR_TYPE_AMD_TEMP)
252 psensor_set_current_value(s, get_temp(s));
253 else if (s->type == SENSOR_TYPE_AMD_FAN)
254 psensor_set_current_value(s, get_fanspeed(s));
261 amd_psensor_list_add(struct psensor **sensors, int values_len)
264 struct psensor **tmp, **ss, *s;
269 for (i = 0; i < n; i++) {
270 s = create_sensor(i, values_len);
272 tmp = psensor_list_add(ss, s);
286 if (adl_main_control_done)
287 adl_main_control_destroy();
291 if (active_amd_adapters) {
292 free(active_amd_adapters);
293 active_amd_adapters = NULL;