Files
2025-12-05 08:54:02 +01:00

113 lines
2.9 KiB
Plaintext

// Copyright (C) 2010, Guy Barrand. All rights reserved.
// See the file tools.license for terms.
#ifndef toolx_Xt_session
#define toolx_Xt_session
#include <X11/Intrinsic.h>
#include <X11/Shell.h>
#include <X11/StringDefs.h>
#include <ostream>
namespace toolx {
namespace Xt {
class session {
public:
session(std::ostream& a_out)
:m_out(a_out),m_app_context(0),m_app_widget(0),m_app_owner(false)
{}
session(std::ostream& a_out,XtAppContext a_app_context,Widget a_app_widget)
:m_out(a_out),m_app_context(a_app_context),m_app_widget(a_app_widget),m_app_owner(false)
{}
session(std::ostream& a_out,int& a_argc,char** a_argv)
:m_out(a_out),m_app_context(0),m_app_widget(0),m_app_owner(false)
{
//LookDSM_Problem();
Arg args[1];
XtSetArg(args[0],XtNgeometry,XtNewString("100x100"));
m_app_widget = ::XtAppInitialize(&m_app_context,"toolx::Xt::session",NULL,(Cardinal)0,&a_argc,a_argv,NULL,args,1);
if(!m_app_context || !m_app_widget) {
m_app_context = 0;
m_app_widget = 0;
m_app_owner = false;
return;
}
m_app_owner = true;
}
virtual ~session() {
if(m_app_owner) {
if(m_app_widget) {::XtDestroyWidget(m_app_widget);m_app_widget = 0;}
if(m_app_context) {::XtDestroyApplicationContext(m_app_context);m_app_context = 0;}
}
}
protected:
session(const session& a_from)
:m_out(a_from.m_out),m_app_context(0),m_app_widget(0),m_app_owner(false)
{}
session& operator=(const session&){return *this;}
public:
std::ostream& out() const {return m_out;}
bool is_valid() {return m_app_context && m_app_widget?true:false;}
bool steer() {
if(!m_app_context) return false;
while(true) {
XEvent event;
::XtAppNextEvent(m_app_context,&event);
::XtDispatchEvent(&event);
//if(m_exit) break;
}
return true;
}
bool sync() {
if(!m_app_context) return false;
while(true) {
XtInputMask input = ::XtAppPending(m_app_context);
if(input==0) break;
XEvent event;
::XtAppNextEvent(m_app_context,&event);
::XtDispatchEvent(&event);
}
return true;
}
public:
Widget get_app_widget() {return m_app_widget;}
protected:
std::ostream& m_out;
XtAppContext m_app_context;
Widget m_app_widget;
bool m_app_owner;
};
}}
#include <X11/IntrinsicP.h>
namespace toolx {
namespace Xt {
inline bool post_expose(Widget a_widget) {
if(!XtIsRealized(a_widget)) return false;
XEvent event;
event.type = Expose;
event.xexpose.serial = 0;
event.xexpose.send_event = True;
event.xexpose.display = XtDisplay(a_widget);
event.xexpose.window = XtWindow(a_widget);
event.xexpose.x = 0;
event.xexpose.y = 0;
event.xexpose.width = a_widget->core.width;
event.xexpose.height = a_widget->core.height;
event.xexpose.count = 0;
//locks
Status stat = ::XSendEvent(event.xexpose.display,event.xexpose.window,False,0L,&event);
::XFlush(event.xexpose.display);
//unlock();
return (stat==0?false:true);
}
}}
#endif