wii.c 2.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153
  1. // SPDX-License-Identifier: GPL-2.0-or-later
  2. /*
  3. * arch/powerpc/boot/wii.c
  4. *
  5. * Nintendo Wii bootwrapper support
  6. * Copyright (C) 2008-2009 The GameCube Linux Team
  7. * Copyright (C) 2008,2009 Albert Herranz
  8. */
  9. #include <stddef.h>
  10. #include "stdio.h"
  11. #include "types.h"
  12. #include "io.h"
  13. #include "ops.h"
  14. #include "ugecon.h"
  15. BSS_STACK(8192);
  16. #define HW_REG(x) ((void *)(x))
  17. #define EXI_CTRL HW_REG(0x0d800070)
  18. #define EXI_CTRL_ENABLE (1<<0)
  19. #define MEM2_TOP (0x10000000 + 64*1024*1024)
  20. #define FIRMWARE_DEFAULT_SIZE (12*1024*1024)
  21. struct mipc_infohdr {
  22. char magic[3];
  23. u8 version;
  24. u32 mem2_boundary;
  25. u32 ipc_in;
  26. size_t ipc_in_size;
  27. u32 ipc_out;
  28. size_t ipc_out_size;
  29. };
  30. static int mipc_check_address(u32 pa)
  31. {
  32. /* only MEM2 addresses */
  33. if (pa < 0x10000000 || pa > 0x14000000)
  34. return -EINVAL;
  35. return 0;
  36. }
  37. static struct mipc_infohdr *mipc_get_infohdr(void)
  38. {
  39. struct mipc_infohdr **hdrp, *hdr;
  40. /* 'mini' header pointer is the last word of MEM2 memory */
  41. hdrp = (struct mipc_infohdr **)0x13fffffc;
  42. if (mipc_check_address((u32)hdrp)) {
  43. printf("mini: invalid hdrp %08X\n", (u32)hdrp);
  44. hdr = NULL;
  45. goto out;
  46. }
  47. hdr = *hdrp;
  48. if (mipc_check_address((u32)hdr)) {
  49. printf("mini: invalid hdr %08X\n", (u32)hdr);
  50. hdr = NULL;
  51. goto out;
  52. }
  53. if (memcmp(hdr->magic, "IPC", 3)) {
  54. printf("mini: invalid magic\n");
  55. hdr = NULL;
  56. goto out;
  57. }
  58. out:
  59. return hdr;
  60. }
  61. static int mipc_get_mem2_boundary(u32 *mem2_boundary)
  62. {
  63. struct mipc_infohdr *hdr;
  64. int error;
  65. hdr = mipc_get_infohdr();
  66. if (!hdr) {
  67. error = -1;
  68. goto out;
  69. }
  70. if (mipc_check_address(hdr->mem2_boundary)) {
  71. printf("mini: invalid mem2_boundary %08X\n",
  72. hdr->mem2_boundary);
  73. error = -EINVAL;
  74. goto out;
  75. }
  76. *mem2_boundary = hdr->mem2_boundary;
  77. error = 0;
  78. out:
  79. return error;
  80. }
  81. static void platform_fixups(void)
  82. {
  83. void *mem;
  84. u32 reg[4];
  85. u32 mem2_boundary;
  86. int len;
  87. int error;
  88. mem = finddevice("/memory");
  89. if (!mem)
  90. fatal("Can't find memory node\n");
  91. /* two ranges of (address, size) words */
  92. len = getprop(mem, "reg", reg, sizeof(reg));
  93. if (len != sizeof(reg)) {
  94. /* nothing to do */
  95. goto out;
  96. }
  97. /* retrieve MEM2 boundary from 'mini' */
  98. error = mipc_get_mem2_boundary(&mem2_boundary);
  99. if (error) {
  100. /* if that fails use a sane value */
  101. mem2_boundary = MEM2_TOP - FIRMWARE_DEFAULT_SIZE;
  102. }
  103. if (mem2_boundary > reg[2] && mem2_boundary < reg[2] + reg[3]) {
  104. reg[3] = mem2_boundary - reg[2];
  105. printf("top of MEM2 @ %08X\n", reg[2] + reg[3]);
  106. setprop(mem, "reg", reg, sizeof(reg));
  107. }
  108. out:
  109. return;
  110. }
  111. void platform_init(unsigned long r3, unsigned long r4, unsigned long r5)
  112. {
  113. u32 heapsize = 24*1024*1024 - (u32)_end;
  114. simple_alloc_init(_end, heapsize, 32, 64);
  115. fdt_init(_dtb_start);
  116. /*
  117. * 'mini' boots the Broadway processor with EXI disabled.
  118. * We need it enabled before probing for the USB Gecko.
  119. */
  120. out_be32(EXI_CTRL, in_be32(EXI_CTRL) | EXI_CTRL_ENABLE);
  121. if (ug_probe())
  122. console_ops.write = ug_console_write;
  123. platform_ops.fixups = platform_fixups;
  124. }