One splitpath implementation (platform independent)

#include "stdio.h"

#include "stdlib.h"
#include "wchar.h"

typedef wchar_t WCHAR;

void _wsplitpath(const WCHAR* path, WCHAR* drv, WCHAR* dir, WCHAR* name, WCHAR* ext)
{
    const WCHAR* end; /* end of processed string */
    const WCHAR* p;      /* search pointer */
    const WCHAR* s;      /* copy pointer */
    
    /* extract drive name */
    if (path[0] && path[1]==':') {
        if (drv) {
            *drv++ = *path++;
            *drv++ = *path++;
            *drv = '\0';
        }
    } else if (drv)
        *drv = '\0';
    
    /* search for end of string or stream separator */
    for(end=path; *end && *end!=':'; )
        end++;
    
    /* search for begin of file extension */
    for(p=end; p>path && *--p!='\\' && *p!='/'; )
        if (*p == '.') {
            end = p;
            break;
        }
    
    if (ext)
        for(s=end; (*ext=*s++); )
            ext++;
    
    /* search for end of directory name */
    for(p=end; p>path; )
        if (*--p=='\\' || *p=='/') {
            p++;
            break;
        }
    
    if (name) {
        for(s=p; s<end; )
            *name++ = *s++;
        
        *name = '\0';
    }
    
    if (dir) {
        for(s=path; s<p; )
            *dir++ = *s++;
        
        *dir = '\0';
    }
}

#define _MAX_DRIVE 255
#define _MAX_DIR 255
#define _MAX_FNAME 255
#define _MAX_EXT 255

int main()    // test splipath()
{
    wchar_t drv[_MAX_DRIVE+1], dir[_MAX_DIR], name[_MAX_FNAME], ext[_MAX_EXT];
    
    _wsplitpath(L"/Perforce/sandbox/flower.jpg", drv, dir, name, ext);
    wprintf(L"drv = %S, dir = %S, filename = %S, ext = %S \n", drv, dir, name, ext);
    _wsplitpath(L"C:\\Program files\\sandbox\\flower.jpg", drv, dir, name, ext);
    wprintf(L"drv = %S, dir = %S, filename = %S, ext = %S \n", drv, dir, name, ext);
    _wsplitpath(L"\\x", drv, dir, name, ext);
    _wsplitpath(L"x", drv, dir, name, ext);
    _wsplitpath(L"", drv, dir, name, ext);
    _wsplitpath(L".x", drv, dir, name, ext);
    _wsplitpath(L":x", drv, dir, name, ext);
    _wsplitpath(L"a:x", drv, dir, name, ext);
    _wsplitpath(L"a.b:x", drv, dir, name, ext);
    _wsplitpath(L"W:\\/\\abc/Z:~", drv, dir, name, ext);
    _wsplitpath(L"abc.EFGH:12345", drv, dir, name, ext);
    _wsplitpath(L"C:/dos/command.com", drv, dir, name, ext);
    
    return 0;
}