view qt/d2/qt/qtd/Str.d @ 218:438877e90dbe

D2 windows fixes
author eldar
date Tue, 14 Jul 2009 17:07:32 +0000
parents 7dd099050621
children 27497bbe62a1
line wrap: on
line source

/**
 *
 *  Copyright: Copyright QtD Team, 2008-2009
 *  License: <a href="http://www.boost.org/LICENSE_1_0.txt>Boost License 1.0</a>
 *
 *  Copyright QtD Team, 2008-2009
 *  Distributed under the Boost Software License, Version 1.0.
 *  (See accompanying file boost-license-1.0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
 *
 */

module qt.qtd.Str;

import std.utf : toUTF8;

version(D_Version2) {
//    private import core.sys.posix.stdio;
    private import core.stdc.string;

    version = druntime;
}

public static char** toStringzArray(string[] args)
{
    if ( args is null )
    {
        return null;
    }
    char** argv = (new char*[args.length]).ptr;
    int argc = 0;
    foreach (string p; args)
    {
        argv[argc++] = cast(char*)(p.dup~'\0');
    }
    argv[argc] = null;
        
    return argv;
}

public string fromStringz(const (char) *s)
{
    return s ? s[0 .. strlen(s)].idup : cast(string)null;
}

version(Windows)
{
    export extern(C) void _d_toUtf8(wchar* arr, uint size, string* str)
    {
        *str = toUTF8(arr[0..size]);
    }
}
else
{
    extern(C) void _d_toUtf8(wchar* arr, uint size, string* str)
    {
        *str = toUTF8(arr[0..size]);
    }
}