osfmk/ppc/testjump.c

   1 /*
   2  * Copyright (c) 2000 Apple Computer, Inc. All rights reserved.
   3  *
   4  * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
   5  *
   6  * This file contains Original Code and/or Modifications of Original Code
   7  * as defined in and that are subject to the Apple Public Source License
   8  * Version 2.0 (the 'License'). You may not use this file except in
   9  * compliance with the License. The rights granted to you under the License
  10  * may not be used to create, or enable the creation or redistribution of,
  11  * unlawful or unlicensed copies of an Apple operating system, or to
  12  * circumvent, violate, or enable the circumvention or violation of, any
  13  * terms of an Apple operating system software license agreement.
  14  *
  15  * Please obtain a copy of the License at
  16  * http://www.opensource.apple.com/apsl/ and read it before using this file.
  17  *
  18  * The Original Code and all software distributed under the License are
  19  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  20  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  21  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
  22  * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
  23  * Please see the License for the specific language governing rights and
  24  * limitations under the License.
  25  *
  26  * @APPLE_OSREFERENCE_LICENSE_HEADER_END@
  27  */
  28 /*
  29  * @OSF_FREE_COPYRIGHT@
  30  */
  31
  32 #define VERBOSE 0
  33
  34 #include <ppc/setjmp.h>
  35
  36 int recursed(jmp_buf_t *bufp, int retval, int depth)
  37 {
  38   int mumbojumbo[16];
  39   int i;
  40
  41 #if VERBOSE
  42   for (i=0;i<depth;i++)
  43     printf(" ");
  44   printf("in recursed(0x%x,%d,%d)\n",bufp,retval,depth);
  45 #endif
  46   if (depth == 0) {
  47 #if VERBOSE
  48     printf("LONGJUMPING from depth %d to buffer at 0x%x!\n",retval, bufp);
  49 #endif
  50     _longjmp(bufp, retval);
  51     printf("SHOULDN'T GET HERE\n");
  52   } else {
  53     recursed(bufp,retval,depth-1);
  54   }
  55   return mumbojumbo[15]=-1; /* make sure we generate our own frame */
  56 }
  57
  58 int testjump()
  59 {
  60   jmp_buf_t  buf;
  61   int val;
  62   int i;
  63
  64   printf("calling setjmp\n");
  65
  66   val = _setjmp(&buf);
  67 #if VERBOSE
  68   for (i=0; i<64; i++) {
  69     if ((i % 8) == 0) printf("\n%2d :",i);
  70     printf(" %8x",buf.jmp_buf[i]);
  71   }
  72 #endif
  73   printf("\nsetjmp returned %d, structure at 0x%x\n",val,&buf);
  74
  75   if (val < 5)
  76     recursed(&buf,val+1,val+1);
  77
  78   printf("returning from setjmp/longjmp test\n");
  79 }
  80