Initial import of the CDE 2.1.30 sources from the Open Group.

cde/examples/tt/Makefile.hp

@@ -0,0 +1,45 @@
+# $XConsortium: Makefile.hp /main/2 1996/05/13 12:02:22 drk $
+##########################################################################
+#
+#  Makefile for ToolTalk examples (HP)
+#
+#  (c) Copyright 1993, 1994 Hewlett-Packard Company	
+#  (c) Copyright 1993, 1994 International Business Machines Corp.
+#  (c) Copyright 1993, 1994 Sun Microsystems, Inc.
+#  (c) Copyright 1993, 1994 Novell, Inc.
+#
+##########################################################################
+
+CC		= cc
+RM		= rm -f
+
+PROGRAM		= broadcast
+SOURCES		= broadcast.c
+OBJECTS		= broadcast.o
+
+DEFINES		= -D_HPUX_SOURCE
+CDEBUGFLAGS	= -O
+CFLAGS		= -Aa -z $(DEFINES) $(CDEBUGFLAGS)
+
+DTINCLUDE	= -I/usr/dt/include
+X11INCLUDE	= -I/usr/include/X11R5
+
+INCLUDES	= $(DTINCLUDE) $(X11INCLUDE)
+
+DTLIBS		= -L/usr/dt/lib -ltt -lXm
+X11LIBS		= -L/usr/lib/X11R5 -lXt -lX11
+SYSLIBS		=
+
+LIBRARIES	= $(DTLIBS) $(X11LIBS) $(SYSLIBS)
+LDFLAGS		=
+
+.c.o:
+	${CC} -c $(CFLAGS) $(INCLUDES) $<
+
+all::	$(PROGRAM)
+
+$(PROGRAM)::	$(OBJECTS)
+	${CC} -o $(PROGRAM) $(LDFLAGS) $(OBJECTS) $(LIBRARIES)
+
+clean::
+	${RM} $(PROGRAM) $(OBJECTS)

cde/examples/tt/Makefile.ibm

@@ -0,0 +1,45 @@
+# $XConsortium: Makefile.ibm /main/2 1996/05/13 12:02:39 drk $
+##########################################################################
+#
+#  Makefile for ToolTalk examples (IBM)
+#
+#  (c) Copyright 1993, 1994 Hewlett-Packard Company	
+#  (c) Copyright 1993, 1994 International Business Machines Corp.
+#  (c) Copyright 1993, 1994 Sun Microsystems, Inc.
+#  (c) Copyright 1993, 1994 Novell, Inc.
+#
+##########################################################################
+
+CC		= cc
+RM		= rm -f
+
+PROGRAM		= broadcast
+SOURCES		= broadcast.c
+OBJECTS		= broadcast.o
+
+DEFINES		= 
+CDEBUGFLAGS	= -O
+CFLAGS		= $(DEFINES) $(CDEBUGFLAGS)
+
+DTINCLUDE	= -I/usr/dt/include
+X11INCLUDE	= -I/usr/include
+
+INCLUDES	= $(DTINCLUDE) $(X11INCLUDE)
+
+DTLIBS		= -L/usr/dt/lib -ltt -lXm
+X11LIBS		= -L/usr/lib -lXt -lX11
+SYSLIBS		= 
+
+LIBRARIES	= $(DTLIBS) $(X11LIBS) $(SYSLIBS)
+LDFLAGS		= 
+
+.c.o:
+	$(CC) -c $(CFLAGS) $(INCLUDES) $<
+
+all::	$(PROGRAM)
+
+$(PROGRAM)::	$(OBJECTS)
+	$(CC) -o $(PROGRAM) $(LDFLAGS) $(OBJECTS) $(LIBRARIES)
+
+clean::
+	$(RM) $(PROGRAM) $(OBJECTS)

cde/examples/tt/Makefile.novell

@@ -0,0 +1,45 @@
+# $XConsortium: Makefile.novell /main/2 1996/05/13 12:02:56 drk $
+##########################################################################
+#
+#  Makefile for ToolTalk examples (Novell)
+#
+#  (c) Copyright 1993, 1994 Hewlett-Packard Company	
+#  (c) Copyright 1993, 1994 International Business Machines Corp.
+#  (c) Copyright 1993, 1994 Sun Microsystems, Inc.
+#  (c) Copyright 1993, 1994 Novell, Inc.
+#
+##########################################################################
+
+CC		= cc
+RM		= rm -f
+
+PROGRAM		= broadcast
+SOURCES		= broadcast.c
+OBJECTS		= broadcast.o
+
+DEFINES		= 
+CDEBUGFLAGS	= -O
+CFLAGS		= -Xc $(DEFINES) $(CDEBUGFLAGS)
+
+DTINCLUDE	= -I/usr/dt/include
+X11INCLUDE	= -I/usr/X/include
+
+INCLUDES	= $(DTINCLUDE) $(X11INCLUDE)
+
+DTLIBS		= -L/usr/dt/lib -ltt -lXm
+X11LIBS		= -L/usr/X/lib -lXt -lX11
+SYSLIBS		= -lw -lgen -lnsl -lresolv -lsocket -lXIM
+
+LIBRARIES	= $(DTLIBS) $(X11LIBS) $(SYSLIBS)
+LDFLAGS		= 
+
+.c.o:
+	$(CC) -c $(CFLAGS) $(INCLUDES) $<
+
+all::	$(PROGRAM)
+
+$(PROGRAM)::	$(OBJECTS)
+	$(CC) -o $(PROGRAM) $(LDFLAGS) $(OBJECTS) $(LIBRARIES)
+
+clean::
+	$(RM) $(PROGRAM) $(OBJECTS)

cde/examples/tt/Makefile.sun

@@ -0,0 +1,45 @@
+# $XConsortium: Makefile.sun /main/2 1996/05/13 12:03:13 drk $
+##########################################################################
+#
+#  Makefile for ToolTalk examples (SUN)
+#
+#  (c) Copyright 1993, 1994 Hewlett-Packard Company	
+#  (c) Copyright 1993, 1994 International Business Machines Corp.
+#  (c) Copyright 1993, 1994 Sun Microsystems, Inc.
+#  (c) Copyright 1993, 1994 Novell, Inc.
+#
+##########################################################################
+
+CC		= cc
+RM		= rm -f
+
+PROGRAM		= broadcast
+SOURCES		= broadcast.c
+OBJECTS		= broadcast.o
+
+DEFINES		= 
+CDEBUGFLAGS	= -O
+CFLAGS		= $(DEFINES) $(CDEBUGFLAGS)
+
+DTINCLUDE	= -I/usr/dt/include
+X11INCLUDE	= -I/usr/openwin/include
+
+INCLUDES	= $(DTINCLUDE) $(X11INCLUDE)
+
+DTLIBS		= -L/usr/dt/lib -ltt -lXm
+X11LIBS		= -L/usr/openwin/lib -lXt -lX11
+SYSLIBS		= -ldl -lw -lgen
+
+LIBRARIES	= $(DTLIBS) $(X11LIBS) $(SYSLIBS)
+LDFLAGS		= -R/usr/dt/lib:/usr/openwin/lib
+
+.c.o:
+	$(CC) -c $(CFLAGS) $(INCLUDES) $<
+
+all::	$(PROGRAM)
+
+$(PROGRAM)::	$(OBJECTS)
+	$(CC) -o $(PROGRAM) $(LDFLAGS) $(OBJECTS) $(LIBRARIES)
+
+clean::
+	$(RM) $(PROGRAM) $(OBJECTS)

cde/examples/tt/Makefile.uxp

@@ -0,0 +1,46 @@
+# $XConsortium: Makefile.uxp /main/2 1996/05/13 12:03:30 drk $
+##########################################################################
+#
+#  Makefile for ToolTalk examples (UXP)
+#
+#	(Fujitsu.patch applied)
+#
+#  (c) Copyright 1993, 1994 Hewlett-Packard Company	
+#  (c) Copyright 1993, 1994 International Business Machines Corp.
+#  (c) Copyright 1993, 1994 Sun Microsystems, Inc.
+#  (c) Copyright 1993, 1994 Novell, Inc.
+#
+##########################################################################
+
+CC		= cc
+RM		= rm -f
+
+PROGRAM		= broadcast
+SOURCES		= broadcast.c
+OBJECTS		= broadcast.o
+
+DEFINES		= 
+CDEBUGFLAGS	= -O
+CFLAGS		= -Xc $(DEFINES) $(CDEBUGFLAGS)
+
+DTINCLUDE	= -I/usr/dt/include
+
+INCLUDES	= $(DTINCLUDE) 
+
+DTLIBS		= -L/usr/dt/lib -ltt -lXm
+X11LIBS		= -lXt -lX11
+SYSLIBS		= -lw -lgen -lnsl -lresolv -lsocket 
+
+LIBRARIES	= $(DTLIBS) $(X11LIBS) $(SYSLIBS)
+LDFLAGS		= 
+
+.c.o:
+	$(CC) -c $(CFLAGS) $(INCLUDES) $<
+
+all::	$(PROGRAM)
+
+$(PROGRAM)::	$(OBJECTS)
+	$(CC) -o $(PROGRAM) $(LDFLAGS) $(OBJECTS) $(LIBRARIES)
+
+clean::
+	$(RM) $(PROGRAM) $(OBJECTS)

cde/examples/tt/README

@@ -0,0 +1,30 @@
+/* $XConsortium: */
+
+Introduction
+
+   The purpose of this demo program is to show the use of some ToolTalk
+   APIs.  In particular, this program creates and registers a pattern,
+   creates a notification message and sends it (to itself) and receives
+   a message.
+
+Building and Running the Demo Program
+
+   To build the demo program:
+
+      % make -f Makefile.<PLATFORM>
+
+	where <PLATFORM> is replaced with the name of your system's 
+	platform type.
+
+   To run the program:
+
+      % broadcast
+
+   When the "Broadcast" button is pressed, the program creates a
+   notifcation message, increments a counter for the number of messages
+   sent, sets the "Send" slider to the value of the counter and then
+   sends the message.
+
+   When the program receives a message, it updates the "Received"
+   slider to the number of messages received.
+

cde/examples/tt/broadcast.c

@@ -0,0 +1,262 @@
+/*
+ * (c) Copyright 1995 Digital Equipment Corporation.
+ * (c) Copyright 1993, 1994, 1995 Hewlett-Packard Company
+ * (c) Copyright 1993, 1994, 1995 International Business Machines Corp.
+ * (c) Copyright 1993, 1994, 1995 Sun Microsystems, Inc.
+ * (c) Copyright 1993, 1994, 1995 Novell, Inc. 
+ * (c) Copyright 1995 FUJITSU LIMITED.
+ * (c) Copyright 1995 Hitachi.
+ *
+ * $XConsortium: broadcast.c /main/4 1996/08/12 18:34:24 barstow $
+ *
+ * broadcast - dynamic pattern and procedural notification example
+ *
+ */
+
+#include <stdio.h>
+#include <sys/param.h>
+#include <sys/types.h>
+#include <string.h>
+#include <Xm/XmAll.h>
+#include <Tt/tt_c.h>
+
+Widget toplevel, base_frame, controls, slider, gauge, button;
+char *my_procid;
+
+void	broadcast_value();
+void	receive_tt_message();
+void	create_ui_components();
+
+
+void
+main(argc, argv)
+	int		argc;
+	char		**argv;
+{
+	int ttfd;
+	Tt_pattern pat;
+	XtAppContext app;
+
+	/*
+	 * Initialize Motif and create ui components
+	 */
+	toplevel = XtVaAppInitialize(&app, "ttsample1", NULL, 0,
+					&argc, argv, NULL, NULL);
+	XtVaSetValues(toplevel, XmNtitle, "ToolTalk Sample 1", 0);
+	create_ui_components();
+
+	/*
+	 * Initialize ToolTalk, using the initial default session, and
+	 * obtain the file descriptor that will become active whenever
+	 * ToolTalk has a message for this process.
+	 */
+
+	my_procid = tt_open();
+	ttfd = tt_fd();
+
+	/*
+	 * Arrange for Motif to call receive_tt_message when the ToolTalk
+	 * file descriptor becomes active.
+	 */
+
+	XtAppAddInput(app, ttfd, (XtPointer) XtInputReadMask,
+                      receive_tt_message, 0);
+
+	/*
+	 * Create and register a pattern so ToolTalk knows we are interested
+	 * in "ttsample1_value" messages within the session we join.
+	 */
+
+	pat = tt_pattern_create();
+	tt_pattern_category_set(pat, TT_OBSERVE);
+	tt_pattern_scope_add(pat, TT_SESSION);
+	tt_pattern_op_add(pat, "ttsample1_value");
+	tt_pattern_register(pat);
+
+	/*
+	 * Join the default session
+	 */
+
+	tt_session_join(tt_default_session());
+
+	/*
+	 * Turn control over to Motif.
+	 */
+	XtRealizeWidget(toplevel);
+	XtAppMainLoop(app);
+	
+	/*
+	 * Before leaving, allow ToolTalk to clean up.
+	 */
+	tt_close();
+
+	exit(0);
+}
+
+
+/*
+ * When the button is pressed, broadcast the new slider value.
+ */
+void
+broadcast_value(widget, client_data, call_data)
+	Widget widget;
+	XtPointer client_data, call_data;
+{
+	int slider_value;
+	Tt_message msg_out;
+
+	/*
+	 * Create and send a ToolTalk notice message
+	 * ttsample1_value(in int <new value)
+	 */
+
+	XtVaGetValues(slider, XmNvalue, &slider_value, 0);
+	slider_value++;
+	XtVaSetValues(slider, XmNvalue, slider_value, 0);
+
+	msg_out = tt_pnotice_create(TT_SESSION, "ttsample1_value");
+	tt_message_arg_add(msg_out, TT_IN, "integer", NULL);
+	tt_message_arg_ival_set(msg_out, 0, slider_value);
+	tt_message_send(msg_out);
+
+	/*
+	 * Since this message is a notice, we don't expect a reply, so
+	 * there's no reason to keep a handle for the message.
+	 */
+
+	tt_message_destroy(msg_out);
+}
+
+/*
+ * When a ToolTalk message is available, receive it; if it's a
+ * ttsample1_value message, update the gauge with the new value.
+ */
+void
+receive_tt_message(client_data, fid, id)
+XtPointer client_data;
+int *fid;
+XtInputId *id;
+{
+	Tt_message msg_in;
+	int mark;
+	int val_in;
+	char *op;
+	Tt_status err;
+
+	msg_in = tt_message_receive();
+
+	/*
+	 * It's possible that the file descriptor would become active
+	 * even though ToolTalk doesn't really have a message for us.
+	 * The returned message handle is NULL in this case.
+	 */
+
+	if (msg_in == NULL) return;
+
+
+	/*
+	 * Get a storage mark so we can easily free all the data
+	 * ToolTalk returns to us.
+	 */
+
+	mark = tt_mark();
+
+	op = tt_message_op(msg_in);
+	err = tt_ptr_error(op);
+	if (err > TT_WRN_LAST) {
+		printf( "tt_message_op(): %s\n", tt_status_message(err));
+	} else if (op != 0) {
+		if (0==strcmp("ttsample1_value", tt_message_op(msg_in))) {
+			tt_message_arg_ival(msg_in, 0, &val_in);
+			XtVaSetValues(gauge, XmNvalue, val_in, 0);
+		}
+	}
+
+	tt_message_destroy(msg_in);
+	tt_release(mark);
+	return;
+}
+	    
+/*
+ * Straight Motif calls for creating the ui elements.  No
+ * ToolTalk-specific code here.
+ */
+void
+create_ui_components()
+{
+	int decor;
+	Widget glabel, slabel;
+	XmString label;
+
+	base_frame = XtVaCreateManagedWidget("base_frame",
+                xmMainWindowWidgetClass, toplevel,
+                XmNwidth,                250,
+                XmNheight,               175,
+                0);
+	XtVaGetValues(base_frame, XmNmwmDecorations, &decor, 0);
+	decor &= ~MWM_DECOR_RESIZEH;
+	XtVaSetValues(base_frame, XmNmwmDecorations, &decor, 0);
+
+	controls = XtVaCreateManagedWidget("controls",
+                xmFormWidgetClass, base_frame, NULL, 0, 0);
+
+	slabel = XtVaCreateManagedWidget("Send:",
+                xmLabelWidgetClass, controls,
+                XmNleftAttachment,  XmATTACH_WIDGET,
+                XmNtopAttachment,   XmATTACH_WIDGET,
+                XmNtopWidget,       controls,
+		XmNtopOffset,		10,
+		XmNleftOffset,		5,
+                0);
+        slider = XtVaCreateManagedWidget("slider",
+                xmScaleWidgetClass, controls,
+                XmNleftAttachment,  XmATTACH_WIDGET,
+                XmNleftWidget,      controls,
+		XmNleftOffset,		10,
+                XmNtopAttachment,   XmATTACH_WIDGET,
+                XmNtopWidget,       slabel,
+                XmNscaleWidth,      225,
+                XmNscaleHeight,     18,
+                XmNminimum,         0,
+                XmNmaximum,         25,
+                XmNorientation,     XmHORIZONTAL,
+                XmNshowValue,       TRUE,
+                0);
+
+	glabel = XtVaCreateManagedWidget("Received:",
+                xmLabelWidgetClass, controls,
+                XmNleftAttachment,  XmATTACH_WIDGET,
+                XmNtopAttachment,   XmATTACH_WIDGET,
+		XmNleftOffset,		5,
+                XmNtopWidget,       slider,
+                0);
+	gauge = XtVaCreateManagedWidget("gauge",
+                xmScaleWidgetClass, controls,
+                XmNleftAttachment,  XmATTACH_WIDGET,
+                XmNleftWidget,      controls,
+		XmNleftOffset,		10,
+                XmNtopAttachment,   XmATTACH_WIDGET,
+                XmNtopWidget,       glabel,
+                XmNorientation,     XmHORIZONTAL,
+                XmNscaleWidth,      225,
+                XmNscaleHeight,     18,
+                XmNminimum,         0,
+                XmNmaximum,         25,
+                XmNshowValue,       TRUE,
+                0);
+
+	label = XmStringCreateSimple("Broadcast");
+	button = XtVaCreateManagedWidget("button",
+                xmPushButtonWidgetClass, controls,
+                XmNtopWidget,		gauge,
+                XmNtopAttachment,	XmATTACH_WIDGET,
+		XmNtopOffset,		5,
+		XmNleftOffset,		75,
+		XmNleftWidget,		controls,
+                XmNleftAttachment,  XmATTACH_WIDGET,
+		XmNbottomOffset,	5,
+                XmNlabelString, label,
+                0);
+	XmStringFree(label);
+	XtAddCallback(button, XmNactivateCallback, broadcast_value, 0);
+}