[wxWidgets.git] / src / stc / PlatWX.cpp

// Scintilla source code edit control
// PlatWX.cxx - implementation of platform facilities on wxWindows
// Copyright 1998-1999 by Neil Hodgson <neilh@scintilla.org>
//                        Robin Dunn <robin@aldunn.com>
// The License.txt file describes the conditions under which this software may be distributed.

#include <ctype.h>

#include "Platform.h"
#include "wx/stc/stc.h"


#ifdef __WXGTK__
#include <gtk/gtk.h>
#endif

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;
}

PRectangle PRectangleFromwxRect(wxRect rc) {
    return PRectangle(rc.GetLeft(), rc.GetTop(), rc.GetRight(), rc.GetBottom());
}

Colour::Colour(long lcol) {
    co.Set(lcol & 0xff, (lcol >> 8) & 0xff, (lcol >> 16) & 0xff);
}

Colour::Colour(unsigned int red, unsigned int green, unsigned int blue) {
    co.Set(red, green, blue);
}

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()));
}

unsigned int Colour::GetRed() {
    return co.Red();
}

unsigned int Colour::GetGreen() {
    return co.Green();
}

unsigned int Colour::GetBlue() {
    return co.Blue();
}

Palette::Palette() {
    used = 0;
    allowRealization = false;
}

Palette::~Palette() {
    Release();
}

void Palette::Release() {
    used = 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;
    }
}

void Palette::Allocate(Window &) {
    if (allowRealization) {
    }
}


Font::Font() {
    id = 0;
    ascent = 0;
}

Font::~Font() {
}

void Font::Create(const char *faceName, int characterSet, int size, bool bold, bool italic) {
    // TODO:  what to do about the characterSet?

    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;
}


Surface::Surface() :
    hdc(0), hdcOwned(0), bitmap(0),
    x(0), y(0) {
}

Surface::~Surface() {
    Release();
}

void Surface::Release() {
    if (bitmap) {
        ((wxMemoryDC*)hdc)->SelectObject(wxNullBitmap);
        delete bitmap;
        bitmap = 0;
    }
    if (hdcOwned) {
        delete hdc;
        hdc = 0;
        hdcOwned = false;
    }
}


bool Surface::Initialised() {
    return hdc != 0;
}

void Surface::Init() {
    Release();
    hdc = new wxMemoryDC();
    hdcOwned = true;
}

void Surface::Init(SurfaceID hdc_) {
    Release();
    hdc = hdc_;
}

void Surface::InitPixMap(int width, int height, Surface *surface_) {
    Release();
    hdc = new wxMemoryDC(surface_->hdc);
    hdcOwned = true;
    if (width < 1) width = 1;
    if (height < 1) height = 1;
    bitmap = new wxBitmap(width, height);
    ((wxMemoryDC*)hdc)->SelectObject(*bitmap);
}

void Surface::PenColour(Colour fore) {
    hdc->SetPen(wxPen(fore.co, 1, wxSOLID));
}

void Surface::BrushColor(Colour back) {
    hdc->SetBrush(wxBrush(back.co, wxSOLID));
}

void Surface::SetFont(Font &font_) {
  if (font_.GetID()) {
      hdc->SetFont(*font_.GetID());
    }
}

int Surface::LogPixelsY() {
    return hdc->GetPPI().y;
}


int Surface::DeviceHeightFont(int points) {
    return points;
}


void Surface::MoveTo(int x_, int y_) {
    x = x_;
    y = y_;
}

void Surface::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) {
    PenColour(fore);
    BrushColor(back);
    hdc->DrawPolygon(npts, (wxPoint*)pts);
}

void Surface::RectangleDraw(PRectangle rc, Colour fore, Colour back) {
    PenColour(fore);
    BrushColor(back);
    hdc->DrawRectangle(wxRectFromPRectangle(rc));
}

void Surface::FillRectangle(PRectangle rc, Colour back) {
    BrushColor(back);
    hdc->SetPen(*wxTRANSPARENT_PEN);
    hdc->DrawRectangle(wxRectFromPRectangle(rc));
}

void Surface::FillRectangle(PRectangle rc, Surface &surfacePattern) {
    wxBrush br;
    if (surfacePattern.bitmap)
        br = wxBrush(*surfacePattern.bitmap);
    else    // Something is wrong so display in red
        br = wxBrush(*wxRED, wxSOLID);
    hdc->SetPen(*wxTRANSPARENT_PEN);
    hdc->SetBrush(br);
    hdc->DrawRectangle(wxRectFromPRectangle(rc));
}

void Surface::RoundedRectangle(PRectangle rc, Colour fore, Colour back) {
    PenColour(fore);
    BrushColor(back);
    hdc->DrawRoundedRectangle(wxRectFromPRectangle(rc), 4);
}

void Surface::Ellipse(PRectangle rc, Colour fore, Colour back) {
    PenColour(fore);
    BrushColor(back);
    hdc->DrawEllipse(wxRectFromPRectangle(rc));
}

void Surface::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);
}

void Surface::DrawText(PRectangle rc, Font &font, int ybase,
                       const char *s, int len, Colour fore, Colour back) {
    SetFont(font);
    hdc->SetTextForeground(fore.co);
    hdc->SetTextBackground(back.co);
    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);
}

void Surface::DrawTextClipped(PRectangle rc, Font &font, int ybase, const char *s, int len, Colour fore, Colour back) {
    SetFont(font);
    hdc->SetTextForeground(fore.co);
    hdc->SetTextBackground(back.co);
    FillRectangle(rc, back);
    hdc->SetClippingRegion(wxRectFromPRectangle(rc));

    // see comments above
    hdc->DrawText(wxString(s, len), rc.left, ybase - font.ascent);
    hdc->DestroyClippingRegion();
}

int Surface::WidthText(Font &font, const char *s, int len) {
    SetFont(font);
    int w;
    int h;
    hdc->GetTextExtent(wxString(s, len), &w, &h);
    return w;
}

void Surface::MeasureWidths(Font &font, const char *s, int len, int *positions) {
    SetFont(font);
    int totalWidth = 0;
    for (int i=0; i<len; i++) {
        int w;
        int h;
        hdc->GetTextExtent(s[i], &w, &h);
        totalWidth += w;
        positions[i] = totalWidth;
    }
}

int Surface::WidthChar(Font &font, char ch) {
    SetFont(font);
    int w;
    int h;
    hdc->GetTextExtent(ch, &w, &h);
    return w;
}

#define EXTENT_TEST " `~!@#$%^&*()-_=+\\|[]{};:\"\'<,>.?/1234567890abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"

int Surface::Ascent(Font &font) {
    SetFont(font);
    int w, h, d, e;
    hdc->GetTextExtent(EXTENT_TEST, &w, &h, &d, &e);
    font.ascent = h - d;
    return font.ascent;
}

int Surface::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) {
    return 0;
}

int Surface::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) {
    SetFont(font);
    return hdc->GetCharHeight();
}

int Surface::AverageCharWidth(Font &font) {
    SetFont(font);
    return hdc->GetCharWidth();
}

int Surface::SetPalette(Palette *pal, bool inBackGround) {
    return 0;
}

void Surface::SetClip(PRectangle rc) {
    hdc->SetClippingRegion(wxRectFromPRectangle(rc));
}

void Surface::FlushCachedState() {
}

Window::~Window() {
}

void Window::Destroy() {
    if (id)
        id->Destroy();
    id = 0;
}

bool Window::HasFocus() {
    return wxWindow::FindFocus() == id;
}

PRectangle Window::GetPosition() {
    wxRect rc(id->GetPosition(), id->GetSize());
    return PRectangleFromwxRect(rc);
}

void Window::SetPosition(PRectangle rc) {
    wxRect r = wxRectFromPRectangle(rc);
    id->SetSize(r);
}

void Window::SetPositionRelative(PRectangle rc, Window) {
    SetPosition(rc);  // ????
}

PRectangle Window::GetClientPosition() {
    wxSize sz = id->GetClientSize();
    return  PRectangle(0, 0, sz.x, sz.y);
}

void Window::Show(bool show) {
    id->Show(show);
}

void Window::InvalidateAll() {
    id->Refresh(false);
}

void Window::InvalidateRectangle(PRectangle rc) {
    wxRect r = wxRectFromPRectangle(rc);
    id->Refresh(false, &r);
}

void Window::SetFont(Font &font) {
    id->SetFont(*font.GetID());
}

void Window::SetCursor(Cursor curs) {
    int cursorId;

    switch (curs) {
    case cursorText:
        cursorId = wxCURSOR_IBEAM;
        break;
    case cursorArrow:
        cursorId = wxCURSOR_ARROW;
        break;
    case cursorUp:
        cursorId = wxCURSOR_ARROW; // ** no up arrow...  wxCURSOR_UPARROW;
        break;
    case cursorWait:
        cursorId = wxCURSOR_WAIT;
        break;
    case cursorHoriz:
        cursorId = wxCURSOR_SIZEWE;
        break;
    case cursorVert:
        cursorId = wxCURSOR_SIZENS;
        break;
    case cursorReverseArrow:
        cursorId = wxCURSOR_POINT_RIGHT;
        break;
    default:
        cursorId = wxCURSOR_ARROW;
        break;
    }

    id->SetCursor(wxCursor(cursorId));
}


void Window::SetTitle(const char *s) {
    id->SetTitle(s);
}


class wxSTCListBox : public wxListBox {
public:
    wxSTCListBox(wxWindow* parent, wxWindowID id)
        : wxListBox(parent, id, wxDefaultPosition, wxDefaultSize,
                    0, NULL, wxLB_SINGLE | wxLB_SORT | wxSIMPLE_BORDER)
        {}

    void OnFocus(wxFocusEvent& event) {
        GetParent()->SetFocus();
        event.Skip();
    }

#ifdef __WXGTK__
    void DoSetFirstItem(int n);
#endif

private:
    DECLARE_EVENT_TABLE()
};

BEGIN_EVENT_TABLE(wxSTCListBox, wxListBox)
    EVT_SET_FOCUS(wxSTCListBox::OnFocus)
END_EVENT_TABLE()


#ifdef __WXGTK__
    // This can be removed after 2.2.2 I think
void wxSTCListBox::DoSetFirstItem( int n )
{
    wxCHECK_RET( m_list, wxT("invalid listbox") );

    if (gdk_pointer_is_grabbed () && GTK_WIDGET_HAS_GRAB (m_list))
        return;

    // 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") );

    GList *target = g_list_nth( m_list->children, n );
    wxCHECK_RET( target, wxT("invalid listbox index") );

    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++ )
    {
        target = target->prev;
        if ( !target )
        {
            // nothing we can do if there are no allocated items yet
            return;
        }

        item = GTK_WIDGET(target->data);
    }

    gtk_adjustment_set_value(adjustment,
                             item->allocation.y +
                                nItemsBefore*item->allocation.height);
}
#endif


ListBox::ListBox() {
}

ListBox::~ListBox() {
}

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);
}

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;

    return rc;
}

void ListBox::SetAverageCharWidth(int width) {
    aveCharWidth = width;
}

void ListBox::SetFont(Font &font) {
    Window::SetFont(font);
}

void ListBox::Clear() {
    ((wxListBox*)id)->Clear();
}

void ListBox::Append(char *s) {
    ((wxListBox*)id)->Append(s);
}

int ListBox::Length() {
    return ((wxListBox*)id)->GetCount();
}

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
}

int ListBox::GetSelection() {
    return ((wxListBox*)id)->GetSelection();
}

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;
        }
    }
    return -1;
}

void ListBox::GetValue(int n, char *value, int len) {
    wxString text = ((wxListBox*)id)->GetString(n);
    strncpy(value, text.c_str(), len);
    value[len-1] = '\0';
}

void ListBox::Sort() {
    // wxWindows keeps sorted so no need to sort
}


Menu::Menu() : id(0) {
}

void Menu::CreatePopUp() {
    Destroy();
    id = new wxMenu();
}

void Menu::Destroy() {
    if (id)
        delete id;
    id = 0;
}

void Menu::Show(Point pt, Window &w) {
    w.GetID()->PopupMenu(id, pt.x - 4, pt.y);
    Destroy();
}


Colour Platform::Chrome() {
    wxColour c;
    c = wxSystemSettings::GetSystemColour(wxSYS_COLOUR_3DFACE);
    return Colour(c.Red(), c.Green(), c.Blue());
}

Colour Platform::ChromeHighlight() {
    wxColour c;
    c = wxSystemSettings::GetSystemColour(wxSYS_COLOUR_3DHIGHLIGHT);
    return Colour(c.Red(), c.Green(), c.Blue());
}

const char *Platform::DefaultFont() {
    return wxNORMAL_FONT->GetFaceName();
}

int Platform::DefaultFontSize() {
    return 8;
}

unsigned int Platform::DoubleClickTime() {
    return 500;   // **** ::GetDoubleClickTime();
}

void Platform::DebugDisplay(const char *s) {
    wxLogDebug(s);
}

bool Platform::IsKeyDown(int key) {
    return false;  // I don't think we'll need this.
}

long Platform::SendScintilla(WindowID w,
                             unsigned int msg,
                             unsigned long wParam,
                             long lParam) {

    wxStyledTextCtrl* stc = (wxStyledTextCtrl*)w;
    return stc->SendMsg(msg, wParam, lParam);
}


// These are utility functions not really tied to a platform

int Platform::Minimum(int a, int b) {
    if (a < b)
        return a;
    else
        return b;
}

int Platform::Maximum(int a, int b) {
    if (a > b)
        return a;
    else
        return b;
}

#define TRACE

void Platform::DebugPrintf(const char *format, ...) {
#ifdef TRACE
    char buffer[2000];
    va_list pArguments;
    va_start(pArguments, format);
    vsprintf(buffer,format,pArguments);
    va_end(pArguments);
    Platform::DebugDisplay(buffer);
#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) {
	char buffer[2000];
	sprintf(buffer, "Assertion [%s] failed at %s %d", c, file, line);
	if (assertionPopUps) {
		int idButton = wxMessageBox(buffer, "Assertion failure",
                                            wxICON_HAND | wxOK);
//  		if (idButton == IDRETRY) {
//  			::DebugBreak();
//  		} else if (idButton == IDIGNORE) {
//  			// all OK
//  		} else {
//  			abort();
//  		}
	} else {
		strcat(buffer, "\r\n");
		Platform::DebugDisplay(buffer);
		abort();
	}
}


int Platform::Clamp(int val, int minVal, int maxVal) {
    if (val > maxVal)
        val = maxVal;
    if (val < minVal)
        val = minVal;
    return val;
}
Commit	Line	Data
9ce192d4 RD	1	// Scintilla source code edit control
	2	// PlatWX.cxx - implementation of platform facilities on wxWindows
	3	// Copyright 1998-1999 by Neil Hodgson <neilh@scintilla.org>
	4	// Robin Dunn <robin@aldunn.com>
	5	// The License.txt file describes the conditions under which this software may be distributed.
	6
f6bcfd97	7	#include <ctype.h>
9ce192d4 RD	8
	9	#include "Platform.h"
	10	#include "wx/stc/stc.h"
	11
f97d84a6 RD	12
	13	#ifdef __WXGTK__
	14	#include <gtk/gtk.h>
	15	#endif
	16
9ce192d4	17	Point Point::FromLong(long lpoint) {
f6bcfd97	18	return Point(lpoint & 0xFFFF, lpoint >> 16);
9ce192d4 RD	19	}
	20
	21	wxRect wxRectFromPRectangle(PRectangle prc) {
	22	wxRect rc(prc.left, prc.top,
21156596	23	prc.right-prc.left, prc.bottom-prc.top);
9ce192d4 RD	24	return rc;
	25	}
	26
	27	PRectangle PRectangleFromwxRect(wxRect rc) {
	28	return PRectangle(rc.GetLeft(), rc.GetTop(), rc.GetRight(), rc.GetBottom());
	29	}
	30
	31	Colour::Colour(long lcol) {
	32	co.Set(lcol & 0xff, (lcol >> 8) & 0xff, (lcol >> 16) & 0xff);
	33	}
	34
	35	Colour::Colour(unsigned int red, unsigned int green, unsigned int blue) {
	36	co.Set(red, green, blue);
	37	}
	38
	39	bool Colour::operator==(const Colour &other) const {
	40	return co == other.co;
	41	}
	42
	43	long Colour::AsLong() const {
	44	return (((long)co.Blue() << 16) \|
	45	((long)co.Green() << 8) \|
	46	((long)co.Red()));
	47	}
	48
	49	unsigned int Colour::GetRed() {
	50	return co.Red();
	51	}
	52
	53	unsigned int Colour::GetGreen() {
	54	return co.Green();
	55	}
	56
	57	unsigned int Colour::GetBlue() {
	58	return co.Blue();
	59	}
	60
	61	Palette::Palette() {
	62	used = 0;
	63	allowRealization = false;
	64	}
	65
	66	Palette::~Palette() {
	67	Release();
	68	}
	69
	70	void Palette::Release() {
	71	used = 0;
	72	}
	73
	74	// This method either adds a colour to the list of wanted colours (want==true)
	75	// or retrieves the allocated colour back to the ColourPair.
	76	// This is one method to make it easier to keep the code for wanting and retrieving in sync.
	77	void Palette::WantFind(ColourPair &cp, bool want) {
	78	if (want) {
	79	for (int i=0; i < used; i++) {
	80	if (entries[i].desired == cp.desired)
	81	return;
	82	}
	83
	84	if (used < numEntries) {
	85	entries[used].desired = cp.desired;
	86	entries[used].allocated = cp.desired;
	87	used++;
88	}
89	} else {
90	for (int i=0; i < used; i++) {
91	if (entries[i].desired == cp.desired) {
92	cp.allocated = entries[i].allocated;
93	return;
94	}
95	}
96	cp.allocated = cp.desired;
97	}
98	}
99
100	void Palette::Allocate(Window &) {
101	if (allowRealization) {
102	}
103	}
104
105
106	Font::Font() {
107	id = 0;
108	ascent = 0;
109	}
110
111	Font::~Font() {
112	}
113
f6bcfd97	114	void Font::Create(const char *faceName, int characterSet, int size, bool bold, bool italic) {
65ec6247 RD	115	// TODO: what to do about the characterSet?
65ec6247 RD	116
9ce192d4 RD	117	Release();
	118	id = new wxFont(size,
	119	wxDEFAULT,
	120	italic ? wxITALIC : wxNORMAL,
	121	bold ? wxBOLD : wxNORMAL,
	122	false,
f6bcfd97 BP	123	faceName,
f6bcfd97 BP	124	wxFONTENCODING_DEFAULT);
9ce192d4 RD	125	}
	126
	127
	128	void Font::Release() {
	129	if (id)
	130	delete id;
	131	id = 0;
	132	}
	133
	134
	135	Surface::Surface() :
	136	hdc(0), hdcOwned(0), bitmap(0),
	137	x(0), y(0) {
	138	}
	139
	140	Surface::~Surface() {
	141	Release();
	142	}
	143
	144	void Surface::Release() {
	145	if (bitmap) {
	146	((wxMemoryDC*)hdc)->SelectObject(wxNullBitmap);
	147	delete bitmap;
	148	bitmap = 0;
	149	}
	150	if (hdcOwned) {
	151	delete hdc;
	152	hdc = 0;
	153	hdcOwned = false;
	154	}
	155	}
	156
	157
	158	bool Surface::Initialised() {
	159	return hdc != 0;
	160	}
	161
	162	void Surface::Init() {
	163	Release();
	164	hdc = new wxMemoryDC();
	165	hdcOwned = true;
9ce192d4 RD	166	}
	167
	168	void Surface::Init(SurfaceID hdc_) {
	169	Release();
	170	hdc = hdc_;
9ce192d4 RD	171	}
	172
	173	void Surface::InitPixMap(int width, int height, Surface *surface_) {
	174	Release();
	175	hdc = new wxMemoryDC(surface_->hdc);
	176	hdcOwned = true;
2beb01db RD	177	if (width < 1) width = 1;
2beb01db RD	178	if (height < 1) height = 1;
21156596	179	bitmap = new wxBitmap(width, height);
9ce192d4	180	((wxMemoryDC)hdc)->SelectObject(bitmap);
9ce192d4 RD	181	}
	182
	183	void Surface::PenColour(Colour fore) {
	184	hdc->SetPen(wxPen(fore.co, 1, wxSOLID));
	185	}
	186
	187	void Surface::BrushColor(Colour back) {
	188	hdc->SetBrush(wxBrush(back.co, wxSOLID));
	189	}
	190
	191	void Surface::SetFont(Font &font_) {
21156596	192	if (font_.GetID()) {
f6bcfd97 BP	193	hdc->SetFont(*font_.GetID());
f6bcfd97 BP	194	}
9ce192d4 RD	195	}
	196
	197	int Surface::LogPixelsY() {
	198	return hdc->GetPPI().y;
	199	}
	200
f6bcfd97 BP	201
f6bcfd97 BP	202	int Surface::DeviceHeightFont(int points) {
9968ba85	203	return points;
f6bcfd97 BP	204	}
	205
	206
9ce192d4 RD	207	void Surface::MoveTo(int x_, int y_) {
	208	x = x_;
	209	y = y_;
	210	}
	211
	212	void Surface::LineTo(int x_, int y_) {
	213	hdc->DrawLine(x,y, x_,y_);
	214	x = x_;
	215	y = y_;
	216	}
	217
	218	void Surface::Polygon(Point *pts, int npts, Colour fore,
	219	Colour back) {
	220	PenColour(fore);
	221	BrushColor(back);
	222	hdc->DrawPolygon(npts, (wxPoint*)pts);
	223	}
	224
	225	void Surface::RectangleDraw(PRectangle rc, Colour fore, Colour back) {
	226	PenColour(fore);
	227	BrushColor(back);
	228	hdc->DrawRectangle(wxRectFromPRectangle(rc));
	229	}
	230
	231	void Surface::FillRectangle(PRectangle rc, Colour back) {
	232	BrushColor(back);
	233	hdc->SetPen(*wxTRANSPARENT_PEN);
	234	hdc->DrawRectangle(wxRectFromPRectangle(rc));
	235	}
	236
	237	void Surface::FillRectangle(PRectangle rc, Surface &surfacePattern) {
	238	wxBrush br;
	239	if (surfacePattern.bitmap)
	240	br = wxBrush(*surfacePattern.bitmap);
	241	else // Something is wrong so display in red
	242	br = wxBrush(*wxRED, wxSOLID);
	243	hdc->SetPen(*wxTRANSPARENT_PEN);
	244	hdc->SetBrush(br);
	245	hdc->DrawRectangle(wxRectFromPRectangle(rc));
	246	}
	247
	248	void Surface::RoundedRectangle(PRectangle rc, Colour fore, Colour back) {
	249	PenColour(fore);
	250	BrushColor(back);
f6bcfd97	251	hdc->DrawRoundedRectangle(wxRectFromPRectangle(rc), 4);
9ce192d4 RD	252	}
	253
	254	void Surface::Ellipse(PRectangle rc, Colour fore, Colour back) {
	255	PenColour(fore);
	256	BrushColor(back);
	257	hdc->DrawEllipse(wxRectFromPRectangle(rc));
	258	}
	259
	260	void Surface::Copy(PRectangle rc, Point from, Surface &surfaceSource) {
f6bcfd97 BP	261	wxRect r = wxRectFromPRectangle(rc);
f6bcfd97 BP	262	hdc->Blit(r.x, r.y, r.width, r.height,
9ce192d4 RD	263	surfaceSource.hdc, from.x, from.y, wxCOPY);
	264	}
	265
	266	void Surface::DrawText(PRectangle rc, Font &font, int ybase,
	267	const char *s, int len, Colour fore, Colour back) {
	268	SetFont(font);
	269	hdc->SetTextForeground(fore.co);
	270	hdc->SetTextBackground(back.co);
	271	FillRectangle(rc, back);
	272
	273	// ybase is where the baseline should be, but wxWin uses the upper left
	274	// corner, so I need to calculate the real position for the text...
	275	hdc->DrawText(wxString(s, len), rc.left, ybase - font.ascent);
	276	}
	277
	278	void Surface::DrawTextClipped(PRectangle rc, Font &font, int ybase, const char *s, int len, Colour fore, Colour back) {
	279	SetFont(font);
	280	hdc->SetTextForeground(fore.co);
	281	hdc->SetTextBackground(back.co);
	282	FillRectangle(rc, back);
	283	hdc->SetClippingRegion(wxRectFromPRectangle(rc));
	284
	285	// see comments above
	286	hdc->DrawText(wxString(s, len), rc.left, ybase - font.ascent);
	287	hdc->DestroyClippingRegion();
	288	}
	289
	290	int Surface::WidthText(Font &font, const char *s, int len) {
	291	SetFont(font);
	292	int w;
	293	int h;
	294	hdc->GetTextExtent(wxString(s, len), &w, &h);
	295	return w;
	296	}
	297
	298	void Surface::MeasureWidths(Font &font, const char s, int len, int positions) {
	299	SetFont(font);
	300	int totalWidth = 0;
	301	for (int i=0; i<len; i++) {
	302	int w;
	303	int h;
	304	hdc->GetTextExtent(s[i], &w, &h);
	305	totalWidth += w;
	306	positions[i] = totalWidth;
	307	}
	308	}
	309
	310	int Surface::WidthChar(Font &font, char ch) {
	311	SetFont(font);
	312	int w;
	313	int h;
	314	hdc->GetTextExtent(ch, &w, &h);
	315	return w;
	316	}
	317
	318	#define EXTENT_TEST " `~!@#$%^&*()-_=+\\\|[]{};:\"\'<,>.?/1234567890abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"
	319
	320	int Surface::Ascent(Font &font) {
	321	SetFont(font);
	322	int w, h, d, e;
	323	hdc->GetTextExtent(EXTENT_TEST, &w, &h, &d, &e);
	324	font.ascent = h - d;
	325	return font.ascent;
	326	}
327
328	int Surface::Descent(Font &font) {
329	SetFont(font);
330	int w, h, d, e;
331	hdc->GetTextExtent(EXTENT_TEST, &w, &h, &d, &e);
332	return d;
333	}
334
335	int Surface::InternalLeading(Font &font) {
336	return 0;
337	}
338
339	int Surface::ExternalLeading(Font &font) {
340	SetFont(font);
341	int w, h, d, e;
342	hdc->GetTextExtent(EXTENT_TEST, &w, &h, &d, &e);
343	return e;
344	}
345
346	int Surface::Height(Font &font) {
347	SetFont(font);
348	return hdc->GetCharHeight();
349	}
350
351	int Surface::AverageCharWidth(Font &font) {
352	SetFont(font);
353	return hdc->GetCharWidth();
354	}
355
356	int Surface::SetPalette(Palette *pal, bool inBackGround) {
65ec6247	357	return 0;
9ce192d4 RD	358	}
	359
	360	void Surface::SetClip(PRectangle rc) {
	361	hdc->SetClippingRegion(wxRectFromPRectangle(rc));
	362	}
	363
f6bcfd97	364	void Surface::FlushCachedState() {
f6bcfd97	365	}
9ce192d4 RD	366
	367	Window::~Window() {
	368	}
	369
	370	void Window::Destroy() {
	371	if (id)
	372	id->Destroy();
	373	id = 0;
	374	}
	375
	376	bool Window::HasFocus() {
	377	return wxWindow::FindFocus() == id;
	378	}
	379
	380	PRectangle Window::GetPosition() {
	381	wxRect rc(id->GetPosition(), id->GetSize());
	382	return PRectangleFromwxRect(rc);
	383	}
	384
	385	void Window::SetPosition(PRectangle rc) {
f6bcfd97 BP	386	wxRect r = wxRectFromPRectangle(rc);
f6bcfd97 BP	387	id->SetSize(r);
9ce192d4 RD	388	}
	389
	390	void Window::SetPositionRelative(PRectangle rc, Window) {
	391	SetPosition(rc); // ????
	392	}
	393
	394	PRectangle Window::GetClientPosition() {
	395	wxSize sz = id->GetClientSize();
21156596	396	return PRectangle(0, 0, sz.x, sz.y);
9ce192d4 RD	397	}
	398
	399	void Window::Show(bool show) {
	400	id->Show(show);
	401	}
	402
	403	void Window::InvalidateAll() {
	404	id->Refresh(false);
	405	}
	406
	407	void Window::InvalidateRectangle(PRectangle rc) {
f6bcfd97 BP	408	wxRect r = wxRectFromPRectangle(rc);
f6bcfd97 BP	409	id->Refresh(false, &r);
9ce192d4 RD	410	}
	411
	412	void Window::SetFont(Font &font) {
	413	id->SetFont(*font.GetID());
	414	}
	415
	416	void Window::SetCursor(Cursor curs) {
	417	int cursorId;
	418
	419	switch (curs) {
	420	case cursorText:
	421	cursorId = wxCURSOR_IBEAM;
	422	break;
	423	case cursorArrow:
	424	cursorId = wxCURSOR_ARROW;
	425	break;
	426	case cursorUp:
	427	cursorId = wxCURSOR_ARROW; // ** no up arrow... wxCURSOR_UPARROW;
	428	break;
	429	case cursorWait:
	430	cursorId = wxCURSOR_WAIT;
	431	break;
	432	case cursorHoriz:
	433	cursorId = wxCURSOR_SIZEWE;
	434	break;
	435	case cursorVert:
	436	cursorId = wxCURSOR_SIZENS;
	437	break;
	438	case cursorReverseArrow:
	439	cursorId = wxCURSOR_POINT_RIGHT;
	440	break;
	441	default:
	442	cursorId = wxCURSOR_ARROW;
	443	break;
	444	}
	445
	446	id->SetCursor(wxCursor(cursorId));
	447	}
	448
	449
	450	void Window::SetTitle(const char *s) {
	451	id->SetTitle(s);
	452	}
	453
	454
f97d84a6 RD	455	class wxSTCListBox : public wxListBox {
	456	public:
	457	wxSTCListBox(wxWindow* parent, wxWindowID id)
	458	: wxListBox(parent, id, wxDefaultPosition, wxDefaultSize,
	459	0, NULL, wxLB_SINGLE \| wxLB_SORT \| wxSIMPLE_BORDER)
	460	{}
	461
	462	void OnFocus(wxFocusEvent& event) {
	463	GetParent()->SetFocus();
	464	event.Skip();
	465	}
	466
	467	#ifdef __WXGTK__
	468	void DoSetFirstItem(int n);
	469	#endif
	470
	471	private:
	472	DECLARE_EVENT_TABLE()
	473	};
	474
	475	BEGIN_EVENT_TABLE(wxSTCListBox, wxListBox)
	476	EVT_SET_FOCUS(wxSTCListBox::OnFocus)
	477	END_EVENT_TABLE()
	478
	479
	480
	481
	482	#ifdef __WXGTK__
	483	// This can be removed after 2.2.2 I think
	484	void wxSTCListBox::DoSetFirstItem( int n )
	485	{
	486	wxCHECK_RET( m_list, wxT("invalid listbox") );
	487
	488	if (gdk_pointer_is_grabbed () && GTK_WIDGET_HAS_GRAB (m_list))
	489	return;
	490
	491	// terribly efficient
	492	const gchar *vadjustment_key = "gtk-vadjustment";
	493	guint vadjustment_key_id = g_quark_from_static_string (vadjustment_key);
	494
	495	GtkAdjustment *adjustment =
	496	(GtkAdjustment*) gtk_object_get_data_by_id (GTK_OBJECT (m_list), vadjustment_key_id);
	497	wxCHECK_RET( adjustment, wxT("invalid listbox code") );
	498
	499	GList *target = g_list_nth( m_list->children, n );
	500	wxCHECK_RET( target, wxT("invalid listbox index") );
	501
	502	GtkWidget *item = GTK_WIDGET(target->data);
	503	wxCHECK_RET( item, wxT("invalid listbox code") );
	504
	505	// find the last item before this one which is already realized
	506	size_t nItemsBefore;
	507	for ( nItemsBefore = 0; item && (item->allocation.y == -1); nItemsBefore++ )
	508	{
	509	target = target->prev;
	510	if ( !target )
	511	{
	512	// nothing we can do if there are no allocated items yet
	513	return;
	514	}
	515
	516	item = GTK_WIDGET(target->data);
	517	}
	518
519	gtk_adjustment_set_value(adjustment,
520	item->allocation.y +
521	nItemsBefore*item->allocation.height);
522	}
523	#endif
524
9ce192d4 RD	525
	526	ListBox::ListBox() {
	527	}
	528
	529	ListBox::~ListBox() {
	530	}
	531
	532	void ListBox::Create(Window &parent, int ctrlID) {
f97d84a6 RD	533	id = new wxSTCListBox(parent.id, ctrlID);
	534	// id = new wxListBox(parent.id, ctrlID, wxDefaultPosition, wxDefaultSize,
	535	// 0, NULL, wxLB_SINGLE \| wxLB_SORT \| wxSIMPLE_BORDER);
9ce192d4 RD	536	}
9ce192d4 RD	537
d134f170 RD	538	PRectangle ListBox::GetDesiredRect() {
	539	wxSize sz = ((wxListBox*)id)->GetBestSize();
	540	PRectangle rc;
	541	rc.top = 0;
	542	rc.left = 0;
f97d84a6 RD	543	if (sz.x > 150) // TODO: A better way to determine these max sizes
	544	sz.x = 150;
	545	if (sz.y > 100)
	546	sz.y = 100;
d134f170 RD	547	rc.right = sz.x;
	548	rc.bottom = sz.y;
	549
	550	return rc;
	551	}
	552
	553	void ListBox::SetAverageCharWidth(int width) {
	554	aveCharWidth = width;
	555	}
	556
	557	void ListBox::SetFont(Font &font) {
	558	Window::SetFont(font);
	559	}
	560
9ce192d4 RD	561	void ListBox::Clear() {
	562	((wxListBox*)id)->Clear();
	563	}
	564
	565	void ListBox::Append(char *s) {
	566	((wxListBox*)id)->Append(s);
	567	}
	568
	569	int ListBox::Length() {
257ed895	570	return ((wxListBox*)id)->GetCount();
9ce192d4 RD	571	}
	572
	573	void ListBox::Select(int n) {
	574	((wxListBox*)id)->SetSelection(n);
f97d84a6 RD	575	#ifdef __WXGTK__
	576	if (n > 4)
	577	n = n - 4;
	578	else
	579	n = 1;
	580	((wxListBox*)id)->SetFirstItem(n);
	581	#endif
9ce192d4 RD	582	}
	583
	584	int ListBox::GetSelection() {
	585	return ((wxListBox*)id)->GetSelection();
	586	}
	587
	588	int ListBox::Find(const char *prefix) {
21156596	589	if (prefix) {
257ed895	590	for (int x=0; x < ((wxListBox*)id)->GetCount(); x++) {
21156596 RD	591	wxString text = ((wxListBox*)id)->GetString(x);
	592	if (text.StartsWith(prefix))
	593	return x;
	594	}
f6bcfd97 BP	595	}
f6bcfd97 BP	596	return -1;
9ce192d4 RD	597	}
	598
	599	void ListBox::GetValue(int n, char *value, int len) {
	600	wxString text = ((wxListBox*)id)->GetString(n);
	601	strncpy(value, text.c_str(), len);
	602	value[len-1] = '\0';
	603	}
	604
	605	void ListBox::Sort() {
	606	// wxWindows keeps sorted so no need to sort
	607	}
	608
	609
	610	Menu::Menu() : id(0) {
	611	}
	612
	613	void Menu::CreatePopUp() {
	614	Destroy();
	615	id = new wxMenu();
	616	}
	617
	618	void Menu::Destroy() {
	619	if (id)
	620	delete id;
	621	id = 0;
	622	}
	623
	624	void Menu::Show(Point pt, Window &w) {
	625	w.GetID()->PopupMenu(id, pt.x - 4, pt.y);
	626	Destroy();
	627	}
	628
	629
	630	Colour Platform::Chrome() {
	631	wxColour c;
	632	c = wxSystemSettings::GetSystemColour(wxSYS_COLOUR_3DFACE);
	633	return Colour(c.Red(), c.Green(), c.Blue());
	634	}
	635
	636	Colour Platform::ChromeHighlight() {
	637	wxColour c;
	638	c = wxSystemSettings::GetSystemColour(wxSYS_COLOUR_3DHIGHLIGHT);
	639	return Colour(c.Red(), c.Green(), c.Blue());
	640	}
	641
	642	const char *Platform::DefaultFont() {
	643	return wxNORMAL_FONT->GetFaceName();
	644	}
	645
	646	int Platform::DefaultFontSize() {
	647	return 8;
	648	}
	649
	650	unsigned int Platform::DoubleClickTime() {
	651	return 500; // **** ::GetDoubleClickTime();
	652	}
	653
	654	void Platform::DebugDisplay(const char *s) {
	655	wxLogDebug(s);
	656	}
	657
	658	bool Platform::IsKeyDown(int key) {
	659	return false; // I don't think we'll need this.
	660	}
661
662	long Platform::SendScintilla(WindowID w,
663	unsigned int msg,
664	unsigned long wParam,
665	long lParam) {
666
667	wxStyledTextCtrl* stc = (wxStyledTextCtrl*)w;
668	return stc->SendMsg(msg, wParam, lParam);
669	}
670
671
672	// These are utility functions not really tied to a platform
673
674	int Platform::Minimum(int a, int b) {
675	if (a < b)
676	return a;
677	else
678	return b;
679	}
680
681	int Platform::Maximum(int a, int b) {
682	if (a > b)
683	return a;
684	else
685	return b;
686	}
687
688	#define TRACE
689
690	void Platform::DebugPrintf(const char *format, ...) {
691	#ifdef TRACE
692	char buffer[2000];
693	va_list pArguments;
694	va_start(pArguments, format);
695	vsprintf(buffer,format,pArguments);
696	va_end(pArguments);
697	Platform::DebugDisplay(buffer);
698	#endif
699	}
700
65ec6247 RD	701
	702	static bool assertionPopUps = true;
	703
	704	bool Platform::ShowAssertionPopUps(bool assertionPopUps_) {
	705	bool ret = assertionPopUps;
	706	assertionPopUps = assertionPopUps_;
	707	return ret;
	708	}
	709
	710	void Platform::Assert(const char c, const char file, int line) {
	711	char buffer[2000];
	712	sprintf(buffer, "Assertion [%s] failed at %s %d", c, file, line);
	713	if (assertionPopUps) {
	714	int idButton = wxMessageBox(buffer, "Assertion failure",
	715	wxICON_HAND \| wxOK);
	716	// if (idButton == IDRETRY) {
	717	// ::DebugBreak();
	718	// } else if (idButton == IDIGNORE) {
	719	// // all OK
	720	// } else {
	721	// abort();
	722	// }
	723	} else {
	724	strcat(buffer, "\r\n");
	725	Platform::DebugDisplay(buffer);
	726	abort();
	727	}
	728	}
	729
	730
9ce192d4 RD	731	int Platform::Clamp(int val, int minVal, int maxVal) {
	732	if (val > maxVal)
	733	val = maxVal;
	734	if (val < minVal)
	735	val = minVal;
	736	return val;
	737	}
	738
	739
	740
	741
	742
	743