bool wxXPMHandler::SaveFile(wxImage * image,
wxOutputStream& stream, bool WXUNUSED(verbose))
{
// 1. count colours:
#define MaxCixels 92
static const char Cixel[MaxCixels+1] =
" .XoO+@#$%&*=-;:>,<1234567890qwertyuipasdfghjk"
"lzxcvbnmMNBVCZASDFGHJKLPIUYTREWQ!~^/()_`'][{}|";
int i, j, k;
wxImageHistogram histogram;
int cols = int(image->ComputeHistogram(histogram));
int chars_per_pixel = 1;
for ( k = MaxCixels; cols > k; k *= MaxCixels)
chars_per_pixel++;
// 2. write the header:
wxString sName;
if ( image->HasOption(wxIMAGE_OPTION_FILENAME) )
{
wxFileName::SplitPath(image->GetOption(wxIMAGE_OPTION_FILENAME),
NULL, &sName, NULL);
sName << wxT("_xpm");
}
if ( !sName.empty() )
sName = wxString(wxT("/* XPM */\nstatic const char *")) + sName;
else
sName = wxT("/* XPM */\nstatic const char *xpm_data");
stream.Write( (const char*) sName.ToAscii(), sName.Len() );
char tmpbuf[200];
// VS: 200b is safe upper bound for anything produced by sprintf below
// (<101 bytes the string, neither %i can expand into more than 10 chars)
sprintf(tmpbuf,
"[] = {\n"
"/* columns rows colors chars-per-pixel */\n"
"\"%i %i %i %i\",\n",
image->GetWidth(), image->GetHeight(), cols, chars_per_pixel);
stream.Write(tmpbuf, strlen(tmpbuf));
// 3. create color symbols table:
char *symbols_data = new char[cols * (chars_per_pixel+1)];
char **symbols = new char*[cols];
// 2a. find mask colour:
unsigned long mask_key = 0x1000000 /*invalid RGB value*/;
if (image->HasMask())
mask_key = (image->GetMaskRed() << 16) |
(image->GetMaskGreen() << 8) | image->GetMaskBlue();
// 2b. generate colour table:
for (wxImageHistogram::iterator entry = histogram.begin();
entry != histogram.end(); ++entry )
{
unsigned long index = entry->second.index;
symbols[index] = symbols_data + index * (chars_per_pixel+1);
char *sym = symbols[index];
for (j = 0; j < chars_per_pixel; j++)
{
sym[j] = Cixel[index % MaxCixels];
index /= MaxCixels;
}
sym[j] = '\0';
unsigned long key = entry->first;
if (key == 0)
sprintf( tmpbuf, "\"%s c Black\",\n", sym);
else if (key == mask_key)
sprintf( tmpbuf, "\"%s c None\",\n", sym);
else
{
wxByte r = wxByte(key >> 16);
wxByte g = wxByte(key >> 8);
wxByte b = wxByte(key);
sprintf(tmpbuf, "\"%s c #%02X%02X%02X\",\n", sym, r, g, b);
}
stream.Write( tmpbuf, strlen(tmpbuf) );
}
stream.Write("/* pixels */\n", 13);
unsigned char *data = image->GetData();
for (j = 0; j < image->GetHeight(); j++)
{
char tmp_c;
tmp_c = '\"'; stream.Write(&tmp_c, 1);
for (i = 0; i < image->GetWidth(); i++, data += 3)
{
unsigned long key = (data[0] << 16) | (data[1] << 8) | (data[2]);
stream.Write(symbols[histogram[key].index], chars_per_pixel);
}
tmp_c = '\"'; stream.Write(&tmp_c, 1);
if ( j + 1 < image->GetHeight() )
{
tmp_c = ','; stream.Write(&tmp_c, 1);
}
tmp_c = '\n'; stream.Write(&tmp_c, 1);
}
stream.Write("};\n", 3 );
// Clean up:
delete[] symbols;
delete[] symbols_data;
return true;
}
void test_a_doublebyte_conv(const std::string& encname)
{
wxString wxencname(encname.c_str(), wxConvUTF8);
wxm::WXMEncoding* enc = wxm::WXMEncodingManager::Instance().GetWxmEncoding(wxencname);
MB2UDataMap::const_iterator mb2uend = mb2u[encname].end();
for (size_t i=0; i<256; ++i)
{
wxByte wxb[2] = {wxByte(i), 0};
if (enc->IsLeadByte(wxb[0]))
{
for(size_t j=0; j<256; ++j)
{
char mbs_arr[3] = {i, j, 0};
MB2UDataMap::const_iterator it = mb2u[encname].find(mbs_arr);
wxb[1] = wxByte(j);
ucs4_t u = enc->MultiBytetoUCS4(wxb);
if (u != 0)
{
BOOST_CHECK(it != mb2uend);
if (it != mb2uend)
{
ucs4_t t = it->second;
BOOST_CHECK(u == t);
}
}
else
{
BOOST_CHECK(it == mb2uend);
}
}
}
else
{
char mbs_arr[2] = {i, 0};
MB2UDataMap::const_iterator it = mb2u[encname].find(mbs_arr);
ucs4_t u = enc->MultiBytetoUCS4(wxb);
if (u != 0)
{
BOOST_CHECK(it != mb2uend);
if (it != mb2uend)
{
ucs4_t t = it->second;
BOOST_CHECK(u == t);
}
}
else
{
BOOST_CHECK(it == mb2uend);
}
}
}
U2MBDataMap::const_iterator u2mbend = u2mb[encname].end();
for (ucs4_t i=0; i<=0x10FFFF; ++i)
{
wxByte buf[4];
size_t n = enc->UCS4toMultiByte(i, buf);
BOOST_CHECK(n <= 2);
U2MBDataMap::const_iterator it = u2mb[encname].find(i);
if (n == 1 || n == 2)
{
BOOST_CHECK(it != u2mbend);
if (it != u2mbend)
{
buf[n] = 0;
std::string mbs((const char*)buf);
BOOST_CHECK(it->second == mbs);
}
}
else if(n == 0)
{
BOOST_CHECK(it == u2mbend);
}
}
mb2u[encname].clear();
u2mb[encname].clear();
}
