]> git.saurik.com Git - wxWidgets.git/blob - src/palmos/window.cpp
Revert the 2.8 hacks from r51892 on the trunk.
[wxWidgets.git] / src / palmos / window.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/palmos/window.cpp
3 // Purpose: wxWindow
4 // Author: William Osborne - minimal working wxPalmOS port
5 // Modified by: Wlodzimierz ABX Skiba - more than minimal functionality
6 // Created: 10/13/04
7 // RCS-ID: $Id$
8 // Copyright: (c) William Osborne, Wlodzimierz Skiba
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 // ===========================================================================
13 // declarations
14 // ===========================================================================
15
16 // ---------------------------------------------------------------------------
17 // headers
18 // ---------------------------------------------------------------------------
19
20 // For compilers that support precompilation, includes "wx.h".
21 #include "wx/wxprec.h"
22
23 #ifdef __BORLANDC__
24 #pragma hdrstop
25 #endif
26
27 #include "wx/window.h"
28
29 #ifndef WX_PRECOMP
30 #include "wx/accel.h"
31 #include "wx/menu.h"
32 #include "wx/dc.h"
33 #include "wx/dcclient.h"
34 #include "wx/dcmemory.h"
35 #include "wx/utils.h"
36 #include "wx/app.h"
37 #include "wx/layout.h"
38 #include "wx/dialog.h"
39 #include "wx/frame.h"
40 #include "wx/listbox.h"
41 #include "wx/button.h"
42 #include "wx/msgdlg.h"
43 #include "wx/settings.h"
44 #include "wx/statbox.h"
45 #include "wx/intl.h"
46 #include "wx/log.h"
47 #include "wx/textctrl.h"
48 #include "wx/menuitem.h"
49 #include "wx/module.h"
50 #endif
51
52 #if wxUSE_OWNER_DRAWN && !defined(__WXUNIVERSAL__)
53 #include "wx/ownerdrw.h"
54 #endif
55
56 #if wxUSE_DRAG_AND_DROP
57 #include "wx/dnd.h"
58 #endif
59
60 #if wxUSE_ACCESSIBILITY
61 #include "wx/access.h"
62 #endif
63
64 #if wxUSE_TOOLTIPS
65 #include "wx/tooltip.h"
66 #endif
67
68 #if wxUSE_CARET
69 #include "wx/caret.h"
70 #endif // wxUSE_CARET
71
72 #if wxUSE_SPINCTRL
73 #include "wx/spinctrl.h"
74 #endif // wxUSE_SPINCTRL
75
76 #include "wx/notebook.h"
77 #include "wx/listctrl.h"
78
79 #ifndef __WXUNIVERSAL__
80 #include <Window.h>
81
82 // ---------------------------------------------------------------------------
83 // global variables
84 // ---------------------------------------------------------------------------
85
86 // ---------------------------------------------------------------------------
87 // private functions
88 // ---------------------------------------------------------------------------
89
90 // ---------------------------------------------------------------------------
91 // event tables
92 // ---------------------------------------------------------------------------
93
94 // in wxUniv/Palm this class is abstract because it doesn't have DoPopupMenu()
95 // method
96 #ifdef __WXUNIVERSAL__
97 IMPLEMENT_ABSTRACT_CLASS(wxWindowPalm, wxWindowBase)
98 #else // __WXPalm__
99 #if wxUSE_EXTENDED_RTTI
100
101 // windows that are created from a parent window during its Create method, eg. spin controls in a calendar controls
102 // must never been streamed out separately otherwise chaos occurs. Right now easiest is to test for negative ids, as
103 // windows with negative ids never can be recreated anyway
104
105 bool wxWindowStreamingCallback( const wxObject *object, wxWriter * , wxPersister * , wxxVariantArray & )
106 {
107 return false;
108 }
109
110 IMPLEMENT_DYNAMIC_CLASS_XTI_CALLBACK(wxWindow, wxWindowBase,"wx/window.h", wxWindowStreamingCallback)
111
112 // make wxWindowList known before the property is used
113
114 wxCOLLECTION_TYPE_INFO( wxWindow* , wxWindowList ) ;
115
116 template<> void wxCollectionToVariantArray( wxWindowList const &theList, wxxVariantArray &value)
117 {
118 wxListCollectionToVariantArray<wxWindowList::compatibility_iterator>( theList , value ) ;
119 }
120
121 WX_DEFINE_FLAGS( wxWindowStyle )
122
123 wxBEGIN_FLAGS( wxWindowStyle )
124 // new style border flags, we put them first to
125 // use them for streaming out
126
127 wxFLAGS_MEMBER(wxBORDER_SIMPLE)
128 wxFLAGS_MEMBER(wxBORDER_SUNKEN)
129 wxFLAGS_MEMBER(wxBORDER_DOUBLE)
130 wxFLAGS_MEMBER(wxBORDER_RAISED)
131 wxFLAGS_MEMBER(wxBORDER_STATIC)
132 wxFLAGS_MEMBER(wxBORDER_NONE)
133
134 // old style border flags
135 wxFLAGS_MEMBER(wxSIMPLE_BORDER)
136 wxFLAGS_MEMBER(wxSUNKEN_BORDER)
137 wxFLAGS_MEMBER(wxDOUBLE_BORDER)
138 wxFLAGS_MEMBER(wxRAISED_BORDER)
139 wxFLAGS_MEMBER(wxSTATIC_BORDER)
140 wxFLAGS_MEMBER(wxBORDER)
141
142 // standard window styles
143 wxFLAGS_MEMBER(wxTAB_TRAVERSAL)
144 wxFLAGS_MEMBER(wxCLIP_CHILDREN)
145 wxFLAGS_MEMBER(wxTRANSPARENT_WINDOW)
146 wxFLAGS_MEMBER(wxWANTS_CHARS)
147 wxFLAGS_MEMBER(wxFULL_REPAINT_ON_RESIZE)
148 wxFLAGS_MEMBER(wxALWAYS_SHOW_SB )
149 wxFLAGS_MEMBER(wxVSCROLL)
150 wxFLAGS_MEMBER(wxHSCROLL)
151
152 wxEND_FLAGS( wxWindowStyle )
153
154 wxBEGIN_PROPERTIES_TABLE(wxWindow)
155 wxEVENT_PROPERTY( Close , wxEVT_CLOSE_WINDOW , wxCloseEvent)
156 wxEVENT_PROPERTY( Create , wxEVT_CREATE , wxWindowCreateEvent )
157 wxEVENT_PROPERTY( Destroy , wxEVT_DESTROY , wxWindowDestroyEvent )
158 // Always constructor Properties first
159
160 wxREADONLY_PROPERTY( Parent,wxWindow*, GetParent, EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
161 wxPROPERTY( Id,wxWindowID, SetId, GetId, wxID_ANY, 0 /*flags*/ , wxT("Helpstring") , wxT("group") )
162 wxPROPERTY( Position,wxPoint, SetPosition , GetPosition, wxDefaultPosition , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // pos
163 wxPROPERTY( Size,wxSize, SetSize, GetSize, wxDefaultSize , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // size
164 wxPROPERTY( WindowStyle , long , SetWindowStyleFlag , GetWindowStyleFlag , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // style
165
166 // Then all relations of the object graph
167
168 wxREADONLY_PROPERTY_COLLECTION( Children , wxWindowList , wxWindowBase* , GetWindowChildren , wxPROP_OBJECT_GRAPH /*flags*/ , wxT("Helpstring") , wxT("group"))
169
170 // and finally all other properties
171
172 wxPROPERTY( ExtraStyle , long , SetExtraStyle , GetExtraStyle , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // extstyle
173 wxPROPERTY( BackgroundColour , wxColour , SetBackgroundColour , GetBackgroundColour , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // bg
174 wxPROPERTY( ForegroundColour , wxColour , SetForegroundColour , GetForegroundColour , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // fg
175 wxPROPERTY( Enabled , bool , Enable , IsEnabled , wxxVariant((bool)true) , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
176 wxPROPERTY( Shown , bool , Show , IsShown , wxxVariant((bool)true) , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
177 #if 0
178 // possible property candidates (not in xrc) or not valid in all subclasses
179 wxPROPERTY( Title,wxString, SetTitle, GetTitle, wxT("") )
180 wxPROPERTY( Font , wxFont , SetFont , GetWindowFont , )
181 wxPROPERTY( Label,wxString, SetLabel, GetLabel, wxT("") )
182 // MaxHeight, Width , MinHeight , Width
183 // TODO switch label to control and title to toplevels
184
185 wxPROPERTY( ThemeEnabled , bool , SetThemeEnabled , GetThemeEnabled , )
186 //wxPROPERTY( Cursor , wxCursor , SetCursor , GetCursor , )
187 // wxPROPERTY( ToolTip , wxString , SetToolTip , GetToolTipText , )
188 wxPROPERTY( AutoLayout , bool , SetAutoLayout , GetAutoLayout , )
189
190
191
192 #endif
193 wxEND_PROPERTIES_TABLE()
194
195 wxBEGIN_HANDLERS_TABLE(wxWindow)
196 wxEND_HANDLERS_TABLE()
197
198 wxCONSTRUCTOR_DUMMY(wxWindow)
199
200 #else
201 IMPLEMENT_DYNAMIC_CLASS(wxWindow, wxWindowBase)
202 #endif
203 #endif // __WXUNIVERSAL__/__WXPalm__
204
205 BEGIN_EVENT_TABLE(wxWindowPalm, wxWindowBase)
206 EVT_ERASE_BACKGROUND(wxWindowPalm::OnEraseBackground)
207 EVT_INIT_DIALOG(wxWindowPalm::OnInitDialog)
208 END_EVENT_TABLE()
209
210 // ===========================================================================
211 // implementation
212 // ===========================================================================
213
214 // ---------------------------------------------------------------------------
215 // wxWindow utility functions
216 // ---------------------------------------------------------------------------
217
218 // Find an item given the MS Windows id
219 wxWindow *wxWindowPalm::FindItem(long id) const
220 {
221 return NULL;
222 }
223
224 // Find an item given the MS Windows handle
225 wxWindow *wxWindowPalm::FindItemByWinHandle(WXWINHANDLE handle, bool controlOnly) const
226 {
227 // TODO
228 return NULL;
229 }
230
231 bool wxGetKeyState(wxKeyCode key)
232 {
233 wxASSERT_MSG(key != WXK_LBUTTON && key != WXK_RBUTTON && key !=
234 WXK_MBUTTON, wxT("can't use wxGetKeyState() for mouse buttons"));
235
236 // TODO
237
238 return false;
239 }
240
241 // ----------------------------------------------------------------------------
242 // constructors and such
243 // ----------------------------------------------------------------------------
244
245 void wxWindowPalm::Init()
246 {
247 m_hWnd = 0;
248 }
249
250 // Destructor
251 wxWindowPalm::~wxWindowPalm()
252 {
253 }
254
255 // real construction (Init() must have been called before!)
256 bool wxWindowPalm::Create(wxWindow *parent,
257 wxWindowID id,
258 const wxPoint& pos,
259 const wxSize& size,
260 long style,
261 const wxString& name)
262 {
263 wxCHECK_MSG( parent, false, wxT("can't create wxWindow without parent") );
264
265 if ( !CreateBase(parent, id, pos, size, style, wxDefaultValidator, name) )
266 return false;
267
268 parent->AddChild(this);
269
270 InheritAttributes();
271
272 return true;
273 }
274
275 WXFORMPTR wxWindowPalm::GetFormPtr()
276 {
277 return FrameForm;
278 }
279 void wxWindowPalm::SetFormPtr(WXFORMPTR FormPtr)
280 {
281 FrameForm = FormPtr;
282 }
283
284 // ---------------------------------------------------------------------------
285 // basic operations
286 // ---------------------------------------------------------------------------
287
288 void wxWindowPalm::SetFocus()
289 {
290 }
291
292 void wxWindowPalm::SetFocusFromKbd()
293 {
294 }
295
296 // Get the window with the focus
297 wxWindow *wxWindowBase::DoFindFocus()
298 {
299 return NULL;
300 }
301
302 bool wxWindowPalm::Enable(bool enable)
303 {
304 return false;
305 }
306
307 bool wxWindowPalm::Show(bool show)
308 {
309 return false;
310 }
311
312 // Raise the window to the top of the Z order
313 void wxWindowPalm::Raise()
314 {
315 }
316
317 // Lower the window to the bottom of the Z order
318 void wxWindowPalm::Lower()
319 {
320 }
321
322 void wxWindowPalm::SetLabel( const wxString& WXUNUSED(label))
323 {
324 }
325
326 wxString wxWindowPalm::GetLabel() const
327 {
328 return wxEmptyString;
329 }
330
331 void wxWindowPalm::DoCaptureMouse()
332 {
333 }
334
335 void wxWindowPalm::DoReleaseMouse()
336 {
337 }
338
339 /* static */ wxWindow *wxWindowBase::GetCapture()
340 {
341 return NULL;
342 }
343
344 bool wxWindowPalm::SetFont(const wxFont& font)
345 {
346 return false;
347 }
348 bool wxWindowPalm::SetCursor(const wxCursor& cursor)
349 {
350 return false;
351 }
352
353 void wxWindowPalm::WarpPointer (int x, int y)
354 {
355 }
356
357 // ---------------------------------------------------------------------------
358 // scrolling stuff
359 // ---------------------------------------------------------------------------
360
361 // convert wxHORIZONTAL/wxVERTICAL to SB_HORZ/SB_VERT
362 static inline int wxDirToWinStyle(int orient)
363 {
364 return 0;
365 }
366
367 int wxWindowPalm::GetScrollPos(int orient) const
368 {
369 return 0;
370 }
371
372 // This now returns the whole range, not just the number
373 // of positions that we can scroll.
374 int wxWindowPalm::GetScrollRange(int orient) const
375 {
376 return 0;
377 }
378
379 int wxWindowPalm::GetScrollThumb(int orient) const
380 {
381 return 0;
382 }
383
384 void wxWindowPalm::SetScrollPos(int orient, int pos, bool refresh)
385 {
386 }
387
388 // New function that will replace some of the above.
389 void wxWindowPalm::SetScrollbar(int orient,
390 int pos,
391 int pageSize,
392 int range,
393 bool refresh)
394 {
395 }
396
397 void wxWindowPalm::ScrollWindow(int dx, int dy, const wxRect *prect)
398 {
399 }
400
401 bool wxWindowPalm::ScrollLines(int lines)
402 {
403 return false;
404 }
405
406 bool wxWindowPalm::ScrollPages(int pages)
407 {
408 return false;
409 }
410
411 // ----------------------------------------------------------------------------
412 // Style handling
413 // ----------------------------------------------------------------------------
414
415 WXDWORD wxWindowPalm::PalmGetStyle(long flags, WXDWORD *exstyle) const
416 {
417 return 0;
418 }
419
420 // Setup background and foreground colours correctly
421 void wxWindowPalm::SetupColours()
422 {
423 }
424
425 void wxWindowPalm::OnInternalIdle()
426 {
427 }
428
429 // Set this window to be the child of 'parent'.
430 bool wxWindowPalm::Reparent(wxWindowBase *parent)
431 {
432 return false;
433 }
434
435 void wxWindowPalm::Refresh(bool eraseBack, const wxRect *rect)
436 {
437 WinHandle handle = (WinHandle)GetHWND();
438 if(handle)
439 {
440 if(rect)
441 {
442 RectangleType dirtyRect;
443 dirtyRect.topLeft.x = rect->GetX() - 1;
444 dirtyRect.topLeft.y = rect->GetY() - 1;
445 dirtyRect.extent.x = rect->GetWidth() + 1;
446 dirtyRect.extent.y = rect->GetHeight() + 1;
447 WinInvalidateRect(handle, &dirtyRect);
448 }
449 else
450 {
451 WinInvalidateWindow(handle);
452 }
453 }
454 }
455
456 void wxWindowPalm::Update()
457 {
458 }
459
460 // ---------------------------------------------------------------------------
461 // drag and drop
462 // ---------------------------------------------------------------------------
463
464
465 #if wxUSE_DRAG_AND_DROP
466 void wxWindowPalm::SetDropTarget(wxDropTarget *pDropTarget)
467 {
468 }
469 #endif // wxUSE_DRAG_AND_DROP
470
471 // old style file-manager drag&drop support: we retain the old-style
472 // DragAcceptFiles in parallel with SetDropTarget.
473 void wxWindowPalm::DragAcceptFiles(bool accept)
474 {
475 }
476
477 // ----------------------------------------------------------------------------
478 // tooltips
479 // ----------------------------------------------------------------------------
480
481 #if wxUSE_TOOLTIPS
482
483 void wxWindowPalm::DoSetToolTip(wxToolTip *tooltip)
484 {
485 }
486
487 #endif // wxUSE_TOOLTIPS
488
489 // ---------------------------------------------------------------------------
490 // moving and resizing
491 // ---------------------------------------------------------------------------
492
493 // Get total size
494 void wxWindowPalm::DoGetSize(int *x, int *y) const
495 {
496 }
497
498 // Get size *available for subwindows* i.e. excluding menu bar etc.
499 void wxWindowPalm::DoGetClientSize(int *x, int *y) const
500 {
501 }
502
503 void wxWindowPalm::DoGetPosition(int *x, int *y) const
504 {
505 if(x)
506 *x = 0;
507 if(y)
508 *y = 0;
509 }
510
511 void wxWindowPalm::DoScreenToClient(int *x, int *y) const
512 {
513 }
514
515 void wxWindowPalm::DoClientToScreen(int *x, int *y) const
516 {
517 }
518
519 void wxWindowPalm::DoMoveWindow(int x, int y, int width, int height)
520 {
521 }
522
523 // set the size of the window: if the dimensions are positive, just use them,
524 // but if any of them is equal to -1, it means that we must find the value for
525 // it ourselves (unless sizeFlags contains wxSIZE_ALLOW_MINUS_ONE flag, in
526 // which case -1 is a valid value for x and y)
527 //
528 // If sizeFlags contains wxSIZE_AUTO_WIDTH/HEIGHT flags (default), we calculate
529 // the width/height to best suit our contents, otherwise we reuse the current
530 // width/height
531 void wxWindowPalm::DoSetSize(int x, int y, int width, int height, int sizeFlags)
532 {
533 // get the current size and position...
534 int currentX, currentY;
535 GetPosition(&currentX, &currentY);
536 int currentW,currentH;
537 GetSize(&currentW, &currentH);
538
539 // ... and don't do anything (avoiding flicker) if it's already ok
540 if ( x == currentX && y == currentY &&
541 width == currentW && height == currentH )
542 {
543 return;
544 }
545
546 if ( x == wxDefaultCoord && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE) )
547 x = currentX;
548 if ( y == wxDefaultCoord && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE) )
549 y = currentY;
550
551 AdjustForParentClientOrigin(x, y, sizeFlags);
552
553 wxSize size = wxDefaultSize;
554 if ( width == wxDefaultCoord )
555 {
556 if ( sizeFlags & wxSIZE_AUTO_WIDTH )
557 {
558 size = DoGetBestSize();
559 width = size.x;
560 }
561 else
562 {
563 // just take the current one
564 width = currentW;
565 }
566 }
567
568 if ( height == wxDefaultCoord )
569 {
570 if ( sizeFlags & wxSIZE_AUTO_HEIGHT )
571 {
572 if ( size.x == wxDefaultCoord )
573 {
574 size = DoGetBestSize();
575 }
576 //else: already called DoGetBestSize() above
577
578 height = size.y;
579 }
580 else
581 {
582 // just take the current one
583 height = currentH;
584 }
585 }
586
587 DoMoveWindow(x, y, width, height);
588 }
589
590 void wxWindowPalm::DoSetClientSize(int width, int height)
591 {
592 }
593
594 // ---------------------------------------------------------------------------
595 // text metrics
596 // ---------------------------------------------------------------------------
597
598 int wxWindowPalm::GetCharHeight() const
599 {
600 return 0;
601 }
602
603 int wxWindowPalm::GetCharWidth() const
604 {
605 return 0;
606 }
607
608 void wxWindowPalm::GetTextExtent(const wxString& string,
609 int *x, int *y,
610 int *descent, int *externalLeading,
611 const wxFont *theFont) const
612 {
613 }
614
615 // ---------------------------------------------------------------------------
616 // popup menu
617 // ---------------------------------------------------------------------------
618
619 #if wxUSE_MENUS_NATIVE
620
621 // yield for WM_COMMAND events only, i.e. process all WM_COMMANDs in the queue
622 // immediately, without waiting for the next event loop iteration
623 //
624 // NB: this function should probably be made public later as it can almost
625 // surely replace wxYield() elsewhere as well
626 static void wxYieldForCommandsOnly()
627 {
628 }
629
630 bool wxWindowPalm::DoPopupMenu(wxMenu *menu, int x, int y)
631 {
632 return false;
633 }
634
635 #endif // wxUSE_MENUS_NATIVE
636
637 // ----------------------------------------------------------------------------
638 // wxWindow <-> HWND map
639 // ----------------------------------------------------------------------------
640
641 wxWinHashTable *wxWinHandleHash = NULL;
642
643 wxWindow *wxFindWinFromWinHandle(WXWINHANDLE handle)
644 {
645 // TODO
646 return NULL;
647 }
648
649 void wxRemoveHandleAssociation(wxWindowPalm *win)
650 {
651 }
652
653 // ----------------------------------------------------------------------------
654 // various Palm specific class dependent functions
655 // ----------------------------------------------------------------------------
656
657 bool wxWindowPalm::PalmGetCreateWindowCoords(const wxPoint& pos,
658 const wxSize& size,
659 int& x, int& y,
660 int& w, int& h) const
661 {
662 return false;
663 }
664
665 bool wxWindowPalm::PalmCreate(const wxChar *wclass,
666 const wxChar *title,
667 const wxPoint& pos,
668 const wxSize& size,
669 WXDWORD style,
670 WXDWORD extendedStyle)
671 {
672 return false;
673 }
674
675 // ===========================================================================
676 // Palm message handlers
677 // ===========================================================================
678
679 // ---------------------------------------------------------------------------
680 // painting
681 // ---------------------------------------------------------------------------
682
683 // Can be called from an application's OnPaint handler
684 void wxWindowPalm::OnPaint(wxPaintEvent& event)
685 {
686 }
687
688 void wxWindowPalm::OnEraseBackground(wxEraseEvent& event)
689 {
690 }
691
692 // ---------------------------------------------------------------------------
693 // moving and resizing
694 // ---------------------------------------------------------------------------
695
696 bool wxWindowPalm::HandleMove(int x, int y)
697 {
698 return false;
699 }
700
701 bool wxWindowPalm::HandleMoving(wxRect& rect)
702 {
703 return false;
704 }
705
706 // ---------------------------------------------------------------------------
707 // joystick
708 // ---------------------------------------------------------------------------
709
710 bool wxWindowPalm::HandleJoystickEvent(WXUINT msg, int x, int y, WXUINT flags)
711 {
712 return false;
713 }
714
715 // ---------------------------------------------------------------------------
716 // scrolling
717 // ---------------------------------------------------------------------------
718
719 bool wxWindowPalm::PalmOnScroll(int orientation, WXWORD wParam,
720 WXWORD pos, WXWINHANDLE control)
721 {
722 // TODO
723 return false;
724 }
725
726 // ===========================================================================
727 // global functions
728 // ===========================================================================
729
730 void wxGetCharSize(WXWINHANDLE wnd, int *x, int *y, const wxFont *the_font)
731 {
732 // TODO
733 }
734
735 #if wxUSE_HOTKEY
736
737 bool wxWindowPalm::RegisterHotKey(int hotkeyId, int modifiers, int keycode)
738 {
739 return false;
740 }
741
742 bool wxWindowPalm::UnregisterHotKey(int hotkeyId)
743 {
744 return false;
745 }
746 #endif // # __WXUNIVERSAL__
747 #endif // wxUSE_HOTKEY