1  /* Copyright (C) 2002-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_cancel (pthread_self ());
      48  
      49    pthread_cleanup_push (ch, (void *) 1l);
      50  
      51    pthread_cleanup_push (ch, (void *) 2l);
      52  
      53    pthread_cleanup_push (ch, (void *) 3l);
      54  
      55    pthread_setcanceltype (PTHREAD_CANCEL_ASYNCHRONOUS, NULL);
      56  
      57    pthread_cleanup_pop (1);
      58  
      59    pthread_cleanup_pop (1);
      60  
      61    pthread_cleanup_pop (1);
      62  
      63    return NULL;
      64  }
      65  
      66  
      67  int
      68  do_test (void)
      69  {
      70    pthread_t th;
      71  
      72    if (pthread_create (&th, NULL, tf, NULL) != 0)
      73      {
      74        write_message ("create failed\n");
      75        _exit (1);
      76      }
      77  
      78    void *r;
      79    int e;
      80    if ((e = pthread_join (th, &r)) != 0)
      81      {
      82        printf ("join failed: %d\n", e);
      83        _exit (1);
      84      }
      85  
      86    if (r != PTHREAD_CANCELED)
      87      {
      88        puts ("thread not canceled");
      89        exit (1);
      90      }
      91  
      92    if (global != 9)
      93      {
      94        printf ("global = %d, expected 9\n", global);
      95        exit (1);
      96      }
      97  
      98    return 0;
      99  }