home *** CD-ROM | disk | FTP | other *** search
/ Geek Gadgets 1 / ADE-1.bin / ade-dist / binutils-2.7-src.tgz / tar.out / fsf / binutils / ld / testsuite / ld-empic / runtest1.c < prev    next >
C/C++ Source or Header  |  1996-09-28  |  2KB  |  118 lines
  1. /* First C source file for actual execution test.  */
  2.  
  3. /* The main point of this test is to make sure that the code and data
  4.    are truly position independent.  We statically initialize several
  5.    global variables, and make sure that they are correctly adjusted at
  6.    runtime.  */
  7.  
  8. int i = 1;
  9. int j = 0;
  10. extern int k;
  11. int l;
  12. char small_buf[] = "aaaa";
  13. char *small_pointer = small_buf;
  14. char big_buf[] = "aaaaaaaaaaaaaaaa";
  15. char *big_pointer = big_buf;
  16.  
  17. extern int bar ();
  18. int (*pbar) () = bar;
  19.  
  20. static int
  21. foo2 (arg)
  22.      int arg;
  23. {
  24.   l = arg;
  25.   return i + j;
  26. }
  27.  
  28. int (*pfoo2) () = foo2;
  29.  
  30. int
  31. chkstr (z, c)
  32.      char *z;
  33.      int c;
  34. {
  35.   /* Switch statements need extra effort to be position independent,
  36.      so we run one here, even though most of the cases will never be
  37.      taken.  */
  38.   switch (c)
  39.     {
  40.     case 1:
  41.     case 2:
  42.     case 3:
  43.       return i - 1;
  44.     case 4:
  45.       break;
  46.     case 5:
  47.     case 6:
  48.     case 7:
  49.     case 8:
  50.     case 9:
  51.       return i * j;
  52.     case 10:
  53.     case 11:
  54.     case 12:
  55.     case 13:
  56.     case 14:
  57.     case 15:
  58.       return j;
  59.     case 16:
  60.       break;
  61.     default:
  62.       return 0;
  63.     }
  64.  
  65.   while (c-- != 0)
  66.     if (*z++ != 'a')
  67.       return 0;
  68.  
  69.   return *z == '\0';
  70. }
  71.  
  72. /* This function is called by the assembler startup routine.  It tries
  73.    to test that everything was correctly initialized.  It returns 0 on
  74.    success, something else on failure.  */
  75.  
  76. int
  77. foo ()
  78. {
  79.   if (i != 1)
  80.     return 1;
  81.   if (j != 0)
  82.     return 2;
  83.   if (! chkstr (small_buf, 4))
  84.     return 3;
  85.   if (! chkstr (small_pointer, 4))
  86.     return 4;
  87.   if (! chkstr (big_buf, 16))
  88.     return 5;
  89.   if (! chkstr (big_pointer, 16))
  90.     return 6;
  91.  
  92.   if (l != 0)
  93.     return 7;
  94.   if (foo2 (1) != 1)
  95.     return 8;
  96.   if (l != 1)
  97.     return 9;
  98.   if ((*pfoo2) (2) != 1)
  99.     return 10;
  100.   if (l != 2)
  101.     return 11;
  102.  
  103.   if (bar (1) != 0)
  104.     return 12;
  105.   if (bar (-1) != 1)
  106.     return 13;
  107.   if ((*pbar) (0xa5a5a5a5) != -1)
  108.     return 14;
  109.   if (k != 0xa5a5a5a5)
  110.     return 15;
  111.   if ((*pbar) (0) != 0xa5a5a5a5)
  112.     return 16;
  113.   if (k != 0)
  114.     return 17;
  115.  
  116.   return 0;
  117. }
  118.