[PATCH kernel-hwmon-occ 03/10] initial check in
OpenBMC Patches
openbmc-patches at stwcx.xyz
Thu Nov 12 21:20:05 AEDT 2015
From: adamliyi <adamliyi at msn.com>
---
occ.c | 942 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 file changed, 942 insertions(+)
create mode 100644 occ.c
diff --git a/occ.c b/occ.c
new file mode 100644
index 0000000..9f0a6c0
--- /dev/null
+++ b/occ.c
@@ -0,0 +1,942 @@
+/*
+ * BMC OCC HWMON driver - read Power8 OCC (On Chip Controller) sensor data via i2c.
+ *
+ * Copyright (c) 2015 IBM (Alvin Wang, Li Yi)
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ */
+
+#include <linux/module.h>
+#include <linux/init.h>
+#include <linux/slab.h>
+#include <linux/jiffies.h>
+#include <linux/i2c.h>
+#include <linux/hwmon.h>
+#include <linux/hwmon-sysfs.h>
+#include <linux/err.h>
+#include <linux/mutex.h>
+#include <linux/of.h>
+#include <linux/delay.h>
+
+#define DEBUG 1
+
+/* ------------------------------------------------------------*/
+/* OCC sensor data format */
+typedef struct {
+ uint16_t sensor_id;
+ uint16_t value;
+} occ_sensor;
+
+typedef struct {
+ uint16_t sensor_id;
+ uint32_t update_tag;
+ uint32_t accumulator;
+ uint16_t value;
+} powr_sensor;
+
+
+typedef struct {
+ char sensor_type[5];
+ uint8_t reserved0;
+ uint8_t sensor_format;
+ uint8_t sensor_length;
+ uint8_t num_of_sensors;
+ occ_sensor *sensor;
+ powr_sensor *powr;
+} sensor_data_block;
+
+typedef struct {
+ uint8_t status;
+ uint8_t ext_status;
+ uint8_t occs_present;
+ uint8_t config;
+ uint8_t occ_state;
+ uint8_t reserved0;
+ uint8_t reserved1;
+ uint8_t error_log_id;
+ uint32_t error_log_addr_start;
+ uint16_t error_log_length;
+ uint8_t reserved2;
+ uint8_t reserved3;
+ char occ_code_level[17];
+ char sensor_eye_catcher[7];
+ uint8_t num_of_sensor_blocks;
+ uint8_t sensor_data_version;
+ sensor_data_block* blocks;
+} occ_poll_data;
+
+typedef struct {
+ uint8_t sequence_num;
+ uint8_t cmd_type;
+ uint8_t rtn_status;
+ uint16_t data_length;
+ occ_poll_data data;
+ uint16_t chk_sum;
+ uint16_t temp_block_id;
+ uint16_t freq_block_id;
+ uint16_t power_block_id;
+} occ_response_t;
+
+static occ_response_t occ_resp;
+
+/* Each client has this additional data */
+struct occ_drv_data {
+ struct i2c_client *client;
+ struct device *hwmon_dev;
+ struct mutex update_lock;
+ char valid; /* !=0 if sensor data are valid */
+ unsigned long last_updated; /* In jiffies */
+ unsigned long sample_time; /* In jiffies */
+ occ_response_t *occ_resp;
+};
+
+/*-----------------------------------------------------------------------*/
+/* i2c read and write occ sensors */
+
+#define OCC_DATA_MAX 4096 /* 4KB at most */
+#define I2C_STATUS_REG 0x000d0001
+#define I2C_ERROR_REG 0x000d0002
+#define I2C_READ_ERROR 1
+#define I2C_WRITE_ERROR 2
+#define I2C_DATABUFFER_SIZE_ERROR 3
+
+/*
+#define SCOM_OCC_SRAM_WOX 0x0006B013
+#define SCOM_OCC_SRAM_WAND 0x0006B012
+#define SCOM_OCC_SRAM_ADDR 0x0006B010
+#define SCOM_OCC_SRAM_DATA 0x0006B015
+*/
+
+// To generate attn to OCC
+#define ATTN_DATA 0x0006B035
+
+// For BMC to read/write SRAM
+#define OCB_ADDRESS 0x0006B070
+#define OCB_DATA 0x0006B075
+#define OCB_STATUS_CONTROL_AND 0x0006B072
+#define OCB_STATUS_CONTROL_OR 0x0006B073
+
+#define OCC_COMMAND_ADDR 0xFFFF6000
+#define OCC_RESPONSE_ADDR 0xFFFF7000
+
+
+static int deinit_occ_resp_buf(occ_response_t *p)
+{
+ int b;
+
+ if (p == NULL)
+ return 0;
+
+ if (p->data.blocks == NULL)
+ return 0;
+
+ for(b = 0; b < p->data.num_of_sensor_blocks; b++) {
+ if (!p->data.blocks[b].sensor)
+ kfree(p->data.blocks[b].sensor);
+ if (!p->data.blocks[b].powr)
+ kfree(p->data.blocks[b].powr);
+ }
+
+ kfree(p->data.blocks);
+
+ memset(p, 0, sizeof(*p));
+
+ return 0;
+}
+
+static ssize_t occ_i2c_read(struct i2c_client *client, char *buf, size_t count)
+{
+ int ret = 0;
+
+ if (count > 8192)
+ count = 8192;
+
+ pr_debug("i2c_read: reading %zu bytes.\n", count);
+ ret = i2c_master_recv(client, buf, count);
+ return ret;
+}
+
+static ssize_t occ_i2c_write(struct i2c_client *client, const char *buf, size_t count)
+{
+ int ret = 0;
+
+ if (count > 8192)
+ count = 8192;
+
+ pr_debug("i2c_write: writing %zu bytes.\n", count);
+ ret = i2c_master_send(client, buf, count);
+ return ret;
+}
+
+/* read two 4-byte value */
+static int occ_getscom(struct i2c_client *client, uint32_t address, uint32_t *value0, uint32_t *value1)
+{
+ uint32_t ret = 0;
+ char buf[8];
+ const char* address_buf = (const char*)&address;
+
+ //P8 i2c slave requires address to be shifted by 1
+ address = address << 1;
+
+ ret = occ_i2c_write(client, address_buf, sizeof(address));
+ //if (ret != sizeof(address))
+ // return -I2C_WRITE_ERROR;
+
+ ret = occ_i2c_read(client, buf, sizeof(buf));
+ //if (ret != sizeof(buf))
+ // return -I2C_READ_ERROR;
+
+ memcpy(value1, &buf[0], sizeof(*value1));
+ memcpy(value0, &buf[4], sizeof(*value0));
+
+ return 0;
+}
+
+/* read 8-byte value and put into data[offset] */
+static int occ_getscomb(struct i2c_client *client, uint32_t address, char* data, int offset)
+{
+ uint32_t ret = 0;
+ const char* address_buf = (const char*)&address;
+ char buf[8];
+ int b = 0;
+
+ //P8 i2c slave requires address to be shifted by 1
+ address = address << 1;
+
+ ret = occ_i2c_write(client, address_buf, sizeof(address));
+ //if (ret != sizeof(address))
+ // return -I2C_WRITE_ERROR;
+
+ ret = occ_i2c_read(client, buf, sizeof(buf));
+ //if (ret != sizeof(buf))
+ // return -I2C_READ_ERROR;
+
+ for (b = 0; b < 8; b++) {
+ data[offset + b] = buf[7 - b];
+ }
+
+ return 0;
+}
+
+static int occ_putscom(struct i2c_client *client, uint32_t address, uint32_t data0, uint32_t data1)
+{
+ const char* address_buf = (const char*)&address;
+ const char* d0 = (const char*)&data0;
+ const char* d1 = (const char*)&data1;
+ char buf[12];
+ uint32_t ret = 0;
+
+ //P8 i2c slave requires address to be shifted by 1
+ address = address << 1;
+
+ memcpy(&buf[0], address_buf, sizeof(address));
+ memcpy(&buf[4], d1, sizeof(data1));
+ memcpy(&buf[8], d0, sizeof(data0));
+
+ ret = occ_i2c_write(client, buf, sizeof(buf));
+ //if (ret != sizeof(buf))
+ // return I2C_WRITE_ERROR;
+
+ return 0;
+}
+
+static int occ_check_i2c_errors(struct i2c_client *client)
+{
+ uint32_t v0;
+ uint32_t v1;
+
+ occ_getscom(client, I2C_STATUS_REG, &v0, &v1);
+ if (v0 != 0x80000000) {
+ printk("ERROR present in P8 I2C Slave. Clearing...\n");
+ occ_putscom(client, I2C_ERROR_REG, 0x00000000, 0x00000000);
+ occ_putscom(client, I2C_STATUS_REG, 0x00000000, 0x00000000);
+ return -1;
+ }
+
+ return 0;
+}
+
+
+static inline uint16_t get_occdata_length(char* d)
+{
+ uint16_t data_length = 0;
+
+ data_length = d[3] << 8;
+ data_length = data_length | d[4];
+ return data_length;
+}
+
+
+static int parse_occ_response(char* d, occ_response_t* o)
+{
+ int b = 0;
+ int s = 0;
+ int ret = 0;
+ int dnum = 45;
+
+ o->sequence_num = d[0];
+ o->cmd_type = d[1];
+ o->rtn_status = d[2];
+ o->data_length = d[3] << 8;
+ o->data_length = o->data_length | d[4];
+ o->data.status = d[5];
+ o->data.ext_status = d[6];
+ o->data.occs_present = d[7];
+ o->data.config = d[8];
+ o->data.occ_state = d[9];
+ o->data.reserved0 = d[10];
+ o->data.reserved1 = d[11];
+ o->data.error_log_id = d[12];
+ o->data.error_log_addr_start = d[13] << 24;
+ o->data.error_log_addr_start = o->data.error_log_addr_start | d[14] << 16;
+ o->data.error_log_addr_start = o->data.error_log_addr_start | d[15] << 8;
+ o->data.error_log_addr_start = o->data.error_log_addr_start | d[16];
+ o->data.error_log_length = d[17] << 8;
+ o->data.error_log_length = o->data.error_log_length | d[18];
+ o->data.reserved2 = d[19];
+ o->data.reserved3 = d[20];
+ strncpy(&o->data.occ_code_level[0], (const char*)&d[21], 16);
+ strncpy(&o->data.sensor_eye_catcher[0], (const char*)&d[37], 6);
+ o->data.sensor_eye_catcher[6]='\0';
+ o->data.num_of_sensor_blocks=d[43];
+ o->data.sensor_data_version = d[44];
+
+ if (strcmp(o->data.sensor_eye_catcher, "SENSOR") != 0) {
+ printk("ERROR: SENSOR not found at byte 37 (%s)\n",o->data.sensor_eye_catcher);
+ return -1;
+ }
+
+ if (o->data.num_of_sensor_blocks == 0) {
+ printk("ERROR: SENSOR block num is 0\n");
+ return -1;
+ }
+
+ o->data.blocks = kzalloc(sizeof(sensor_data_block) * o->data.num_of_sensor_blocks, GFP_KERNEL);
+ if (o->data.blocks == NULL)
+ return -ENOMEM;
+
+ printk("Reading %d sensor blocks\n", o->data.num_of_sensor_blocks);
+ for(b = 0; b < o->data.num_of_sensor_blocks; b++) {
+ /* 8-byte sensor block head */
+ strncpy(&o->data.blocks[b].sensor_type[0], (const char*)&d[dnum], 4);
+ o->data.blocks[b].reserved0 = d[dnum+4];
+ o->data.blocks[b].sensor_format = d[dnum+5];
+ o->data.blocks[b].sensor_length = d[dnum+6];
+ o->data.blocks[b].num_of_sensors = d[dnum+7];
+ dnum = dnum + 8;
+
+ printk("sensor block[%d]: type: %s, num_of_sensors: %d, sensor_length: %u\n",
+ b, o->data.blocks[b].sensor_type, o->data.blocks[b].num_of_sensors,
+ o->data.blocks[b].sensor_length);
+
+ /* empty sensor block */
+ if (o->data.blocks[b].num_of_sensors <= 0)
+ continue;
+ if (o->data.blocks[b].sensor_length == 0)
+ continue;
+
+ if (strcmp(o->data.blocks[b].sensor_type, "FREQ") == 0) {
+ o->data.blocks[b].sensor =
+ kzalloc(sizeof(occ_sensor) * o->data.blocks[b].num_of_sensors, GFP_KERNEL);
+
+ if (o->data.blocks[b].sensor == NULL) {
+ ret = -ENOMEM;
+ goto abort;
+ }
+ o->freq_block_id = b;
+ for (s = 0; s < o->data.blocks[b].num_of_sensors; s++) {
+ o->data.blocks[b].sensor[s].sensor_id = d[dnum] << 8;
+ o->data.blocks[b].sensor[s].sensor_id =
+ o->data.blocks[b].sensor[s].sensor_id | d[dnum+1];
+ o->data.blocks[b].sensor[s].value = d[dnum+2] << 8;
+ o->data.blocks[b].sensor[s].value = o->data.blocks[b].sensor[s].value | d[dnum+3];
+ printk("sensor[%d]-[%d]: id: %u, value: %u\n",
+ b, s, o->data.blocks[b].sensor[s].sensor_id, o->data.blocks[b].sensor[s].value);
+ dnum = dnum + o->data.blocks[b].sensor_length;
+ }
+ }
+ else if (strcmp(o->data.blocks[b].sensor_type, "TEMP") == 0) {
+
+ o->data.blocks[b].sensor =
+ kzalloc(sizeof(occ_sensor) * o->data.blocks[b].num_of_sensors, GFP_KERNEL);
+
+ if (o->data.blocks[b].sensor == NULL) {
+ ret = -ENOMEM;
+ goto abort;
+ }
+
+ o->temp_block_id = b;
+ for (s = 0; s < o->data.blocks[b].num_of_sensors; s++) {
+ o->data.blocks[b].sensor[s].sensor_id = d[dnum] << 8;
+ o->data.blocks[b].sensor[s].sensor_id =
+ o->data.blocks[b].sensor[s].sensor_id | d[dnum+1];
+ o->data.blocks[b].sensor[s].value = d[dnum+2] << 8;
+ o->data.blocks[b].sensor[s].value = o->data.blocks[b].sensor[s].value | d[dnum+3];
+ printk("sensor[%d]-[%d]: id: %u, value: %u\n",
+ b, s, o->data.blocks[b].sensor[s].sensor_id, o->data.blocks[b].sensor[s].value);
+ dnum = dnum + o->data.blocks[b].sensor_length;
+ }
+ }
+ else if (strcmp(o->data.blocks[b].sensor_type, "POWR") == 0) {
+/*
+ o->data.blocks[b].powr =
+ kzalloc(sizeof(powr_sensor) * o->data.blocks[b].num_of_sensors, GFP_KERNEL);
+
+ if (o->data.blocks[b].powr == NULL) {
+ ret = -ENOMEM;
+ goto abort;
+ }
+ o->power_block_id = b;
+ for (s = 0; s< o->data.blocks[b].num_of_sensors; s++) {
+ o->data.blocks[b].powr[s].sensor_id = d[dnum] << 8;
+ o->data.blocks[b].powr[s].sensor_id = o->data.blocks[b].powr[s].sensor_id | d[dnum+1];
+ o->data.blocks[b].powr[s].update_tag = d[dnum+2] << 24;
+ o->data.blocks[b].powr[s].update_tag = o->data.blocks[b].powr[s].update_tag | d[dnum+3] << 16;
+ o->data.blocks[b].powr[s].update_tag = o->data.blocks[b].powr[s].update_tag | d[dnum+4] << 8;
+ o->data.blocks[b].powr[s].update_tag = o->data.blocks[b].powr[s].update_tag | d[dnum+5];
+ o->data.blocks[b].powr[s].accumulator = d[dnum+6] << 24;
+ o->data.blocks[b].powr[s].accumulator = o->data.blocks[b].powr[s].accumulator | d[dnum+7] << 16;
+ o->data.blocks[b].powr[s].accumulator = o->data.blocks[b].powr[s].accumulator | d[dnum+8] << 8;
+ o->data.blocks[b].powr[s].accumulator = o->data.blocks[b].powr[s].accumulator | d[dnum+9];
+ o->data.blocks[b].powr[s].value = d[dnum+10] << 8;
+ o->data.blocks[b].powr[s].value = o->data.blocks[b].powr[s].value | d[dnum+11];
+
+ printk("sensor[%d]-[%d]: id: %u, value: %u\n",
+ b, s, o->data.blocks[b].sensor[s].sensor_id, o->data.blocks[b].sensor[s].value);
+
+ dnum = dnum + o->data.blocks[b].sensor_length;
+ }
+*/
+ }
+ else {
+ printk("ERROR: sensor type %s not supported\n", o->data.blocks[b].sensor_type);
+ continue;
+ /* FIX: ignore wrong sensor type? */
+ //ret = -1;
+ //goto abort;
+ }
+ }
+
+ return ret;
+abort:
+ deinit_occ_resp_buf(o);
+ return ret;
+}
+
+char fake_occ_rsp[OCC_DATA_MAX] = {
+0x69, 0x00, 0x00, 0x00, 0xa4, 0xc3, 0x00, 0x03, 0x00, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
+0x00, 0x00, 0x00, 0x00, 0x00, 0x6f, 0x70, 0x5f, 0x6f, 0x63, 0x63, 0x5f, 0x31, 0x35, 0x30, 0x37,
+0x31, 0x36, 0x61, 0x00, 0x00, 0x53, 0x45, 0x4e, 0x53, 0x4f, 0x52, 0x04, 0x01, 0x54, 0x45, 0x4d,
+0x50, 0x00, 0x01, 0x04, 0x0a, 0x00 ,0x6a, 0x00, 0x00, 0x00, 0x6c, 0x00, 0x00, 0x00, 0x6d, 0x00,
+0x00,0x00,0x6e,0x00, 0x00,0x00,0x6f,0x00, 0x00,0x00,0x70,0x00, 0x00,0x00,0x71,0x00,
+0x00,0x00,0x73,0x00, 0x00,0x00,0x74,0x00, 0x00,0x00,0x75,0x00, 0x00,0x46,0x52,0x45,
+0x51,0x00,0x01,0x04, 0x0a,0x00,0x76,0x00, 0x00,0x00,0x78,0x00, 0x00,0x00,0x79,0x00,
+0x00,0x00,0x7a,0x00, 0x00,0x00,0x7b,0x00, 0x00,0x00,0x7c,0x00, 0x00,0x00,0x7d,0x00,
+0x00,0x00,0x7f,0x00, 0x00,0x00,0x80,0x00, 0x00,0x00,0x81,0x00, 0x00,0x50,0x4f,0x57,
+0x52,0x00,0x01,0x0c, 0x00,0x43,0x41,0x50, 0x53,0x00,0x01,0x0c, 0x01,0x00,0x00,0x00,
+0x00,0x04,0xb0,0x09, 0x60,0x04,0x4c,0x00, 0x00,0x17,0xc5,};
+
+#define DUMP_RAW 1
+
+static int occ_get_all(struct i2c_client *client, occ_response_t *occ_resp)
+{
+ char occ_data[OCC_DATA_MAX];
+ uint16_t num_bytes = 0;
+ int b = 0;
+ int ret = 0;
+/*
+ //Procedure to access SRAM where OCC data is located
+ occ_putscom(client, SCOM_OCC_SRAM_WOX, 0x08000000, 0x00000000);
+ occ_putscom(client, SCOM_OCC_SRAM_WAND, 0xFBFFFFFF, 0xFFFFFFFF);
+ occ_putscom(client, SCOM_OCC_SRAM_ADDR, OCC_RESPONSE_ADDR, 0x00000000);
+ occ_putscom(client, SCOM_OCC_SRAM_ADDR, OCC_RESPONSE_ADDR, 0x00000000);
+
+ occ_getscomb(client, SCOM_OCC_SRAM_DATA, occ_data, 0);
+
+*/
+
+ // Init OCB
+ occ_putscom(client, OCB_STATUS_CONTROL_OR, 0x08000000, 0x00000000);
+ occ_putscom(client, OCB_STATUS_CONTROL_AND, 0xFBFFFFFF, 0xFFFFFFFF);
+
+ // Send poll command to OCC
+ occ_putscom(client, OCB_ADDRESS, OCC_COMMAND_ADDR, 0x00000000);
+ occ_putscom(client, OCB_ADDRESS, OCC_COMMAND_ADDR, 0x00000000);
+ occ_putscom(client, OCB_DATA, 0x00000001, 0x10001100);
+
+ // Trigger ATTN
+ occ_putscom(client, ATTN_DATA, 0x01010000, 0x00000000);
+
+ // TODO: check command status Refere to "1.6.2 OCC Command/Response Sequence" in OCC_OpenPwr_FW_Interfaces1.2.pdf
+ // Use sleep as workaround
+ //msleep(2000);
+
+ // Get response data
+ occ_putscom(client, OCB_ADDRESS, OCC_RESPONSE_ADDR, 0x00000000);
+ occ_getscomb(client, OCB_DATA, occ_data, 0);
+
+
+ /* FIXME: use fake data to test driver without hw */
+ //printk("i2c-occ: using FAKE occ data\n");
+ //memcpy(&occ_data[0], &fake_occ_rsp[0], sizeof(occ_data));
+
+ num_bytes = get_occdata_length(occ_data);
+
+ printk("OCC data length: %d\n", num_bytes);
+
+#ifdef DUMP_RAW
+ int i = 0;
+ printk("\nRAW data\n==================\n");
+ for (i = 0; i < 8; i++) {
+ if(i == 4) printk(" ");
+ printk("%02x", occ_data[i]);
+ }
+ printk("\n");
+#endif
+
+
+
+ if (num_bytes > OCC_DATA_MAX) {
+ printk("ERROR: OCC data length must be < 4KB\n");
+ /* yi: debug */
+ return -1;
+ }
+
+ if (num_bytes <= 0) {
+ printk("ERROR: OCC data length is zero\n");
+ return -1;
+ }
+
+ for (b = 8; b < num_bytes; b = b + 8) {
+ //occ_getscomb(client, SCOM_OCC_SRAM_DATA, occ_data, b);
+ occ_getscomb(client, OCB_DATA, occ_data, b);
+#ifdef DUMP_RAW
+ for (i = 0; i < 8; i++) {
+ if(i == 4) printk(" ");
+ printk("%02x", occ_data[b+i]);
+ }
+ printk("\n");
+#endif
+
+ }
+
+ /* FIXME: use fake data to test driver without hw */
+ //memcpy(&occ_data[0], &fake_occ_rsp[0], sizeof(occ_data));
+
+ ret = parse_occ_response(occ_data, occ_resp);
+
+ return ret;
+}
+
+
+static int occ_update_device(struct device *dev)
+{
+ struct occ_drv_data *data = dev_get_drvdata(dev);
+ struct i2c_client *client = data->client;
+ int ret = 0;
+
+ mutex_lock(&data->update_lock);
+
+ if (time_after(jiffies, data->last_updated + data->sample_time)
+ || !data->valid) {
+ dev_dbg(&client->dev, "Starting occ update\n");
+
+ deinit_occ_resp_buf(data->occ_resp);
+
+ ret = occ_get_all(client, data->occ_resp);
+
+ data->last_updated = jiffies;
+ data->valid = 1;
+ }
+ mutex_unlock(&data->update_lock);
+
+ return ret;
+}
+
+/* ----------------------------------------------------------------------*/
+/* sysfs interface */
+
+static int print_occ_resp(char *buf, occ_response_t *p, int index)
+{
+ int i = 0;
+ int j = 0;
+ sensor_data_block *block;
+ occ_sensor *sensor;
+ powr_sensor *powr;
+
+ printk("occ hwmon all: index: %d\n", index);
+ printk("------------- above are debug message, bellow is real output------------\n");
+ sprintf(buf, "Dump all sensor data from OCC - Todo\n");
+
+ return 0;
+#if 0
+ sprintf(buf, "num_of_sensor_blocks: %u\n", p->data.num_of_sensor_blocks);
+ for (i = 0; i < p->data.num_of_sensor_blocks; i++)
+ {
+ block = &p->data.blocks[i];
+ if (block == NULL)
+ continue;
+
+ snprintf(buf, sizeof(block->sensor_type), "sensor_type: %s\n", block->sensor_type);
+ sprintf(buf, "num_of_sensors: %u\n", block->num_of_sensors);
+ sprintf(buf, "sensor_length: %u\n", block->sensor_length);
+
+ if (block->sensor_length == 0)
+ continue;
+
+ if (strcmp(block->sensor_type, "TEMP") == 0)
+ {
+ for (j = 0; j < block->num_of_sensors; j++)
+ {
+ sensor = &block->sensor[j];
+ if (sensor == NULL)
+ continue;
+
+ sprintf(buf, "sensor_id: %u\n", sensor->sensor_id);
+ sprintf(buf, "value: %u\n", sensor->value);
+ }
+ }
+
+
+ if (strcmp(block->sensor_type, "FREQ") == 0)
+ {
+ for (j = 0; j < block->num_of_sensors; j++)
+ {
+ sensor = &block->sensor[j];
+ if (sensor == NULL)
+ continue;
+
+ sprintf(buf, "sensor_id: %u\n", sensor->sensor_id);
+ sprintf(buf, "value: %u\n", sensor->value);
+ }
+
+ }
+
+ if (strcmp(block->sensor_type, "POWR") == 0)
+ {
+ for (j = 0; j < block->num_of_sensors; j++)
+ {
+ powr = &block->powr[j];
+ if (powr == NULL)
+ continue;
+
+ sprintf(buf, "sensor_id: %u\n", powr->sensor_id);
+ sprintf(buf, "value: %u\n", powr->value);
+ sprintf(buf, "update_tag: %u\n", powr->update_tag);
+ sprintf(buf, "accumulator: %u\n", powr->accumulator);
+ }
+ }
+ }
+ return 0;
+#endif
+}
+
+/* sysfs attributes for hwmon */
+static ssize_t show_occ_data(struct device *dev, struct device_attribute *da, char *buf)
+{
+ struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
+ int n = attr->index;
+ struct occ_drv_data *data = dev_get_drvdata(dev);
+ int ret = 0;
+
+ ret = occ_update_device(dev);
+
+ if (ret != 0);
+ {
+ /* FIXME: to test fake data */
+ //printk("ERROR: cannot get occ sensor data\n");
+ //return ret;
+ }
+
+ return print_occ_resp(buf, data->occ_resp, n);
+}
+
+static ssize_t show_occ_temp(struct device *dev, struct device_attribute *da, char *buf)
+{
+ struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
+ int n = attr->index;
+ struct occ_drv_data *data = dev_get_drvdata(dev);
+ int ret = 0;
+ occ_sensor *sensor;
+ int val = 0;
+
+ ret = occ_update_device(dev);
+
+ if (ret != 0);
+ {
+ /* FIXME: to test fake data */
+ //printk("ERROR: cannot get occ sensor data\n");
+ //return ret;
+ }
+
+ printk("temp_block_id: %d, sensor: %d\n", data->occ_resp->temp_block_id, n -1);
+ sensor = &data->occ_resp->data.blocks[data->occ_resp->temp_block_id].sensor[n - 1];
+ val = sensor->value;
+ printk("temp%d sensor value\n", n, val);
+
+ printk("------------- above are debug message, bellow is real output------------\n");
+ return sprintf(buf, "%d\n", val);
+}
+
+static ssize_t show_occ_temp_label(struct device *dev, struct device_attribute *da, char *buf)
+{
+ struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
+ int n = attr->index;
+ struct occ_drv_data *data = dev_get_drvdata(dev);
+ int ret = 0;
+ occ_sensor *sensor;
+ int val = 0;
+
+ ret = occ_update_device(dev);
+
+ if (ret != 0);
+ {
+ /* FIXME: to test fake data */
+ //printk("ERROR: cannot get occ sensor data\n");
+ //return ret;
+ }
+
+ sensor = &data->occ_resp->data.blocks[data->occ_resp->temp_block_id].sensor[n - 1];
+ val = sensor->sensor_id;
+ printk("temp%d sensor id\n", n, val);
+ printk("------------- above are debug message, bellow is real output------------\n");
+
+ return sprintf(buf, "sensor id: %d\n", val);
+}
+
+
+static SENSOR_DEVICE_ATTR(all, S_IRUGO, show_occ_data, NULL, 0);
+static SENSOR_DEVICE_ATTR(temp1_input, S_IRUGO, show_occ_temp, NULL, 1);
+static SENSOR_DEVICE_ATTR(temp2_input, S_IRUGO, show_occ_temp, NULL, 2);
+static SENSOR_DEVICE_ATTR(temp3_input, S_IRUGO, show_occ_temp, NULL, 3);
+static SENSOR_DEVICE_ATTR(temp4_input, S_IRUGO, show_occ_temp, NULL, 4);
+static SENSOR_DEVICE_ATTR(temp5_input, S_IRUGO, show_occ_temp, NULL, 5);
+static SENSOR_DEVICE_ATTR(temp6_input, S_IRUGO, show_occ_temp, NULL, 6);
+static SENSOR_DEVICE_ATTR(temp7_input, S_IRUGO, show_occ_temp, NULL, 7);
+static SENSOR_DEVICE_ATTR(temp8_input, S_IRUGO, show_occ_temp, NULL, 8);
+static SENSOR_DEVICE_ATTR(temp9_input, S_IRUGO, show_occ_temp, NULL, 9);
+static SENSOR_DEVICE_ATTR(temp10_input, S_IRUGO, show_occ_temp, NULL, 10);
+static SENSOR_DEVICE_ATTR(temp1_label, S_IRUGO, show_occ_temp_label, NULL, 1);
+static SENSOR_DEVICE_ATTR(temp2_label, S_IRUGO, show_occ_temp_label, NULL, 2);
+static SENSOR_DEVICE_ATTR(temp3_label, S_IRUGO, show_occ_temp_label, NULL, 3);
+static SENSOR_DEVICE_ATTR(temp4_label, S_IRUGO, show_occ_temp_label, NULL, 4);
+static SENSOR_DEVICE_ATTR(temp5_label, S_IRUGO, show_occ_temp_label, NULL, 5);
+static SENSOR_DEVICE_ATTR(temp6_label, S_IRUGO, show_occ_temp_label, NULL, 6);
+static SENSOR_DEVICE_ATTR(temp7_label, S_IRUGO, show_occ_temp_label, NULL, 7);
+static SENSOR_DEVICE_ATTR(temp8_label, S_IRUGO, show_occ_temp_label, NULL, 8);
+static SENSOR_DEVICE_ATTR(temp9_label, S_IRUGO, show_occ_temp_label, NULL, 9);
+static SENSOR_DEVICE_ATTR(temp10_label, S_IRUGO, show_occ_temp_label, NULL, 10);
+
+static struct attribute *occ_attrs[] = {
+ &sensor_dev_attr_all.dev_attr.attr,
+ &sensor_dev_attr_temp1_input.dev_attr.attr,
+ &sensor_dev_attr_temp2_input.dev_attr.attr,
+ &sensor_dev_attr_temp3_input.dev_attr.attr,
+ &sensor_dev_attr_temp4_input.dev_attr.attr,
+ &sensor_dev_attr_temp5_input.dev_attr.attr,
+ &sensor_dev_attr_temp6_input.dev_attr.attr,
+ &sensor_dev_attr_temp7_input.dev_attr.attr,
+ &sensor_dev_attr_temp8_input.dev_attr.attr,
+ &sensor_dev_attr_temp9_input.dev_attr.attr,
+ &sensor_dev_attr_temp10_input.dev_attr.attr,
+ &sensor_dev_attr_temp1_label.dev_attr.attr,
+ &sensor_dev_attr_temp2_label.dev_attr.attr,
+ &sensor_dev_attr_temp3_label.dev_attr.attr,
+ &sensor_dev_attr_temp4_label.dev_attr.attr,
+ &sensor_dev_attr_temp5_label.dev_attr.attr,
+ &sensor_dev_attr_temp6_label.dev_attr.attr,
+ &sensor_dev_attr_temp7_label.dev_attr.attr,
+ &sensor_dev_attr_temp8_label.dev_attr.attr,
+ &sensor_dev_attr_temp9_label.dev_attr.attr,
+ &sensor_dev_attr_temp10_label.dev_attr.attr,
+
+ NULL
+};
+ATTRIBUTE_GROUPS(occ);
+
+/*-----------------------------------------------------------------------*/
+/* device probe and removal */
+
+#define OCC_I2C_ADDR 0x50
+#define OCC_I2C_NAME "occ-i2c"
+
+enum occ_type {
+ occ_id,
+};
+
+
+static int occ_probe(struct i2c_client *client, const struct i2c_device_id *id)
+{
+ struct device *dev = &client->dev;
+ struct occ_drv_data *data;
+ unsigned long funcs;
+
+ data = devm_kzalloc(dev, sizeof(struct occ_drv_data), GFP_KERNEL);
+ if (!data)
+ return -ENOMEM;
+
+ data->client = client;
+ data->occ_resp = &occ_resp;
+ i2c_set_clientdata(client, data);
+ mutex_init(&data->update_lock);
+ data->sample_time = HZ;
+
+ //if (i2cdev_check_addr(client->adapter, OCC_I2C_ADDR))
+ // return -EBUSY;
+
+ client->addr = OCC_I2C_ADDR;
+
+ /* configure the driver */
+ //dev_dbg(dev, "occ i2c register hwmon\n");
+ printk("occ i2c register hwmon\n");
+
+ data->hwmon_dev = hwmon_device_register_with_groups(dev, "occ",
+ data, occ_groups);
+ if (IS_ERR(data->hwmon_dev))
+ return PTR_ERR(data->hwmon_dev);
+
+ //dev_info(dev, "%s: sensor '%s'\n",
+ // dev_name(data->hwmon_dev), client->name);
+ printk("%s: sensor '%s'\n",
+ dev_name(data->hwmon_dev), client->name);
+
+ funcs = i2c_get_functionality(client->adapter);
+
+ dev_info(dev, "i2c adaptor supports function: 0x%lx\n", funcs);
+
+ occ_check_i2c_errors(client);
+ //dev_info(dev, "occ i2c driver ready\n");
+ printk("occ i2c driver ready\n");
+
+ return 0;
+}
+
+static int occ_remove(struct i2c_client *client)
+{
+ struct occ_drv_data *data = i2c_get_clientdata(client);
+
+ /* free allocated sensor memory */
+ deinit_occ_resp_buf(data->occ_resp);
+
+ hwmon_device_unregister(data->hwmon_dev);
+ return 0;
+}
+
+static const struct i2c_device_id occ_ids[] = {
+ { OCC_I2C_NAME, occ_id, },
+ { /* LIST END */ }
+};
+MODULE_DEVICE_TABLE(i2c, occ_ids);
+
+static const struct of_device_id i2c_occ_of_match[] = {
+ {.compatible = "ibm,occ-i2c"},
+ {},
+};
+
+MODULE_DEVICE_TABLE(of, i2c_occ_of_match);
+
+#ifdef CONFIG_PM
+static int occ_suspend(struct device *dev)
+{
+ //struct i2c_client *client = to_i2c_client(dev);
+ /* TODO */
+ return 0;
+}
+
+static int occ_resume(struct device *dev)
+{
+ //struct i2c_client *client = to_i2c_client(dev);
+ /* TODO */
+ return 0;
+}
+
+static const struct dev_pm_ops occ_dev_pm_ops = {
+ .suspend = occ_suspend,
+ .resume = occ_resume,
+};
+#define OCC_DEV_PM_OPS (&occ_dev_pm_ops)
+#else
+#define OCC_DEV_PM_OPS NULL
+#endif /* CONFIG_PM */
+
+static const unsigned short normal_i2c[] = {0x50, I2C_CLIENT_END };
+
+/* Return 0 if detection is successful, -ENODEV otherwise */
+static int occ_detect(struct i2c_client *new_client,
+ struct i2c_board_info *info)
+{
+ strncpy(info->type, OCC_I2C_NAME, sizeof(OCC_I2C_NAME));
+ return 0;
+}
+
+static struct i2c_driver occ_driver = {
+ .class = I2C_CLASS_HWMON,
+ .driver = {
+ .name = OCC_I2C_NAME,
+ .pm = OCC_DEV_PM_OPS,
+ .of_match_table = i2c_occ_of_match,
+ },
+ .probe = occ_probe,
+ .remove = occ_remove,
+ .id_table = occ_ids,
+ .address_list = normal_i2c,
+ .detect = occ_detect,
+};
+
+module_i2c_driver(occ_driver);
+
+#if 0
+
+static struct i2c_board_info my_dev_info[] __initdata = {
+ {
+ I2C_BOARD_INFO(OCC_I2C_NAME, 0x50),
+ },
+};
+
+static struct i2c_client *my_client;
+
+static int occ_init(void)
+{
+ static int sys_adap_bus_num = 3;
+ struct i2c_adapter* adap = i2c_get_adapter(sys_adap_bus_num);
+
+ if(adap==NULL) {
+ printk("[OCC-DEBUG] i2c_get_adapter fail!\n");
+ return -1;
+ }
+
+ my_client = i2c_new_device(adap, &my_dev_info[0]);
+ if( my_client==NULL ){
+ printk("[OCC-DEBUG] i2c_new_device fail!\n");
+ return -1;
+ }
+ i2c_put_adapter(adap);
+ return i2c_add_driver(&occ_driver);
+}
+
+static void __exit occ_exit(void)
+{
+ i2c_unregister_device(my_client);
+ i2c_del_driver(&occ_driver);
+}
+
+module_init(occ_init);
+module_exit(occ_exit);
+
+#endif
+
+MODULE_AUTHOR("Li Yi <shliyi at cn.ibm.com>");
+MODULE_DESCRIPTION("BMC OCC monitor driver");
+MODULE_LICENSE("GPL");
--
2.6.3
More information about the openbmc
mailing list