home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c082_122 / 1.ddi / WINLBSRC.ZIP / H_CHKSTK.ASM < prev    next >
Encoding:
Assembly Source File  |  1992-06-10  |  1.9 KB  |  69 lines
  1. ;[]-----------------------------------------------------------------[]
  2. ;|      H_CHKSTK.ASM -- Windows stack check function                 |
  3. ;[]-----------------------------------------------------------------[]
  4.  
  5. ;
  6. ;       C/C++ Run Time Library - Version 5.0
  7. ; 
  8. ;       Copyright (c) 1987, 1992 by Borland International
  9. ;       All Rights Reserved.
  10. ; 
  11.  
  12.         INCLUDE RULES.ASI
  13.  
  14. ; calls to these routines are generated by the compiler to allocate
  15. ; stack space if available.  Aborts with message on failure.
  16.  
  17. MARGIN    equ   1024
  18. pStackTop equ   0Ah
  19.  
  20. extrn   __errorExitBox:DIST
  21.  
  22. _DATA   segment
  23.         _stkovrmsg db "Runtime Error: Stack Overflow", 0
  24.         ends
  25.  
  26. _TEXT   segment
  27.         assume cs:_TEXT
  28. ;
  29. ;       F_CHKSTK@ - Allocates local space.
  30. ;
  31. ;       ax      number of bytes for local space
  32.  
  33.         public  N_CHKSTK@
  34.         public  F_CHKSTK@
  35.         public  __aNchkstk
  36.         public  __aFchkstk
  37.  
  38. __aNchkstk:
  39. N_CHKSTK@:      pop     bx
  40.                 push    cs
  41.                 push    bx
  42. __aFchkstk:
  43. F_CHKSTK@:
  44.                 pop     bx              ; get return address
  45.                 pop     dx
  46.                 sub     ax, sp
  47.                 jae     overflow
  48.                 neg     ax
  49.                 mov     cx, ss:pStackTop
  50.                 add     cx, MARGIN
  51.                 cmp     ax, cx          ;StackMax + MARGIN
  52.                 jbe     overflow
  53.                 mov     sp, ax
  54.                 push    dx              ; Note: may use up to four bytes
  55.                 push    bx              ; of the reserved stack buffer
  56.                 retf
  57. overflow:
  58.                 mov    ax, 3
  59.                 push   ax
  60. IF LDATA
  61.                 push   ds
  62. ENDIF
  63.                 lea    ax, _stkovrmsg
  64.                 push   ax
  65.                 call   __errorExitBox   ; doesn't return!
  66.                 ends
  67.                 END
  68.  
  69.