gdb/testsuite/gdb.threads/schedlock.c

   1 /* This testcase is part of GDB, the GNU debugger.
   2
   3    Copyright 2002-2024 Free Software Foundation, Inc.
   4
   5    This program is free software; you can redistribute it and/or modify
   6    it under the terms of the GNU General Public License as published by
   7    the Free Software Foundation; either version 3 of the License, or
   8    (at your option) any later version.
   9
  10    This program is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13    GNU General Public License for more details.
  14
  15    You should have received a copy of the GNU General Public License
  16    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  17
  18 #include <stdio.h>
  19 #include <unistd.h>
  20 #include <stdlib.h>
  21 #include <pthread.h>
  22
  23 void *thread_function(void *arg); /* Pointer to function executed by each thread */
  24
  25 #define NUM 1
  26
  27 unsigned long long int args[NUM+1];
  28
  29 int main() {
  30     int res;
  31     pthread_t threads[NUM];
  32     void *thread_result;
  33     long i;
  34
  35     alarm (30);
  36
  37     for (i = 1; i <= NUM; i++)
  38       {
  39         args[i] = 1;
  40         res = pthread_create(&threads[i - 1],
  41                              NULL,
  42                              thread_function,
  43                              (void *) i);
  44       }
  45
  46     /* schedlock.exp: last thread start.  */
  47     args[0] = 1;
  48     thread_function ((void *) 0);
  49
  50     exit(EXIT_SUCCESS);
  51 }
  52
  53 void some_function (void) {
  54   /* Sleep a bit to give the other threads a chance to run, if not
  55      locked.  This also ensure that even if the compiler optimizes out
  56      or inlines some_function, there's still be some function that
  57      needs to be stepped over.  */
  58   usleep (1);
  59 }
  60
  61 /* When testing "next", this is set to have the loop call
  62    some_function, which GDB should step over.  When testing "step",
  63    that would step into the function, which is not what we want.  */
  64 volatile int call_function = 0;
  65
  66 /* Call some_function if CALL_FUNCTION is set.  This is wrapped in a
  67    macro so that it's a single source line in the main loop.  */
  68 #define MAYBE_CALL_SOME_FUNCTION()              \
  69   do                                            \
  70     {                                           \
  71       if (call_function)                        \
  72         some_function ();                       \
  73     } while (0)
  74
  75 void *thread_function(void *arg) {
  76     int my_number =  (long) arg;
  77     unsigned long long int *myp = (unsigned long long int *) &args[my_number];
  78     volatile unsigned int one = 1;
  79
  80     while (one)
  81       {
  82         /* schedlock.exp: main loop.  */
  83         MAYBE_CALL_SOME_FUNCTION(); (*myp) ++;
  84       }
  85
  86     pthread_exit(NULL);
  87 }
  88