home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c082_122 / 5.ddi / CLIBSRC2.ZIP / CHAININT.ASM < prev    next >
Encoding:
Assembly Source File  |  1992-06-10  |  2.9 KB  |  83 lines
  1. ;[]-----------------------------------------------------------------[]
  2. ;|      chainint.asm                                                 |
  3. ;[]-----------------------------------------------------------------[]
  4.  
  5. ;
  6. ;       C/C++ Run Time Library - Version 5.0
  7. ; 
  8. ;       Copyright (c) 1991, 1992 by Borland International
  9. ;       All Rights Reserved.
  10. ; 
  11.  
  12.         INCLUDE rules.asi
  13.  
  14. ; Name          _chain_intr - chain to another interrupt handler
  15. ;
  16. ; Usage         void _chain_intr (void interrupt (far *target)());
  17. ;
  18. ; Description   _chain_intr passes control from one interrupt
  19. ;               handler to another.  The current register set
  20. ;               is NOT passed to the new handler.  Instead,
  21. ;               the new handler receives the registers that
  22. ;               were stacked (and possibly modified in the stack)
  23. ;               by the old handler.  The new handler can simply
  24. ;               return, as if it were the original handler.
  25. ;               The old handler is not entered again.
  26. ;
  27. ; Return value  This function does not return.
  28. ;
  29. ; This function is always called by a C interrupt function, so the
  30. ; stack now looks like this (high address at top, low at bottom):
  31. ;
  32. ;       FLAGS
  33. ;       CS
  34. ;       IP
  35. ;       AX
  36. ;       BX
  37. ;       CX
  38. ;       DX
  39. ;       ES
  40. ;       DS
  41. ;       SI
  42. ;       DI
  43. ; BP->  BP
  44. ;       target (low word)
  45. ;       target (high word)
  46. ;       return address (low word)
  47. ; SP->  return address (high word -- only present in large code models)
  48. ;
  49. ; To chain to "target" (the new interrupt handler), we poke the target
  50. ; address into the stack where AX and BX were saved (after loading
  51. ; AX and BX directly from the stack).  Then we pop all registers up
  52. ; to where "target" was poked in, and execute a far return.  This
  53. ; causes execution to start at "target" with only the CS, IP, and flags
  54. ; on the stack, exactly as if an interrupt had just occurred.
  55.  
  56.                 Code_Seg@
  57.  
  58. PubProc@        _chain_intr, __CDECL__
  59.  
  60.                 pop     ax              ; discard return address
  61. IF LPROG
  62.                 pop     ax              ; discard high word of return address
  63. ENDIF
  64.                 mov     bx,[bp+14]      ; restore stacked BX
  65.                 mov     ax,[bp+16]      ; restore stacked AX
  66.                 pop     [bp+14]         ; pop target address into stack
  67.                 pop     [bp+16]         ;  in place of stacked AX:BX
  68.                 mov     sp,bp           ; point SP at stacked registers
  69.                 pop     bp              ; restore all other stacked registers
  70.                 pop     di
  71.                 pop     si
  72.                 pop     ds
  73.                 pop     es
  74.                 pop     dx
  75.                 pop     cx
  76.                 cli                     ; disable interrupts
  77.                 retf                    ; "return" to target
  78.  
  79. EndProc@        _chain_intr, __CDECL__
  80.  
  81.                 Code_EndS@
  82.                 END
  83.