(root)/
tar-1.35/
gnu/
dirname.c
       1  /* dirname.c -- return all but the last element in a file name
       2  
       3     Copyright (C) 1990, 1998, 2000-2001, 2003-2006, 2009-2023 Free Software
       4     Foundation, Inc.
       5  
       6     This program is free software: you can redistribute it and/or modify
       7     it under the terms of the GNU General Public License as published by
       8     the Free Software Foundation, either version 3 of the License, or
       9     (at your option) any later version.
      10  
      11     This program is distributed in the hope that it will be useful,
      12     but WITHOUT ANY WARRANTY; without even the implied warranty of
      13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
      14     GNU General Public License for more details.
      15  
      16     You should have received a copy of the GNU General Public License
      17     along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
      18  
      19  #include <config.h>
      20  
      21  #include "dirname.h"
      22  
      23  #include <stdlib.h>
      24  #include <string.h>
      25  #include "xalloc.h"
      26  
      27  /* Just like mdir_name (dirname-lgpl.c), except, rather than
      28     returning NULL upon malloc failure, here, we report the
      29     "memory exhausted" condition and exit.  */
      30  
      31  char *
      32  dir_name (char const *file)
      33  {
      34    char *result = mdir_name (file);
      35    if (!result)
      36      xalloc_die ();
      37    return result;
      38  }