Mercurial > hg > octave-nkf

annotate libgui/graphics/ObjectFactory.cc @ 19799:f3ac54ac2c6a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
also skip startup message if session is not interactive * octave.cc (octave_initialize_interpreter): If session is not interactive or forced interactive, set inhibit_startup_message to true.
author John W. Eaton <jwe@octave.org>
date Wed, 21 Jan 2015 12:36:25 -0500
parents fe0e34be5576
children 3cc0734283dc
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
18566
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
1 /*
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
2
18568
49877d3be064 update copyright notices for new QtHandles code
John W. Eaton <jwe@octave.org>
parents: 18566
diff changeset
3 Copyright (C) 2011-2014 Michael Goffioul
18566
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
4
18568
49877d3be064 update copyright notices for new QtHandles code
John W. Eaton <jwe@octave.org>
parents: 18566
diff changeset
5 This file is part of Octave.
18566
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
6
18568
49877d3be064 update copyright notices for new QtHandles code
John W. Eaton <jwe@octave.org>
parents: 18566
diff changeset
7 Octave is free software; you can redistribute it and/or modify it
49877d3be064 update copyright notices for new QtHandles code
John W. Eaton <jwe@octave.org>
parents: 18566
diff changeset
8 under the terms of the GNU General Public License as published by the
49877d3be064 update copyright notices for new QtHandles code
John W. Eaton <jwe@octave.org>
parents: 18566
diff changeset
9 Free Software Foundation; either version 3 of the License, or (at your
49877d3be064 update copyright notices for new QtHandles code
John W. Eaton <jwe@octave.org>
parents: 18566
diff changeset
10 option) any later version.
18566
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
11
18568
49877d3be064 update copyright notices for new QtHandles code
John W. Eaton <jwe@octave.org>
parents: 18566
diff changeset
12 Octave is distributed in the hope that it will be useful, but WITHOUT
49877d3be064 update copyright notices for new QtHandles code
John W. Eaton <jwe@octave.org>
parents: 18566
diff changeset
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
49877d3be064 update copyright notices for new QtHandles code
John W. Eaton <jwe@octave.org>
parents: 18566
diff changeset
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
49877d3be064 update copyright notices for new QtHandles code
John W. Eaton <jwe@octave.org>
parents: 18566
diff changeset
15 for more details.
18566
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
16
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
18568
49877d3be064 update copyright notices for new QtHandles code
John W. Eaton <jwe@octave.org>
parents: 18566
diff changeset
18 along with Octave; see the file COPYING. If not, see
49877d3be064 update copyright notices for new QtHandles code
John W. Eaton <jwe@octave.org>
parents: 18566
diff changeset
19 <http://www.gnu.org/licenses/>.
18566
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
20
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
21 */
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
22
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
23 #ifdef HAVE_CONFIG_H
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
24 #include <config.h>
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
25 #endif
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
26
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
27 #include <QApplication>
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
28 #include <QThread>
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
29
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
30 #include "graphics.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
31
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
32 #include "Backend.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
33 #include "CheckBoxControl.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
34 #include "ContextMenu.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
35 #include "EditControl.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
36 #include "Figure.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
37 #include "ListBoxControl.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
38 #include "Logger.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
39 #include "Menu.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
40 #include "ObjectFactory.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
41 #include "ObjectProxy.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
42 #include "Panel.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
43 #include "PopupMenuControl.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
44 #include "PushButtonControl.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
45 #include "PushTool.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
46 #include "RadioButtonControl.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
47 #include "SliderControl.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
48 #include "TextControl.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
49 #include "ToggleButtonControl.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
50 #include "ToggleTool.h"
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
51 #include "ToolBar.h"
18573
fb96b7f55242 rename file to avoid clash on case-insenstive filesystems (bug #41658)
John W. Eaton <jwe@octave.org>
parents: 18569
diff changeset
52 #include "QtHandlesUtils.h"
18566
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
53
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
54 namespace QtHandles
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
55 {
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
56
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
57 ObjectFactory* ObjectFactory::instance (void)
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
58 {
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
59 static ObjectFactory s_instance;
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
60 static bool s_instanceCreated = false;
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
61
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
62 if (! s_instanceCreated)
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
63 {
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
64 if (QThread::currentThread () != QApplication::instance ()->thread ())
18847
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
65 s_instance.moveToThread (QApplication::instance ()->thread ());
18566
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
66 s_instanceCreated = true;
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
67 }
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
68
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
69 return &s_instance;
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
70 }
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
71
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
72 void ObjectFactory::createObject (double handle)
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
73 {
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
74 gh_manager::auto_lock lock;
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
75
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
76 graphics_object go (gh_manager::get_object (graphics_handle (handle)));
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
77
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
78 if (go.valid_object ())
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
79 {
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
80 if (go.get_properties ().is_beingdeleted ())
18847
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
81 qWarning ("ObjectFactory::createObject: object is being deleted");
18566
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
82 else
18847
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
83 {
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
84 ObjectProxy* proxy = Backend::toolkitObjectProxy (go);
18566
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
85
18847
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
86 if (proxy)
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
87 {
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
88 Logger::debug ("ObjectFactory::createObject: "
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
89 "create %s from thread %08x",
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
90 go.type ().c_str (), QThread::currentThreadId ());
18566
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
91
18847
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
92 Object* obj = 0;
18566
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
93
18847
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
94 if (go.isa ("figure"))
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
95 obj = Figure::create (go);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
96 else if (go.isa ("uicontrol"))
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
97 {
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
98 uicontrol::properties& up =
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
99 Utils::properties<uicontrol> (go);
18566
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
100
18847
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
101 if (up.style_is ("pushbutton"))
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
102 obj = PushButtonControl::create (go);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
103 else if (up.style_is ("edit"))
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
104 obj = EditControl::create (go);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
105 else if (up.style_is ("checkbox"))
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
106 obj = CheckBoxControl::create (go);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
107 else if (up.style_is ("radiobutton"))
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
108 obj = RadioButtonControl::create (go);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
109 else if (up.style_is ("togglebutton"))
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
110 obj = ToggleButtonControl::create (go);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
111 else if (up.style_is ("text"))
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
112 obj = TextControl::create (go);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
113 else if (up.style_is ("popupmenu"))
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
114 obj = PopupMenuControl::create (go);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
115 else if (up.style_is ("slider"))
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
116 obj = SliderControl::create (go);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
117 else if (up.style_is ("listbox"))
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
118 obj = ListBoxControl::create (go);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
119 }
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
120 else if (go.isa ("uipanel"))
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
121 obj = Panel::create (go);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
122 else if (go.isa ("uimenu"))
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
123 obj = Menu::create (go);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
124 else if (go.isa ("uicontextmenu"))
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
125 obj = ContextMenu::create (go);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
126 else if (go.isa ("uitoolbar"))
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
127 obj = ToolBar::create (go);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
128 else if (go.isa ("uipushtool"))
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
129 obj = PushTool::create (go);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
130 else if (go.isa ("uitoggletool"))
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
131 obj = ToggleTool::create (go);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
132 else
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
133 qWarning ("ObjectFactory::createObject: unsupported type `%s'",
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
134 go.type ().c_str ());
18566
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
135
18847
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
136 if (obj)
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
137 proxy->setObject (obj);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
138 }
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
139 else
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
140 qWarning ("ObjectFactory::createObject: no proxy for handle %g",
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
141 handle);
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
142 }
18566
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
143 }
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
144 else
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
145 qWarning ("ObjectFactory::createObject: invalid object for handle %g",
18847
fe0e34be5576 maint: untabify recently added code files.
Rik <rik@octave.org>
parents: 18573
diff changeset
146 handle);
18566
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
147 }
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
148
2e7cad6f180c Initial integration of QtHandles.
John W. Eaton <jwe@octave.org>
parents:
diff changeset
149 };