af6c2fd881
This program has never worked very well, and it may still not work very well. This commit removes the ancient C++ headers and uses modern replacements with some changes required due to the different interfaces. It builds a lot cleaner, and no longer does stupid things like deleteing char *, ostream.str()'s, and the like. This program could be really useful if it worked well. Some thought should be givien in the future to decouple this SW from dtappbuilder and maybe just rewrite from scratch.
404 lines
12 KiB
Plaintext
404 lines
12 KiB
Plaintext
/*** DTB_USER_CODE_START vvv Add file header below vvv ***/
|
|
//%% (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.
|
|
//%% $XConsortium: stringChooser_stubs.C.src /main/3 1995/11/06 17:13:57 rswiston $
|
|
/*** DTB_USER_CODE_END ^^^ Add file header above ^^^ ***/
|
|
|
|
/*
|
|
* File: stringChooser_stubs.c
|
|
* Contains: Module callbacks and connection functions
|
|
*
|
|
* This file was generated by dtcodegen, from module stringChooser
|
|
*
|
|
* Any text may be added between the DTB_USER_CODE_START and
|
|
* DTB_USER_CODE_END comments (even non-C code). Descriptive comments
|
|
* are provided only as an aid.
|
|
*
|
|
* ** EDIT ONLY WITHIN SECTIONS MARKED WITH DTB_USER_CODE COMMENTS. **
|
|
* ** ALL OTHER MODIFICATIONS WILL BE OVERWRITTEN. DO NOT MODIFY OR **
|
|
* ** DELETE THE GENERATED COMMENTS! **
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <Xm/Xm.h>
|
|
#include "dtb_utils.h"
|
|
#include "stringChooser_ui.h"
|
|
|
|
/*
|
|
* Header files for cross-module connections
|
|
*/
|
|
#include "ttsnoop_ui.h"
|
|
|
|
|
|
/**************************************************************************
|
|
*** DTB_USER_CODE_START
|
|
***
|
|
*** All necessary header files have been included.
|
|
***
|
|
*** Add include files, types, macros, externs, and user functions here.
|
|
***/
|
|
|
|
#include <Xm/TextF.h>
|
|
|
|
#include <fstream>
|
|
|
|
#include "DtTt.h"
|
|
|
|
extern ofstream snoopStream;
|
|
|
|
void
|
|
_DtStringChooserSet(
|
|
_DtStringChooserAction choice,
|
|
void * entity,
|
|
const char * val
|
|
)
|
|
{
|
|
DtbStringChooserStringChooserInfo instance =
|
|
&dtb_string_chooser_string_chooser;
|
|
if (! instance->initialized) {
|
|
dtb_string_chooser_string_chooser_initialize(
|
|
instance, dtb_ttsnoop_ttsnoop_win.ttsnoopWin );
|
|
}
|
|
if ((! tt_is_err( tt_ptr_error( val ))) && (val != 0)) {
|
|
XmTextFieldSetString( instance->stringText, (char *)val );
|
|
}
|
|
_DtStringChooserSet( choice, entity );
|
|
}
|
|
|
|
void
|
|
_DtStringChooserSet(
|
|
_DtStringChooserAction choice,
|
|
void * entity
|
|
)
|
|
{
|
|
char *okString;
|
|
char *title;
|
|
char *valueLabel;
|
|
switch (choice) {
|
|
case _DtStringChoosePatternOp:
|
|
okString = "Add";
|
|
title = "tt_pattern_op_add";
|
|
valueLabel = "Op:";
|
|
break;
|
|
case _DtStringChoosePatternOtype:
|
|
okString = "Add";
|
|
title = "tt_pattern_otype_add";
|
|
valueLabel = "Otype:";
|
|
break;
|
|
case _DtStringChoosePatternObject:
|
|
okString = "Add";
|
|
title = "tt_pattern_object_add";
|
|
valueLabel = "Object:";
|
|
break;
|
|
case _DtStringChoosePatternSenderPtype:
|
|
okString = "Add";
|
|
title = "tt_pattern_sender_ptype_add";
|
|
valueLabel = "Ptype:";
|
|
break;
|
|
case _DtStringChooseMessageOtype:
|
|
okString = "Set";
|
|
title = "tt_message_otype_set";
|
|
valueLabel = "Otype:";
|
|
break;
|
|
case _DtStringChooseMessageObject:
|
|
okString = "Set";
|
|
title = "tt_message_object_set";
|
|
valueLabel = "Object:";
|
|
break;
|
|
case _DtStringChooseMessageSenderPtype:
|
|
okString = "Set";
|
|
title = "tt_message_sender_ptype_set";
|
|
valueLabel = "Ptype:";
|
|
break;
|
|
case _DtStringChooseMessageHandlerPtype:
|
|
okString = "Set";
|
|
title = "tt_message_handler_ptype_set";
|
|
valueLabel = "Ptype:";
|
|
break;
|
|
case _DtStringChooseMessageStatusString:
|
|
okString = "Set";
|
|
title = "tt_message_status_string_set";
|
|
valueLabel = "String:";
|
|
break;
|
|
case _DtStringChooseMessageArgValSet:
|
|
okString = "Set...";
|
|
title = "tt_message_arg_val_set";
|
|
valueLabel = "Arg:";
|
|
break;
|
|
case _DtStringChoosePtype2Declare:
|
|
okString = "Declare";
|
|
title = "tt_ptype_declare";
|
|
valueLabel = "Ptype:";
|
|
break;
|
|
case _DtStringChooseMediaPtype2Declare:
|
|
okString = "Undeclare";
|
|
title = "ttmedia_ptype_undeclare";
|
|
valueLabel = "Ptype:";
|
|
break;
|
|
case _DtStringChoosePtype2UnDeclare:
|
|
okString = "Undeclare";
|
|
title = "tt_ptype_undeclare";
|
|
valueLabel = "Ptype:";
|
|
break;
|
|
case _DtStringChoosePtype2SetDefault:
|
|
okString = "Set";
|
|
title = "tt_default_ptype_set";
|
|
valueLabel = "Ptype:";
|
|
break;
|
|
case _DtStringChoosePtype2Exists:
|
|
okString = "Exists?";
|
|
title = "tt_ptype_exists";
|
|
valueLabel = "Ptype:";
|
|
break;
|
|
case _DtStringChooseSystem:
|
|
okString = "system()";
|
|
title = "system(3C)";
|
|
valueLabel = "Command:";
|
|
break;
|
|
case _DtStringChoosePutenv:
|
|
okString = "putenv()";
|
|
title = "putenv(3C)";
|
|
valueLabel = "variable=value:";
|
|
break;
|
|
case _DtStringChooseNetfile2File:
|
|
okString = "File";
|
|
title = "tt_netfile_file";
|
|
valueLabel = "Netfile:";
|
|
break;
|
|
default:
|
|
return;
|
|
}
|
|
DtbStringChooserStringChooserInfo instance =
|
|
&dtb_string_chooser_string_chooser;
|
|
if (! instance->initialized) {
|
|
dtb_string_chooser_string_chooser_initialize(
|
|
instance, dtb_ttsnoop_ttsnoop_win.ttsnoopWin );
|
|
}
|
|
DtTtSetLabel( instance->stringOkButton, okString );
|
|
DtTtSetLabel( instance->stringText_label, valueLabel );
|
|
XtVaSetValues( instance->stringChooser, XmNtitle, title, NULL );
|
|
// Remember dialog mode, entity
|
|
XtVaSetValues( instance->stringOkButton, XmNuserData, choice, NULL );
|
|
XtVaSetValues( instance->stringCancelButton, XmNuserData, entity, NULL );
|
|
XmTextPosition last = XmTextFieldGetLastPosition( instance->stringText );
|
|
Time when = XtLastTimestampProcessed( XtDisplay( instance->stringText ));
|
|
XmTextFieldSetSelection( instance->stringText, 0, last, when );
|
|
XtManageChild( instance->stringChooser_shellform );
|
|
}
|
|
|
|
/*** DTB_USER_CODE_END
|
|
***
|
|
*** End of user code section
|
|
***
|
|
**************************************************************************/
|
|
|
|
|
|
|
|
void
|
|
stringChooser_stringCancelButton_CB1(
|
|
Widget widget,
|
|
XtPointer clientData,
|
|
XtPointer callData
|
|
)
|
|
{
|
|
/*** DTB_USER_CODE_START vvv Add C variables and code below vvv ***/
|
|
/*** DTB_USER_CODE_END ^^^ Add C variables and code above ^^^ ***/
|
|
|
|
DtbStringChooserStringChooserInfo instance = (DtbStringChooserStringChooserInfo)clientData;
|
|
|
|
if (!(instance->initialized))
|
|
{
|
|
dtb_string_chooser_string_chooser_initialize(instance, dtb_ttsnoop_ttsnoop_win.ttsnoopWin);
|
|
}
|
|
XtUnmanageChild(instance->stringChooser_shellform);
|
|
|
|
/*** DTB_USER_CODE_START vvv Add C code below vvv ***/
|
|
/*** DTB_USER_CODE_END ^^^ Add C code above ^^^ ***/
|
|
}
|
|
|
|
|
|
void
|
|
stringOkayed(
|
|
Widget widget,
|
|
XtPointer clientData,
|
|
XtPointer callData
|
|
)
|
|
{
|
|
/*** DTB_USER_CODE_START vvv Add C variables and code below vvv ***/
|
|
/*** DTB_USER_CODE_END ^^^ Add C variables and code above ^^^ ***/
|
|
|
|
/*** DTB_USER_CODE_START vvv Add C code below vvv ***/
|
|
DtbStringChooserStringChooserInfo instance =
|
|
(DtbStringChooserStringChooserInfo)clientData;
|
|
char *string = XmTextFieldGetString( instance->stringText );
|
|
if ((string != 0) && (string[0] == '\0')) {
|
|
XtFree( string );
|
|
string = 0;
|
|
}
|
|
XtPointer val;
|
|
XtVaGetValues( instance->stringOkButton, XmNuserData, &val, NULL );
|
|
_DtStringChooserAction choice = (_DtStringChooserAction) (long) val;
|
|
XtVaGetValues( instance->stringCancelButton, XmNuserData, &val, NULL );
|
|
Widget label = dtb_ttsnoop_ttsnoop_win.ttsnoopWin_label;
|
|
switch (choice) {
|
|
Tt_status status;
|
|
int ival;
|
|
char *file;
|
|
case _DtStringChoosePatternOp:
|
|
case _DtStringChoosePatternOtype:
|
|
case _DtStringChoosePatternObject:
|
|
case _DtStringChoosePatternSenderPtype:
|
|
_DtTtPatternUpdate( (Tt_pattern)val, choice, string );
|
|
break;
|
|
case _DtStringChooseMessageOtype:
|
|
case _DtStringChooseMessageObject:
|
|
case _DtStringChooseMessageSenderPtype:
|
|
case _DtStringChooseMessageHandlerPtype:
|
|
case _DtStringChooseMessageStatusString:
|
|
case _DtStringChooseMessageArgValSet:
|
|
_DtTtMessageUpdate( (Tt_message)val, choice, string );
|
|
break;
|
|
case _DtStringChoosePtype2Declare:
|
|
status = tt_ptype_declare( string );
|
|
DtTtSetLabel( label, "tt_ptype_declare()", status );
|
|
break;
|
|
case _DtStringChooseMediaPtype2Declare:
|
|
// XXX prompt for base_opnum
|
|
status = ttmedia_ptype_declare( string, 0, _DtTtMediaLoadPatCb,
|
|
0, 1 );
|
|
DtTtSetLabel( label, "ttmedia_ptype_declare()", status );
|
|
break;
|
|
case _DtStringChoosePtype2UnDeclare:
|
|
status = tt_ptype_undeclare( string );
|
|
DtTtSetLabel( label, "tt_ptype_undeclare()", status );
|
|
break;
|
|
case _DtStringChoosePtype2SetDefault:
|
|
status = tt_default_ptype_set( string );
|
|
DtTtSetLabel( label, "tt_default_ptype_set()", status );
|
|
break;
|
|
case _DtStringChoosePtype2Exists:
|
|
status = tt_ptype_exists( string );
|
|
DtTtSetLabel( label, "tt_ptype_exists()", status );
|
|
break;
|
|
case _DtStringChooseSystem:
|
|
ival = system( string );
|
|
DtTtSetLabel( label, "system()", ival );
|
|
break;
|
|
case _DtStringChoosePutenv:
|
|
ival = putenv( string );
|
|
DtTtSetLabel( label, "putenv()", ival );
|
|
break;
|
|
case _DtStringChooseNetfile2File:
|
|
file = tt_netfile_file( string );
|
|
DtTtSetLabel( label, "tt_netfile_file()", file );
|
|
if (! tt_is_err( tt_ptr_error( file ))) {
|
|
snoopStream << "tt_netfile_file( \"" << string
|
|
<< "\" ) = \"" << file << "\"" << endl;
|
|
}
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
if (string != 0) {
|
|
XtFree( string );
|
|
}
|
|
XtUnmanageChild( instance->stringChooser_shellform );
|
|
/*** DTB_USER_CODE_END ^^^ Add C code above ^^^ ***/
|
|
}
|
|
|
|
|
|
void
|
|
stringHelp(
|
|
Widget widget,
|
|
XtPointer clientData,
|
|
XtPointer callData
|
|
)
|
|
{
|
|
/*** DTB_USER_CODE_START vvv Add C variables and code below vvv ***/
|
|
/*** DTB_USER_CODE_END ^^^ Add C variables and code above ^^^ ***/
|
|
|
|
/*** DTB_USER_CODE_START vvv Add C code below vvv ***/
|
|
DtbStringChooserStringChooserInfo instance =
|
|
(DtbStringChooserStringChooserInfo)clientData;
|
|
XtPointer val;
|
|
XtVaGetValues( instance->stringOkButton, XmNuserData, &val, NULL );
|
|
_DtStringChooserAction choice = (_DtStringChooserAction) (long) val;
|
|
Widget label = dtb_ttsnoop_ttsnoop_win.ttsnoopWin_label;
|
|
switch (choice) {
|
|
case _DtStringChoosePatternOp:
|
|
_DtMan( label, "tt_pattern_op_add" );
|
|
break;
|
|
case _DtStringChoosePatternOtype:
|
|
_DtMan( label, "tt_pattern_otype_add" );
|
|
break;
|
|
case _DtStringChoosePatternObject:
|
|
_DtMan( label, "tt_pattern_object_add" );
|
|
break;
|
|
case _DtStringChoosePatternSenderPtype:
|
|
_DtMan( label, "tt_pattern_sender_ptype_add" );
|
|
break;
|
|
case _DtStringChooseMessageOtype:
|
|
_DtMan( label, "tt_message_otype_set" );
|
|
break;
|
|
case _DtStringChooseMessageObject:
|
|
_DtMan( label, "tt_message_object_set" );
|
|
break;
|
|
case _DtStringChooseMessageSenderPtype:
|
|
_DtMan( label, "tt_message_sender_ptype_set" );
|
|
break;
|
|
case _DtStringChooseMessageHandlerPtype:
|
|
_DtMan( label, "tt_message_handler_ptype_set" );
|
|
break;
|
|
case _DtStringChooseMessageStatusString:
|
|
_DtMan( label, "tt_message_status_string_set" );
|
|
break;
|
|
case _DtStringChooseMessageArgValSet:
|
|
_DtMan( label, "tt_message_arg_val_set" );
|
|
break;
|
|
case _DtStringChoosePtype2Declare:
|
|
_DtMan( label, "tt_ptype_declare" );
|
|
break;
|
|
case _DtStringChooseMediaPtype2Declare:
|
|
_DtMan( label, "ttmedia_ptype_declare" );
|
|
break;
|
|
case _DtStringChoosePtype2UnDeclare:
|
|
_DtMan( label, "tt_ptype_undeclare" );
|
|
break;
|
|
case _DtStringChoosePtype2SetDefault:
|
|
_DtMan( label, "tt_default_ptype_set" );
|
|
break;
|
|
case _DtStringChoosePtype2Exists:
|
|
_DtMan( label, "tt_ptype_exists" );
|
|
break;
|
|
case _DtStringChooseSystem:
|
|
_DtMan( label, "system" );
|
|
break;
|
|
case _DtStringChoosePutenv:
|
|
_DtMan( label, "putenv" );
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
/*** DTB_USER_CODE_END ^^^ Add C code above ^^^ ***/
|
|
}
|
|
|
|
|
|
|
|
/**************************************************************************
|
|
*** DTB_USER_CODE_START
|
|
***
|
|
*** All automatically-generated data and functions have been defined.
|
|
***
|
|
*** Add new functions here, or at the top of the file.
|
|
***/
|
|
|
|
/*** DTB_USER_CODE_END
|
|
***
|
|
*** End of user code section
|
|
***
|
|
**************************************************************************/
|
|
|
|
|