reipl.S 2.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778
  1. /*
  2. * arch/s390/kernel/reipl.S
  3. *
  4. * S390 version
  5. * Copyright (C) 2000 IBM Deutschland Entwicklung GmbH, IBM Corporation
  6. * Author(s): Holger Smolinski (Holger.Smolinski@de.ibm.com)
  7. */
  8. #include <asm/lowcore.h>
  9. .globl do_reipl
  10. do_reipl: basr %r13,0
  11. .Lpg0: lpsw .Lnewpsw-.Lpg0(%r13)
  12. .Lpg1: lctl %c6,%c6,.Lall-.Lpg0(%r13)
  13. stctl %c0,%c0,.Lctlsave-.Lpg0(%r13)
  14. ni .Lctlsave-.Lpg0(%r13),0xef
  15. lctl %c0,%c0,.Lctlsave-.Lpg0(%r13)
  16. lr %r1,%r2
  17. mvc __LC_PGM_NEW_PSW(8),.Lpcnew-.Lpg0(%r13)
  18. stsch .Lschib-.Lpg0(%r13)
  19. oi .Lschib+5-.Lpg0(%r13),0x84
  20. .Lecs: xi .Lschib+27-.Lpg0(%r13),0x01
  21. msch .Lschib-.Lpg0(%r13)
  22. lhi %r0,5
  23. .Lssch: ssch .Liplorb-.Lpg0(%r13)
  24. jz .L001
  25. brct %r0,.Lssch
  26. bas %r14,.Ldisab-.Lpg0(%r13)
  27. .L001: mvc __LC_IO_NEW_PSW(8),.Lionew-.Lpg0(%r13)
  28. .Ltpi: lpsw .Lwaitpsw-.Lpg0(%r13)
  29. .Lcont: c %r1,__LC_SUBCHANNEL_ID
  30. jnz .Ltpi
  31. clc __LC_IO_INT_PARM(4),.Liplorb-.Lpg0(%r13)
  32. jnz .Ltpi
  33. tsch .Liplirb-.Lpg0(%r13)
  34. tm .Liplirb+9-.Lpg0(%r13),0xbf
  35. jz .L002
  36. bas %r14,.Ldisab-.Lpg0(%r13)
  37. .L002: tm .Liplirb+8-.Lpg0(%r13),0xf3
  38. jz .L003
  39. bas %r14,.Ldisab-.Lpg0(%r13)
  40. .L003: spx .Lnull-.Lpg0(%r13)
  41. st %r1,__LC_SUBCHANNEL_ID
  42. lpsw 0
  43. sigp 0,0,0(6)
  44. .Ldisab: st %r14,.Ldispsw+4-.Lpg0(%r13)
  45. lpsw .Ldispsw-.Lpg0(%r13)
  46. .align 8
  47. .Lall: .long 0xff000000
  48. .Lnull: .long 0x00000000
  49. .Lctlsave: .long 0x00000000
  50. .align 8
  51. .Lnewpsw: .long 0x00080000,0x80000000+.Lpg1
  52. .Lpcnew: .long 0x00080000,0x80000000+.Lecs
  53. .Lionew: .long 0x00080000,0x80000000+.Lcont
  54. .Lwaitpsw: .long 0x020a0000,0x00000000+.Ltpi
  55. .Ldispsw: .long 0x000a0000,0x00000000
  56. .Liplccws: .long 0x02000000,0x60000018
  57. .long 0x08000008,0x20000001
  58. .Liplorb: .long 0x0049504c,0x0040ff80
  59. .long 0x00000000+.Liplccws
  60. .Lschib: .long 0x00000000,0x00000000
  61. .long 0x00000000,0x00000000
  62. .long 0x00000000,0x00000000
  63. .long 0x00000000,0x00000000
  64. .long 0x00000000,0x00000000
  65. .long 0x00000000,0x00000000
  66. .Liplirb: .long 0x00000000,0x00000000
  67. .long 0x00000000,0x00000000
  68. .long 0x00000000,0x00000000
  69. .long 0x00000000,0x00000000
  70. .long 0x00000000,0x00000000
  71. .long 0x00000000,0x00000000
  72. .long 0x00000000,0x00000000
  73. .long 0x00000000,0x00000000