BlueGrey
calm
Elegant
Català-Valencià – Catalan
中文 – Chinese (Simplified)
中文 – Chinese (Traditional)
Česky – Czech
Dansk – Danish
Nederlands – Dutch
English – English
Suomi – Finnish
Français – French
Deutsch – German
עברית – Hebrew
हिंदी – Hindi
Magyar – Hungarian
Bahasa Indonesia – Indonesian
Italiano – Italian
日本語 – Japanese
한국어 – Korean
Македонски – Macedonian
मराठी – Marathi
Norsk – Norwegian
Polski – Polish
Português – Portuguese
Português – Portuguese (Brazil)
Русский – Russian
Slovenčina – Slovak
Slovenščina – Slovenian
Español – Spanish
Svenska – Swedish
Türkçe – Turkish
Українська – Ukrainian
Oëzbekcha – Uzbek
Subversion Repositories
Kolibri OS
(root)
/
programs
/
develop
/
ktcc
/
trunk
/
libc.obj
/
source
/
misc
/
dirname.c
– Rev 9765
Rev
Rev 9262
|
Blame
|
Compare with Previous
|
Last modification
|
View Log
|
Download
|
RSS feed
#include <libgen.h>
#include <string.h>
char
*
dirname
(
char
*
s
)
{
size_t
i
;
if
(
!
s
||
!*
s
)
return
"."
;
i
=
strlen
(
s
)
-
1
;
for
(
;
s
[
i
]
==
'/'
;
i
--
)
if
(
!
i
)
return
"/"
;
for
(
;
s
[
i
]
!=
'/'
;
i
--
)
if
(
!
i
)
return
"."
;
for
(
;
s
[
i
]
==
'/'
;
i
--
)
if
(
!
i
)
return
"/"
;
s
[
i
+
1
]
=
0
;
return
s
;
}