mirror of
https://github.com/php/php-src.git
synced 2024-10-01 06:46:08 +00:00
33 lines
901 B
C
33 lines
901 B
C
/* Copyright Abandoned 1996 TCX DataKonsult AB & Monty Program KB & Detron HB
|
|
This file is public domain and comes with NO WARRANTY of any kind */
|
|
|
|
/* Returnerar en pekare till filnamnets extension. */
|
|
|
|
#include "mysys_priv.h"
|
|
#include <m_string.h>
|
|
|
|
/* Return a pointerto the extension of the filename
|
|
The pointer points at the extension character (normally '.'))
|
|
If there isn't any extension, the pointer points at the end
|
|
NULL of the filename
|
|
*/
|
|
|
|
my_string fn_ext(const char *name)
|
|
{
|
|
register my_string pos,gpos;
|
|
DBUG_ENTER("fn_ext");
|
|
DBUG_PRINT("mfunkt",("name: '%s'",name));
|
|
|
|
#if defined(FN_DEVCHAR) || defined(FN_C_AFTER_DIR)
|
|
{
|
|
char buff[FN_REFLEN];
|
|
gpos=(my_string) name+dirname_part(buff,(char*) name);
|
|
}
|
|
#else
|
|
if (!(gpos=strrchr(name,FNLIBCHAR)))
|
|
gpos=name;
|
|
#endif
|
|
pos=strrchr(gpos,FN_EXTCHAR);
|
|
DBUG_RETURN (pos ? pos : strend(gpos));
|
|
} /* fn_ext */
|