You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
43 lines
1.3 KiB
43 lines
1.3 KiB
/* find-suffix.c: return the stuff after a dot. |
|
|
|
Copyright (C) 1992, 93 Free Software Foundation, Inc. |
|
|
|
This program is free software; you can redistribute it and/or modify |
|
it under the terms of the GNU General Public License as published by |
|
the Free Software Foundation; either version 2, or (at your option) |
|
any later version. |
|
|
|
This program is distributed in the hope that it will be useful, |
|
but WITHOUT ANY WARRANTY; without even the implied warranty of |
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
|
GNU General Public License for more details. |
|
|
|
You should have received a copy of the GNU General Public License |
|
along with this program; if not, write to the Free Software |
|
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ |
|
|
|
#include <kpathsea/config.h> |
|
|
|
#include <kpathsea/c-pathch.h> |
|
|
|
|
|
/* Return pointer to first character after `.' in last directory element |
|
of NAME. If the name is `foo' or `/foo.bar/baz', we have no extension. */ |
|
|
|
string |
|
find_suffix P1C(const_string, name) |
|
{ |
|
const_string slash_pos; |
|
string dot_pos = strrchr (name, '.'); |
|
|
|
if (dot_pos == NULL) |
|
return NULL; |
|
|
|
for (slash_pos = name + strlen (name) + 1; |
|
slash_pos > dot_pos && !IS_DIR_SEP (*slash_pos); |
|
slash_pos--) |
|
; |
|
|
|
return slash_pos > dot_pos ? NULL : dot_pos + 1; |
|
} |
|
|
|
|