summaryrefslogtreecommitdiff
path: root/Examples/ocaml/std_string/example.h
blob: 60de9847c1e4b2a4eeec9e624c2727d4b6b5be9d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
/* File : example.h -- stolen from the guile std_vector example */

#include <string>
#include <algorithm>
#include <functional>
#include <numeric>
#include <stdlib.h>
#include <locale.h>

std::string from_wstring_with_locale( const std::wstring source,
				      const std::string locale ) {
    const char *current_locale = setlocale( LC_CTYPE, locale.c_str() );
    int required_chars = wcstombs( NULL, source.c_str(), 0 );
    std::string s;
    char *temp_chars = new char[required_chars + 1];
    temp_chars[0] = 0;
    wcstombs( temp_chars, source.c_str(), required_chars + 1 );
    s = temp_chars;
    delete [] temp_chars;
    setlocale( LC_CTYPE, current_locale );
    return s;
}

std::wstring to_wstring_with_locale( const std::string source,
				     const std::string locale ) {
    const char *current_locale = setlocale( LC_CTYPE, locale.c_str() );
    int required_chars = mbstowcs( NULL, source.c_str(), 0 );
    std::wstring s;
    wchar_t *temp_chars = new wchar_t[required_chars + 1];
    temp_chars[0] = 0;
    mbstowcs( temp_chars, source.c_str(), required_chars + 1 );
    s = temp_chars;
    delete [] temp_chars;
    setlocale( LC_CTYPE, current_locale );
    return s;
}