reipl.S
上传用户:jlfgdled
上传日期:2013-04-10
资源大小:33168k
文件大小:3k
源码类别:

Linux/Unix编程

开发平台:

Unix_Linux

  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