X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/257ed895d539d3dc6a11058c337ba1a58c5b7036..739c5499fcab1c165b8dd0591c9fd9e2329b3cf9:/src/stc/PlatWX.cpp diff --git a/src/stc/PlatWX.cpp b/src/stc/PlatWX.cpp index 2b478141af..af67c0cdaa 100644 --- a/src/stc/PlatWX.cpp +++ b/src/stc/PlatWX.cpp @@ -1,145 +1,228 @@ // Scintilla source code edit control -// PlatWX.cxx - implementation of platform facilities on wxWindows +// PlatWX.cxx - implementation of platform facilities on wxWidgets // Copyright 1998-1999 by Neil Hodgson // Robin Dunn // The License.txt file describes the conditions under which this software may be distributed. +// For compilers that support precompilation, includes "wx.h". +#include "wx/wxprec.h" + +#ifdef __BORLANDC__ + #pragma hdrstop +#endif + +#if wxUSE_STC + +#ifndef WX_PRECOMP + #include "wx/menu.h" + #include "wx/dcmemory.h" + #include "wx/settings.h" +#endif // WX_PRECOMP + #include -#include "Platform.h" -#include "wx/stc/stc.h" +#if wxUSE_DISPLAY +#include "wx/display.h" +#endif +#include "wx/encconv.h" +#include "wx/listctrl.h" +#include "wx/mstream.h" +#include "wx/image.h" +#include "wx/imaglist.h" +#include "wx/tokenzr.h" -#ifdef __WXGTK__ -#include +#ifdef wxHAS_RAW_BITMAP +#include "wx/rawbmp.h" +#endif +#if wxUSE_GRAPHICS_CONTEXT +#include "wx/dcgraph.h" #endif +#include "Platform.h" +#include "PlatWX.h" +#include "wx/stc/stc.h" +#include "wx/stc/private.h" + + Point Point::FromLong(long lpoint) { return Point(lpoint & 0xFFFF, lpoint >> 16); } wxRect wxRectFromPRectangle(PRectangle prc) { - wxRect rc(prc.left, prc.top, - prc.right-prc.left, prc.bottom-prc.top); - return rc; + wxRect r(prc.left, prc.top, + prc.Width(), prc.Height()); + return r; } PRectangle PRectangleFromwxRect(wxRect rc) { - return PRectangle(rc.GetLeft(), rc.GetTop(), rc.GetRight(), rc.GetBottom()); + return PRectangle(rc.GetLeft(), rc.GetTop(), + rc.GetRight()+1, rc.GetBottom()+1); } -Colour::Colour(long lcol) { - co.Set(lcol & 0xff, (lcol >> 8) & 0xff, (lcol >> 16) & 0xff); +wxColour wxColourFromCD(ColourDesired& cd) { + return wxColour((unsigned char)cd.GetRed(), + (unsigned char)cd.GetGreen(), + (unsigned char)cd.GetBlue()); } -Colour::Colour(unsigned int red, unsigned int green, unsigned int blue) { - co.Set(red, green, blue); +wxColour wxColourFromCDandAlpha(ColourDesired& cd, int alpha) { + return wxColour((unsigned char)cd.GetRed(), + (unsigned char)cd.GetGreen(), + (unsigned char)cd.GetBlue(), + (unsigned char)alpha); } -bool Colour::operator==(const Colour &other) const { - return co == other.co; -} +//---------------------------------------------------------------------- -long Colour::AsLong() const { - return (((long)co.Blue() << 16) | - ((long)co.Green() << 8) | - ((long)co.Red())); +Font::Font() { + fid = 0; + ascent = 0; } -unsigned int Colour::GetRed() { - return co.Red(); +Font::~Font() { } -unsigned int Colour::GetGreen() { - return co.Green(); -} +void Font::Create(const FontParameters &fp) { + Release(); -unsigned int Colour::GetBlue() { - return co.Blue(); -} + // The minus one is done because since Scintilla uses SC_CHARSET_DEFAULT + // internally and we need to have wxFONENCODING_DEFAULT == SC_SHARSET_DEFAULT + // so we adjust the encoding before passing it to Scintilla. See also + // wxStyledTextCtrl::StyleSetCharacterSet + wxFontEncoding encoding = (wxFontEncoding)(fp.characterSet-1); + + wxFontEncodingArray ea = wxEncodingConverter::GetPlatformEquivalents(encoding); + if (ea.GetCount()) + encoding = ea[0]; + + wxFontWeight weight; + if (fp.weight <= 300) + weight = wxFONTWEIGHT_LIGHT; + else if (fp.weight >= 700) + weight = wxFONTWEIGHT_BOLD; + else + weight = wxFONTWEIGHT_NORMAL; -Palette::Palette() { - used = 0; - allowRealization = false; + wxFont* font = new wxFont(fp.size, + wxFONTFAMILY_DEFAULT, + fp.italic ? wxFONTSTYLE_ITALIC : wxFONTSTYLE_NORMAL, + weight, + false, + stc2wx(fp.faceName), + encoding); + fid = font; } -Palette::~Palette() { - Release(); -} -void Palette::Release() { - used = 0; +void Font::Release() { + if (fid) + delete (wxFont*)fid; + fid = 0; } -// This method either adds a colour to the list of wanted colours (want==true) -// or retrieves the allocated colour back to the ColourPair. -// This is one method to make it easier to keep the code for wanting and retrieving in sync. -void Palette::WantFind(ColourPair &cp, bool want) { - if (want) { - for (int i=0; i < used; i++) { - if (entries[i].desired == cp.desired) - return; - } +//---------------------------------------------------------------------- - if (used < numEntries) { - entries[used].desired = cp.desired; - entries[used].allocated = cp.desired; - used++; - } - } else { - for (int i=0; i < used; i++) { - if (entries[i].desired == cp.desired) { - cp.allocated = entries[i].allocated; - return; - } - } - cp.allocated = cp.desired; - } -} +class SurfaceImpl : public Surface { +private: + wxDC* hdc; + bool hdcOwned; + wxBitmap* bitmap; + int x; + int y; + bool unicodeMode; -void Palette::Allocate(Window &) { - if (allowRealization) { - } -} +public: + SurfaceImpl(); + ~SurfaceImpl(); + + virtual void Init(WindowID wid); + virtual void Init(SurfaceID sid, WindowID wid); + virtual void InitPixMap(int width, int height, Surface *surface_, WindowID wid); + + virtual void Release(); + virtual bool Initialised(); + virtual void PenColour(ColourDesired fore); + virtual int LogPixelsY(); + virtual int DeviceHeightFont(int points); + virtual void MoveTo(int x_, int y_); + virtual void LineTo(int x_, int y_); + virtual void Polygon(Point *pts, int npts, ColourDesired fore, ColourDesired back); + virtual void RectangleDraw(PRectangle rc, ColourDesired fore, ColourDesired back); + virtual void FillRectangle(PRectangle rc, ColourDesired back); + virtual void FillRectangle(PRectangle rc, Surface &surfacePattern); + virtual void RoundedRectangle(PRectangle rc, ColourDesired fore, ColourDesired back); + virtual void AlphaRectangle(PRectangle rc, int cornerSize, ColourDesired fill, int alphaFill, + ColourDesired outline, int alphaOutline, int flags); + virtual void DrawRGBAImage(PRectangle rc, int width, int height, + const unsigned char *pixelsImage); + virtual void Ellipse(PRectangle rc, ColourDesired fore, ColourDesired back); + virtual void Copy(PRectangle rc, Point from, Surface &surfaceSource); + + virtual void DrawTextNoClip(PRectangle rc, Font &font_, XYPOSITION ybase, const char *s, int len, ColourDesired fore, ColourDesired back); + virtual void DrawTextClipped(PRectangle rc, Font &font_, XYPOSITION ybase, const char *s, int len, ColourDesired fore, ColourDesired back); + virtual void DrawTextTransparent(PRectangle rc, Font &font_, XYPOSITION ybase, const char *s, int len, ColourDesired fore); + virtual void MeasureWidths(Font &font_, const char *s, int len, XYPOSITION *positions); + virtual XYPOSITION WidthText(Font &font_, const char *s, int len); + virtual XYPOSITION WidthChar(Font &font_, char ch); + virtual XYPOSITION Ascent(Font &font_); + virtual XYPOSITION Descent(Font &font_); + virtual XYPOSITION InternalLeading(Font &font_); + virtual XYPOSITION ExternalLeading(Font &font_); + virtual XYPOSITION Height(Font &font_); + virtual XYPOSITION AverageCharWidth(Font &font_); + + virtual void SetClip(PRectangle rc); + virtual void FlushCachedState(); + + virtual void SetUnicodeMode(bool unicodeMode_); + virtual void SetDBCSMode(int codePage); + + void BrushColour(ColourDesired back); + void SetFont(Font &font_); +}; -Font::Font() { - id = 0; - ascent = 0; -} -Font::~Font() { -} +SurfaceImpl::SurfaceImpl() : + hdc(0), hdcOwned(0), bitmap(0), + x(0), y(0), unicodeMode(0) +{} -void Font::Create(const char *faceName, int characterSet, int size, bool bold, bool italic) { +SurfaceImpl::~SurfaceImpl() { Release(); - id = new wxFont(size, - wxDEFAULT, - italic ? wxITALIC : wxNORMAL, - bold ? wxBOLD : wxNORMAL, - false, - faceName, - wxFONTENCODING_DEFAULT); } - -void Font::Release() { - if (id) - delete id; - id = 0; +void SurfaceImpl::Init(WindowID wid) { +#if 0 + Release(); + hdc = new wxMemoryDC(); + hdcOwned = true; +#else + // On Mac and GTK the DC is not really valid until it has a bitmap + // selected into it. So instead of just creating the DC with no bitmap, + // go ahead and give it one. + InitPixMap(1,1,NULL,wid); +#endif } - -Surface::Surface() : - hdc(0), hdcOwned(0), bitmap(0), - x(0), y(0) { +void SurfaceImpl::Init(SurfaceID hdc_, WindowID) { + Release(); + hdc = (wxDC*)hdc_; } -Surface::~Surface() { +void SurfaceImpl::InitPixMap(int width, int height, Surface *WXUNUSED(surface_), WindowID) { Release(); + hdc = new wxMemoryDC(); + hdcOwned = true; + if (width < 1) width = 1; + if (height < 1) height = 1; + bitmap = new wxBitmap(width, height); + ((wxMemoryDC*)hdc)->SelectObject(*bitmap); } -void Surface::Release() { + +void SurfaceImpl::Release() { if (bitmap) { ((wxMemoryDC*)hdc)->SelectObject(wxNullBitmap); delete bitmap; @@ -153,170 +236,341 @@ void Surface::Release() { } -bool Surface::Initialised() { +bool SurfaceImpl::Initialised() { return hdc != 0; } -void Surface::Init() { - Release(); - hdc = new wxMemoryDC(); - hdcOwned = true; - // **** ::SetTextAlign(hdc, TA_BASELINE); -} -void Surface::Init(SurfaceID hdc_) { - Release(); - hdc = hdc_; - // **** ::SetTextAlign(hdc, TA_BASELINE); +void SurfaceImpl::PenColour(ColourDesired fore) { + hdc->SetPen(wxPen(wxColourFromCD(fore))); } -void Surface::InitPixMap(int width, int height, Surface *surface_) { - Release(); - hdc = new wxMemoryDC(surface_->hdc); - hdcOwned = true; - bitmap = new wxBitmap(width, height); - ((wxMemoryDC*)hdc)->SelectObject(*bitmap); - // **** ::SetTextAlign(hdc, TA_BASELINE); -} - -void Surface::PenColour(Colour fore) { - hdc->SetPen(wxPen(fore.co, 1, wxSOLID)); -} - -void Surface::BrushColor(Colour back) { - hdc->SetBrush(wxBrush(back.co, wxSOLID)); +void SurfaceImpl::BrushColour(ColourDesired back) { + hdc->SetBrush(wxBrush(wxColourFromCD(back))); } -void Surface::SetFont(Font &font_) { +void SurfaceImpl::SetFont(Font &font_) { if (font_.GetID()) { - hdc->SetFont(*font_.GetID()); + hdc->SetFont(*((wxFont*)font_.GetID())); } } -int Surface::LogPixelsY() { +int SurfaceImpl::LogPixelsY() { return hdc->GetPPI().y; } - -int Surface::DeviceHeightFont(int points) { - return points * LogPixelsY() / 72; +int SurfaceImpl::DeviceHeightFont(int points) { + return points; } - -void Surface::MoveTo(int x_, int y_) { +void SurfaceImpl::MoveTo(int x_, int y_) { x = x_; y = y_; } -void Surface::LineTo(int x_, int y_) { +void SurfaceImpl::LineTo(int x_, int y_) { hdc->DrawLine(x,y, x_,y_); x = x_; y = y_; } -void Surface::Polygon(Point *pts, int npts, Colour fore, - Colour back) { +void SurfaceImpl::Polygon(Point *pts, int npts, ColourDesired fore, ColourDesired back) { PenColour(fore); - BrushColor(back); - hdc->DrawPolygon(npts, (wxPoint*)pts); + BrushColour(back); + wxPoint *p = new wxPoint[npts]; + + for (int i=0; iDrawPolygon(npts, p); + delete [] p; } -void Surface::RectangleDraw(PRectangle rc, Colour fore, Colour back) { +void SurfaceImpl::RectangleDraw(PRectangle rc, ColourDesired fore, ColourDesired back) { PenColour(fore); - BrushColor(back); + BrushColour(back); hdc->DrawRectangle(wxRectFromPRectangle(rc)); } -void Surface::FillRectangle(PRectangle rc, Colour back) { - BrushColor(back); +void SurfaceImpl::FillRectangle(PRectangle rc, ColourDesired back) { + BrushColour(back); hdc->SetPen(*wxTRANSPARENT_PEN); hdc->DrawRectangle(wxRectFromPRectangle(rc)); } -void Surface::FillRectangle(PRectangle rc, Surface &surfacePattern) { +void SurfaceImpl::FillRectangle(PRectangle rc, Surface &surfacePattern) { wxBrush br; - if (surfacePattern.bitmap) - br = wxBrush(*surfacePattern.bitmap); + if (((SurfaceImpl&)surfacePattern).bitmap) + br = wxBrush(*((SurfaceImpl&)surfacePattern).bitmap); else // Something is wrong so display in red - br = wxBrush(*wxRED, wxSOLID); + br = wxBrush(*wxRED); hdc->SetPen(*wxTRANSPARENT_PEN); hdc->SetBrush(br); hdc->DrawRectangle(wxRectFromPRectangle(rc)); } -void Surface::RoundedRectangle(PRectangle rc, Colour fore, Colour back) { +void SurfaceImpl::RoundedRectangle(PRectangle rc, ColourDesired fore, ColourDesired back) { PenColour(fore); - BrushColor(back); + BrushColour(back); hdc->DrawRoundedRectangle(wxRectFromPRectangle(rc), 4); } -void Surface::Ellipse(PRectangle rc, Colour fore, Colour back) { +#if defined(__WXMSW__) || defined(__WXMAC__) +#define wxPy_premultiply(p, a) ((p) * (a) / 0xff) +#else +#define wxPy_premultiply(p, a) (p) +#endif + +void SurfaceImpl::AlphaRectangle(PRectangle rc, int cornerSize, + ColourDesired fill, int alphaFill, + ColourDesired outline, int alphaOutline, + int /*flags*/) { +#if wxUSE_GRAPHICS_CONTEXT + wxGCDC dc(*(wxMemoryDC*)hdc); + wxColour penColour(wxColourFromCDandAlpha(outline, alphaOutline)); + wxColour brushColour(wxColourFromCDandAlpha(fill, alphaFill)); + dc.SetPen(wxPen(penColour)); + dc.SetBrush(wxBrush(brushColour)); + dc.DrawRoundedRectangle(wxRectFromPRectangle(rc), cornerSize); + return; +#else + +#ifdef wxHAS_RAW_BITMAP + + // TODO: do something with cornerSize + wxUnusedVar(cornerSize); + + int x, y; + wxRect r = wxRectFromPRectangle(rc); + wxBitmap bmp(r.width, r.height, 32); + + // This block is needed to ensure that the changes done to the bitmap via + // pixel data object are committed before the bitmap is drawn. + { + wxAlphaPixelData pixData(bmp); + + // Set the fill pixels + ColourDesired cdf(fill.AsLong()); + int red = cdf.GetRed(); + int green = cdf.GetGreen(); + int blue = cdf.GetBlue(); + + wxAlphaPixelData::Iterator p(pixData); + for (y=0; yDrawBitmap(bmp, r.x, r.y, true); + +#else + wxUnusedVar(cornerSize); + wxUnusedVar(alphaFill); + wxUnusedVar(alphaOutline); + RectangleDraw(rc, outline, fill); +#endif +#endif +} + +#ifdef wxHAS_RAW_BITMAP +wxBitmap BitmapFromRGBAImage(int width, int height, const unsigned char *pixelsImage) +{ + int x, y; + wxBitmap bmp(width, height, 32); + wxAlphaPixelData pixData(bmp); + + wxAlphaPixelData::Iterator p(pixData); + for (y=0; yDrawBitmap(bmp, r.x, r.y, true); +#endif +} + + +void SurfaceImpl::Ellipse(PRectangle rc, ColourDesired fore, ColourDesired back) { PenColour(fore); - BrushColor(back); + BrushColour(back); hdc->DrawEllipse(wxRectFromPRectangle(rc)); } -void Surface::Copy(PRectangle rc, Point from, Surface &surfaceSource) { +void SurfaceImpl::Copy(PRectangle rc, Point from, Surface &surfaceSource) { wxRect r = wxRectFromPRectangle(rc); hdc->Blit(r.x, r.y, r.width, r.height, - surfaceSource.hdc, from.x, from.y, wxCOPY); + ((SurfaceImpl&)surfaceSource).hdc, + from.x, from.y, wxCOPY); } -void Surface::DrawText(PRectangle rc, Font &font, int ybase, - const char *s, int len, Colour fore, Colour back) { +void SurfaceImpl::DrawTextNoClip(PRectangle rc, Font &font, XYPOSITION ybase, + const char *s, int len, + ColourDesired fore, ColourDesired back) { SetFont(font); - hdc->SetTextForeground(fore.co); - hdc->SetTextBackground(back.co); + hdc->SetTextForeground(wxColourFromCD(fore)); + hdc->SetTextBackground(wxColourFromCD(back)); FillRectangle(rc, back); // ybase is where the baseline should be, but wxWin uses the upper left // corner, so I need to calculate the real position for the text... - hdc->DrawText(wxString(s, len), rc.left, ybase - font.ascent); + hdc->DrawText(stc2wx(s, len), rc.left, ybase - font.ascent); } -void Surface::DrawTextClipped(PRectangle rc, Font &font, int ybase, const char *s, int len, Colour fore, Colour back) { +void SurfaceImpl::DrawTextClipped(PRectangle rc, Font &font, XYPOSITION ybase, + const char *s, int len, + ColourDesired fore, ColourDesired back) { SetFont(font); - hdc->SetTextForeground(fore.co); - hdc->SetTextBackground(back.co); + hdc->SetTextForeground(wxColourFromCD(fore)); + hdc->SetTextBackground(wxColourFromCD(back)); FillRectangle(rc, back); hdc->SetClippingRegion(wxRectFromPRectangle(rc)); // see comments above - hdc->DrawText(wxString(s, len), rc.left, ybase - font.ascent); + hdc->DrawText(stc2wx(s, len), rc.left, ybase - font.ascent); hdc->DestroyClippingRegion(); } -int Surface::WidthText(Font &font, const char *s, int len) { + +void SurfaceImpl::DrawTextTransparent(PRectangle rc, Font &font, XYPOSITION ybase, + const char *s, int len, + ColourDesired fore) { + SetFont(font); - int w; - int h; - hdc->GetTextExtent(wxString(s, len), &w, &h); - return w; + hdc->SetTextForeground(wxColourFromCD(fore)); + hdc->SetBackgroundMode(wxBRUSHSTYLE_TRANSPARENT); + + // ybase is where the baseline should be, but wxWin uses the upper left + // corner, so I need to calculate the real position for the text... + hdc->DrawText(stc2wx(s, len), rc.left, ybase - font.ascent); + + hdc->SetBackgroundMode(wxBRUSHSTYLE_SOLID); } -void Surface::MeasureWidths(Font &font, const char *s, int len, int *positions) { + +void SurfaceImpl::MeasureWidths(Font &font, const char *s, int len, XYPOSITION *positions) { + + wxString str = stc2wx(s, len); + wxArrayInt tpos; + SetFont(font); - int totalWidth = 0; - for (int i=0; iGetTextExtent(s[i], &w, &h); - totalWidth += w; - positions[i] = totalWidth; + + hdc->GetPartialTextExtents(str, tpos); + +#if wxUSE_UNICODE + // Map the widths for UCS-2 characters back to the UTF-8 input string + // NOTE: I don't think this is right for when sizeof(wxChar) > 2, ie wxGTK2 + // so figure it out and fix it! + size_t i = 0; + size_t ui = 0; + while ((int)i < len) { + unsigned char uch = (unsigned char)s[i]; + positions[i++] = tpos[ui]; + if (uch >= 0x80) { + if (uch < (0x80 + 0x40 + 0x20)) { + positions[i++] = tpos[ui]; + } else { + positions[i++] = tpos[ui]; + positions[i++] = tpos[ui]; + } + } + ui++; } +#else + + // If not unicode then just use the widths we have +#if wxUSE_STD_CONTAINERS + std::copy(tpos.begin(), tpos.end(), positions); +#else + memcpy(positions, tpos.begin(), len * sizeof(int)); +#endif +#endif +} + + +XYPOSITION SurfaceImpl::WidthText(Font &font, const char *s, int len) { + SetFont(font); + int w; + int h; + + hdc->GetTextExtent(stc2wx(s, len), &w, &h); + return w; } -int Surface::WidthChar(Font &font, char ch) { + +XYPOSITION SurfaceImpl::WidthChar(Font &font, char ch) { SetFont(font); int w; int h; - hdc->GetTextExtent(ch, &w, &h); + char s[2] = { ch, 0 }; + + hdc->GetTextExtent(stc2wx(s, 1), &w, &h); return w; } -#define EXTENT_TEST " `~!@#$%^&*()-_=+\\|[]{};:\"\'<,>.?/1234567890abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ" +#define EXTENT_TEST wxT(" `~!@#$%^&*()-_=+\\|[]{};:\"\'<,>.?/1234567890abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ") -int Surface::Ascent(Font &font) { +XYPOSITION SurfaceImpl::Ascent(Font &font) { SetFont(font); int w, h, d, e; hdc->GetTextExtent(EXTENT_TEST, &w, &h, &d, &e); @@ -324,66 +578,84 @@ int Surface::Ascent(Font &font) { return font.ascent; } -int Surface::Descent(Font &font) { +XYPOSITION SurfaceImpl::Descent(Font &font) { SetFont(font); int w, h, d, e; hdc->GetTextExtent(EXTENT_TEST, &w, &h, &d, &e); return d; } -int Surface::InternalLeading(Font &font) { +XYPOSITION SurfaceImpl::InternalLeading(Font &WXUNUSED(font)) { return 0; } -int Surface::ExternalLeading(Font &font) { +XYPOSITION SurfaceImpl::ExternalLeading(Font &font) { SetFont(font); int w, h, d, e; hdc->GetTextExtent(EXTENT_TEST, &w, &h, &d, &e); return e; } -int Surface::Height(Font &font) { +XYPOSITION SurfaceImpl::Height(Font &font) { SetFont(font); - return hdc->GetCharHeight(); + return hdc->GetCharHeight() + 1; } -int Surface::AverageCharWidth(Font &font) { +XYPOSITION SurfaceImpl::AverageCharWidth(Font &font) { SetFont(font); return hdc->GetCharWidth(); } -int Surface::SetPalette(Palette *pal, bool inBackGround) { - return 0; // **** figure out what to do with palettes... +void SurfaceImpl::SetClip(PRectangle rc) { + hdc->SetClippingRegion(wxRectFromPRectangle(rc)); +} + +void SurfaceImpl::FlushCachedState() { } -void Surface::SetClip(PRectangle rc) { - hdc->SetClippingRegion(wxRectFromPRectangle(rc)); +void SurfaceImpl::SetUnicodeMode(bool unicodeMode_) { + unicodeMode=unicodeMode_; } -void Surface::FlushCachedState() { +void SurfaceImpl::SetDBCSMode(int WXUNUSED(codePage)) { + // dbcsMode = codePage == SC_CP_DBCS; } + +Surface *Surface::Allocate(int WXUNUSED(technology)) { + return new SurfaceImpl; +} + + +//---------------------------------------------------------------------- + + +inline wxWindow* GETWIN(WindowID id) { return (wxWindow*)id; } + Window::~Window() { } void Window::Destroy() { - if (id) - id->Destroy(); - id = 0; + if (wid) { + Show(false); + GETWIN(wid)->Destroy(); + } + wid = 0; } bool Window::HasFocus() { - return wxWindow::FindFocus() == id; + return wxWindow::FindFocus() == GETWIN(wid); } PRectangle Window::GetPosition() { - wxRect rc(id->GetPosition(), id->GetSize()); + if (! wid) return PRectangle(); + wxRect rc(GETWIN(wid)->GetPosition(), GETWIN(wid)->GetSize()); return PRectangleFromwxRect(rc); } void Window::SetPosition(PRectangle rc) { wxRect r = wxRectFromPRectangle(rc); - id->SetSize(r); + GETWIN(wid)->SetSize(r); } void Window::SetPositionRelative(PRectangle rc, Window) { @@ -391,29 +663,30 @@ void Window::SetPositionRelative(PRectangle rc, Window) { } PRectangle Window::GetClientPosition() { - wxSize sz = id->GetClientSize(); + if (! wid) return PRectangle(); + wxSize sz = GETWIN(wid)->GetClientSize(); return PRectangle(0, 0, sz.x, sz.y); } void Window::Show(bool show) { - id->Show(show); + GETWIN(wid)->Show(show); } void Window::InvalidateAll() { - id->Refresh(false); + GETWIN(wid)->Refresh(false); } void Window::InvalidateRectangle(PRectangle rc) { wxRect r = wxRectFromPRectangle(rc); - id->Refresh(false, &r); + GETWIN(wid)->Refresh(false, &r); } void Window::SetFont(Font &font) { - id->SetFont(*font.GetID()); + GETWIN(wid)->SetFont(*((wxFont*)font.GetID())); } void Window::SetCursor(Cursor curs) { - int cursorId; + wxStockCursor cursorId; switch (curs) { case cursorText: @@ -435,226 +708,724 @@ void Window::SetCursor(Cursor curs) { cursorId = wxCURSOR_SIZENS; break; case cursorReverseArrow: - cursorId = wxCURSOR_POINT_RIGHT; + cursorId = wxCURSOR_RIGHT_ARROW; + break; + case cursorHand: + cursorId = wxCURSOR_HAND; break; default: cursorId = wxCURSOR_ARROW; break; } - id->SetCursor(wxCursor(cursorId)); + wxCursor wc = wxCursor(cursorId); + if(curs != cursorLast) + { + GETWIN(wid)->SetCursor(wc); + cursorLast = curs; + } } void Window::SetTitle(const char *s) { - id->SetTitle(s); + GETWIN(wid)->SetLabel(stc2wx(s)); } -class wxSTCListBox : public wxListBox { +// Returns rectangle of monitor pt is on +PRectangle Window::GetMonitorRect(Point pt) { + wxRect rect; + if (! wid) return PRectangle(); +#if wxUSE_DISPLAY + // Get the display the point is found on + int n = wxDisplay::GetFromPoint(wxPoint(pt.x, pt.y)); + wxDisplay dpy(n == wxNOT_FOUND ? 0 : n); + rect = dpy.GetGeometry(); +#else + wxUnusedVar(pt); +#endif + return PRectangleFromwxRect(rect); +} + +//---------------------------------------------------------------------- +// Helper classes for ListBox + + +// This is a simple subclass of wxListView that just resets focus to the +// parent when it gets it. +class wxSTCListBox : public wxListView { public: - wxSTCListBox(wxWindow* parent, wxWindowID id) - : wxListBox(parent, id, wxDefaultPosition, wxDefaultSize, - 0, NULL, wxLB_SINGLE | wxLB_SORT | wxSIMPLE_BORDER) - {} + wxSTCListBox(wxWindow* parent, wxWindowID id, + const wxPoint& pos, const wxSize& size, + long style) + : wxListView() + { +#ifdef __WXMSW__ + Hide(); // don't flicker as we move it around... +#endif + Create(parent, id, pos, size, style); + } + void OnFocus(wxFocusEvent& event) { GetParent()->SetFocus(); event.Skip(); } -#ifdef __WXGTK__ - void DoSetFirstItem(int n); + void OnKillFocus(wxFocusEvent& WXUNUSED(event)) { + // Do nothing. Prevents base class from resetting the colors... + } + +#ifdef __WXMAC__ + // For some reason I don't understand yet the focus doesn't really leave + // the listbox like it should, so if we get any events feed them back to + // the wxSTC + void OnKeyDown(wxKeyEvent& event) { + GetGrandParent()->GetEventHandler()->ProcessEvent(event); + } + void OnChar(wxKeyEvent& event) { + GetGrandParent()->GetEventHandler()->ProcessEvent(event); + } + + // And we need to force the focus back when being destroyed + ~wxSTCListBox() { + GetGrandParent()->SetFocus(); + } #endif private: DECLARE_EVENT_TABLE() }; -BEGIN_EVENT_TABLE(wxSTCListBox, wxListBox) - EVT_SET_FOCUS(wxSTCListBox::OnFocus) +BEGIN_EVENT_TABLE(wxSTCListBox, wxListView) + EVT_SET_FOCUS( wxSTCListBox::OnFocus) + EVT_KILL_FOCUS(wxSTCListBox::OnKillFocus) +#ifdef __WXMAC__ + EVT_KEY_DOWN( wxSTCListBox::OnKeyDown) + EVT_CHAR( wxSTCListBox::OnChar) +#endif END_EVENT_TABLE() +#if wxUSE_POPUPWIN //----------------------------------- +#include "wx/popupwin.h" -#ifdef __WXGTK__ - // This can be removed after 2.2.2 I think -void wxSTCListBox::DoSetFirstItem( int n ) +// A popup window to place the wxSTCListBox upon +class wxSTCListBoxWin : public wxPopupWindow { - wxCHECK_RET( m_list, wxT("invalid listbox") ); +private: + wxListView* lv; + CallBackAction doubleClickAction; + void* doubleClickActionData; +public: + wxSTCListBoxWin(wxWindow* parent, wxWindowID id, Point WXUNUSED(location)) : + wxPopupWindow(parent, wxBORDER_SIMPLE) + { - if (gdk_pointer_is_grabbed () && GTK_WIDGET_HAS_GRAB (m_list)) - return; + lv = new wxSTCListBox(parent, id, wxPoint(-50,-50), wxDefaultSize, + wxLC_REPORT | wxLC_SINGLE_SEL | wxLC_NO_HEADER | wxBORDER_NONE); + lv->SetCursor(wxCursor(wxCURSOR_ARROW)); + lv->InsertColumn(0, wxEmptyString); + lv->InsertColumn(1, wxEmptyString); + + // NOTE: We need to fool the wxListView into thinking that it has the + // focus so it will use the normal selection colour and will look + // "right" to the user. But since the wxPopupWindow or its children + // can't receive focus then we have to pull a fast one and temporarily + // parent the listctrl on the STC window and then call SetFocus and + // then reparent it back to the popup. + lv->SetFocus(); + lv->Reparent(this); +#ifdef __WXMSW__ + lv->Show(); +#endif +#if defined(__WXOSX_COCOA__) || defined(__WXGTK__) + // This color will end up being our border + SetBackgroundColour(wxColour(0xC0, 0xC0, 0xC0)); +#endif + } - // terribly efficient - const gchar *vadjustment_key = "gtk-vadjustment"; - guint vadjustment_key_id = g_quark_from_static_string (vadjustment_key); - GtkAdjustment *adjustment = - (GtkAdjustment*) gtk_object_get_data_by_id (GTK_OBJECT (m_list), vadjustment_key_id); - wxCHECK_RET( adjustment, wxT("invalid listbox code") ); + // Set position in client coords + virtual void DoSetSize(int x, int y, + int width, int height, + int sizeFlags = wxSIZE_AUTO) { + if (x != wxDefaultCoord) { + GetParent()->ClientToScreen(&x, NULL); + } + if (y != wxDefaultCoord) { + GetParent()->ClientToScreen(NULL, &y); + } + wxPopupWindow::DoSetSize(x, y, width, height, sizeFlags); + } - GList *target = g_list_nth( m_list->children, n ); - wxCHECK_RET( target, wxT("invalid listbox index") ); + // return position as if it were in client coords + virtual void DoGetPosition( int *x, int *y ) const { + int sx, sy; + wxPopupWindow::DoGetPosition(&sx, &sy); + GetParent()->ScreenToClient(&sx, &sy); + if (x) *x = sx; + if (y) *y = sy; + } - GtkWidget *item = GTK_WIDGET(target->data); - wxCHECK_RET( item, wxT("invalid listbox code") ); - // find the last item before this one which is already realized - size_t nItemsBefore; - for ( nItemsBefore = 0; item && (item->allocation.y == -1); nItemsBefore++ ) + bool Destroy() { + if ( !wxPendingDelete.Member(this) ) + wxPendingDelete.Append(this); + return true; + } + + + int IconWidth() { + wxImageList* il = lv->GetImageList(wxIMAGE_LIST_SMALL); + if (il != NULL) { + int w, h; + il->GetSize(0, w, h); + return w; + } + return 0; + } + + + void SetDoubleClickAction(CallBackAction action, void *data) { + doubleClickAction = action; + doubleClickActionData = data; + } + + + void OnFocus(wxFocusEvent& event) { + GetParent()->SetFocus(); + event.Skip(); + } + + void OnSize(wxSizeEvent& event) { + // resize the child to fill the popup + wxSize sz = GetClientSize(); + int x, y, w, h; + x = y = 0; + w = sz.x; + h = sz.y; +#if defined(__WXOSX_COCOA__) || defined(__WXGTK__) + // make room for the parent's bg color to show, to act as a border + x = y = 1; + w -= 2; + h -= 2; +#endif + lv->SetSize(x, y, w, h); + // reset the column widths + lv->SetColumnWidth(0, IconWidth()+4); + lv->SetColumnWidth(1, w - 2 - lv->GetColumnWidth(0) - + wxSystemSettings::GetMetric(wxSYS_VSCROLL_X)); + event.Skip(); + } + + void OnActivate(wxListEvent& WXUNUSED(event)) { + doubleClickAction(doubleClickActionData); + } + + wxListView* GetLB() { return lv; } + +private: + DECLARE_EVENT_TABLE() + +}; + +BEGIN_EVENT_TABLE(wxSTCListBoxWin, wxPopupWindow) + EVT_SET_FOCUS ( wxSTCListBoxWin::OnFocus) + EVT_SIZE ( wxSTCListBoxWin::OnSize) + EVT_LIST_ITEM_ACTIVATED(wxID_ANY, wxSTCListBoxWin::OnActivate) +END_EVENT_TABLE() + + + +#else // !wxUSE_POPUPWIN ----------------------------------- +#include "wx/frame.h" + +// A normal window to place the wxSTCListBox upon, but make it behave as much +// like a wxPopupWindow as possible +class wxSTCListBoxWin : public wxFrame { +private: + wxListView* lv; + CallBackAction doubleClickAction; + void* doubleClickActionData; +public: + wxSTCListBoxWin(wxWindow* parent, wxWindowID id, Point location) : + wxFrame(parent, id, wxEmptyString, wxPoint(location.x, location.y), wxSize(0,0), + wxFRAME_NO_TASKBAR + | wxFRAME_FLOAT_ON_PARENT +#ifdef __WXMAC__ + | wxPOPUP_WINDOW + | wxNO_BORDER +#else + | wxSIMPLE_BORDER +#endif + ) { - target = target->prev; - if ( !target ) - { - // nothing we can do if there are no allocated items yet - return; + + lv = new wxSTCListBox(this, id, wxDefaultPosition, wxDefaultSize, + wxLC_REPORT | wxLC_SINGLE_SEL | wxLC_NO_HEADER | wxNO_BORDER); + lv->SetCursor(wxCursor(wxCURSOR_ARROW)); + lv->InsertColumn(0, wxEmptyString); + lv->InsertColumn(1, wxEmptyString); + + // Eventhough we immediately reset the focus to the parent, this helps + // things to look right... + lv->SetFocus(); + + Hide(); + } + + + // On OSX and (possibly others) there can still be pending + // messages/events for the list control when Scintilla wants to + // close it, so do a pending delete of it instead of destroying + // immediately. + bool Destroy() + { +#ifdef __WXMAC__ + // The bottom edge of this window is not getting properly + // refreshed upon deletion, so help it out... + wxWindow* p = GetParent(); + wxRect r(GetPosition(), GetSize()); + r.SetHeight(r.GetHeight()+1); + p->Refresh(false, &r); +#endif + if ( !wxPendingDelete.Member(this) ) + wxPendingDelete.Append(this); + return true; + } + + + int IconWidth() + { + wxImageList* il = lv->GetImageList(wxIMAGE_LIST_SMALL); + if (il != NULL) { + int w, h; + il->GetSize(0, w, h); + return w; } + return 0; + } + - item = GTK_WIDGET(target->data); + void SetDoubleClickAction(CallBackAction action, void *data) + { + doubleClickAction = action; + doubleClickActionData = data; } - gtk_adjustment_set_value(adjustment, - item->allocation.y + - nItemsBefore*item->allocation.height); -} + + void OnFocus(wxFocusEvent& event) + { + ActivateParent(); + GetParent()->SetFocus(); + event.Skip(); + } + + void OnSize(wxSizeEvent& event) + { + // resize the child + wxSize sz = GetClientSize(); + lv->SetSize(sz); + // reset the column widths + lv->SetColumnWidth(0, IconWidth()+4); + lv->SetColumnWidth(1, sz.x - 2 - lv->GetColumnWidth(0) - + wxSystemSettings::GetMetric(wxSYS_VSCROLL_X)); + event.Skip(); + } + + void ActivateParent() + { + // Although we're a frame, we always want the parent to be active, so + // raise it whenever we get shown, focused, etc. + wxTopLevelWindow *frame = wxDynamicCast( + wxGetTopLevelParent(GetParent()), wxTopLevelWindow); + if (frame) + frame->Raise(); + } + + + virtual void DoSetSize(int x, int y, + int width, int height, + int sizeFlags = wxSIZE_AUTO) + { + // convert coords to screen coords since we're a top-level window + if (x != wxDefaultCoord) { + GetParent()->ClientToScreen(&x, NULL); + } + if (y != wxDefaultCoord) { + GetParent()->ClientToScreen(NULL, &y); + } + wxFrame::DoSetSize(x, y, width, height, sizeFlags); + } + + virtual bool Show(bool show = true) + { + bool rv = wxFrame::Show(show); + if (rv && show) + ActivateParent(); +#ifdef __WXMAC__ + GetParent()->Refresh(false); #endif + return rv; + } + void OnActivate(wxListEvent& WXUNUSED(event)) + { + doubleClickAction(doubleClickActionData); + } -ListBox::ListBox() { + wxListView* GetLB() { return lv; } + +private: + DECLARE_EVENT_TABLE() +}; + + +BEGIN_EVENT_TABLE(wxSTCListBoxWin, wxWindow) + EVT_SET_FOCUS ( wxSTCListBoxWin::OnFocus) + EVT_SIZE ( wxSTCListBoxWin::OnSize) + EVT_LIST_ITEM_ACTIVATED(wxID_ANY, wxSTCListBoxWin::OnActivate) +END_EVENT_TABLE() + +#endif // wxUSE_POPUPWIN ----------------------------------- + + +inline wxSTCListBoxWin* GETLBW(WindowID win) { + return ((wxSTCListBoxWin*)win); } -ListBox::~ListBox() { +inline wxListView* GETLB(WindowID win) { + return GETLBW(win)->GetLB(); } -void ListBox::Create(Window &parent, int ctrlID) { - id = new wxSTCListBox(parent.id, ctrlID); -// id = new wxListBox(parent.id, ctrlID, wxDefaultPosition, wxDefaultSize, -// 0, NULL, wxLB_SINGLE | wxLB_SORT | wxSIMPLE_BORDER); +//---------------------------------------------------------------------- + +class ListBoxImpl : public ListBox { +private: + int lineHeight; + bool unicodeMode; + int desiredVisibleRows; + int aveCharWidth; + size_t maxStrWidth; + Point location; // Caret location at which the list is opened + wxImageList* imgList; + wxArrayInt* imgTypeMap; + +public: + ListBoxImpl(); + ~ListBoxImpl(); + static ListBox *Allocate(); + + virtual void SetFont(Font &font); + virtual void Create(Window &parent, int ctrlID, Point location_, int lineHeight_, bool unicodeMode_, int technology_); + virtual void SetAverageCharWidth(int width); + virtual void SetVisibleRows(int rows); + virtual int GetVisibleRows() const; + virtual PRectangle GetDesiredRect(); + virtual int CaretFromEdge(); + virtual void Clear(); + virtual void Append(char *s, int type = -1); + void Append(const wxString& text, int type); + virtual int Length(); + virtual void Select(int n); + virtual int GetSelection(); + virtual int Find(const char *prefix); + virtual void GetValue(int n, char *value, int len); + virtual void RegisterImage(int type, const char *xpm_data); + void RegisterImageHelper(int type, wxBitmap& bmp); + virtual void RegisterRGBAImage(int type, int width, int height, const unsigned char *pixelsImage); + virtual void ClearRegisteredImages(); + virtual void SetDoubleClickAction(CallBackAction, void *); + virtual void SetList(const char* list, char separator, char typesep); +}; + + +ListBoxImpl::ListBoxImpl() + : lineHeight(10), unicodeMode(false), + desiredVisibleRows(5), aveCharWidth(8), maxStrWidth(0), + imgList(NULL), imgTypeMap(NULL) +{ } -PRectangle ListBox::GetDesiredRect() { - wxSize sz = ((wxListBox*)id)->GetBestSize(); - PRectangle rc; - rc.top = 0; - rc.left = 0; - if (sz.x > 150) // TODO: A better way to determine these max sizes - sz.x = 150; - if (sz.y > 100) - sz.y = 100; - rc.right = sz.x; - rc.bottom = sz.y; +ListBoxImpl::~ListBoxImpl() { + wxDELETE(imgList); + wxDELETE(imgTypeMap); +} - return rc; + +void ListBoxImpl::SetFont(Font &font) { + GETLB(wid)->SetFont(*((wxFont*)font.GetID())); +} + + +void ListBoxImpl::Create(Window &parent, int ctrlID, Point location_, int lineHeight_, bool unicodeMode_, int WXUNUSED(technology_)) { + location = location_; + lineHeight = lineHeight_; + unicodeMode = unicodeMode_; + maxStrWidth = 0; + wid = new wxSTCListBoxWin(GETWIN(parent.GetID()), ctrlID, location); + if (imgList != NULL) + GETLB(wid)->SetImageList(imgList, wxIMAGE_LIST_SMALL); } -void ListBox::SetAverageCharWidth(int width) { + +void ListBoxImpl::SetAverageCharWidth(int width) { aveCharWidth = width; } -void ListBox::SetFont(Font &font) { - Window::SetFont(font); + +void ListBoxImpl::SetVisibleRows(int rows) { + desiredVisibleRows = rows; } -void ListBox::Clear() { - ((wxListBox*)id)->Clear(); + +int ListBoxImpl::GetVisibleRows() const { + return desiredVisibleRows; } -void ListBox::Append(char *s) { - ((wxListBox*)id)->Append(s); +PRectangle ListBoxImpl::GetDesiredRect() { + // wxListCtrl doesn't have a DoGetBestSize, so instead we kept track of + // the max size in Append and calculate it here... + int maxw = maxStrWidth * aveCharWidth; + int maxh ; + + // give it a default if there are no lines, and/or add a bit more + if (maxw == 0) maxw = 100; + maxw += aveCharWidth * 3 + + GETLBW(wid)->IconWidth() + wxSystemSettings::GetMetric(wxSYS_VSCROLL_X); + if (maxw > 350) + maxw = 350; + + // estimate a desired height + int count = GETLB(wid)->GetItemCount(); + if (count) { + wxRect rect; + GETLB(wid)->GetItemRect(0, rect); + maxh = count * rect.GetHeight(); + if (maxh > 140) // TODO: Use desiredVisibleRows?? + maxh = 140; + + // Try to make the size an exact multiple of some number of lines + int lines = maxh / rect.GetHeight(); + maxh = (lines + 1) * rect.GetHeight() + 2; + } + else + maxh = 100; + + PRectangle rc; + rc.top = 0; + rc.left = 0; + rc.right = maxw; + rc.bottom = maxh; + return rc; } -int ListBox::Length() { - return ((wxListBox*)id)->GetCount(); + +int ListBoxImpl::CaretFromEdge() { + return 4 + GETLBW(wid)->IconWidth(); } -void ListBox::Select(int n) { - ((wxListBox*)id)->SetSelection(n); -#ifdef __WXGTK__ - if (n > 4) - n = n - 4; - else - n = 1; - ((wxListBox*)id)->SetFirstItem(n); -#endif + +void ListBoxImpl::Clear() { + GETLB(wid)->DeleteAllItems(); } -int ListBox::GetSelection() { - return ((wxListBox*)id)->GetSelection(); + +void ListBoxImpl::Append(char *s, int type) { + Append(stc2wx(s), type); } -int ListBox::Find(const char *prefix) { - if (prefix) { - for (int x=0; x < ((wxListBox*)id)->GetCount(); x++) { - wxString text = ((wxListBox*)id)->GetString(x); - if (text.StartsWith(prefix)) - return x; +void ListBoxImpl::Append(const wxString& text, int type) { + long count = GETLB(wid)->GetItemCount(); + long itemID = GETLB(wid)->InsertItem(count, wxEmptyString); + long idx = -1; + GETLB(wid)->SetItem(itemID, 1, text); + maxStrWidth = wxMax(maxStrWidth, text.length()); + if (type != -1) { + wxCHECK_RET(imgTypeMap, wxT("Unexpected NULL imgTypeMap")); + idx = imgTypeMap->Item(type); + } + GETLB(wid)->SetItemImage(itemID, idx, idx); +} + +void ListBoxImpl::SetList(const char* list, char separator, char typesep) { + GETLB(wid)->Freeze(); + Clear(); + wxStringTokenizer tkzr(stc2wx(list), (wxChar)separator); + while ( tkzr.HasMoreTokens() ) { + wxString token = tkzr.GetNextToken(); + long type = -1; + int pos = token.Find(typesep); + if (pos != -1) { + token.Mid(pos+1).ToLong(&type); + token.Truncate(pos); } + Append(token, (int)type); } - return -1; + GETLB(wid)->Thaw(); } -void ListBox::GetValue(int n, char *value, int len) { - wxString text = ((wxListBox*)id)->GetString(n); - strncpy(value, text.c_str(), len); + +int ListBoxImpl::Length() { + return GETLB(wid)->GetItemCount(); +} + + +void ListBoxImpl::Select(int n) { + bool select = true; + if (n == -1) { + n = 0; + select = false; + } + GETLB(wid)->EnsureVisible(n); + GETLB(wid)->Select(n, select); +} + + +int ListBoxImpl::GetSelection() { + return GETLB(wid)->GetFirstSelected(); +} + + +int ListBoxImpl::Find(const char *WXUNUSED(prefix)) { + // No longer used + return wxNOT_FOUND; +} + + +void ListBoxImpl::GetValue(int n, char *value, int len) { + wxListItem item; + item.SetId(n); + item.SetColumn(1); + item.SetMask(wxLIST_MASK_TEXT); + GETLB(wid)->GetItem(item); + strncpy(value, wx2stc(item.GetText()), len); value[len-1] = '\0'; } -void ListBox::Sort() { - // wxWindows keeps sorted so no need to sort +void ListBoxImpl::RegisterImageHelper(int type, wxBitmap& bmp) +{ + if (! imgList) { + // assumes all images are the same size + imgList = new wxImageList(bmp.GetWidth(), bmp.GetHeight(), true); + imgTypeMap = new wxArrayInt; + } + + int idx = imgList->Add(bmp); + + // do we need to extend the mapping array? + wxArrayInt& itm = *imgTypeMap; + if ( itm.GetCount() < (size_t)type+1) + itm.Add(-1, type - itm.GetCount() + 1); + + // Add an item that maps type to the image index + itm[type] = idx; +} + +void ListBoxImpl::RegisterImage(int type, const char *xpm_data) { + wxMemoryInputStream stream(xpm_data, strlen(xpm_data)+1); + wxImage img(stream, wxBITMAP_TYPE_XPM); + wxBitmap bmp(img); + RegisterImageHelper(type, bmp); +} + + +void ListBoxImpl::RegisterRGBAImage(int type, int width, int height, + const unsigned char *pixelsImage) +{ +#ifdef wxHAS_RAW_BITMAP + wxBitmap bmp = BitmapFromRGBAImage(width, height, pixelsImage); + RegisterImageHelper(type, bmp); +#endif } -Menu::Menu() : id(0) { +void ListBoxImpl::ClearRegisteredImages() { + wxDELETE(imgList); + wxDELETE(imgTypeMap); + if (wid) + GETLB(wid)->SetImageList(NULL, wxIMAGE_LIST_SMALL); +} + + +void ListBoxImpl::SetDoubleClickAction(CallBackAction action, void *data) { + GETLBW(wid)->SetDoubleClickAction(action, data); +} + + +ListBox::ListBox() { +} + +ListBox::~ListBox() { +} + +ListBox *ListBox::Allocate() { + return new ListBoxImpl(); +} + +//---------------------------------------------------------------------- + +Menu::Menu() : mid(0) { } void Menu::CreatePopUp() { Destroy(); - id = new wxMenu(); + mid = new wxMenu(); } void Menu::Destroy() { - if (id) - delete id; - id = 0; + if (mid) + delete (wxMenu*)mid; + mid = 0; } void Menu::Show(Point pt, Window &w) { - w.GetID()->PopupMenu(id, pt.x - 4, pt.y); + GETWIN(w.GetID())->PopupMenu((wxMenu*)mid, pt.x - 4, pt.y); Destroy(); } +//---------------------------------------------------------------------- + +DynamicLibrary *DynamicLibrary::Load(const char *WXUNUSED(modulePath)) { + wxFAIL_MSG(wxT("Dynamic lexer loading not implemented yet")); + return NULL; +} + +//---------------------------------------------------------------------- -Colour Platform::Chrome() { +ColourDesired Platform::Chrome() { wxColour c; - c = wxSystemSettings::GetSystemColour(wxSYS_COLOUR_3DFACE); - return Colour(c.Red(), c.Green(), c.Blue()); + c = wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE); + return ColourDesired(c.Red(), c.Green(), c.Blue()); } -Colour Platform::ChromeHighlight() { +ColourDesired Platform::ChromeHighlight() { wxColour c; - c = wxSystemSettings::GetSystemColour(wxSYS_COLOUR_3DHIGHLIGHT); - return Colour(c.Red(), c.Green(), c.Blue()); + c = wxSystemSettings::GetColour(wxSYS_COLOUR_3DHIGHLIGHT); + return ColourDesired(c.Red(), c.Green(), c.Blue()); } const char *Platform::DefaultFont() { - return wxNORMAL_FONT->GetFaceName(); + static char buf[128]; + strcpy(buf, wxNORMAL_FONT->GetFaceName().mbc_str()); + return buf; } int Platform::DefaultFontSize() { - return 8; + return wxNORMAL_FONT->GetPointSize(); } unsigned int Platform::DoubleClickTime() { return 500; // **** ::GetDoubleClickTime(); } -void Platform::DebugDisplay(const char *s) { - wxLogDebug(s); +bool Platform::MouseButtonBounce() { + return false; } -bool Platform::IsKeyDown(int key) { +bool Platform::IsKeyDown(int WXUNUSED(key)) { return false; // I don't think we'll need this. } @@ -667,6 +1438,15 @@ long Platform::SendScintilla(WindowID w, return stc->SendMsg(msg, wParam, lParam); } +long Platform::SendScintillaPointer(WindowID w, + unsigned int msg, + unsigned long wParam, + void *lParam) { + + wxStyledTextCtrl* stc = (wxStyledTextCtrl*)w; + return stc->SendMsg(msg, wParam, (wxIntPtr)lParam); +} + // These are utility functions not really tied to a platform @@ -684,7 +1464,15 @@ int Platform::Maximum(int a, int b) { return b; } -#define TRACE +//#define TRACE + +void Platform::DebugDisplay(const char *s) { +#ifdef TRACE + wxLogDebug(stc2wx(s)); +#else + wxUnusedVar(s); +#endif +} void Platform::DebugPrintf(const char *format, ...) { #ifdef TRACE @@ -694,9 +1482,42 @@ void Platform::DebugPrintf(const char *format, ...) { vsprintf(buffer,format,pArguments); va_end(pArguments); Platform::DebugDisplay(buffer); +#else + wxUnusedVar(format); #endif } + +static bool assertionPopUps = true; + +bool Platform::ShowAssertionPopUps(bool assertionPopUps_) { + bool ret = assertionPopUps; + assertionPopUps = assertionPopUps_; + return ret; +} + +void Platform::Assert(const char *c, const char *file, int line) { +#ifdef TRACE + char buffer[2000]; + sprintf(buffer, "Assertion [%s] failed at %s %d", c, file, line); + if (assertionPopUps) { + /*int idButton = */ + wxMessageBox(stc2wx(buffer), + wxT("Assertion failure"), + wxICON_HAND | wxOK); + } else { + strcat(buffer, "\r\n"); + Platform::DebugDisplay(buffer); + abort(); + } +#else + wxUnusedVar(c); + wxUnusedVar(file); + wxUnusedVar(line); +#endif +} + + int Platform::Clamp(int val, int minVal, int maxVal) { if (val > maxVal) val = maxVal; @@ -706,7 +1527,84 @@ int Platform::Clamp(int val, int minVal, int maxVal) { } +bool Platform::IsDBCSLeadByte(int WXUNUSED(codePage), char WXUNUSED(ch)) { + return false; +} + +int Platform::DBCSCharLength(int WXUNUSED(codePage), const char *WXUNUSED(s)) { + return 1; +} + +int Platform::DBCSCharMaxLength() { + return 1; +} + +//---------------------------------------------------------------------- +ElapsedTime::ElapsedTime() { + wxLongLong localTime = wxGetLocalTimeMillis(); + littleBit = localTime.GetLo(); + bigBit = localTime.GetHi(); +} +double ElapsedTime::Duration(bool reset) { + wxLongLong prevTime(bigBit, littleBit); + wxLongLong localTime = wxGetLocalTimeMillis(); + if(reset) { + littleBit = localTime.GetLo(); + bigBit = localTime.GetHi(); + } + wxLongLong duration = localTime - prevTime; + double result = duration.ToDouble(); + result /= 1000.0; + return result; +} + + +//---------------------------------------------------------------------- + +#if wxUSE_UNICODE + +#include "UniConversion.h" + +// Convert using Scintilla's functions instead of wx's, Scintilla's are more +// forgiving and won't assert... + +wxString stc2wx(const char* str, size_t len) +{ + if (!len) + return wxEmptyString; + + size_t wclen = UTF16Length(str, len); + wxWCharBuffer buffer(wclen+1); + + size_t actualLen = UTF16FromUTF8(str, len, buffer.data(), wclen+1); + return wxString(buffer.data(), actualLen); +} + + + +wxString stc2wx(const char* str) +{ + return stc2wx(str, strlen(str)); +} + + +wxWX2MBbuf wx2stc(const wxString& str) +{ + const wchar_t* wcstr = str.c_str(); + size_t wclen = str.length(); + size_t len = UTF8Length(wcstr, wclen); + + wxCharBuffer buffer(len+1); + UTF8FromUTF16(wcstr, wclen, buffer.data(), len); + + // TODO check NULL termination!! + + return buffer; +} + +#endif +#endif // wxUSE_STC