| /* SPDX-License-Identifier: GPL-2.0-only */ |
| |
| #include <types.h> |
| #include <cbfs.h> |
| #include <device/device.h> |
| #include <device/pci_ops.h> |
| #include <console/console.h> |
| #include <drivers/intel/gma/int15.h> |
| #include <fmap.h> |
| #include <arch/io.h> |
| #include "onboard.h" |
| #include "ec.h" |
| #include <southbridge/intel/bd82x6x/pch.h> |
| #include <smbios.h> |
| #include <ec/quanta/ene_kb3940q/ec.h> |
| |
| static unsigned int search(char *p, char *a, unsigned int lengthp, |
| unsigned int lengtha) |
| { |
| int i, j; |
| |
| /* Searching */ |
| for (j = 0; j <= lengtha - lengthp; j++) { |
| for (i = 0; i < lengthp && p[i] == a[i + j]; i++) |
| ; |
| if (i >= lengthp) |
| return j; |
| } |
| return lengtha; |
| } |
| |
| static unsigned char get_hex_digit(char *offset) |
| { |
| unsigned char retval = 0; |
| |
| retval = *offset - '0'; |
| if (retval > 0x09) { |
| retval = *offset - 'A' + 0x0A; |
| if (retval > 0x0F) |
| retval = *offset - 'a' + 0x0a; |
| } |
| if (retval > 0x0F) { |
| printk(BIOS_ERR, "Invalid Hex digit found: %c - 0x%02x\n", |
| *offset, (unsigned char)*offset); |
| retval = 0; |
| } |
| |
| return retval; |
| } |
| |
| static int get_mac_address(u32 *high_dword, u32 *low_dword, |
| u32 search_address, u32 search_length) |
| { |
| char key[] = "ethernet_mac"; |
| unsigned int offset; |
| int i; |
| |
| offset = search(key, (char *)search_address, |
| sizeof(key) - 1, search_length); |
| if (offset == search_length) { |
| printk(BIOS_ERR, "Could not locate '%s' in VPD\n", key); |
| return 0; |
| } |
| printk(BIOS_DEBUG, "Located '%s' in VPD\n", key); |
| |
| offset += sizeof(key); /* move to next character */ |
| *high_dword = 0; |
| |
| /* Fetch the MAC address and put the octets in the correct order to |
| * be programmed. |
| * |
| * From RTL8105E_Series_EEPROM-Less_App_Note_1.1 |
| * If the MAC address is 001122334455h: |
| * Write 33221100h to I/O register offset 0x00 via double word access |
| * Write 00005544h to I/O register offset 0x04 via double word access |
| */ |
| |
| for (i = 0; i < 4; i++) { |
| *high_dword |= (get_hex_digit((char *)(search_address + offset)) |
| << (4 + (i * 8))); |
| *high_dword |= (get_hex_digit((char *)(search_address + offset + 1)) |
| << (i * 8)); |
| offset += 3; |
| } |
| |
| *low_dword = 0; |
| for (i = 0; i < 2; i++) { |
| *low_dword |= (get_hex_digit((char *)(search_address + offset)) |
| << (4 + (i * 8))); |
| *low_dword |= (get_hex_digit((char *)(search_address + offset + 1)) |
| << (i * 8)); |
| offset += 3; |
| } |
| |
| return *high_dword | *low_dword; |
| } |
| |
| static void program_mac_address(u16 io_base, u32 search_address, |
| u32 search_length) |
| { |
| /* Default MAC Address of A0:00:BA:D0:0B:AD */ |
| u32 high_dword = 0xD0BA00A0; /* high dword of mac address */ |
| u32 low_dword = 0x0000AD0B; /* low word of mac address as a dword */ |
| |
| if (search_length != -1) |
| get_mac_address(&high_dword, &low_dword, search_address, |
| search_length); |
| |
| if (io_base) { |
| printk(BIOS_DEBUG, "Realtek NIC io_base = 0x%04x\n", io_base); |
| printk(BIOS_DEBUG, "Programming MAC Address\n"); |
| |
| outb(0xc0, io_base + 0x50); /* Disable register protection */ |
| outl(high_dword, io_base); |
| outl(low_dword, io_base + 0x04); |
| outb(0x60, io_base + 54); |
| outb(0x00, io_base + 0x50); /* Enable register protection again */ |
| } |
| } |
| |
| static void program_keyboard_type(u32 search_address, u32 search_length) |
| { |
| char key[] = "keyboard_layout"; |
| char kbd_jpn[] = "xkb:jp::jpn"; |
| unsigned int offset; |
| char kbd_type = EC_KBD_EN; /* Default keyboard type is English */ |
| |
| if (search_length != -1) { |
| |
| /* |
| * Search for keyboard_layout identifier |
| * The only options in the EC are Japanese or English. |
| * The English keyboard layout is actually used for multiple |
| * different languages - English, Spanish, French... Because |
| * of this the code only searches for Japanese, and sets the |
| * keyboard type to English if Japanese is not found. |
| */ |
| offset = search(key, (char *)search_address, sizeof(key) - 1, |
| search_length); |
| if (offset != search_length) { |
| printk(BIOS_DEBUG, "Located '%s' in VPD\n", key); |
| |
| offset += sizeof(key); /* move to next character */ |
| search_length = sizeof(kbd_jpn); |
| offset = search(kbd_jpn, (char *)(search_address + offset), |
| sizeof(kbd_jpn) - 1, search_length); |
| if (offset != search_length) |
| kbd_type = EC_KBD_JP; |
| } |
| } else { |
| printk(BIOS_ERR, "Could not locate VPD area\n"); |
| } |
| |
| printk(BIOS_DEBUG, "Setting Keyboard type in EC to "); |
| printk(BIOS_DEBUG, (kbd_type == EC_KBD_JP) ? "Japanese" : "English"); |
| printk(BIOS_DEBUG, ".\n"); |
| |
| ec_mem_write(EC_KBID_REG, kbd_type); |
| } |
| |
| static void mainboard_init(struct device *dev) |
| { |
| u32 search_address = 0x0; |
| size_t search_length = -1; |
| u16 io_base = 0; |
| struct device *ethernet_dev = NULL; |
| void *vpd_file; |
| |
| if (CONFIG(VPD)) { |
| struct region_device rdev; |
| |
| if (fmap_locate_area_as_rdev("RO_VPD", &rdev) == 0) { |
| vpd_file = rdev_mmap_full(&rdev); |
| |
| if (vpd_file != NULL) { |
| search_length = region_device_sz(&rdev); |
| search_address = (uintptr_t)vpd_file; |
| } |
| } |
| } else { |
| vpd_file = cbfs_map("vpd.bin", &search_length); |
| if (vpd_file) { |
| search_address = (unsigned long)vpd_file; |
| } else { |
| search_length = -1; |
| search_address = 0; |
| } |
| } |
| |
| /* Initialize the Embedded Controller */ |
| butterfly_ec_init(); |
| |
| /* Program EC Keyboard locale based on VPD data */ |
| program_keyboard_type(search_address, search_length); |
| |
| /* Get NIC's IO base address */ |
| ethernet_dev = dev_find_device(BUTTERFLY_NIC_VENDOR_ID, |
| BUTTERFLY_NIC_DEVICE_ID, dev); |
| if (ethernet_dev != NULL) { |
| io_base = pci_read_config16(ethernet_dev, 0x10) & 0xfffe; |
| |
| /* |
| * Battery life time - LAN PCIe should enter ASPM L1 to save |
| * power when LAN connection is idle. |
| * enable CLKREQ: LAN pci config space 0x81h=01 |
| */ |
| pci_write_config8(ethernet_dev, 0x81, 0x01); |
| } |
| |
| if (io_base) { |
| /* Program MAC address based on VPD data */ |
| program_mac_address(io_base, search_address, search_length); |
| |
| /* |
| * Program NIC LEDS |
| * |
| * RTL8105E Series EEPROM-Less Application Note, |
| * Section 5.6 LED Mode Configuration |
| * |
| * Step1: Write C0h to I/O register 0x50 via byte access to |
| * disable 'register protection' |
| * Step2: Write xx001111b to I/O register 0x52 via byte access |
| * (bit7 is LEDS1 and bit6 is LEDS0) |
| * Step3: Write 0x00 to I/O register 0x50 via byte access to |
| * enable 'register protection' |
| */ |
| outb(0xc0, io_base + 0x50); /* Disable protection */ |
| outb((BUTTERFLY_NIC_LED_MODE << 6) | 0x0f, io_base + 0x52); |
| outb(0x00, io_base + 0x50); /* Enable register protection */ |
| } |
| } |
| |
| static int butterfly_onboard_smbios_data(struct device *dev, int *handle, |
| unsigned long *current) |
| { |
| int len = 0; |
| |
| len += smbios_write_type41( |
| current, handle, |
| BOARD_TRACKPAD_NAME, /* name */ |
| BOARD_TRACKPAD_IRQ, /* instance */ |
| 0, /* segment */ |
| BOARD_TRACKPAD_I2C_ADDR, /* bus */ |
| 0, /* device */ |
| 0, /* function */ |
| SMBIOS_DEVICE_TYPE_OTHER); /* device type */ |
| |
| return len; |
| } |
| |
| static void mainboard_enable(struct device *dev) |
| { |
| dev->ops->init = mainboard_init; |
| dev->ops->get_smbios_data = butterfly_onboard_smbios_data; |
| install_intel_vga_int15_handler(GMA_INT15_ACTIVE_LFP_INT_LVDS, GMA_INT15_PANEL_FIT_DEFAULT, GMA_INT15_BOOT_DISPLAY_DEFAULT, 0); |
| } |
| |
| struct chip_operations mainboard_ops = { |
| .enable_dev = mainboard_enable, |
| }; |