/* * drivers/arisc/arisc.c * * Copyright (c) 2012 Allwinner. * 2012-05-01 Written by sunny (sunny@allwinnertech.com). * 2012-10-01 Written by superm (superm@allwinnertech.com). * * 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. * */ #include #include "arisc_i.h" #define DEBUG_POWER_TREE 0 struct arisc_cfg arisc_cfg; #define ARISC_RESERVE_MEMSIZE (0x4000) static unsigned int arisc_debug_baudrate = 115200; unsigned int arisc_debug_dram_crc_en; unsigned int arisc_debug_dram_crc_srcaddr = 0x40000000; unsigned int arisc_debug_dram_crc_len = (1024 * 1024); unsigned int arisc_debug_dram_crc_error; unsigned int arisc_debug_dram_crc_total_count; unsigned int arisc_debug_dram_crc_error_count; unsigned int arisc_debug_level = 2; static unsigned char arisc_version[40] = "arisc default version"; static unsigned int arisc_pll; #if (defined CONFIG_ARCH_SUN50IW2P1) || (defined CONFIG_ARCH_SUN50IW6P1) static struct arisc_twi_block_cfg block_cfg; static u8 regaddr; static u8 data; #else static struct arisc_rsb_block_cfg block_cfg; static u32 devaddr; static u8 regaddr; static u32 data; static u32 datatype; #endif /* for save power check configuration */ struct standby_info_para arisc_powchk_back; static ssize_t arisc_version_show(struct device *dev, struct device_attribute *attr, char *buf) { ssize_t size = 0; size = sprintf(buf, "%s\n", arisc_version); return size; } static ssize_t arisc_debug_mask_show(struct device *dev, struct device_attribute *attr, char *buf) { ssize_t size = 0; size = sprintf(buf, "%u\n", arisc_debug_level); return size; } static ssize_t arisc_debug_mask_store(struct device *dev, struct device_attribute *attr, const char *buf, size_t size) { u32 value = 0; sscanf(buf, "%u", &value); if ((value < 0) || (value > 3)) { ARISC_WRN("invalid arisc debug mask [%d] to set\n", value); return size; } arisc_debug_level = value; arisc_set_debug_level(arisc_debug_level); ARISC_LOG("debug_mask change to %d\n", arisc_debug_level); return size; } static ssize_t arisc_debug_baudrate_show(struct device *dev, struct device_attribute *attr, char *buf) { ssize_t size = 0; size = sprintf(buf, "%u\n", arisc_debug_baudrate); return size; } static ssize_t arisc_debug_baudrate_store(struct device *dev, struct device_attribute *attr, const char *buf, size_t size) { u32 value = 0; sscanf(buf, "%u", &value); if ((value != 115200) && (value != 57600) && (value != 9600)) { ARISC_WRN("invalid arisc uart baudrate [%d] to set\n", value); return size; } arisc_debug_baudrate = value; arisc_set_uart_baudrate(arisc_debug_baudrate); ARISC_LOG("debug_baudrate change to %d\n", arisc_debug_baudrate); return size; } static ssize_t arisc_dram_crc_paras_show(struct device *dev, struct device_attribute *attr, char *buf) { ssize_t size = 0; size = sprintf(buf, "enable:0x%x srcaddr:0x%x lenght:0x%x\n", arisc_debug_dram_crc_en, arisc_debug_dram_crc_srcaddr, arisc_debug_dram_crc_len); return size; } static ssize_t arisc_dram_crc_paras_store(struct device *dev, struct device_attribute *attr, const char *buf, size_t size) { u32 dram_crc_en = 0; u32 dram_crc_srcaddr = 0; u32 dram_crc_len = 0; sscanf(buf, "%x %x %x\n", &dram_crc_en, &dram_crc_srcaddr, &dram_crc_len); if ((dram_crc_en != 0) && (dram_crc_en != 1)) { ARISC_WRN("invalid arisc debug dram crc paras [%x] [%x] [%x] to set\n", dram_crc_en, dram_crc_srcaddr, dram_crc_len); return size; } arisc_debug_dram_crc_en = dram_crc_en; arisc_debug_dram_crc_srcaddr = dram_crc_srcaddr; arisc_debug_dram_crc_len = dram_crc_len; arisc_set_dram_crc_paras(arisc_debug_dram_crc_en, arisc_debug_dram_crc_srcaddr, arisc_debug_dram_crc_len); ARISC_LOG("dram_crc_en=0x%x, dram_crc_srcaddr=0x%x, dram_crc_len=0x%x\n", arisc_debug_dram_crc_en, arisc_debug_dram_crc_srcaddr, arisc_debug_dram_crc_len); return size; } static ssize_t arisc_dram_crc_result_show(struct device *dev, struct device_attribute *attr, char *buf) { arisc_query_dram_crc_result((unsigned long *)&arisc_debug_dram_crc_error, (unsigned long *)&arisc_debug_dram_crc_total_count, (unsigned long *)&arisc_debug_dram_crc_error_count); return sprintf(buf, "dram info:\n" \ " enable %u\n" \ " error %u\n" \ " total count %u\n" \ " error count %u\n" \ " src:%x\n" \ " len:0x%x\n", \ arisc_debug_dram_crc_en, arisc_debug_dram_crc_error, arisc_debug_dram_crc_total_count, arisc_debug_dram_crc_error_count, arisc_debug_dram_crc_srcaddr, arisc_debug_dram_crc_len); } static ssize_t arisc_dram_crc_result_store(struct device *dev, struct device_attribute *attr, const char *buf, size_t size) { u32 error = 0; u32 total_count = 0; u32 error_count = 0; sscanf(buf, "%u %u %u", &error, &total_count, &error_count); if ((error != 0) && (error != 1)) { ARISC_WRN("invalid arisc dram crc result [%d] [%d] [%d] to set\n", error, total_count, error_count); return size; } arisc_debug_dram_crc_error = error; arisc_debug_dram_crc_total_count = total_count; arisc_debug_dram_crc_error_count = error_count; arisc_set_dram_crc_result((unsigned long)arisc_debug_dram_crc_error, (unsigned long)arisc_debug_dram_crc_total_count, (unsigned long)arisc_debug_dram_crc_error_count); ARISC_LOG("debug_dram_crc_result change to error:%u total count:%u error count:%u\n", arisc_debug_dram_crc_error, arisc_debug_dram_crc_total_count, arisc_debug_dram_crc_error_count); return size; } static ssize_t arisc_power_enable_show(struct device *dev, struct device_attribute *attr, char *buf) { return sprintf(buf, "power enable 0x%x\n", \ arisc_powchk_back.power_state.enable); } static ssize_t arisc_power_enable_store(struct device *dev, struct device_attribute *attr, const char *buf, size_t size) { unsigned long value; if (kstrtoul(buf, 0, &value) < 0) { ARISC_ERR("illegal value, only one para support\n"); return -EINVAL; } if (value & ~(CPUS_ENABLE_POWER_EXP | CPUS_WAKEUP_POWER_STA | CPUS_WAKEUP_POWER_CSM)) { ARISC_ERR("invalid format, 'enable' should:\n"\ " bit31:enable power check during standby\n"\ " bit1: enable wakeup when power state exception\n"\ " bit0: enable wakeup when power consume exception\n"); return size; } arisc_powchk_back.power_state.enable = value; arisc_set_standby_power_cfg(&arisc_powchk_back); ARISC_LOG("standby_power_set enable:0x%x\n", arisc_powchk_back.power_state.enable); return size; } static ssize_t arisc_power_state_show(struct device *dev, struct device_attribute *attr, char *buf) { return sprintf(buf, "power regs 0x%x\n", \ arisc_powchk_back.power_state.power_reg); } static ssize_t arisc_power_state_store(struct device *dev, struct device_attribute *attr, const char *buf, size_t size) { unsigned long value; if (kstrtoul(buf, 0, &value) < 0) { ARISC_ERR("illegal value, only one para support"); return -EINVAL; } arisc_powchk_back.power_state.power_reg = value; arisc_set_standby_power_cfg(&arisc_powchk_back); ARISC_LOG("standby_power_set power_state 0x%x\n", arisc_powchk_back.power_state.power_reg); return size; } static ssize_t arisc_power_consum_show(struct device *dev, struct device_attribute *attr, char *buf) { return sprintf(buf, "power consume %dmw\n", \ arisc_powchk_back.power_state.system_power); } static ssize_t arisc_power_consum_store(struct device *dev, struct device_attribute *attr, const char *buf, size_t size) { unsigned long value; if (kstrtoul(buf, 0, &value) < 0) { if (1 != sscanf(buf, "%lu", &value)) { ARISC_ERR("illegal value, only one para support"); return -EINVAL; } } arisc_powchk_back.power_state.system_power = value; arisc_set_standby_power_cfg(&arisc_powchk_back); ARISC_LOG("standby_power_set power_consum %dmw\n", arisc_powchk_back.power_state.system_power); return size; } #if (defined CONFIG_ARCH_SUN9IW1P1) #define SST_POWER_MASK 0xffffffff static const unsigned char pmu_powername[32][8] = { "dc5ldo", "dcdc1", "dcdc2", "dcdc3", "dcdc4", "dcdc5", "aldo1", "aldo2", "eldo1", "eldo2", "eldo3", "dldo1", "dldo2", "aldo3", "swout", "dc1sw", "dcdca", "dcdcb", "dcdcc", "dcdcd", "dcdce", "aldo1", "aldo2", "aldo3", "bldo1", "bldo2", "bldo3", "bldo4", "cldo1", "cldo2", "cldo3", "swout", }; #elif (defined CONFIG_ARCH_SUN8IW1P1) || \ (defined CONFIG_ARCH_SUN8IW3P1) || \ (defined CONFIG_ARCH_SUN8IW5P1) || \ (defined CONFIG_ARCH_SUN8IW7P1) || \ (defined CONFIG_ARCH_SUN8IW9P1) || \ (defined CONFIG_ARCH_SUN8IW15P1) || \ (defined CONFIG_ARCH_SUN50IW1P1) || \ (defined CONFIG_ARCH_SUN50IW2P1) || \ (defined CONFIG_ARCH_SUN50IW3P1) || \ (defined CONFIG_ARCH_SUN50IW6P1) || \ (defined CONFIG_ARCH_SUN50IW8P1) #define SST_POWER_MASK 0x07ffff static const unsigned char pmu_powername[20][8] = { "dc5ldo", "dcdc1", "dcdc2", "dcdc3", "dcdc4", "dcdc5", "aldo1", "aldo2", "eldo1", "eldo2", "eldo3", "dldo1", "dldo2", "dldo3", "dldo4", "dc1sw", "aldo3", "io0ldo", "io1ldo", }; #elif (defined CONFIG_ARCH_SUN8IW6P1) #define SST_POWER_MASK 0xffffff static const unsigned char pmu_powername[26][10] = { "dcdc1", "dcdc2", "dcdc3", "dcdc4", "dcdc5", "dcdc6", "dcdc7", "reserved0", "eldo1", "eldo2", "eldo3", "dldo1", "dldo2", "dldo3", "dldo4", "dc1sw", "reserved1", "reserved2", "fldo1", "fldo2", "fldo3", "aldo1", "aldo2", "aldo3", "io0ldo", "io1ldo", }; #elif (defined CONFIG_ARCH_SUN8IW12P1) #define SST_POWER_MASK 0x1ff static const unsigned char pmu_powername[9][10] = { "dcdc1", "dcdc2", "dcdc3", "dcdc4", "aldo1", "aldo2", "dldo1", "dldo2", "io0ldo", }; #endif static ssize_t arisc_power_trueinfo_show(struct device *dev, struct device_attribute *attr, char *buf) { unsigned int i, count, power_reg; standby_info_para_t sst_info; unsigned char pmu_name[320]; unsigned char *pbuf; arisc_query_standby_power(&sst_info); power_reg = sst_info.power_state.power_reg; power_reg &= SST_POWER_MASK; #if (defined CONFIG_ARCH_SUN9IW1P1) /* print the pmu power on state */ strcpy(pmu_name, "these power on during standby:\n axp809:"); pbuf = pmu_name + strlen("these power on during standby:\n axp809:"); count = 0; for (i = 0; i < 16; i++) { if (power_reg & (1 << i)) { strncpy(pbuf, pmu_powername[i], 8); pbuf += strlen(pmu_powername[i]); *pbuf++ = ','; count++; } } if (count) strcpy(--pbuf, ""); /* rollback the last ',' */ else { strcpy(pbuf, "(null)"); pbuf += strlen("(null)"); } strcpy(pbuf, "\n axp806:"); pbuf += strlen("\n axp806:"); count = 0; for (i = 16; i < 32; i++) { if (power_reg & (1 << i)) { strncpy(pbuf, pmu_powername[i], 8); pbuf += strlen(pmu_powername[i]); *pbuf++ = ','; count++; } } if (count) strcpy(--pbuf, "\n"); /* rollback the last ',' */ else { strcpy(pbuf, "(null)"); pbuf += strlen("(null)"); } /* print the pmu power off state */ power_reg ^= SST_POWER_MASK; strcpy(pbuf, "\nthese power off during standby:\n axp809:"); pbuf += strlen("\nthese power off during standby:\n axp809:"); count = 0; for (i = 0; i < 16; i++) { if (power_reg & (1 << i)) { strncpy(pbuf, pmu_powername[i], 8); pbuf += strlen(pmu_powername[i]); *pbuf++ = ','; count++; } } if (count) strcpy(--pbuf, ""); /* rollback the last ',' */ else { strcpy(pbuf, "(null)"); pbuf += strlen("(null)"); } strcpy(pbuf, "\n axp806:"); pbuf += strlen("\n axp806:"); count = 0; for (i = 16; i < 32; i++) { if (power_reg & (1 << i)) { strncpy(pbuf, pmu_powername[i], 8); pbuf += strlen(pmu_powername[i]); *pbuf++ = ','; count++; } } if (count) strcpy(--pbuf, ""); /* rollback the last ',' */ else { strcpy(pbuf, "(null)"); pbuf += strlen("(null)"); } #else /* print the pmu power on state */ strcpy(pmu_name, "these power on during standby:\n axp:"); pbuf = pmu_name + strlen("these power on during standby:\n axp:"); count = 0; for (i = 0; i < 32; i++) { if (power_reg & (1 << i)) { strncpy(pbuf, pmu_powername[i], 8); pbuf += strlen(pmu_powername[i]); *pbuf++ = ','; count++; } } if (count) strcpy(--pbuf, ""); /* rollback the last ',' */ else { strcpy(pbuf, "(null)"); pbuf += strlen("(null)"); } /* print the pmu power off state */ power_reg ^= SST_POWER_MASK; strcpy(pbuf, "\nthese power off during standby:\n axp:"); pbuf += strlen("\nthese power off during standby:\n axp:"); count = 0; for (i = 0; i < 32; i++) { if (power_reg & (1 << i)) { strncpy(pbuf, pmu_powername[i], 8); pbuf += strlen(pmu_powername[i]); *pbuf++ = ','; count++; } } if (count) strcpy(--pbuf, ""); /* rollback the last ',' */ else { strcpy(pbuf, "(null)"); pbuf += strlen("(null)"); } #endif return sprintf(buf, "power info:\n" \ " enable 0x%x\n" \ " regs 0x%x\n" \ " power consume %dmw\n" \ "%s\n", \ sst_info.power_state.enable, \ sst_info.power_state.power_reg, \ sst_info.power_state.system_power, \ pmu_name); } static ssize_t arisc_freq_show(struct device *dev, struct device_attribute *attr, char *buf) { ssize_t size = 0; struct clk *pll = NULL; pll = clk_get(NULL, "pll_cpu"); if (!pll || IS_ERR(pll)) { ARISC_ERR("try to get pll%u failed!\n", arisc_pll); return size; } size = sprintf(buf, "%u\n", (unsigned int)clk_get_rate(pll)); return size; } static ssize_t arisc_freq_store(struct device *dev, struct device_attribute *attr, const char *buf, size_t size) { u32 freq = 0; u32 pll = 0; u32 mode = 0; u32 ret = 0; sscanf(buf, "%u %u", &pll, &freq); if ((pll != 1) || (freq < 0) || (freq > 3000000)) { ARISC_WRN("invalid pll [%u] or freq [%u] to set, this platform only support pll1, freq [0, 3000000]KHz\n", pll, freq); ARISC_WRN("pls echo like that: echo pll freq > freq\n"); return size; } arisc_pll = pll; ret = arisc_dvfs_set_cpufreq(freq, pll, mode, NULL, NULL); if (ret) { ARISC_ERR("pll%u freq set to %u fail\n", pll, freq); } else { ARISC_LOG("pll%u freq set to %u success\n", pll, freq); } return size; } #if (defined CONFIG_ARCH_SUN50IW6P1) static ssize_t arisc_regulator_state_show(struct device *dev, struct device_attribute *attr, char *buf) { ssize_t size = 0; s32 ret = 0; u32 type; for (type = DUMMY_REGULATOR1; type <= DUMMY_REGULATOR6; type++) { ret = arisc_pmu_get_voltage_state(type); if (ret >= 0) size += sprintf(buf + size, "regulator%u state:%d\n", type, ret); } return size; } static ssize_t arisc_regulator_state_store(struct device *dev, struct device_attribute *attr, const char *buf, size_t size) { u32 type = 0; u32 state = 0; s32 ret = 0; sscanf(buf, "%u %u", &type, &state); if ((type < 0) || (type >= DUMMY_REGULATOR_MAX) || ((state != 0) && (state != 1))) { ARISC_WRN("invalid type [%u] or state [%u] to set\n", type, state); ARISC_WRN("pls echo like that: echo type state > regulator_state to set regulator state\n"); return size; } ret = arisc_pmu_set_voltage_state(type, state); if (ret) { ARISC_ERR("type:%u state set to %u fail\n", type, state); } else { ARISC_LOG("type:%u state set to %u success\n", type, state); } return size; } static ssize_t arisc_regulator_voltage_show(struct device *dev, struct device_attribute *attr, char *buf) { ssize_t size = 0; s32 ret = 0; u32 type; for (type = DUMMY_REGULATOR1; type <= DUMMY_REGULATOR6; type++) { ret = arisc_pmu_get_voltage(type); if (ret >= 0) size += sprintf(buf + size, "regulator%u voltage:%d\n", type, ret); } return size; } static ssize_t arisc_regulator_voltage_store(struct device *dev, struct device_attribute *attr, const char *buf, size_t size) { u32 type = 0; u32 voltage = 0; s32 ret = 0; sscanf(buf, "%u %u", &type, &voltage); if ((type < 0) || (type >= DUMMY_REGULATOR_MAX) || (voltage < 0)) { ARISC_WRN("invalid type [%u] or voltage [%u] to set\n", type, voltage); ARISC_WRN("pls echo like that: echo type voltage > regulator_voltage to set regulator voltage\n"); return size; } ret = arisc_pmu_set_voltage(type, voltage); if (ret) { ARISC_ERR("type:%u voltage set to %u fail\n", type, voltage); } else { ARISC_LOG("type:%u voltage set to %u success\n", type, voltage); } return size; } #endif /* CONFIG_ARCH_SUN50IW6P1 */ #if (defined CONFIG_ARCH_SUN50IW6P1) static ssize_t arisc_twi_read_block_data_show(struct device *dev, struct device_attribute *attr, char *buf) { ssize_t size = 0; u32 ret = 0; if ((block_cfg.addr == NULL) || (block_cfg.data == NULL) || (*block_cfg.addr < 0) || (*block_cfg.addr > 0xff)) { ARISC_LOG("invalid twi paras, regaddr:0x%x\n", block_cfg.addr ? *block_cfg.addr : 0); ARISC_LOG("echo like: echo regaddr > twi_read_block_data\n"); return size; } ret = arisc_twi_read_block_data(&block_cfg); if (ret) { ARISC_LOG("twi read data:0x%x from regaddr:0x%x fail\n", *block_cfg.data, *block_cfg.addr); } else { ARISC_LOG("twi read data:0x%x from regaddr:0x%x success\n", *block_cfg.data, *block_cfg.addr); } size = sprintf(buf, "%x\n", data); return size; } static ssize_t arisc_twi_read_block_data_store(struct device *dev, struct device_attribute *attr, const char *buf, size_t size) { sscanf(buf, "%x", (u32 *)®addr); if ((regaddr < 0) || (regaddr > 0xff)) { ARISC_WRN("invalid paras, regaddr:0x%x\n", regaddr); ARISC_LOG("echo like: echo regaddr > twi_read_block_data\n"); return size; } block_cfg.msgattr = ARISC_MESSAGE_ATTR_SOFTSYN; block_cfg.len = 1; block_cfg.addr = ®addr; block_cfg.data = &data; ARISC_LOG("twi read regaddr:0x%x\n", *block_cfg.addr); return size; } static ssize_t arisc_twi_write_block_data_show(struct device *dev, struct device_attribute *attr, char *buf) { ssize_t size = 0; u32 ret = 0; if ((block_cfg.addr == NULL) || (block_cfg.data == NULL) || (*block_cfg.addr < 0) || (*block_cfg.addr > 0xff)) { ARISC_WRN("invalid paras, regaddr:0x%x, data:0x%x\n", block_cfg.addr ? *block_cfg.addr : 0, block_cfg.data ? *block_cfg.data : 0); ARISC_LOG("echo like: echo regaddr data > twi_write_block_data\n"); return size; } block_cfg.msgattr = ARISC_MESSAGE_ATTR_SOFTSYN; block_cfg.len = 1; block_cfg.addr = ®addr; block_cfg.data = &data; ret = arisc_twi_read_block_data(&block_cfg); if (ret) { ARISC_ERR("twi read data:0x%x from regaddr:0x%x fail\n", *block_cfg.data, *block_cfg.addr); } else { ARISC_LOG("twi read data:0x%x from regaddr:0x%x success\n", *block_cfg.data, *block_cfg.addr); } size = sprintf(buf, "%x\n", data); return size; } static ssize_t arisc_twi_write_block_data_store(struct device *dev, struct device_attribute *attr, const char *buf, size_t size) { u32 ret = 0; sscanf(buf, "%x %x", (u32 *)®addr, (u32 *)&data); if ((regaddr < 0) || (regaddr > 0xff)) { ARISC_WRN("invalid paras, regaddr:0x%x, data:0x%x\n", regaddr, data); ARISC_WRN("echo like: echo regaddr data > twi_write_block_data\n"); return size; } block_cfg.msgattr = ARISC_MESSAGE_ATTR_SOFTSYN; block_cfg.len = 1; block_cfg.addr = ®addr; block_cfg.data = &data; ret = arisc_twi_write_block_data(&block_cfg); if (ret) { ARISC_ERR("twi write data:0x%x to regaddr:0x%x fail\n", *block_cfg.data, *block_cfg.addr); } else { ARISC_LOG("twi write data:0x%x to regaddr:0x%x success\n", *block_cfg.data, *block_cfg.addr); } return size; } #else static ssize_t arisc_rsb_read_block_data_show(struct device *dev, struct device_attribute *attr, char *buf) { ssize_t size = 0; u32 ret = 0; if ((block_cfg.regaddr == NULL) || (block_cfg.data == NULL) || (block_cfg.devaddr > 0xff) || ((block_cfg.datatype != RSB_DATA_TYPE_BYTE) && (block_cfg.datatype != RSB_DATA_TYPE_HWORD) && (block_cfg.datatype != RSB_DATA_TYPE_WORD))) { ARISC_WRN("invalid rsb paras, devaddr:0x%x, regaddr:0x%x, datatype:0x%x\n", block_cfg.devaddr, block_cfg.regaddr ? *block_cfg.regaddr : 0, block_cfg.datatype); ARISC_WRN("pls echo like that: echo devaddr regaddr datatype > rsb_read_block_data\n"); return size; } ret = arisc_rsb_read_block_data(&block_cfg); if (ret) { ARISC_LOG("rsb read data:0x%x from devaddr:0x%x regaddr:0x%x fail\n", *block_cfg.data, block_cfg.devaddr, *block_cfg.regaddr); } else { ARISC_LOG("rsb read data:0x%x from devaddr:0x%x regaddr:0x%x success\n", *block_cfg.data, block_cfg.devaddr, *block_cfg.regaddr); } size = sprintf(buf, "%x\n", data); return size; } static ssize_t arisc_rsb_read_block_data_store(struct device *dev, struct device_attribute *attr, const char *buf, size_t size) { sscanf(buf, "%x %x %x", &devaddr, (u32 *)®addr, &datatype); if ((devaddr > 0xff) || ((datatype != RSB_DATA_TYPE_BYTE) && (datatype != RSB_DATA_TYPE_HWORD) && (datatype != RSB_DATA_TYPE_WORD))) { ARISC_WRN("invalid rsb paras to set, devaddr:0x%x, regaddr:0x%x, datatype:0x%x\n", devaddr, regaddr, datatype); ARISC_WRN("pls echo like that: echo devaddr regaddr datatype > rsb_read_block_data\n"); return size; } block_cfg.msgattr = ARISC_MESSAGE_ATTR_SOFTSYN; block_cfg.datatype = datatype; block_cfg.len = 1; block_cfg.devaddr = devaddr; block_cfg.regaddr = ®addr; block_cfg.data = &data; ARISC_LOG("rsb read data from devaddr:0x%x regaddr:0x%x\n", devaddr, regaddr); return size; } static ssize_t arisc_rsb_write_block_data_show(struct device *dev, struct device_attribute *attr, char *buf) { ssize_t size = 0; u32 ret = 0; if ((block_cfg.regaddr == NULL) || (block_cfg.data == NULL) || (block_cfg.devaddr > 0xff) || ((block_cfg.datatype != RSB_DATA_TYPE_BYTE) && (block_cfg.datatype != RSB_DATA_TYPE_HWORD) && (block_cfg.datatype != RSB_DATA_TYPE_WORD))) { ARISC_WRN("invalid rsb paras, devaddr:0x%x, regaddr:0x%x, datatype:0x%x\n", block_cfg.devaddr, block_cfg.regaddr ? *block_cfg.regaddr : 0, block_cfg.datatype); ARISC_WRN("pls echo like that: echo devaddr regaddr data datatype > rsb_write_block_data\n"); return size; } ret = arisc_rsb_read_block_data(&block_cfg); if (ret) { ARISC_ERR("rsb read data:0x%x from devaddr:0x%x regaddr:0x%x fail\n", *block_cfg.data, block_cfg.devaddr, *block_cfg.regaddr); } else { ARISC_LOG("rsb read data:0x%x from devaddr:0x%x regaddr:0x%x success\n", *block_cfg.data, block_cfg.devaddr, *block_cfg.regaddr); } size = sprintf(buf, "%x\n", data); return size; } static ssize_t arisc_rsb_write_block_data_store(struct device *dev, struct device_attribute *attr, const char *buf, size_t size) { u32 ret = 0; sscanf(buf, "%x %x %x %x", &devaddr, (u32 *)®addr, (u32 *)&data, &datatype); if ((devaddr > 0xff) || ((datatype != RSB_DATA_TYPE_BYTE) && (datatype != RSB_DATA_TYPE_HWORD) && (datatype != RSB_DATA_TYPE_WORD))) { ARISC_WRN("invalid rsb paras, devaddr:0x%x, regaddr:0x%x, data:0x%x, datatype:0x%x\n", devaddr, regaddr, data, datatype); ARISC_WRN("pls echo like that: echo devaddr regaddr data datatype > rsb_write_block_data\n"); return size; } block_cfg.msgattr = ARISC_MESSAGE_ATTR_SOFTSYN; block_cfg.datatype = datatype; block_cfg.len = 1; block_cfg.devaddr = devaddr; block_cfg.regaddr = ®addr; block_cfg.data = &data; ret = arisc_rsb_write_block_data(&block_cfg); if (ret) { ARISC_ERR("rsb write data:0x%x to devaddr:0x%x regaddr:0x%x fail\n", *block_cfg.data, block_cfg.devaddr, *block_cfg.regaddr); } else { ARISC_LOG("rsb write data:0x%x to devaddr:0x%x regaddr:0x%x success\n", *block_cfg.data, block_cfg.devaddr, *block_cfg.regaddr); } return size; } #endif #ifdef CONFIG_PM static int sunxi_arisc_suspend(struct device *dev) { return 0; } static int sunxi_arisc_resume(struct device *dev) { u32 wake_event; arisc_query_wakeup_source(&wake_event); return 0; } static const struct dev_pm_ops sunxi_arisc_dev_pm_ops = { .suspend = sunxi_arisc_suspend, .resume = sunxi_arisc_resume, }; #define SUNXI_ARISC_DEV_PM_OPS (&sunxi_arisc_dev_pm_ops) #else #define SUNXI_ARISC_DEV_PM_OPS NULL #endif /* CONFIG_PM */ static struct device_attribute sunxi_arisc_attrs[] = { __ATTR(version, S_IRUGO, arisc_version_show, NULL), __ATTR(debug_mask, S_IRUGO | S_IWUSR, arisc_debug_mask_show, arisc_debug_mask_store), __ATTR(debug_baudrate, S_IRUGO | S_IWUSR, arisc_debug_baudrate_show, arisc_debug_baudrate_store), __ATTR(dram_crc_paras, S_IRUGO | S_IWUSR, arisc_dram_crc_paras_show, arisc_dram_crc_paras_store), __ATTR(dram_crc_result, S_IRUGO | S_IWUSR, arisc_dram_crc_result_show, arisc_dram_crc_result_store), __ATTR(sst_power_enable_mask, S_IRUGO | S_IWUSR, arisc_power_enable_show, arisc_power_enable_store), __ATTR(sst_power_state_mask, S_IRUGO | S_IWUSR, arisc_power_state_show, arisc_power_state_store), __ATTR(sst_power_consume_mask, S_IRUGO | S_IWUSR, arisc_power_consum_show, arisc_power_consum_store), __ATTR(sst_power_real_info, S_IRUGO, arisc_power_trueinfo_show, NULL), __ATTR(freq, S_IRUGO | S_IWUSR, arisc_freq_show, arisc_freq_store), #if (defined CONFIG_ARCH_SUN50IW2P1) || (defined CONFIG_ARCH_SUN50IW6P1) __ATTR(regulator_state, S_IRUGO | S_IWUSR, arisc_regulator_state_show, arisc_regulator_state_store), __ATTR(regulator_voltage, S_IRUGO | S_IWUSR, arisc_regulator_voltage_show, arisc_regulator_voltage_store), __ATTR(twi_read_block_data, S_IRUGO | S_IWUSR, arisc_twi_read_block_data_show, arisc_twi_read_block_data_store), __ATTR(twi_write_block_data, S_IRUGO | S_IWUSR, arisc_twi_write_block_data_show, arisc_twi_write_block_data_store), #else __ATTR(rsb_read_block_data, S_IRUGO | S_IWUSR, arisc_rsb_read_block_data_show, arisc_rsb_read_block_data_store), __ATTR(rsb_write_block_data, S_IRUGO | S_IWUSR, arisc_rsb_write_block_data_show, arisc_rsb_write_block_data_store), #endif }; static void sunxi_arisc_sysfs(struct platform_device *pdev) { unsigned int i; memset((void *)&block_cfg, 0, sizeof(block_cfg)); for (i = 0; i < ARRAY_SIZE(sunxi_arisc_attrs); i++) { device_create_file(&pdev->dev, &sunxi_arisc_attrs[i]); } } static int sunxi_arisc_clk_cfg(struct platform_device *pdev) { ARISC_INF("device [%s] clk resource request enter\n", dev_name(&pdev->dev)); if (clk_prepare_enable(arisc_cfg.core.losc)) { ARISC_ERR("try to enable losc output failed!\n"); return -EINVAL; } if (clk_prepare_enable(arisc_cfg.core.iosc)) { ARISC_ERR("try to enable iosc output failed!\n"); return -EINVAL; } if (clk_prepare_enable(arisc_cfg.core.hosc)) { ARISC_ERR("try to enable hosc output failed!\n"); return -EINVAL; } if (clk_prepare_enable(arisc_cfg.core.pllperiph0)) { ARISC_ERR("try to enable pll_periph0 output failed!\n"); return -EINVAL; } ARISC_INF("device [%s] clk resource request ok\n", dev_name(&pdev->dev)); return 0; } static int sunxi_arisc_pin_cfg(struct platform_device *pdev) { struct platform_device *pdev_suart, *pdev_sjtag; struct platform_device __maybe_unused *pdev_stwi; struct platform_device __maybe_unused *pdev_srsb; struct pinctrl *pinctrl = NULL; ARISC_INF("device [%s] pin resource request enter\n", dev_name(&pdev->dev)); /* s_uart0 gpio */ if (arisc_cfg.suart.status) { pdev_suart = of_find_device_by_node(arisc_cfg.suart.np); if (!pdev_suart) { ARISC_ERR("get s_uart0 platform_device error!\n"); return -EINVAL; } pinctrl = pinctrl_get_select_default(&pdev_suart->dev); if (!pinctrl || IS_ERR(pinctrl)) { ARISC_ERR("set s_uart0 pin error!\n"); return -EINVAL; } ARISC_INF("set s_uart0 pin OK\n"); } #if (defined CONFIG_ARCH_SUN50IW2P1) || (defined CONFIG_ARCH_SUN50IW6P1) /* s_twi0 gpio */ if (arisc_cfg.stwi.status) { pdev_stwi = of_find_device_by_node(arisc_cfg.stwi.np); if (!pdev_stwi) { ARISC_ERR("get s_twi0 platform_device error!\n"); return -EINVAL; } pinctrl = pinctrl_get_select_default(&pdev_stwi->dev); if (!pinctrl || IS_ERR(pinctrl)) { ARISC_ERR("set s_twi0 pin error!\n"); return -EINVAL; } } #else /* s_rsb0 gpio */ if (arisc_cfg.srsb.status) { pdev_srsb = of_find_device_by_node(arisc_cfg.srsb.np); if (!pdev_srsb) { ARISC_ERR("get s_rsb0 platform_device error!\n"); return -EINVAL; } pinctrl = pinctrl_get_select_default(&pdev_srsb->dev); if (!pinctrl || IS_ERR(pinctrl)) { ARISC_ERR("set s_rsb0 pin error!\n"); return -EINVAL; } } #endif /* s_jtag0 gpio */ if (arisc_cfg.sjtag.status) { pdev_sjtag = of_find_device_by_node(arisc_cfg.sjtag.np); if (!pdev_sjtag) { ARISC_ERR("get s_jtag0 platform_device error!\n"); return -EINVAL; } pinctrl = pinctrl_get_select_default(&pdev_sjtag->dev); if (!pinctrl || IS_ERR(pinctrl)) { ARISC_ERR("set s_jtag0 pin error!\n"); return -EINVAL; } } ARISC_INF("device [%s] pin resource request ok\n", dev_name(&pdev->dev)); return 0; } #if DEBUG_POWER_TREE void hexdump(char *name, char *base, int len) { u32 i; printk("%s :\n", name); for (i = 0; i < len; i += 4) { if (!(i&0xf)) printk("\n0x%8p : ", base + i); printk("%8x ", readl(base + i)); } printk("\n"); } #endif static int sunxi_arisc_parse_cfg(struct platform_device *pdev) { struct resource res; u32 ret; union space_union space; struct device_node *np; arisc_cfg.core.np = pdev->dev.of_node; /* parse arisc node */ arisc_cfg.core.losc = of_clk_get_by_name(arisc_cfg.core.np, "losc"); if (!arisc_cfg.core.losc || IS_ERR(arisc_cfg.core.losc)) { ARISC_ERR("try to get losc failed!\n"); return -EINVAL; } arisc_cfg.core.iosc = of_clk_get_by_name(arisc_cfg.core.np, "iosc"); if (!arisc_cfg.core.iosc || IS_ERR(arisc_cfg.core.iosc)) { ARISC_ERR("try to get iosc failed!\n"); return -EINVAL; } arisc_cfg.core.hosc = of_clk_get_by_name(arisc_cfg.core.np, "hosc"); if (!arisc_cfg.core.hosc || IS_ERR(arisc_cfg.core.hosc)) { ARISC_ERR("try to get hosc failed!\n"); return -EINVAL; } arisc_cfg.core.pllperiph0 = of_clk_get_by_name(arisc_cfg.core.np, "pll_periph0"); if (!arisc_cfg.core.pllperiph0 || IS_ERR(arisc_cfg.core.pllperiph0)) { ARISC_ERR("try to get pll_periph0 failed!\n"); return -EINVAL; } /* parse dram node */ arisc_cfg.dram.np = of_find_compatible_node(NULL, NULL, "allwinner,dram"); if (IS_ERR(arisc_cfg.dram.np)) { ARISC_ERR("get [allwinner,dram] device node error\n"); return -EINVAL; } /* parse s_uart node */ arisc_cfg.suart.np = of_find_compatible_node(NULL, NULL, "allwinner,s_uart"); if (IS_ERR(arisc_cfg.suart.np)) { ARISC_ERR("get [allwinner,s_uart] device node error\n"); return -EINVAL; } ret = of_address_to_resource(arisc_cfg.suart.np, 0, &res); if (ret || !res.start) { ARISC_ERR("get suart pbase error\n"); return -EINVAL; } arisc_cfg.suart.pbase = res.start; arisc_cfg.suart.size = resource_size(&res); arisc_cfg.suart.vbase = of_iomap(arisc_cfg.suart.np, 0); if (!arisc_cfg.suart.vbase) panic("Can't map suart registers"); arisc_cfg.suart.irq = irq_of_parse_and_map(arisc_cfg.suart.np, 0); if (arisc_cfg.suart.irq <= 0) panic("Can't parse suart IRQ"); arisc_cfg.suart.status = of_device_is_available(arisc_cfg.suart.np); ARISC_INF("suart pbase:0x%p, vbase:0x%p, size:0x%x, irq:0x%x, status:%u\n", (void *)arisc_cfg.suart.pbase, arisc_cfg.suart.vbase, (unsigned int)arisc_cfg.suart.size, (unsigned int)arisc_cfg.suart.irq, arisc_cfg.suart.status); ARISC_INF("suart pbase:0x%p, vbase:0x%p, size:0x%x, irq:0x%x, status:%u\n", (void *)arisc_cfg.suart.pbase, arisc_cfg.suart.vbase, (unsigned int)arisc_cfg.suart.size, (unsigned int)arisc_cfg.suart.irq, arisc_cfg.suart.status); #if (defined CONFIG_ARCH_SUN50IW2P1) || (defined CONFIG_ARCH_SUN50IW6P1) /* parse s_twi node */ arisc_cfg.stwi.np = of_find_compatible_node(NULL, NULL, "allwinner,s_twi"); if (IS_ERR(arisc_cfg.stwi.np)) { ARISC_ERR("get [allwinner,s_twi] device node error\n"); return -EINVAL; } ret = of_address_to_resource(arisc_cfg.stwi.np, 0, &res); if (ret || !res.start) { ARISC_ERR("get stwi pbase error\n"); return -EINVAL; } arisc_cfg.stwi.pbase = res.start; arisc_cfg.stwi.size = resource_size(&res); arisc_cfg.stwi.vbase = of_iomap(arisc_cfg.stwi.np, 0); if (!arisc_cfg.stwi.vbase) panic("Can't map stwi registers"); arisc_cfg.stwi.irq = irq_of_parse_and_map(arisc_cfg.stwi.np, 0); if (arisc_cfg.stwi.irq <= 0) panic("Can't parse stwi IRQ"); arisc_cfg.stwi.status = of_device_is_available(arisc_cfg.stwi.np); ARISC_INF("stwi pbase:0x%p, vbase:0x%p, size:0x%x, irq:0x%x, status:%u\n", (void *)arisc_cfg.stwi.pbase, arisc_cfg.stwi.vbase, (unsigned int)arisc_cfg.stwi.size, (unsigned int)arisc_cfg.stwi.irq, arisc_cfg.stwi.status); #else /* parse s_rsb node */ arisc_cfg.srsb.np = of_find_compatible_node(NULL, NULL, "allwinner,s_rsb"); if (IS_ERR(arisc_cfg.srsb.np)) { ARISC_ERR("get [allwinner,s_rsb] device node error\n"); return -EINVAL; } ret = of_address_to_resource(arisc_cfg.srsb.np, 0, &res); if (ret || !res.start) { ARISC_ERR("get srsb pbase error\n"); return -EINVAL; } arisc_cfg.srsb.pbase = res.start; arisc_cfg.srsb.size = resource_size(&res); arisc_cfg.srsb.vbase = of_iomap(arisc_cfg.srsb.np, 0); if (!arisc_cfg.srsb.vbase) panic("Can't map srsb registers"); arisc_cfg.srsb.irq = irq_of_parse_and_map(arisc_cfg.srsb.np, 0); if (arisc_cfg.srsb.irq <= 0) panic("Can't parse srsb IRQ"); arisc_cfg.srsb.status = of_device_is_available(arisc_cfg.srsb.np); ARISC_INF("srsb pbase:0x%p, vbase:0x%p, size:0x%x, irq:0x%x, status:%u\n", (void *)arisc_cfg.srsb.pbase, arisc_cfg.srsb.vbase, (unsigned int)arisc_cfg.srsb.size, (unsigned int)arisc_cfg.srsb.irq, arisc_cfg.srsb.status); #endif /* parse msgbox node */ arisc_cfg.msgbox.np = of_find_compatible_node(NULL, NULL, "allwinner,msgbox"); if (IS_ERR(arisc_cfg.msgbox.np)) { ARISC_ERR("get [allwinner,msgbox] device node error\n"); return -EINVAL; } ret = of_address_to_resource(arisc_cfg.msgbox.np, 0, &res); if (ret || !res.start) { ARISC_ERR("get msgbox pbase error\n"); return -EINVAL; } arisc_cfg.msgbox.pbase = res.start; arisc_cfg.msgbox.size = resource_size(&res); arisc_cfg.msgbox.vbase = of_iomap(arisc_cfg.msgbox.np, 0); if (!arisc_cfg.msgbox.vbase) panic("Can't map msgbox registers"); arisc_cfg.msgbox.irq = irq_of_parse_and_map(arisc_cfg.msgbox.np, 0); if (arisc_cfg.msgbox.irq <= 0) panic("Can't parse msgbox IRQ"); arisc_cfg.msgbox.status = of_device_is_available(arisc_cfg.msgbox.np); ARISC_INF("msgbox pbase:0x%p, vbase:0x%p, size:0x%zx, irq:0x%x, status:%u\n", (void *)arisc_cfg.msgbox.pbase, arisc_cfg.msgbox.vbase, arisc_cfg.msgbox.size, arisc_cfg.msgbox.irq, arisc_cfg.msgbox.status); /* parse s_cpucfg node */ arisc_cfg.cpuscfg.np = of_find_compatible_node(NULL, NULL, "allwinner,s_cpuscfg"); if (IS_ERR(arisc_cfg.cpuscfg.np)) { ARISC_ERR("get [allwinner,s_cpuscfg] device node error\n"); return -EINVAL; } ret = of_address_to_resource(arisc_cfg.cpuscfg.np, 0, &res); if (ret || !res.start) { ARISC_ERR("get s_cpuscfg pbase error\n"); return -EINVAL; } arisc_cfg.cpuscfg.pbase = res.start; arisc_cfg.cpuscfg.size = resource_size(&res); arisc_cfg.cpuscfg.vbase = of_iomap(arisc_cfg.cpuscfg.np, 0); if (!arisc_cfg.cpuscfg.vbase) panic("Can't map cpuscfg registers"); ARISC_INF("cpuscfg pbase:0x%p, vbase:0x%p, size:0x%zx\n", (void *)arisc_cfg.cpuscfg.pbase, arisc_cfg.cpuscfg.vbase, arisc_cfg.cpuscfg.size); np = of_find_compatible_node(NULL, NULL, "allwinner,arisc_space"); if (IS_ERR(np)) { ARISC_ERR("get [allwinner,arisc_space] device node error\n"); return -EINVAL; } ret = of_property_read_u32_array(np, "space4", space.value, 3); if (ret) { ARISC_ERR("get arisc_space1 error.\n"); return -EINVAL; } arisc_cfg.space[0].vbase = phys_to_virt(space.info.dst); arisc_cfg.space[0].size = space.info.size; ret = of_property_read_u32_array(np, "space2", space.value, 3); if (ret) { ARISC_ERR("get arisc_space2 error.\n"); return -EINVAL; } arisc_cfg.space[1].vbase = phys_to_virt(space.info.dst); arisc_cfg.space[1].size = space.info.size; /* parse s_jtag node */ arisc_cfg.sjtag.np = of_find_compatible_node(NULL, NULL, "allwinner,s_jtag"); if (IS_ERR(arisc_cfg.sjtag.np)) { ARISC_ERR("get [allwinner,s_jtag] device node error\n"); return -EINVAL; } arisc_cfg.sjtag.status = of_device_is_available(arisc_cfg.sjtag.np); ARISC_INF("sjtag status:%u\n", arisc_cfg.sjtag.status); return 0; } static int sunxi_arisc_probe(struct platform_device *pdev); #ifdef CONFIG_AW_AXP #if (defined CONFIG_ARCH_SUN8IW5P1) static int axp_notify_call(struct notifier_block *nfb, unsigned long action, void *parg) { return NOTIFY_OK; } #else static int axp_notify_call(struct notifier_block *nfb, unsigned long action, void *parg) { switch (action) { case AXP_READY: /* axp ready now, should send power tree to cpus */ /* get power regulator tree */ axp_get_pwr_regu_tree(arisc_cfg.power_regu_tree); arisc_set_pwr_tree(arisc_cfg.power_regu_tree); #if DEBUG_POWER_TREE hexdump("tree", arisc_cfg.power_regu_tree, sizeof(arisc_cfg.power_regu_tree)); #endif break; } return NOTIFY_OK; } #endif static struct notifier_block axp_notifier = { &axp_notify_call, NULL, 0 }; #endif static int sunxi_arisc_probe(struct platform_device *pdev) { int ret; //ARISC_INF("arisc initialize\n"); sunxi_arisc_parse_cfg(pdev); /* cfg sunxi arisc clk */ ret = sunxi_arisc_clk_cfg(pdev); if (ret) { ARISC_ERR("sunxi-arisc clk cfg failed\n"); return -EINVAL; } /* cfg sunxi arisc pin */ ret = sunxi_arisc_pin_cfg(pdev); if (ret) { ARISC_ERR("sunxi-arisc pin cfg failed\n"); return -EINVAL; } sunxi_arisc_sysfs(pdev); /* register axp regulator notify, so the axp regulator will * call the arisc set power tree callback function when it ready */ #ifdef CONFIG_AW_AXP ret = raw_notifier_chain_register(&axp_regu_notifier, &axp_notifier); #endif /* arisc init ok */ arisc_notify(ARISC_INIT_READY, NULL); /* arisc initialize succeeded */ ARISC_LOG("sunxi-arisc driver v%s startup succeeded\n", DRV_VERSION); return ret; } static const struct of_device_id sunxi_arisc_match[] = { { .compatible = "allwinner,sunxi-arisc", }, {}, }; MODULE_DEVICE_TABLE(of, sunxi_arisc_match); static struct platform_driver sunxi_arisc_driver = { .probe = sunxi_arisc_probe, .driver = { .name = DRV_NAME, .owner = THIS_MODULE, .pm = SUNXI_ARISC_DEV_PM_OPS, .of_match_table = sunxi_arisc_match, }, }; static int __init arisc_init(void) { int ret; ARISC_LOG("sunxi-arisc driver v%s\n", DRV_VERSION); ret = platform_driver_register(&sunxi_arisc_driver); if (IS_ERR_VALUE((unsigned long)ret)) { ARISC_ERR("register sunxi arisc platform driver failed\n"); goto err_platform_driver_register; } return 0; err_platform_driver_register: platform_driver_unregister(&sunxi_arisc_driver); return -EINVAL; } static void __exit arisc_exit(void) { platform_driver_unregister(&sunxi_arisc_driver); ARISC_LOG("module unloaded\n"); } subsys_initcall(arisc_init); module_exit(arisc_exit); MODULE_DESCRIPTION("SUNXI ARISC Driver"); MODULE_AUTHOR("Superm Wu "); MODULE_LICENSE("GPL"); MODULE_VERSION(DRV_VERSION); MODULE_ALIAS("platform:sunxi arisc driver");