target/linux/ifxmips/files/arch/mips/ifxmips/prom.c

   1 /*
   2  *   This program is free software; you can redistribute it and/or modify
   3  *   it under the terms of the GNU General Public License as published by
   4  *   the Free Software Foundation; either version 2 of the License, or
   5  *   (at your option) any later version.
   6  *
   7  *   This program is distributed in the hope that it will be useful,
   8  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
   9  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  10  *   GNU General Public License for more details.
  11  *
  12  *   You should have received a copy of the GNU General Public License
  13  *   along with this program; if not, write to the Free Software
  14  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA.
  15  *
  16  *   Copyright (C) 2005 Wu Qi Ming infineon
  17  *   Copyright (C) 2007 John Crispin <blogic@openwrt.org>
  18  */
  19
  20 #include <linux/init.h>
  21 #include <linux/bootmem.h>
  22 #include <asm/bootinfo.h>
  23 #include <asm/ifxmips/ifxmips.h>
  24
  25 static char buf[1024];
  26 unsigned int *prom_cp1_base = NULL;
  27 unsigned int prom_cp1_size = 0;
  28
  29 #ifdef IFXMIPS_PROM_ASC0
  30 #define IFXMIPS_ASC_DIFF        0
  31 #else
  32 #define IFXMIPS_ASC_DIFF        IFXMIPS_ASC_BASE_DIFF
  33 #endif
  34
  35 static inline u32
  36 asc_r32(unsigned long r)
  37 {
  38         return ifxmips_r32((u32*)(IFXMIPS_ASC_BASE_ADDR + IFXMIPS_ASC_DIFF + r));
  39 }
  40
  41 static inline void
  42 asc_w32(u32 v, unsigned long r)
  43 {
  44         ifxmips_w32(v, (u32*)(IFXMIPS_ASC_BASE_ADDR + IFXMIPS_ASC_DIFF + r));
  45 }
  46
  47 void
  48 prom_free_prom_memory(void)
  49 {
  50 }
  51
  52 void
  53 prom_putchar(char c)
  54 {
  55         unsigned long flags;
  56
  57         local_irq_save(flags);
  58         while((asc_r32(IFXMIPS_ASC_FSTAT) & ASCFSTAT_TXFFLMASK) >> ASCFSTAT_TXFFLOFF);
  59
  60         if(c == '\n')
  61                 asc_w32('\r', IFXMIPS_ASC_TBUF);
  62         asc_w32(c, IFXMIPS_ASC_TBUF);
  63         local_irq_restore(flags);
  64 }
  65
  66 void
  67 prom_printf(const char * fmt, ...)
  68 {
  69         va_list args;
  70         int l;
  71         char *p, *buf_end;
  72
  73         va_start(args, fmt);
  74         l = vsprintf(buf, fmt, args);
  75         va_end(args);
  76         buf_end = buf + l;
  77
  78         for(p = buf; p < buf_end; p++)
  79                 prom_putchar(*p);
  80 }
  81
  82 unsigned int *prom_get_cp1_base(void)
  83 {
  84         return prom_cp1_base;
  85 }
  86
  87 unsigned int prom_get_cp1_size(void)
  88 {
  89         return prom_cp1_size;
  90 }
  91
  92 void __init
  93 prom_init(void)
  94 {
  95         int argc = fw_arg0;
  96         char **argv = (char **) fw_arg1;
  97         char **envp = (char **) fw_arg2;
  98
  99         int memsize = 16;
 100         int i;
 101
 102         mips_machtype = MACH_INFINEON_IFXMIPS;
 103
 104         argv = (char**)KSEG1ADDR((unsigned long)argv);
 105         arcs_cmdline[0] = '\0';
 106         for(i = 1; i < argc; i++)
 107         {
 108                 char *a = (char*)KSEG1ADDR(argv[i]);
 109                 if(!a)
 110                         continue;
 111                 if(strlen(arcs_cmdline) + strlen(a + 1) >= sizeof(arcs_cmdline))
 112                         break;
 113                 strcat(arcs_cmdline, a);
 114                 strcat(arcs_cmdline, " ");
 115         }
 116
 117         envp = (char**)KSEG1ADDR((unsigned long)envp);
 118         while(*envp)
 119         {
 120                 char *e = (char*)KSEG1ADDR(*envp);
 121
 122                 if(!strncmp(e, "memsize=", 8))
 123                 {
 124                         e += 8;
 125                         memsize = simple_strtoul(e, NULL, 10);
 126                 }
 127                 envp++;
 128         }
 129
 130         prom_cp1_size = 2;
 131         memsize -= prom_cp1_size;
 132         prom_cp1_base = (unsigned int*)(0xA0000000 + (memsize * 1024 * 1024));
 133
 134         prom_printf("Using %dMB Ram and reserving %dMB for cp1\n", memsize, prom_cp1_size);
 135         memsize *= 1024 * 1024;
 136
 137         if(!*arcs_cmdline)
 138                 strcpy(&(arcs_cmdline[0]),
 139                         "console=ttyS0,115200 rootfstype=squashfs,jffs2 init=/etc/preinit");
 140
 141         add_memory_region(0x00000000, memsize, BOOT_MEM_RAM);
 142 }