|
Packit |
b099d7 |
/*
|
|
Packit |
b099d7 |
* Motif
|
|
Packit |
b099d7 |
*
|
|
Packit |
b099d7 |
* Copyright (c) 1987-2012, The Open Group. All rights reserved.
|
|
Packit |
b099d7 |
*
|
|
Packit |
b099d7 |
* These libraries and programs are free software; you can
|
|
Packit |
b099d7 |
* redistribute them and/or modify them under the terms of the GNU
|
|
Packit |
b099d7 |
* Lesser General Public License as published by the Free Software
|
|
Packit |
b099d7 |
* Foundation; either version 2 of the License, or (at your option)
|
|
Packit |
b099d7 |
* any later version.
|
|
Packit |
b099d7 |
*
|
|
Packit |
b099d7 |
* These libraries and programs are distributed in the hope that
|
|
Packit |
b099d7 |
* they will be useful, but WITHOUT ANY WARRANTY; without even the
|
|
Packit |
b099d7 |
* implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
|
|
Packit |
b099d7 |
* PURPOSE. See the GNU Lesser General Public License for more
|
|
Packit |
b099d7 |
* details.
|
|
Packit |
b099d7 |
*
|
|
Packit |
b099d7 |
* You should have received a copy of the GNU Lesser General Public
|
|
Packit |
b099d7 |
* License along with these librararies and programs; if not, write
|
|
Packit |
b099d7 |
* to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
|
|
Packit |
b099d7 |
* Floor, Boston, MA 02110-1301 USA
|
|
Packit |
b099d7 |
*/
|
|
Packit |
b099d7 |
/*
|
|
Packit |
b099d7 |
* HISTORY
|
|
Packit |
b099d7 |
*/
|
|
Packit |
b099d7 |
#ifdef REV_INFO
|
|
Packit |
b099d7 |
#ifndef lint
|
|
Packit |
b099d7 |
static char rcsid[] = "$XConsortium: DNDTxtLbl1.c /main/8 1995/07/14 11:55:24 drk $"
|
|
Packit |
b099d7 |
#endif
|
|
Packit |
b099d7 |
#endif
|
|
Packit |
b099d7 |
/*
|
|
Packit |
b099d7 |
* file: TextLabel1.c
|
|
Packit |
b099d7 |
*
|
|
Packit |
b099d7 |
* Has a two line Label widget under Form. Also has a Multi line Text
|
|
Packit |
b099d7 |
* widget under Form. The XmNcolumns resource is being set to 50 at
|
|
Packit |
b099d7 |
* creation time, and XmNrows to 10. A program to be run either as one
|
|
Packit |
b099d7 |
* of the clients in a Drag And Drop transaction, or as both the initiator
|
|
Packit |
b099d7 |
* and the receiver for testing Drag And Drop transaction.
|
|
Packit |
b099d7 |
*/
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
/* Standard C headers */
|
|
Packit |
b099d7 |
#include <math.h>
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
/* X headers */
|
|
Packit |
b099d7 |
#include <X11/Xlib.h>
|
|
Packit |
b099d7 |
#include <X11/StringDefs.h>
|
|
Packit |
b099d7 |
#include <X11/Xatom.h>
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
#include <testlib.h>
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
#define TEXT1_TOPCHAR 1
|
|
Packit |
b099d7 |
#define NUM_COLUMNS 50
|
|
Packit |
b099d7 |
#define NUM_ROWS 10
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
#define TEXT1_X 10
|
|
Packit |
b099d7 |
#define TEXT1_Y 10
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
/* Global Variables */
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
char *test_string = "This is a test string";
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Widget Form1;
|
|
Packit |
b099d7 |
Widget Text1;
|
|
Packit |
b099d7 |
Widget Label1;
|
|
Packit |
b099d7 |
Widget Label2;
|
|
Packit |
b099d7 |
Widget PushB1;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Boolean use_instruction_box;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
main (argc, argv)
|
|
Packit |
b099d7 |
int argc;
|
|
Packit |
b099d7 |
char **argv;
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
XFontStruct *newfont;
|
|
Packit |
b099d7 |
XmFontList newfontlist;
|
|
Packit |
b099d7 |
XmString tcs;
|
|
Packit |
b099d7 |
Arg args[MAX_ARGS];
|
|
Packit |
b099d7 |
int n;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
use_instruction_box = True;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
CommonTestInit(argc, argv);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
if (UserData != NULL)
|
|
Packit |
b099d7 |
ProcessCommandArgs();
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XtNwidth, 500); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XtNheight, 250); n++;
|
|
Packit |
b099d7 |
XtSetValues(Shell1, args, n);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
/* create main form */
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
Form1 = XmCreateForm (Shell1, "Form1", args, n);
|
|
Packit |
b099d7 |
XtManageChild (Form1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
/* make a string label widget */
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
tcs = XmStringLtoRCreate("Two-Line\nLabel String",
|
|
Packit |
b099d7 |
XmSTRING_DEFAULT_CHARSET);
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNlabelString, tcs); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNalignment, XmALIGNMENT_CENTER); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNrecomputeSize, TRUE); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtopAttachment, XmATTACH_FORM); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtopOffset, 5); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNleftAttachment, XmATTACH_FORM); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNleftOffset, 5); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNrightAttachment, XmATTACH_FORM); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNrightOffset, 5); n++;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Label1 = XmCreateLabel(Form1, "Label1", args, n);
|
|
Packit |
b099d7 |
XtManageChild(Label1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XmStringFree(tcs);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
/* create multi line text widget */
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNverifyBell, False); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNvalue, test_string); n++;
|
|
Packit |
b099d7 |
newfont = XLoadQueryFont(XtDisplay(Shell1),"9x15");
|
|
Packit |
b099d7 |
newfontlist = XmFontListCreate(newfont, XmSTRING_DEFAULT_CHARSET);
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNfontList, newfontlist); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNcolumns, NUM_COLUMNS); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNrows, NUM_ROWS); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNeditMode, XmMULTI_LINE_EDIT); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtopAttachment, XmATTACH_WIDGET); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtopOffset, 5); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtopWidget, Label1); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNleftAttachment, XmATTACH_FORM); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNleftOffset, 5); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNrightAttachment, XmATTACH_FORM); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNrightOffset, 5); n++;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Text1 = XmCreateText(Form1, "Text1", args, n);
|
|
Packit |
b099d7 |
XtManageChild(Text1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XmTextSetTopCharacter(Text1, (XmTextPosition)TEXT1_TOPCHAR);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XtRealizeWidget(Shell1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
if (use_instruction_box == True) {
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
CommonPause();
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
CommonPause();
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
/* make a new label widget */
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
tcs = XmStringLtoRCreate("One line", XmSTRING_DEFAULT_CHARSET);
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNlabelString, tcs); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNalignment, XmALIGNMENT_CENTER); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNrecomputeSize, TRUE); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtopAttachment, XmATTACH_WIDGET); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtopOffset, 5); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtopWidget, Label1); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNleftAttachment, XmATTACH_FORM); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNleftOffset, 5); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNrightAttachment, XmATTACH_FORM); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNrightOffset, 5); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNborderWidth, 5); n++;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Label2 = XmCreateLabel(Form1, "Label2", args, n);
|
|
Packit |
b099d7 |
XtManageChild(Label2);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XmStringFree(tcs);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtopAttachment, XmATTACH_WIDGET); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtopOffset, 5); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtopWidget, Label2); n++;
|
|
Packit |
b099d7 |
XtSetValues(Text1, args, n);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
CommonPause();
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
tcs = XmStringLtoRCreate("", XmSTRING_DEFAULT_CHARSET);
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNlabelString, tcs); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNalignment, XmALIGNMENT_CENTER); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNrecomputeSize, TRUE); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNheight, 30); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtopAttachment, XmATTACH_WIDGET); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtopOffset, 5); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtopWidget, Label2); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNleftAttachment, XmATTACH_FORM); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNleftOffset, 5); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNrightAttachment, XmATTACH_FORM); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNrightOffset, 5); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNborderWidth, 5); n++;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
PushB1 = XmCreatePushButton(Form1, "PushB1", args, n);
|
|
Packit |
b099d7 |
XtManageChild(PushB1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XmStringFree(tcs);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtopAttachment, XmATTACH_WIDGET); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtopOffset, 5); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtopWidget, PushB1); n++;
|
|
Packit |
b099d7 |
XtSetValues(Text1, args, n);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
CommonPause();
|
|
Packit |
b099d7 |
CommonPause();
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XtAppMainLoop(app_context);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
#define WORD_LEN 32
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
ProcessCommandArgs()
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
char *user_data;
|
|
Packit |
b099d7 |
char next_word[WORD_LEN + 1];
|
|
Packit |
b099d7 |
int num_spaces;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
user_data = UserData;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
while (*user_data != '\0') {
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
get_next_word(user_data, next_word, &num_spaces);
|
|
Packit |
b099d7 |
user_data += (strlen(next_word) + num_spaces);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
if (strcmp(next_word, "-noinstruct") == 0) {
|
|
Packit |
b099d7 |
use_instruction_box = False;
|
|
Packit |
b099d7 |
continue;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
free(UserData);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
get_next_word(source, dest, spaces)
|
|
Packit |
b099d7 |
char *source;
|
|
Packit |
b099d7 |
char *dest;
|
|
Packit |
b099d7 |
int *spaces;
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
int n;
|
|
Packit |
b099d7 |
int space_count;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
space_count = 0;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
while (isspace(*source)) {
|
|
Packit |
b099d7 |
source++;
|
|
Packit |
b099d7 |
space_count++;
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
while (!isspace(*source) && *source != '\0' && n < WORD_LEN) {
|
|
Packit |
b099d7 |
*dest++ = *source++;
|
|
Packit |
b099d7 |
n++;
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
*dest = '\0';
|
|
Packit |
b099d7 |
*spaces = space_count;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
}
|