Back to index

tetex-bin  3.0
truncate.c
Go to the documentation of this file.
00001 /* truncate.c: truncate too-long components in a filename.
00002 
00003 Copyright (C) 1993, 95 Karl Berry.
00004 
00005 This library is free software; you can redistribute it and/or
00006 modify it under the terms of the GNU Library General Public
00007 License as published by the Free Software Foundation; either
00008 version 2 of the License, or (at your option) any later version.
00009 
00010 This library is distributed in the hope that it will be useful,
00011 but WITHOUT ANY WARRANTY; without even the implied warranty of
00012 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
00013 Library General Public License for more details.
00014 
00015 You should have received a copy of the GNU Library General Public
00016 License along with this library; if not, write to the Free Software
00017 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
00018 
00019 #include <kpathsea/config.h>
00020 
00021 #include <kpathsea/c-namemx.h>
00022 #include <kpathsea/c-pathch.h>
00023 #include <kpathsea/c-pathmx.h>
00024 #include <kpathsea/truncate.h>
00025 
00026 
00027 /* Truncate any too-long components in NAME, returning the result.  It's
00028    too bad this is necessary.  See comments in readable.c for why.  */
00029 
00030 string
00031 kpse_truncate_filename P1C(const_string, name)
00032 {
00033   unsigned c_len = 0;        /* Length of current component.  */
00034   unsigned ret_len = 0;      /* Length of constructed result.  */
00035   
00036   /* Allocate enough space.  */
00037   string ret = (string) xmalloc (strlen (name) + 1);
00038 
00039   for (; *name; name++)
00040     {
00041       if (IS_DIR_SEP (*name) || IS_DEVICE_SEP (*name))
00042         { /* At a directory delimiter, reset component length.  */
00043           c_len = 0;
00044         }
00045       else if (c_len > NAME_MAX)
00046         { /* If past the max for a component, ignore this character.  */
00047           continue;
00048         }
00049 
00050       /* Copy this character.  */
00051       ret[ret_len++] = *name;
00052       c_len++;
00053     }
00054   ret[ret_len] = 0;
00055 
00056   return ret;
00057 }