static void
OpenHost(Widget W, Widget w)
{
Widget Host;
Widget Port;
#ifdef DEBUG
printf("OpenHost(%s,%s) - %s %s\n", XtName(W), XtName(w), Host_Name(w), Host_Port(w));
#endif
Disconnect(w);
Host = XtNameToWidget(W, "*HostText");
Port = XtNameToWidget(W, "*PortText");
/* I should be able to free this but can't seem to on HP-UX!!
XtFree(Host_Name(w));
XtFree(Host_Port(w));
*/
Host_Name(w) = XmTextFieldGetString(Host);
Host_Port(w) = XmTextFieldGetString(Port);
/*
printf("Host (%s)>%s< Port (%s)>%s<\n", XtName(Host), Host_Name(w), XtName(Port), Host_Port(w));
*/
/*
Connect(w);
*/
XtAppAddTimeOut(XtWidgetToApplicationContext(w),
1000, (XtTimerCallbackProc)Connect, w);
}
static void
CursorBlinkCallback
(
Widget w,
XtPointer clientData,
XtPointer callData
)
{
OptionsDialogType *options = (OptionsDialogType *) clientData;
XmRowColumnCallbackStruct
*cb = (XmRowColumnCallbackStruct *) callData;
char buffer[BUFSIZ];
char *c1;
if (cb->widget == options->cursor.blink.on) {
(void) XtSetSensitive(options->cursor.blinkRate.label, True);
(void) XtSetSensitive(options->cursor.blinkRate.text, True);
c1 = XmTextFieldGetString(options->cursor.blinkRate.text);
if (atoi(c1) <= 0) {
if (options->cursor.blinkRate.oldBlinkRate <= 0) {
options->cursor.blinkRate.oldBlinkRate = 250;
}
(void) sprintf(buffer, "%d",
options->cursor.blinkRate.oldBlinkRate);
(void) XmTextFieldSetString(options->cursor.blinkRate.text, buffer);
}
} else {
(void) XtSetSensitive(options->cursor.blinkRate.label, False);
(void) XtSetSensitive(options->cursor.blinkRate.text, False);
c1 = XmTextFieldGetString(options->cursor.blinkRate.text);
options->cursor.blinkRate.oldBlinkRate = atoi(c1);
}
}
static void
PSCallback(Widget btn, XtPointer client, XtPointer call)
{
PlotDialogData *stuff = (PlotDialogData *) client;
char *filename;
#ifdef EXTRA_FANCY
char txt[1024],*ptr;
ptr=XmTextFieldGetString(stuff->label1);
strcpy(txt,ptr);
strcat(txt,"\n");
XtFree(ptr);
ptr=XmTextFieldGetString(stuff->label2);
strcat(txt,ptr);
strcat(txt,"\n\n");
XtFree(ptr);
ptr=XmTextFieldGetString(stuff->label3);
strcat(txt,ptr);
strcat(txt,"\n");
XtFree(ptr);
filename = XmTextFieldGetString(stuff->text);
if (strlen(filename) > 0)
SciPlotPSCreateFancy(stuff->plot,filename,
TRUE,txt,NULL);
XtFree(filename);
#else
filename = XmTextFieldGetString(stuff->text);
if (strlen(filename) > 0)
SciPlotPSCreateColor(stuff->plot,filename);
XtFree(filename);
#endif
}
/*
* set_opt --
* Send a set-edit-option message to core.
*/
static void
set_opt(Widget w, XtPointer closure, XtPointer call_data)
{
optData *opt;
Boolean set;
IP_BUF ipb;
String str;
extern IPVI ipvi_motif;
opt = closure;
ipb.code = VI_EDITOPT;
ipb.str1 = opt->name;
ipb.len1 = strlen(opt->name);
switch (opt->kind) {
case optToggle:
XtVaGetValues(w, XmNset, &set, 0);
ipb.val1 = set;
ipb.len2 = 0;
vi_wsend(&ipvi_motif, "ab1", &ipb);
if (ipb.val1) {
opt->value = (void *)!set;
/*
* RAZ:
* How do we turn off the button? We don't want to
* go recursive where we set it and it calls set_opt
* to tell the core. Is that possible?
*/
XtVaSetValues(w, XmNset, &set, 0);
break;
}
if (strcmp(opt->name, "ruler") == 0)
if (set)
__vi_show_text_ruler_dialog(
__vi_screen->area, "Ruler");
else
__vi_clear_text_ruler_dialog();
break;
case optInteger:
str = XmTextFieldGetString(w);
ipb.val1 = atoi(str);
ipb.len2 = 0;
vi_send(vi_ofd, "ab1", &ipb);
break;
case optFile:
case optString:
ipb.str2 = XmTextFieldGetString(w);
ipb.len2 = strlen(ipb.str2);
vi_send(vi_ofd, "ab1", &ipb);
break;
case optTerminator:
abort();
}
}
void update_callback(Widget widget, XtPointer client_data, XtPointer call_data) {
puts("Update was pressed.");
NodeInfoWidget *node_info_widget = (NodeInfoWidget *)client_data;
puts(XmTextFieldGetString(node_info_widget->index_widget));
puts(XmTextFieldGetString(node_info_widget->x_widget));
puts(XmTextFieldGetString(node_info_widget->y_widget));
puts(XmTextFieldGetString(node_info_widget->z_widget));
puts(XmTextFieldGetString(node_info_widget->code_widget));
}
void
Process_Size_OK( void )
{
char *widthStr, *heightStr;
int new_width, new_height;
XtUnmanageChild(newIconDialog);
widthStr = XmTextFieldGetString(newWidthText);
heightStr = XmTextFieldGetString(newHeightText);
new_width = atoi(widthStr);
new_height = atoi(heightStr);
Eval_NewSize(new_width, new_height);
DialogFlag = NONE;
}
int look_for_open_group_data(char *to) {
int i,found;
char temp1[MAX_CALLSIGN+1];
char *temp_ptr;
begin_critical_section(&send_message_dialog_lock, "messages.c:look_for_open_group_data" );
found = FALSE;
for(i = 0; i < MAX_MESSAGE_WINDOWS; i++) {
/* find station */
if(mw[i].send_message_dialog != NULL) {
temp_ptr = XmTextFieldGetString(mw[i].send_message_call_data);
xastir_snprintf(temp1,
sizeof(temp1),
"%s",
temp_ptr);
XtFree(temp_ptr);
(void)to_upper(temp1);
/*fprintf(stderr,"Looking at call <%s> for <%s>\n",temp1,to);*/
if(strcmp(temp1,to)==0) {
found=(int)TRUE;
break;
}
}
}
end_critical_section(&send_message_dialog_lock, "messages.c:look_for_open_group_data" );
return(found);
}
static void update_sources(Widget sources, Widget filter)
{
StatusDelay delay("Getting sources");
get_gdb_sources(all_sources);
String pattern_s = XmTextFieldGetString(filter);
string pattern = pattern_s;
XtFree(pattern_s);
strip_space(pattern);
if (pattern.empty())
pattern = "*";
XmTextFieldSetString(filter, XMST(pattern.chars()));
StringArray labels;
uniquify(all_sources, labels);
// Sort and remove duplicates
sort(labels, all_sources);
uniq(labels, all_sources);
// Filter pattern
filter_sources(labels, all_sources, pattern);
// Now set the selection.
bool *selected = new bool[labels.size()];
for (int i = 0; i < labels.size(); i++)
selected[i] = false;
setLabelList(sources, labels.values(),
selected, labels.size(), false, false);
delete[] selected;
}
void InvPartEditor::selectByNameCB(Widget widget, XtPointer client_data, XtPointer call_data)
{
char *name = XmTextFieldGetString(((InvPartEditor *)client_data)->partname_);
(void)widget;
(void)call_data;
((InvPartEditor *)client_data)->selectByName(name);
}
void InvPartEditor::referencePartNameCB(Widget widget, XtPointer client_data, XtPointer call_data)
{
char *name = XmTextFieldGetString(widget);
(void)call_data;
((InvPartEditor *)client_data)->selectReferenceByName(name);
}
void
lineTextFieldActivateCB( Widget w, XtPointer client_data,
XtPointer call_data)
{
short line, rows, cols;
int conv;
char *cb, *buf, *linestr;
Widget doc_w, line_w;
XmTextPosition pos;
cb = "lineTextFieldActivateCB";
doc_w = get_document_text(w, cb);
line_w = get_widget_by_name(w, cb, "lineTextField");
XtVaGetValues(doc_w,
XmNrows, &rows,
XmNcolumns, &cols,
NULL);
buf = XmTextGetString(doc_w);
linestr = XmTextFieldGetString(line_w);
conv = atoi(linestr);
if (conv > rows) {
manage_widget(w, cb, "lineOutOfRangeMessageBox");
goto Cleanup;
}
line = (short) conv;
pos = line_to_position(buf, line, rows, cols);
XmTextSetInsertionPosition(doc_w, pos);
Cleanup:
XtFree(linestr);
XtFree(buf);
}
/*ARGSUSED*/
static void
CommandCallback(
Widget w, /* unused */
XtPointer cl_data,
XtPointer call_data )
{
XmCommandWidget client_data = (XmCommandWidget) cl_data ;
XmCommandCallbackStruct cb;
char *str;
/****************/
cb.reason = XmCR_COMMAND_CHANGED;
cb.event = ((XmAnyCallbackStruct *) call_data)->event ;
/* get char* string from text and convert to XmString type */
str = XmTextFieldGetString (client_data->selection_box.text);
cb.value = XmStringGenerate(str, XmFONTLIST_DEFAULT_TAG,
XmCHARSET_TEXT, NULL);
XtFree (str);
cb.length = XmStringLength (cb.value);
XtCallCallbackList ((Widget) client_data, client_data->command.value_changed_callback, &cb);
XmStringFree (cb.value);
return ;
}
int CEdit::xd_get_window_text(LPSTR lpszStringBuf, int nMaxCount) const
{
// Implements GetWindowText() for XmText and XmTextField.
// Return value:
// 0 if the widget has not been created (no call to create() yet).
// The length of the text otherwise.
if (_xd_textwidget!=NULL)
{
char *s = (char *) 0 ;
if (XmIsText(_xd_textwidget))
s = XmTextGetString(_xd_textwidget);
else if (XmIsTextField(_xd_textwidget))
s = XmTextFieldGetString(_xd_textwidget);
if (s) {
(void) strncpy(lpszStringBuf, s, nMaxCount - 1);
XtFree(s);
lpszStringBuf[nMaxCount-1]='\0';
return strlen(lpszStringBuf);
}
}
return 0;
}
int CEdit::xd_get_window_text_length(void) const
{
// Implements GetWindowTextLength() for XmText and XmTextField
// Return value:
// 0 if the widget has not been created (no call to create() yet).
// The length of the text otherwise.
if (_xd_textwidget != NULL)
{
char *s = (char *) 0 ;
if (XmIsText(_xd_textwidget))
s = XmTextGetString(_xd_textwidget);
else if (XmIsTextField(_xd_textwidget))
s = XmTextFieldGetString(_xd_textwidget);
if (s) {
int length = strlen(s) ;
XtFree(s) ;
return length;
}
}
return 0;
}
/* ARGSUSED */
void mpcstw_defConCb ( Widget w, XtPointer clnt, XtPointer call )
/************************************************************************
* mpcstw_defConCb *
* *
* This is the callback for DEF proj content button *
* *
* void mpcstw_defConCb(w, data, call) *
* *
* Input parameters: *
* w Widget calling widget ID *
* clnt XtPointer client data *
* call XtPointer never used *
* *
* Output parameters: *
* Return parameters: *
* NONE *
* *
** *
* Log: *
* S. Wang/GSC 09/96 *
* C. Lin/EAI 02/97 add checking if text is NULL *
* C. Lin/EAI 07/97 call new mapw module *
* M. Li/GSC 03/01 removed mapw_getDEFproj *
***********************************************************************/
{
unsigned char shadow_char;
char *text;
XmString str_def_con;
/*---------------------------------------------------------------------*/
if ( XmToggleButtonGetState(_defaultBt) == FALSE )
return;
XtVaGetValues( _defaultConFrame,
XmNshadowType, &shadow_char,
NULL);
if ( shadow_char == XmSHADOW_OUT ) {
/*
* show the content of current DEF projection
*/
text = XmTextFieldGetString(_gareaTextW) ;
if ( strlen(text) != (size_t)0 ) {
XtFree(text);
str_def_con = XmStringCreateLocalized( _curDef );
XtVaSetValues(w,
XmNlabelString, str_def_con,
NULL);
XmStringFree(str_def_con);
XtVaSetValues(_defaultConFrame,
XmNshadowType, XmSHADOW_IN,
NULL);
}
}
else
mpcstw_resetDefCon();
}
static void
darkness_text_cb(Widget w, XtPointer client_data, XtPointer call_data)
{
char *text;
int val;
struct topic_info *info = (struct topic_info *)client_data;
struct prefs_choice *prefs = (struct prefs_choice *)(info->data);
#if USE_SPINBOX
/* synchronize internal spinbox value. Apparently this loses the insertion position,
so we need to save it and set it again. */
XmTextPosition pos = XmTextFieldGetInsertionPosition(w);
UNUSED(call_data);
text = XmTextFieldGetString(w);
val = strtol(text, (char **)NULL, 10);
if (val != 0) {
XtVaSetValues(w, XmNposition, val, NULL);
XmTextFieldSetInsertionPosition(w, pos);
}
#else
Widget text_field;
UNUSED(call_data);
XtVaGetValues(w, XmNuserData, &text_field, NULL);
XtVaGetValues(text_field, XmNvalue, &text, NULL);
val = strtol(text, (char **)NULL, 10);
#endif
if (XtIsRealized(w)) {
do_set_density(val / 100.0, True, False);
store_preference(&(prefs->db), "gamma", "%f", val / 100.0);
}
XtFree(text);
}
static void _RGISEditGridLayersYearTextCBK (Widget widget,char *yearText,XmAnyCallbackStruct *callData)
{
char *text = XmTextFieldGetString (widget);
strncpy (yearText,text,DBStringLength);
XtFree (text);
}
/*
* Callback for the add name button. This simply calls the blist_name_append
* function and adds the name to the UI.
*/
static void
blist_addname(Widget widget, XtPointer client_data, XtPointer cbs) {
char *new_name, *end_ptr, buf[MAXNAMELEN];
XEvent *e = ((XmAnyCallbackStruct *)cbs)->event;
XmString xmstr;
Calendar *c = (Calendar *)client_data;
Browselist *bl = (Browselist *)c->browselist;
int insert_location;
XtVaSetValues(bl->form, XmNresizePolicy, XmRESIZE_NONE, NULL);
bl_clear_pending_change(bl);
bl_list_is_changed(bl);
set_message(bl->message, " ");
new_name = XmTextFieldGetString(bl->username);
/* crush out leading white space for the name
comparison/insert process */
while ((*new_name == ' ') || (*new_name == '\t'))
new_name++;
/* compress off trailing whitespace */
end_ptr = new_name;
while (*end_ptr)
end_ptr++;
while ((end_ptr > new_name) &&
((*(end_ptr - 1) == ' ') || (*(end_ptr - 1) == '\t')))
end_ptr--;
*end_ptr = NULL;
if (blank_buf(new_name)) {
set_message(bl->message, catgets(c->DT_catd, 1, 603,
"Type a name to add in the User Name field"));
return;
}
if (embedded_blank(new_name)) {
set_message(bl->message, catgets(c->DT_catd, 1, 684,
"User Names may not have embedded blanks or tabs"));
return;
}
if ((insert_location = blist_name_append(c, new_name, BLIST_INSERT)) != -1) {
xmstr = XmStringCreateLocalized(new_name);
XmListAddItem(bl->browse_list, xmstr, insert_location);
XmStringFree(xmstr);
cm_select_text(bl->username, e->xbutton.time);
} else {
sprintf(buf, "%s %s", new_name,
catgets(c->DT_catd, 1, 604, "is already in the list"));
set_message(bl->message, buf);
}
XtVaSetValues(bl->form, XmNresizePolicy, XmRESIZE_ANY, NULL);
}
static int getTextField (Widget textField) {
int i = 0;
char *s = XmTextFieldGetString (textField);
if (sscanf (s, "%d", &i) == 0) /* no integer found, return zero */
i = 0;
XtFree (s);
return (i);
}
static void _UIDataHeaderTextFieldCBK(Widget widget, int *changed, XmAnyCallbackStruct *callData) {
char *text, *origText;
XtVaGetValues(widget, XmNuserData, &text, NULL);
origText = XmTextFieldGetString(widget);
*changed = strcmp(origText, text) == 0 ? false : true;
XtFree(origText);
}
static void
NEGetValue(Widget wid, int resource_offset, XtArgVal *value)
{
*value = (XtArgVal)XmTextFieldGetString(NumEntry_TextField(wid));
#ifdef DEBUG
printf("NumEntry - NEGetValue(%s) - >%s< >%s<\n", XtName(wid), *value, NumEntry_Value(wid));
#endif
}
static void
FPGetValue(Widget wid, int resource_offset, XtArgVal *value)
{
*value = (XtArgVal)XmTextFieldGetString(FilePicker_TextField(wid));
#ifdef DEBUG
printf("%s:FPGetValue(%d) - %s\n", __FILE__, __LINE__,
XtName(wid));
#endif
}
/******************************************************
audioSetupFilenameChangeCallback
******************************************************/
static void audioSetupFilenameChangeCallback( Widget widget,
XtPointer clientdata, XtPointer cbs)
{
char * string;
string = XmTextFieldGetString(widget);
audioSetupNewFilename(widget,string);
XtFree(string);
}
void ShowRateChangeDialog(struct rpar_object *rp,int focus)
{
Arg args[1];
char tempString[LINEMAX];
Widget focusTo;
XmString XmTemp;
char *insert;
int insertlen;
cur_rpar = rp;
if(cur_rpar != NULL)
{
XmTemp=XmStringCreate("Change Rate Parameter",XmSTRING_DEFAULT_CHARSET);
XtSetArg(args[0],XmNdialogTitle,XmTemp);
XtSetValues(rate_dlg,args,1);
if(cur_rpar->tag != NULL)
XmTextFieldSetString(rate_tag,cur_rpar->tag);
else
XmTextFieldSetString(rate_tag,"");
sprintf(tempString,"%f",cur_rpar->value);
XmTextFieldSetString(rate_rate,tempString);
switch(focus)
{
case 0:
focusTo=rate_tag;
break;
default:
focusTo=rate_rate;
}
}
else
{
XmTemp=XmStringCreate("Create Rate Parameter",XmSTRING_DEFAULT_CHARSET);
XtSetArg(args[0],XmNdialogTitle,XmTemp);
XtSetValues(rate_dlg,args,1);
XmTextFieldSetString(rate_tag,"");
XmTextFieldSetString(rate_rate,"");
focusTo = rate_tag;
}
XmStringFree(XmTemp);
XtManageChild(rate_dlg);
XmProcessTraversal(focusTo,XmTRAVERSE_CURRENT);
insert=XmTextFieldGetString(focusTo);
insertlen=strlen(insert);
XmTextFieldSetSelection(focusTo,0,insertlen,XtLastTimestampProcessed(XtDisplay(focusTo)));
XmTextFieldSetHighlight(focusTo,0,insertlen,XmHIGHLIGHT_SELECTED);
XtFree(insert);
}
static void load_callback( Widget w,
XtPointer data,
XmAnyCallbackStruct *cbs)
{
char *str;
str = XmTextFieldGetString((Widget)data);
anim_load(str);
XtFree(str);
}
static void script_callback( Widget w,
XtPointer data,
XmPushButtonCallbackStruct *cbs)
{
char *str;
str = XmTextFieldGetString((Widget)data);
anim_loadscript(str);
XtFree(str);
}
static char* motListGetValueAttrib(Ihandle* ih)
{
if (ih->data->has_editbox)
{
char *str, *xstr;
Widget cbedit;
XtVaGetValues(ih->handle, XmNtextField, &cbedit, NULL);
xstr = XmTextFieldGetString(cbedit);
str = iupStrGetMemoryCopy(xstr);
XtFree(xstr);
return str;
}
else
{
if (ih->data->is_dropdown)
{
char* str;
int pos;
XtVaGetValues(ih->handle, XmNselectedPosition, &pos, NULL);
str = iupStrGetMemory(50);
sprintf(str, "%d", pos+1); /* IUP starts at 1 */
return str;
}
else
{
int *pos, sel_count;
if (XmListGetSelectedPos(ih->handle, &pos, &sel_count)) /* XmListGetSelectedPos starts at 1 */
{
if (!ih->data->is_multiple)
{
char* str = iupStrGetMemory(50);
sprintf(str, "%d", pos[0]);
XtFree((char*)pos);
return str;
}
else
{
int i, count;
char* str;
XtVaGetValues(ih->handle, XmNitemCount, &count, NULL);
str = iupStrGetMemory(count+1);
memset(str, '-', count);
str[count]=0;
for (i=0; i<sel_count; i++)
str[pos[i]-1] = '+';
XtFree((char*)pos);
return str;
}
}
}
}
return NULL;
}
void print_result (Widget text_w, XtPointer client_data,
XtPointer call_data)
{
char *value = XmTextFieldGetString (text_w);
char *label = (char *) client_data;
printf ("%s %s\n", label, value);
XtFree (value);
XmProcessTraversal (text_w, XmTRAVERSE_NEXT_TAB_GROUP);
}
/* NOTE: caller must free memory allocated by XmTextFieldGetString() */
String
options_field_get_value(
Widget field
)
{
String value;
value = XmTextFieldGetString(field);
return value;
}
static void typecommand_cback( Widget w,
XtPointer data,
XmAnyCallbackStruct *cbs)
{
char *str;
str = XmTextFieldGetString(CommandText);
anim_setcommand(str);
XtFree(str);
XtUnmanageChild((Widget)data);
}
