arch/sparc64/prom/misc.c

   1 /* $Id: misc.c,v 1.20 2001/09/21 03:17:07 kanoj Exp $
   2  * misc.c:  Miscellaneous prom functions that don't belong
   3  *          anywhere else.
   4  *
   5  * Copyright (C) 1995 David S. Miller (davem@caip.rutgers.edu)
   6  * Copyright (C) 1996,1997 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
   7  */
   8
   9 #include <linux/types.h>
  10 #include <linux/kernel.h>
  11 #include <linux/sched.h>
  12 #include <linux/interrupt.h>
  13 #include <linux/delay.h>
  14 #include <asm/openprom.h>
  15 #include <asm/oplib.h>
  16 #include <asm/system.h>
  17 #include <asm/ldc.h>
  18
  19 int prom_service_exists(const char *service_name)
  20 {
  21         int err = p1275_cmd("test", P1275_ARG(0, P1275_ARG_IN_STRING) |
  22                             P1275_INOUT(1, 1), service_name);
  23
  24         if (err)
  25                 return 0;
  26         return 1;
  27 }
  28
  29 void prom_sun4v_guest_soft_state(void)
  30 {
  31         const char *svc = "SUNW,soft-state-supported";
  32
  33         if (!prom_service_exists(svc))
  34                 return;
  35         p1275_cmd(svc, P1275_INOUT(0, 0));
  36 }
  37
  38 /* Reset and reboot the machine with the command 'bcommand'. */
  39 void prom_reboot(const char *bcommand)
  40 {
  41 #ifdef CONFIG_SUN_LDOMS
  42         if (ldom_domaining_enabled)
  43                 ldom_reboot(bcommand);
  44 #endif
  45         p1275_cmd("boot", P1275_ARG(0, P1275_ARG_IN_STRING) |
  46                   P1275_INOUT(1, 0), bcommand);
  47 }
  48
  49 /* Forth evaluate the expression contained in 'fstring'. */
  50 void prom_feval(const char *fstring)
  51 {
  52         if (!fstring || fstring[0] == 0)
  53                 return;
  54         p1275_cmd("interpret", P1275_ARG(0, P1275_ARG_IN_STRING) |
  55                   P1275_INOUT(1, 1), fstring);
  56 }
  57
  58 /* We want to do this more nicely some day. */
  59 extern void (*prom_palette)(int);
  60
  61 #ifdef CONFIG_SMP
  62 extern void smp_capture(void);
  63 extern void smp_release(void);
  64 #endif
  65
  66 /* Drop into the prom, with the chance to continue with the 'go'
  67  * prom command.
  68  */
  69 void prom_cmdline(void)
  70 {
  71         unsigned long flags;
  72
  73         local_irq_save(flags);
  74
  75         if (prom_palette)
  76                 prom_palette(1);
  77
  78 #ifdef CONFIG_SMP
  79         smp_capture();
  80 #endif
  81
  82         p1275_cmd("enter", P1275_INOUT(0, 0));
  83
  84 #ifdef CONFIG_SMP
  85         smp_release();
  86 #endif
  87
  88         if (prom_palette)
  89                 prom_palette(0);
  90
  91         local_irq_restore(flags);
  92 }
  93
  94 /* Drop into the prom, but completely terminate the program.
  95  * No chance of continuing.
  96  */
  97 void prom_halt(void)
  98 {
  99 #ifdef CONFIG_SUN_LDOMS
 100         if (ldom_domaining_enabled)
 101                 ldom_power_off();
 102 #endif
 103 again:
 104         p1275_cmd("exit", P1275_INOUT(0, 0));
 105         goto again; /* PROM is out to get me -DaveM */
 106 }
 107
 108 void prom_halt_power_off(void)
 109 {
 110 #ifdef CONFIG_SUN_LDOMS
 111         if (ldom_domaining_enabled)
 112                 ldom_power_off();
 113 #endif
 114         p1275_cmd("SUNW,power-off", P1275_INOUT(0, 0));
 115
 116         /* if nothing else helps, we just halt */
 117         prom_halt();
 118 }
 119
 120 /* Set prom sync handler to call function 'funcp'. */
 121 void prom_setcallback(callback_func_t funcp)
 122 {
 123         if (!funcp)
 124                 return;
 125         p1275_cmd("set-callback", P1275_ARG(0, P1275_ARG_IN_FUNCTION) |
 126                   P1275_INOUT(1, 1), funcp);
 127 }
 128
 129 /* Get the idprom and stuff it into buffer 'idbuf'.  Returns the
 130  * format type.  'num_bytes' is the number of bytes that your idbuf
 131  * has space for.  Returns 0xff on error.
 132  */
 133 unsigned char prom_get_idprom(char *idbuf, int num_bytes)
 134 {
 135         int len;
 136
 137         len = prom_getproplen(prom_root_node, "idprom");
 138         if ((len >num_bytes) || (len == -1))
 139                 return 0xff;
 140         if (!prom_getproperty(prom_root_node, "idprom", idbuf, num_bytes))
 141                 return idbuf[0];
 142
 143         return 0xff;
 144 }
 145
 146 int prom_get_mmu_ihandle(void)
 147 {
 148         int node, ret;
 149
 150         if (prom_mmu_ihandle_cache != 0)
 151                 return prom_mmu_ihandle_cache;
 152
 153         node = prom_finddevice(prom_chosen_path);
 154         ret = prom_getint(node, prom_mmu_name);
 155         if (ret == -1 || ret == 0)
 156                 prom_mmu_ihandle_cache = -1;
 157         else
 158                 prom_mmu_ihandle_cache = ret;
 159
 160         return ret;
 161 }
 162
 163 static int prom_get_memory_ihandle(void)
 164 {
 165         static int memory_ihandle_cache;
 166         int node, ret;
 167
 168         if (memory_ihandle_cache != 0)
 169                 return memory_ihandle_cache;
 170
 171         node = prom_finddevice("/chosen");
 172         ret = prom_getint(node, "memory");
 173         if (ret == -1 || ret == 0)
 174                 memory_ihandle_cache = -1;
 175         else
 176                 memory_ihandle_cache = ret;
 177
 178         return ret;
 179 }
 180
 181 /* Load explicit I/D TLB entries. */
 182 long prom_itlb_load(unsigned long index,
 183                     unsigned long tte_data,
 184                     unsigned long vaddr)
 185 {
 186         return p1275_cmd(prom_callmethod_name,
 187                          (P1275_ARG(0, P1275_ARG_IN_STRING) |
 188                           P1275_ARG(2, P1275_ARG_IN_64B) |
 189                           P1275_ARG(3, P1275_ARG_IN_64B) |
 190                           P1275_INOUT(5, 1)),
 191                          "SUNW,itlb-load",
 192                          prom_get_mmu_ihandle(),
 193                          /* And then our actual args are pushed backwards. */
 194                          vaddr,
 195                          tte_data,
 196                          index);
 197 }
 198
 199 long prom_dtlb_load(unsigned long index,
 200                     unsigned long tte_data,
 201                     unsigned long vaddr)
 202 {
 203         return p1275_cmd(prom_callmethod_name,
 204                          (P1275_ARG(0, P1275_ARG_IN_STRING) |
 205                           P1275_ARG(2, P1275_ARG_IN_64B) |
 206                           P1275_ARG(3, P1275_ARG_IN_64B) |
 207                           P1275_INOUT(5, 1)),
 208                          "SUNW,dtlb-load",
 209                          prom_get_mmu_ihandle(),
 210                          /* And then our actual args are pushed backwards. */
 211                          vaddr,
 212                          tte_data,
 213                          index);
 214 }
 215
 216 int prom_map(int mode, unsigned long size,
 217              unsigned long vaddr, unsigned long paddr)
 218 {
 219         int ret = p1275_cmd(prom_callmethod_name,
 220                             (P1275_ARG(0, P1275_ARG_IN_STRING) |
 221                              P1275_ARG(3, P1275_ARG_IN_64B) |
 222                              P1275_ARG(4, P1275_ARG_IN_64B) |
 223                              P1275_ARG(6, P1275_ARG_IN_64B) |
 224                              P1275_INOUT(7, 1)),
 225                             prom_map_name,
 226                             prom_get_mmu_ihandle(),
 227                             mode,
 228                             size,
 229                             vaddr,
 230                             0,
 231                             paddr);
 232
 233         if (ret == 0)
 234                 ret = -1;
 235         return ret;
 236 }
 237
 238 void prom_unmap(unsigned long size, unsigned long vaddr)
 239 {
 240         p1275_cmd(prom_callmethod_name,
 241                   (P1275_ARG(0, P1275_ARG_IN_STRING) |
 242                    P1275_ARG(2, P1275_ARG_IN_64B) |
 243                    P1275_ARG(3, P1275_ARG_IN_64B) |
 244                    P1275_INOUT(4, 0)),
 245                   prom_unmap_name,
 246                   prom_get_mmu_ihandle(),
 247                   size,
 248                   vaddr);
 249 }
 250
 251 /* Set aside physical memory which is not touched or modified
 252  * across soft resets.
 253  */
 254 unsigned long prom_retain(const char *name,
 255                           unsigned long pa_low, unsigned long pa_high,
 256                           long size, long align)
 257 {
 258         /* XXX I don't think we return multiple values correctly.
 259          * XXX OBP supposedly returns pa_low/pa_high here, how does
 260          * XXX it work?
 261          */
 262
 263         /* If align is zero, the pa_low/pa_high args are passed,
 264          * else they are not.
 265          */
 266         if (align == 0)
 267                 return p1275_cmd("SUNW,retain",
 268                                  (P1275_ARG(0, P1275_ARG_IN_BUF) | P1275_INOUT(5, 2)),
 269                                  name, pa_low, pa_high, size, align);
 270         else
 271                 return p1275_cmd("SUNW,retain",
 272                                  (P1275_ARG(0, P1275_ARG_IN_BUF) | P1275_INOUT(3, 2)),
 273                                  name, size, align);
 274 }
 275
 276 /* Get "Unumber" string for the SIMM at the given
 277  * memory address.  Usually this will be of the form
 278  * "Uxxxx" where xxxx is a decimal number which is
 279  * etched into the motherboard next to the SIMM slot
 280  * in question.
 281  */
 282 int prom_getunumber(int syndrome_code,
 283                     unsigned long phys_addr,
 284                     char *buf, int buflen)
 285 {
 286         return p1275_cmd(prom_callmethod_name,
 287                          (P1275_ARG(0, P1275_ARG_IN_STRING)     |
 288                           P1275_ARG(3, P1275_ARG_OUT_BUF)       |
 289                           P1275_ARG(6, P1275_ARG_IN_64B)        |
 290                           P1275_INOUT(8, 2)),
 291                          "SUNW,get-unumber", prom_get_memory_ihandle(),
 292                          buflen, buf, P1275_SIZE(buflen),
 293                          0, phys_addr, syndrome_code);
 294 }
 295
 296 /* Power management extensions. */
 297 void prom_sleepself(void)
 298 {
 299         p1275_cmd("SUNW,sleep-self", P1275_INOUT(0, 0));
 300 }
 301
 302 int prom_sleepsystem(void)
 303 {
 304         return p1275_cmd("SUNW,sleep-system", P1275_INOUT(0, 1));
 305 }
 306
 307 int prom_wakeupsystem(void)
 308 {
 309         return p1275_cmd("SUNW,wakeup-system", P1275_INOUT(0, 1));
 310 }
 311
 312 #ifdef CONFIG_SMP
 313 void prom_startcpu(int cpunode, unsigned long pc, unsigned long arg)
 314 {
 315         p1275_cmd("SUNW,start-cpu", P1275_INOUT(3, 0), cpunode, pc, arg);
 316 }
 317
 318 void prom_startcpu_cpuid(int cpuid, unsigned long pc, unsigned long arg)
 319 {
 320         p1275_cmd("SUNW,start-cpu-by-cpuid", P1275_INOUT(3, 0),
 321                   cpuid, pc, arg);
 322 }
 323
 324 void prom_stopcpu_cpuid(int cpuid)
 325 {
 326         p1275_cmd("SUNW,stop-cpu-by-cpuid", P1275_INOUT(1, 0),
 327                   cpuid);
 328 }
 329
 330 void prom_stopself(void)
 331 {
 332         p1275_cmd("SUNW,stop-self", P1275_INOUT(0, 0));
 333 }
 334
 335 void prom_idleself(void)
 336 {
 337         p1275_cmd("SUNW,idle-self", P1275_INOUT(0, 0));
 338 }
 339
 340 void prom_resumecpu(int cpunode)
 341 {
 342         p1275_cmd("SUNW,resume-cpu", P1275_INOUT(1, 0), cpunode);
 343 }
 344 #endif