1  /* Copyright (C) 2003-2023 Free Software Foundation, Inc.
       2     This file is part of the GNU C Library.
       3  
       4     The GNU C Library is free software; you can redistribute it and/or
       5     modify it under the terms of the GNU Lesser General Public
       6     License as published by the Free Software Foundation; either
       7     version 2.1 of the License, or (at your option) any later version.
       8  
       9     The GNU C Library is distributed in the hope that it will be useful,
      10     but WITHOUT ANY WARRANTY; without even the implied warranty of
      11     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
      12     Lesser General Public License for more details.
      13  
      14     You should have received a copy of the GNU Lesser General Public
      15     License along with the GNU C Library; if not, see
      16     <https://www.gnu.org/licenses/>.  */
      17  
      18  #include <pthread.h>
      19  #include <stdio.h>
      20  #include <stdlib.h>
      21  #include <unistd.h>
      22  
      23  
      24  static int do_test (void);
      25  
      26  #define TEST_FUNCTION do_test ()
      27  #include "../test-skeleton.c"
      28  
      29  static int global;
      30  
      31  
      32  static void
      33  ch (void *arg)
      34  {
      35    int val = (long int) arg;
      36  
      37    printf ("ch (%d)\n", val);
      38  
      39    global *= val;
      40    global += val;
      41  }
      42  
      43  
      44  static void *
      45  tf (void *a)
      46  {
      47    pthread_cleanup_push (ch, (void *) 1l);
      48  
      49    pthread_cleanup_push (ch, (void *) 2l);
      50  
      51    pthread_cleanup_push (ch, (void *) 3l);
      52  
      53    pthread_exit ((void *) 1l);
      54  
      55    pthread_cleanup_pop (1);
      56  
      57    pthread_cleanup_pop (1);
      58  
      59    pthread_cleanup_pop (1);
      60  
      61    return NULL;
      62  }
      63  
      64  
      65  int
      66  do_test (void)
      67  {
      68    pthread_t th;
      69  
      70    if (pthread_create (&th, NULL, tf, NULL) != 0)
      71      {
      72        write_message ("create failed\n");
      73        _exit (1);
      74      }
      75  
      76    void *r;
      77    int e;
      78    if ((e = pthread_join (th, &r)) != 0)
      79      {
      80        printf ("join failed: %d\n", e);
      81        _exit (1);
      82      }
      83  
      84    if (r != (void *) 1l)
      85      {
      86        puts ("thread not canceled");
      87        exit (1);
      88      }
      89  
      90    if (global != 9)
      91      {
      92        printf ("global = %d, expected 9\n", global);
      93        exit (1);
      94      }
      95  
      96    return 0;
      97  }