compilers/linux86-0.16.17/tests/grab.c

   1
   2 #include <stdio.h>
   3 #include <malloc.h>
   4
   5 struct s
   6 {
   7    struct s * n;
   8    char v[1];
   9 };
  10
  11 #define M  ((unsigned)-1>>1)
  12 #define V  (M^(M>>1))
  13
  14 main (argc,argv)
  15 int argc;
  16 char ** argv;
  17 {
  18         struct s * ptr1 = 0;
  19         struct s * ptr2;
  20         struct s * ptr3;
  21         int i,sz;
  22         unsigned long total = 0;
  23
  24         for(i=0, sz=256 ; i<32; i++, sz = ((sz << 1) | (sz & V)) & M)
  25         {
  26                 ptr2 = (struct s *) malloc(sz-sizeof(int));
  27                 printf("%2d(%8u)..%08lx..%ld\n",i,sz,(long)ptr2,(long)ptr2);
  28                 if(ptr2==0) break;
  29                 total+=sz;
  30                 if(ptr1==0)
  31                 {
  32                         ptr1 = ptr3 = ptr2;
  33                         ptr3->n = 0;
  34                 }
  35                 else
  36                 {
  37                         ptr3->n = ptr2;
  38                         ptr3 = ptr2;
  39                         ptr3->n = 0;
  40                 }
  41         }
  42         for(sz>>=1; sz>3; )
  43         {
  44                 ptr2 = (struct s *) malloc(sz-sizeof(int));
  45                 if(ptr2==0) { sz >>=1; continue; }
  46                 printf("%2d(%8u)..%08lx..%ld\n",i++,sz,(long)ptr2,(long)ptr2);
  47                 total+=sz;
  48                 if(ptr1==0)
  49                 {
  50                         ptr1 = ptr3 = ptr2;
  51                         ptr3->n = 0;
  52                 }
  53                 else
  54                 {
  55                         ptr3->n = ptr2;
  56                         ptr3 = ptr2;
  57                         ptr3->n = 0;
  58                 }
  59         }
  60         printf("Free all - total was %ldK bytes\n", total/1024);
  61         while( ptr1 )
  62         {
  63                 ptr3 = ptr1->n;
  64                 free(ptr1);
  65                 ptr1 = ptr3;
  66         }
  67         ptr2 = (struct s *) malloc(200);
  68         printf("%2d(%8u)..%08lx..%ld\n",i++,200,(long)ptr2,(long)ptr2);
  69         ptr2 = (struct s *) malloc(30000);
  70         printf("%2d(%8u)..%08lx..%ld\n",i++,30000,(long)ptr2,(long)ptr2);
  71         ptr2 = (struct s *) malloc(20000);
  72         printf("%2d(%8u)..%08lx..%ld\n",i++,20000,(long)ptr2,(long)ptr2);
  73         sz = (256<<sizeof(int));
  74         do
  75         {
  76            ptr2 = (struct s *) malloc(sz-sizeof(int));
  77            printf("%2d(%8u)..%08lx..%ld\n",i++,sz,(long)ptr2,(long)ptr2);
  78         }
  79         while(ptr2 && i < 100);
  80         exit(0);
  81 }