Various license header consistency fixes (trivial).
[coreboot.git] / src / arch / i386 / boot / acpigen.c
index 6342a695722aecf42dc962c1ab2448d1260393d2..3ed7a2f05dae862c449a57839adf7be885787d4b 100644 (file)
@@ -4,8 +4,8 @@
  * Copyright (C) 2009 Rudolf Marek <r.marek@assembler.cz>
  *
  * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License v2 as published by
- * the Free Software Foundation.
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; version 2 of the License.
  *
  * This program is distributed in the hope that it will be useful,
  * but WITHOUT ANY WARRANTY; without even the implied warranty of
@@ -34,10 +34,10 @@ static char *gencurrent;
 char *len_stack[ACPIGEN_LENSTACK_SIZE];
 int ltop = 0;
 
-static int acpigen_write_len_f()
+static int acpigen_write_len_f(void)
 {
        ASSERT(ltop < (ACPIGEN_LENSTACK_SIZE - 1))
-       len_stack[ltop++] = gencurrent;
+           len_stack[ltop++] = gencurrent;
        acpigen_emit_byte(0);
        acpigen_emit_byte(0);
        return 2;
@@ -46,7 +46,7 @@ static int acpigen_write_len_f()
 void acpigen_patch_len(int len)
 {
        ASSERT(len <= ACPIGEN_MAXLEN)
-       ASSERT(ltop > 0)
+           ASSERT(ltop > 0)
        char *p = len_stack[--ltop];
        /* generate store length for 0xfff max */
        p[0] = (0x40 | (len & 0xf));
@@ -54,12 +54,14 @@ void acpigen_patch_len(int len)
 
 }
 
-void acpigen_set_current(char *curr) {
-    gencurrent = curr;
+void acpigen_set_current(char *curr)
+{
+       gencurrent = curr;
 }
 
-char *acpigen_get_current(void) {
-    return gencurrent;
+char *acpigen_get_current(void)
+{
+       return gencurrent;
 }
 
 int acpigen_emit_byte(unsigned char b)
@@ -97,21 +99,47 @@ int acpigen_write_dword(unsigned int data)
        return 5;
 }
 
-int acpigen_write_name_byte(char *name, uint8_t val) {
+int acpigen_write_qword(uint64_t data)
+{
+       /* qword op */
+       acpigen_emit_byte(0xe);
+       acpigen_emit_byte(data & 0xff);
+       acpigen_emit_byte((data >> 8) & 0xff);
+       acpigen_emit_byte((data >> 16) & 0xff);
+       acpigen_emit_byte((data >> 24) & 0xff);
+       acpigen_emit_byte((data >> 32) & 0xff);
+       acpigen_emit_byte((data >> 40) & 0xff);
+       acpigen_emit_byte((data >> 48) & 0xff);
+       acpigen_emit_byte((data >> 56) & 0xff);
+       return 9;
+}
+
+int acpigen_write_name_byte(const char *name, uint8_t val)
+{
        int len;
        len = acpigen_write_name(name);
        len += acpigen_write_byte(val);
        return len;
 }
 
-int acpigen_write_name_dword(char *name, uint32_t val) {
+int acpigen_write_name_dword(const char *name, uint32_t val)
+{
        int len;
        len = acpigen_write_name(name);
        len += acpigen_write_dword(val);
        return len;
 }
 
-int acpigen_emit_stream(char *data, int size) {
+int acpigen_write_name_qword(const char *name, uint64_t val)
+{
+       int len;
+       len = acpigen_write_name(name);
+       len += acpigen_write_qword(val);
+       return len;
+}
+
+int acpigen_emit_stream(const char *data, int size)
+{
        int i;
        for (i = 0; i < size; i++) {
                acpigen_emit_byte(data[i]);
@@ -119,22 +147,111 @@ int acpigen_emit_stream(char *data, int size) {
        return size;
 }
 
-int acpigen_write_name(char *name)
+/* The NameString are bit tricky, each element can be 4 chars, if 
+   less its padded with underscore. Check 18.2.2 and 18.4 
+   and 5.3 of ACPI specs 3.0 for details
+*/
+
+static int acpigen_emit_simple_namestring(const char *name) {
+       int i, len = 0;
+       char ud[] = "____";
+       for (i = 0; i < 4; i++) {
+               if ((name[i] == '\0') || (name[i] == '.')) {
+                       len += acpigen_emit_stream(ud, 4 - i);
+                       break;
+               } else {
+                       len += acpigen_emit_byte(name[i]);                              
+               }
+       }
+       return len;
+}
+
+static int acpigen_emit_double_namestring(const char *name, int dotpos) {
+       int len = 0; 
+       /* mark dual name prefix */
+       len += acpigen_emit_byte(0x2e);
+       len += acpigen_emit_simple_namestring(name);
+       len += acpigen_emit_simple_namestring(&name[dotpos + 1]);
+       return len;
+}
+
+static int acpigen_emit_multi_namestring(const char *name) {
+       int len = 0, count = 0;
+       unsigned char *pathlen; 
+       /* mark multi name prefix */
+       len += acpigen_emit_byte(0x2f);
+       len += acpigen_emit_byte(0x0);
+       pathlen = ((unsigned char *) acpigen_get_current()) - 1;
+
+       while (name[0] != '\0') {
+               len += acpigen_emit_simple_namestring(name);
+               /* find end or next entity */
+               while ((name[0] != '.') && (name[0] != '\0'))
+                       name++;
+               /* forward to next */
+               if (name[0] == '.')
+                       name++;
+               count++;
+       }
+
+       pathlen[0] = count;
+       return len;
+}
+
+
+int acpigen_emit_namestring(const char *namepath) {
+       int dotcount = 0, i;
+       int dotpos = 0;
+       int len = 0;
+
+       /* we can start with a \ */
+       if (namepath[0] == '\\') {
+               len += acpigen_emit_byte('\\');
+               namepath++;
+       }
+
+       /* and there can be any number of ^ */
+       while (namepath[0] == '^') {
+               len += acpigen_emit_byte('^');
+               namepath++;
+       }
+
+       ASSERT(namepath[0] != '\0');
+
+       i = 0;
+       while (namepath[i] != '\0') {
+               if (namepath[i] == '.') {
+                       dotcount++;
+                       dotpos = i;
+               }
+               i++;
+       }
+
+       if (dotcount == 0) {
+               len += acpigen_emit_simple_namestring(namepath);
+       } else if (dotcount == 1) { 
+               len += acpigen_emit_double_namestring(namepath, dotpos);
+       } else {
+               len += acpigen_emit_multi_namestring(namepath);
+       }
+       return len;
+}
+
+int acpigen_write_name(const char *name)
 {
-       int len = strlen(name);
+       int len;
        /* name op */
-       acpigen_emit_byte(0x8);
-       acpigen_emit_stream(name, len);
-       return len + 1;
+       len = acpigen_emit_byte(0x8);
+       return len + acpigen_emit_namestring(name);
 }
 
-int acpigen_write_scope(char *name)
+int acpigen_write_scope(const char *name)
 {
        int len;
        /* scope op */
-       acpigen_emit_byte(0x10);
-       len = acpigen_write_len_f();
-       return len + acpigen_emit_stream(name, strlen(name)) + 1;
+       len = acpigen_emit_byte(0x10);
+       len += acpigen_write_len_f();
+       return len + acpigen_emit_namestring(name);
 }
 
 int acpigen_write_processor(u8 cpuindex, u32 pblock_addr, u8 pblock_len)
@@ -144,21 +261,21 @@ int acpigen_write_processor(u8 cpuindex, u32 pblock_addr, u8 pblock_len)
         {
 */
        char pscope[16];
-       int  len;
+       int len;
        /* processor op */
        acpigen_emit_byte(0x5b);
        acpigen_emit_byte(0x83);
        len = acpigen_write_len_f();
 
-       sprintf(pscope, "\\._PR_CPU%x", (unsigned int) cpuindex);
-       len += acpigen_emit_stream(pscope, strlen(pscope));
+       sprintf(pscope, "\\_PR.CPU%x", (unsigned int) cpuindex);
+       len += acpigen_emit_namestring(pscope);
        acpigen_emit_byte(cpuindex);
        acpigen_emit_byte(pblock_addr & 0xff);
        acpigen_emit_byte((pblock_addr >> 8) & 0xff);
        acpigen_emit_byte((pblock_addr >> 16) & 0xff);
        acpigen_emit_byte((pblock_addr >> 24) & 0xff);
        acpigen_emit_byte(pblock_len);
-       return 6  + 2 + len;
+       return 6 + 2 + len;
 }
 
 int acpigen_write_empty_PCT(void)
@@ -210,19 +327,21 @@ int acpigen_write_PPC(u8 nr)
        /* method op */
        acpigen_emit_byte(0x14);
        len = acpigen_write_len_f();
-       len += acpigen_emit_stream("_PPC", 4);
+       len += acpigen_emit_namestring("_PPC");
        /* no fnarg */
        acpigen_emit_byte(0x00);
        /* return */
        acpigen_emit_byte(0xa4);
        /* arg */
        len += acpigen_write_byte(nr);
+       /* add all single bytes */
+       len += 3;
        acpigen_patch_len(len - 1);
-       return len + 3;
+       return len;
 }
 
-int acpigen_write_PSS_package(u32 coreFreq, u32 power, u32 transLat, u32 busmLat,
-                       u32 control, u32 status)
+int acpigen_write_PSS_package(u32 coreFreq, u32 power, u32 transLat,
+                             u32 busmLat, u32 control, u32 status)
 {
        int len;
        len = acpigen_write_package(6);
@@ -236,3 +355,20 @@ int acpigen_write_PSS_package(u32 coreFreq, u32 power, u32 transLat, u32 busmLat
        acpigen_patch_len(len - 1);
        return len;
 }
+
+int acpigen_write_PSD_package(u32 domain, u32 numprocs, PSD_coord coordtype)
+{
+       int len, lenh, lenp;
+       lenh = acpigen_write_name("_PSD");
+       lenp = acpigen_write_package(1);
+       len = acpigen_write_package(5);
+       len += acpigen_write_byte(5);   // 5 values
+       len += acpigen_write_byte(0);   // revision 0
+       len += acpigen_write_dword(domain);
+       len += acpigen_write_dword(coordtype);
+       len += acpigen_write_dword(numprocs);
+       acpigen_patch_len(len - 1);
+       len += lenp;
+       acpigen_patch_len(len - 1);
+       return len + lenh;
+}