static GdkScreen *
get_inspector_screen (void)
{
static GdkDisplay *display = NULL;
if (display == NULL)
{
const gchar *name;
name = g_getenv ("GTK_INSPECTOR_DISPLAY");
display = gdk_display_open (name);
if (display)
g_debug ("Using display %s for GtkInspector", name);
else
g_message ("Failed to open display %s", name);
}
if (!display)
{
display = gdk_display_open (NULL);
if (display)
g_debug ("Using default display for GtkInspector");
else
g_message ("Failed to separate connection to default display");
}
if (!display)
display = gdk_display_get_default ();
return gdk_display_get_default_screen (display);
}
gint
main (gint argc, gchar *argv[])
{
GdkDisplay *extra_display;
gtk_init (&argc, &argv);
test_error_trapping (gdk_display_get_default ());
extra_display = gdk_display_open (NULL);
test_error_trapping (extra_display);
gdk_display_close (extra_display);
test_error_trapping (gdk_display_get_default ());
/* open a display with a trap pushed and see if we
* get confused
*/
gdk_error_trap_push ();
gdk_error_trap_push ();
extra_display = gdk_display_open (NULL);
test_error_trapping (extra_display);
gdk_display_close (extra_display);
gdk_error_trap_pop_ignored ();
gdk_error_trap_pop_ignored ();
test_error_trapping (gdk_display_get_default ());
/* reassure us that the tests ran. */
g_print("All errors properly trapped.\n");
return 0;
}
/* Called when the user clicks on "Open..." in the display
* frame. Prompts for a new display, and then opens a connection
* to that display.
*/
static void
open_display_cb (GtkWidget *button,
ChangeDisplayInfo *info)
{
GtkWidget *content_area;
GtkWidget *dialog;
GtkWidget *display_entry;
GtkWidget *dialog_label;
gchar *new_screen_name = NULL;
GdkDisplay *result = NULL;
dialog = gtk_dialog_new_with_buttons ("Open Display",
GTK_WINDOW (info->window),
GTK_DIALOG_MODAL,
_("_Cancel"), GTK_RESPONSE_CANCEL,
_("_OK"), GTK_RESPONSE_OK,
NULL);
gtk_dialog_set_default_response (GTK_DIALOG (dialog), GTK_RESPONSE_OK);
display_entry = gtk_entry_new ();
gtk_entry_set_activates_default (GTK_ENTRY (display_entry), TRUE);
dialog_label =
gtk_label_new ("Please enter the name of\nthe new display\n");
content_area = gtk_dialog_get_content_area (GTK_DIALOG (dialog));
gtk_container_add (GTK_CONTAINER (content_area), dialog_label);
gtk_container_add (GTK_CONTAINER (content_area), display_entry);
gtk_widget_grab_focus (display_entry);
gtk_widget_show_all (gtk_bin_get_child (GTK_BIN (dialog)));
while (!result)
{
gint response_id = gtk_dialog_run (GTK_DIALOG (dialog));
if (response_id != GTK_RESPONSE_OK)
break;
new_screen_name = gtk_editable_get_chars (GTK_EDITABLE (display_entry),
0, -1);
if (strcmp (new_screen_name, "") != 0)
{
result = gdk_display_open (new_screen_name);
if (!result)
{
gchar *error_msg =
g_strdup_printf ("Can't open display:\n\t%s\nplease try another one\n",
new_screen_name);
gtk_label_set_text (GTK_LABEL (dialog_label), error_msg);
g_free (error_msg);
}
g_free (new_screen_name);
}
}
gtk_widget_destroy (dialog);
}
/*< private >
* gdk_display_open_default:
*
* Opens the default display specified by command line arguments or
* environment variables, sets it as the default display, and returns
* it. gdk_parse_args() must have been called first. If the default
* display has previously been set, simply returns that. An internal
* function that should not be used by applications.
*
* Returns: (nullable) (transfer none): the default display, if it
* could be opened, otherwise %NULL.
*/
GdkDisplay *
gdk_display_open_default (void)
{
GdkDisplay *display;
g_return_val_if_fail (gdk_initialized, NULL);
display = gdk_display_get_default ();
if (display)
return display;
display = gdk_display_open (gdk_get_display_arg_name ());
return display;
}
/*#
@class GdkDisplay
@brief An opaque structure representing an offscreen drawable of depth 1.
@param display_name the name of the display to open
GdkDisplay objects purpose are two fold:
- To grab/ungrab keyboard focus and mouse pointer
- To manage and provide information about the GdkScreen(s) available for this GdkDisplay
GdkDisplay objects are the GDK representation of the X Display which can be
described as a workstation consisting of a keyboard a pointing device (such
as a mouse) and one or more screens. It is used to open and keep track of
various GdkScreen objects currently instanciated by the application. It is
also used to grab and release the keyboard and the mouse pointer.
*/
FALCON_FUNC Display::open( VMARG )
{
Item* i_name = vm->param( 0 );
#ifndef NO_PARAMETER_CHECK
if ( !i_name || !i_name->isString() )
throw_inv_params( "S" );
#endif
AutoCString name( i_name->asString() );
MYSELF;
GdkDisplay* display = gdk_display_open( name.c_str() );
if ( display )
self->setObject( (GObject*) display );
else
throw_inv_params( "Display could not be opened" ); // todo
}
/**
* gdk_display_open_default_libgtk_only:
*
* Opens the default display specified by command line arguments or
* environment variables, sets it as the default display, and returns
* it. gdk_parse_args() must have been called first. If the default
* display has previously been set, simply returns that. An internal
* function that should not be used by applications.
*
* Return value: (transfer none): the default display, if it could be
* opened, otherwise %NULL.
**/
GdkDisplay *
gdk_display_open_default_libgtk_only (void)
{
GdkDisplay *display;
g_return_val_if_fail (gdk_initialized, NULL);
if (gdk_display_manager_peek () == NULL)
return NULL;
display = gdk_display_get_default ();
if (display)
return display;
display = gdk_display_open (gdk_get_display_arg_name ());
return display;
}
static VALUE
rg_s_open(G_GNUC_UNUSED VALUE self, VALUE display_name)
{
GdkDisplay* gdisplay = gdk_display_open(RVAL2CSTR(display_name));
if (! gdisplay) {
rb_raise(rb_eRuntimeError, "The display `%s' could not be opened.",
RVAL2CSTR(display_name));
} else {
VALUE display;
g_object_ref(gdisplay);
display = GOBJ2RVAL(gdisplay);
if (rb_block_given_p()) {
rb_ensure(rb_yield, display, rg_close, display);
return Qnil;
} else {
return display;
}
}
}
static GdkDisplay *
display_open_if_needed (const gchar *name)
{
GSList *displays;
GSList *l;
GdkDisplay *display = NULL;
displays = gdk_display_manager_list_displays (gdk_display_manager_get ());
for (l = displays; l != NULL; l = l->next)
{
if (strcmp (gdk_display_get_name ((GdkDisplay *) l->data), name) == 0)
{
display = l->data;
break;
}
}
g_slist_free (displays);
return display != NULL ? display : gdk_display_open (name);
}
int
main (int argc, char *argv[])
{
ASFlagType flags = 0 ;
int i;
char * initial_command = NULL ;
static char *deleted_arg = "_deleted_arg_" ;
memset( &AppState, 0x00, sizeof(AppState));
InitMyApp (CLASS_ASMOUNT, argc, argv, NULL, NULL, 0 );
for( i = 1 ; i < argc ; ++i )
if( argv[i] == NULL )
argv[i] = strdup(deleted_arg) ;
LinkAfterStepConfig();
InitSession();
g_type_init();
#if 0
ConnectXDisplay (gdk_x11_display_get_xdisplay(gdk_display_open(NULL)), NULL, False);
#else
ConnectX( ASDefaultScr, EnterWindowMask|PropertyChangeMask );
#endif
ReloadASEnvironment( NULL, NULL, NULL, False, True );
ConnectAfterStep(0,0);
Config = AS_ASMOUNT_CONFIG(parse_asmodule_config_all( getASMountConfigClass() )/*asm_config*/);
CheckASMountConfigSanity(Config, &TileSize);
SetASMountLook();
init_ASMount( flags, initial_command);
mainLoop();
return 0;
}
static void
cb_view_ok_clicked (G_GNUC_UNUSED GtkWidget *button,
ViewState *state)
{
WBCGtk *wbcg = state->wbcg;
WorkbookControl *wbc = WORKBOOK_CONTROL (wbcg);
WorkbookControl *new_wbc;
gboolean shared;
GdkScreen *screen;
GSList *buttons = gtk_radio_button_get_group (state->location_elsewhere);
shared = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (go_gtk_builder_get_widget (state->gui, "view_shared")));
while (buttons)
if (gtk_toggle_button_get_active (buttons->data))
break;
else
buttons = buttons->next;
if (!buttons) {
g_assert_not_reached ();
return;
} else if (buttons->data == state->location_elsewhere) {
const char *name = gtk_entry_get_text (state->location_display_name);
GdkDisplay *display;
if (!name)
return; /* Just ignore */
display = gdk_display_open (name);
if (!display) {
char *error_str =
g_strdup_printf (_("Display \"%s\" could not be opened."),
name);
gtk_widget_destroy (state->dialog);
go_gtk_notice_dialog (wbcg_toplevel (wbcg),
GTK_MESSAGE_ERROR,
"%s", error_str);
g_free (error_str);
return;
}
screen = gdk_display_get_default_screen (display);
} else {
screen = g_object_get_data (buttons->data, "screen");
}
gtk_widget_destroy (state->dialog);
new_wbc = wb_control_wrapper_new
(wbc,
shared ? wb_control_view (wbc) : NULL,
wb_control_get_workbook (wbc),
screen);
if (IS_WBC_GTK (new_wbc)) {
/* What else would it be? */
WBCGtk *new_wbcg = WBC_GTK (new_wbc);
wbcg_copy_toolbar_visibility (new_wbcg, wbcg);
_gnm_app_flag_windows_changed ();
}
}
char *sendpraat (void *display, const char *programName, long timeOut, const char *text) {
char nativeProgramName [100];
#if gtk
char *home, pidFileName [256], messageFileName [256];
FILE *pidFile;
long pid, wid = 0;
#elif win
char homeDirectory [256], messageFileName [256], windowName [256];
HWND window;
(void) display;
(void) timeOut;
#elif mac
AEDesc programDescriptor;
AppleEvent event, reply;
OSStatus err;
UInt32 signature;
(void) display;
#endif
/*
* Clean up from an earlier call.
*/
errorMessage [0] = '\0';
/*
* Handle case differences.
*/
strcpy (nativeProgramName, programName);
#if gtk
nativeProgramName [0] = tolower (nativeProgramName [0]);
#else
nativeProgramName [0] = toupper (nativeProgramName [0]);
#endif
/*
* If the text is going to be sent in a file, create its name.
* The file is going to be written into the preferences directory of the receiving program.
* On Unix, the name will be something like /home/jane/.praat-dir/message.
* On Windows, the name will be something like C:\Users\Jane\Praat\Message.txt,
* or C:\Windows\Praat\Message.txt on older systems.
* On Macintosh, the text is NOT going to be sent in a file.
*/
#if gtk
if ((home = getenv ("HOME")) == NULL) {
sprintf (errorMessage, "HOME environment variable not set.");
return errorMessage;
}
sprintf (messageFileName, "%s/.%s-dir/message", home, programName);
#elif win
if (GetEnvironmentVariableA ("USERPROFILE", homeDirectory, 255)) {
; /* Ready. */
} else if (GetEnvironmentVariableA ("HOMEDRIVE", homeDirectory, 255)) {
GetEnvironmentVariableA ("HOMEPATH", homeDirectory + strlen (homeDirectory), 255);
} else {
GetWindowsDirectoryA (homeDirectory, 255);
}
sprintf (messageFileName, "%s\\%s\\Message.txt", homeDirectory, programName);
#endif
/*
* Save the message file (Unix and Windows only).
*/
#if gtk || win
{
FILE *messageFile;
if ((messageFile = fopen (messageFileName, "w")) == NULL) {
sprintf (errorMessage, "Cannot create message file \"%s\" "
"(no privilege to write to directory, or disk full, or program is not called %s).\n", messageFileName, programName);
return errorMessage;
}
#if gtk
if (timeOut)
fprintf (messageFile, "#%ld\n", (long) getpid ()); /* Write own process ID for callback. */
#endif
fprintf (messageFile, "%s", text);
fclose (messageFile);
}
#endif
/*
* Where shall we send the message?
*/
#if gtk
/*
* Get the process ID and the window ID of a running Praat-shell program.
*/
sprintf (pidFileName, "%s/.%s-dir/pid", home, programName);
if ((pidFile = fopen (pidFileName, "r")) == NULL) {
sprintf (errorMessage, "Program %s not running.", programName);
return errorMessage;
}
if (fscanf (pidFile, "%ld%ld", & pid, & wid) < 1) {
fclose (pidFile);
sprintf (errorMessage, "Program %s not running, or disk has been full.", programName);
return errorMessage;
}
fclose (pidFile);
#elif win
/*
* Get the window handle of the "Objects" window of a running Praat-shell program.
*/
sprintf (windowName, "PraatShell1 %s", programName);
window = FindWindowA (windowName, NULL);
if (! window) {
sprintf (errorMessage, "Program %s not running (or an old version).", programName);
return errorMessage;
}
#elif mac
/*
* Convert the program name to a Macintosh signature.
* I know of no system routine for this, so I'll just translate the two most common names:
*/
if (! strcmp (programName, "praat") || ! strcmp (programName, "Praat") || ! strcmp (programName, "PRAAT"))
signature = 'PpgB';
else if (! strcmp (programName, "als") || ! strcmp (programName, "Als") || ! strcmp (programName, "ALS"))
signature = 'CclA';
else
signature = 0;
AECreateDesc (typeApplSignature, & signature, 4, & programDescriptor);
#endif
/*
* Send the message.
*/
#if gtk
/*
* Be ready to receive notification of completion.
*/
if (timeOut)
signal (SIGUSR2, handleCompletion);
/*
* Notify running program.
*/
if (wid != 0) { /* Praat shell version October 21, 1998 or later? Send event to window. */
/*
* Notify main window.
*/
GdkEventClient gevent;
g_type_init ();
int displaySupplied = display != NULL;
if (! displaySupplied) {
display = gdk_display_open (getenv ("DISPLAY")); /* GdkDisplay* */
if (display == NULL) {
sprintf (errorMessage, "Cannot open display %s", getenv ("DISPLAY"));
return errorMessage;
}
}
gevent. type = GDK_CLIENT_EVENT;
gevent. window = 0;
gevent. send_event = 1;
gevent. message_type = gdk_atom_intern_static_string ("SENDPRAAT");
gevent. data_format = 8;
if (! gdk_event_send_client_message_for_display (display, (GdkEvent *) & gevent, wid)) {
if (! displaySupplied) gdk_display_close (display);
sprintf (errorMessage, "Cannot send message to %s (window %ld). "
"The program %s may have been started by a different user, "
"or may have crashed.", programName, wid, programName);
return errorMessage;
}
if (! displaySupplied) gdk_display_close (display);
}
/*
* Wait for the running program to notify us of completion,
* but do not wait for more than 'timeOut' seconds.
*/
if (timeOut) {
signal (SIGALRM, handleTimeOut);
alarm (timeOut);
theTimeOut = timeOut; /* Hand an argument to handleTimeOut () in a static variable. */
errorMessage [0] = '\0';
pause ();
if (errorMessage [0] != '\0') return errorMessage;
}
#elif win
/*
* Notify the running program by sending a WM_USER message to its main window.
*/
if (SendMessage (window, WM_USER, 0, 0)) {
sprintf (errorMessage, "Program %s returns error.", programName); /* BUG? */
return errorMessage;
}
#elif mac
/*
* Notify the running program by sending it an Apple event of the magic class 758934755.
*/
AECreateAppleEvent (758934755, 0, & programDescriptor, kAutoGenerateReturnID, 1, & event);
AEPutParamPtr (& event, 1, typeChar, text, strlen (text) + 1);
#ifdef __MACH__
err = AESendMessage (& event, & reply,
( timeOut == 0 ? kAENoReply : kAEWaitReply ) | kAECanInteract | kAECanSwitchLayer,
timeOut == 0 ? kNoTimeOut : 60 * timeOut);
#else
err = AESend (& event, & reply,
( timeOut == 0 ? kAENoReply : kAEWaitReply ) | kAECanInteract | kAECanSwitchLayer,
kAENormalPriority, timeOut == 0 ? kNoTimeOut : 60 * timeOut, NULL, NULL);
#endif
if (err != noErr) {
if (err == procNotFound || err == connectionInvalid)
sprintf (errorMessage, "Could not send message to program \"%s\".\n"
"The program is probably not running (or an old version).", programName);
else if (err == errAETimeout)
sprintf (errorMessage, "Message to program \"%s\" timed out "
"after %ld seconds, before completion.", programName, timeOut);
else
sprintf (errorMessage, "Unexpected sendpraat error %d.\nNotify the author.", err);
}
AEDisposeDesc (& programDescriptor);
AEDisposeDesc (& event);
AEDisposeDesc (& reply);
#endif
/*
* Notify the caller of success (NULL pointer) or failure (string with an error message).
*/
return errorMessage [0] == '\0' ? NULL : errorMessage;
}
void
window_open_display_cmd_callback (GtkAction *action,
gpointer data)
{
GtkWidget *widget;
GtkWidget *dialog;
GtkWidget *entry;
return_if_no_widget (widget, data);
dialog = gimp_message_dialog_new ("Open Display", GIMP_STOCK_WILBER_EEK,
widget, GTK_DIALOG_MODAL,
NULL, NULL,
GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL,
GTK_STOCK_OK, GTK_RESPONSE_OK,
NULL);
gtk_dialog_set_alternative_button_order (GTK_DIALOG (dialog),
GTK_RESPONSE_OK,
GTK_RESPONSE_CANCEL,
-1);
gimp_message_box_set_primary_text (GIMP_MESSAGE_DIALOG (dialog)->box,
"Experimental multi-display stuff!\n"
"Click OK and have fun crashing GIMP...");
gimp_message_box_set_text (GIMP_MESSAGE_DIALOG (dialog)->box,
"Please enter the name of the new display:");
entry = gtk_entry_new ();
gtk_entry_set_activates_default (GTK_ENTRY (entry), TRUE);
gtk_box_pack_start (GTK_BOX (GIMP_MESSAGE_DIALOG (dialog)->box), entry,
TRUE, TRUE, 0);
gtk_widget_grab_focus (entry);
gtk_widget_show_all (dialog);
while (gtk_dialog_run (GTK_DIALOG (dialog)) == GTK_RESPONSE_OK)
{
gchar *screen_name;
screen_name = gtk_editable_get_chars (GTK_EDITABLE (entry), 0, -1);
if (strcmp (screen_name, ""))
{
GdkDisplay *display;
gtk_widget_set_sensitive (dialog, FALSE);
display = gdk_display_open (screen_name);
if (! display)
gimp_message_box_set_text (GIMP_MESSAGE_DIALOG (dialog)->box,
"Can't open display '%s'. "
"Please try another one:",
screen_name);
g_free (screen_name);
gtk_widget_set_sensitive (dialog, TRUE);
if (display)
break;
}
gtk_widget_grab_focus (entry);
}
gtk_widget_destroy (dialog);
}
int
main (int argc, char *argv[])
{
GtkWidget *dialog, *display_entry, *dialog_label;
GtkWidget *entry, *entry2;
GtkWidget *content_area;
GdkDisplay *dpy2;
GdkScreen *scr2 = NULL; /* Quiet GCC */
gboolean correct_second_display = FALSE;
gtk_init (&argc, &argv);
if (argc == 2)
screen2_name = g_strdup (argv[1]);
/* Get the second display information */
dialog = gtk_dialog_new_with_buttons ("Second Display Selection",
NULL,
GTK_DIALOG_MODAL,
GTK_STOCK_OK,
GTK_RESPONSE_OK, NULL);
gtk_dialog_set_default_response (GTK_DIALOG (dialog), GTK_RESPONSE_OK);
display_entry = gtk_entry_new ();
gtk_entry_set_activates_default (GTK_ENTRY (display_entry), TRUE);
dialog_label =
gtk_label_new ("Please enter the name of\nthe second display\n");
content_area = gtk_dialog_get_content_area (GTK_DIALOG (dialog));
gtk_container_add (GTK_CONTAINER (content_area), dialog_label);
gtk_container_add (GTK_CONTAINER (content_area), display_entry);
g_signal_connect (dialog, "response",
G_CALLBACK (get_screen_response), display_entry);
gtk_widget_grab_focus (display_entry);
gtk_widget_show_all (gtk_bin_get_child (GTK_BIN (dialog)));
while (!correct_second_display)
{
if (screen2_name)
{
if (!g_ascii_strcasecmp (screen2_name, ""))
g_printerr ("No display name, reverting to default display\n");
dpy2 = gdk_display_open (screen2_name);
if (dpy2)
{
scr2 = gdk_display_get_default_screen (dpy2);
correct_second_display = TRUE;
}
else
{
char *error_msg =
g_strdup_printf ("Can't open display :\n\t%s\nplease try another one\n",
screen2_name);
gtk_label_set_text (GTK_LABEL (dialog_label), error_msg);
g_free (error_msg);
}
}
if (!correct_second_display)
gtk_dialog_run (GTK_DIALOG (dialog));
}
gtk_widget_destroy (dialog);
entry = g_object_new (GTK_TYPE_ENTRY,
"activates_default", TRUE,
"visible", TRUE,
NULL);
entry2 = g_object_new (GTK_TYPE_ENTRY,
"activates_default", TRUE,
"visible", TRUE,
NULL);
/* for default display */
make_selection_dialog (NULL, entry2, entry);
/* for selected display */
make_selection_dialog (scr2, entry, entry2);
gtk_main ();
return 0;
}
