Subversion Repositories Kolibri OS

.global ___chkstk_ms

.global __alloca

#.def ___chkstk_ms;  .scl  2;  .type 32; .endef

#.def __alloca; .scl  2;  .type 32; .endef

__alloca:

        pushl   %ecx            /* save temp */

        leal    8(%esp), %ecx   /* point past return addr */

        subl    %eax, %ecx

        cmpl    %fs:8, %ecx     # check low stack limit

        jb      1f

        movl    %ecx, %esp      /* decrement stack */

        movl    (%eax), %ecx    /* recover saved temp */

        movl    4(%eax), %eax   /* recover return address */

           jumping to %eax preserves the cached call-return stack

           used by most modern processors.  */

        pushl   %eax

        ret

1:

        int3                    #trap to debugger

        .ascii "Stack overflow"

       pushl  %ecx            /* save temp */

       pushl  %eax

       cmpl $0x1000, %eax     /* > 4k ?*/

       leal 12(%esp), %ecx    /* point past return addr */

       jb 2f

       subl $0x1000, %ecx     /* yes, move pointer down 4k*/

       cmpl %fs:8, %ecx       /* check low stack limit    */

       jb 3f

       subl $0x1000, %eax     /* decrement count */

       cmpl $0x1000, %eax

       ja 1b                  /* and do it again */

       subl %eax, %ecx

       orl $0x0, (%ecx) /* less than 4k, just peek here */

       popl %ecx

       ret

3:

       int3                    #trap to debugger

       .ascii "Stack overflow"