1  /* Copyright (C) 2009-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 <errno.h>
      19  #include <printf.h>
      20  #include <stdlib.h>
      21  #include <libc-lock.h>
      22  #include <set-freeres.h>
      23  
      24  
      25  /* Array of functions indexed by format character.  */
      26  printf_va_arg_function **__printf_va_arg_table attribute_hidden;
      27  
      28  __libc_lock_define_initialized (static, lock);
      29  
      30  /* Last type allocated.  */
      31  static int pa_next_type = PA_LAST;
      32  
      33  
      34  int
      35  __register_printf_type (printf_va_arg_function fct)
      36  {
      37    int result = -1;
      38    __libc_lock_lock (lock);
      39  
      40    if (__printf_va_arg_table == NULL)
      41      {
      42        __printf_va_arg_table = (printf_va_arg_function **)
      43  	calloc (0x100 - PA_LAST, sizeof (void *));
      44        if (__printf_va_arg_table == NULL)
      45  	goto out;
      46      }
      47  
      48    if (pa_next_type == 0x100)
      49      __set_errno (ENOSPC);
      50    else
      51      {
      52        result = pa_next_type++;
      53        __printf_va_arg_table[result - PA_LAST] = fct;
      54      }
      55  
      56   out:
      57    __libc_lock_unlock (lock);
      58  
      59    return result;
      60  }
      61  weak_alias (__register_printf_type, register_printf_type)
      62  
      63  weak_alias (__printf_va_arg_table, __libc_reg_type_freemem_ptr)