falso
/
cdesktopenv
mirror of https://git.code.sf.net/p/cdesktopenv/code
1
0
Fork 0
Code Issues Releases Wiki Activity
cdesktopenv/cde/programs/dtudcexch/selectxlfd.c

1035 lines
24 KiB
C
Raw Blame History

/*
* CDE - Common Desktop Environment
*
* Copyright (c) 1993-2012, The Open Group. All rights reserved.
*
* These libraries and programs are free software; you can
* redistribute them and/or modify them under the terms of the GNU
* Lesser General Public License as published by the Free Software
* Foundation; either version 2 of the License, or (at your option)
* any later version.
*
* These libraries and programs are distributed in the hope that
* they will be useful, but WITHOUT ANY WARRANTY; without even the
* implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
* PURPOSE. See the GNU Lesser General Public License for more
* details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with these librararies and programs; if not, write
* to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
* Floor, Boston, MA 02110-1301 USA
*/
/* $XConsortium: selectxlfd.c /main/3 1996/10/14 14:45:17 barstow $ */
/*
* All Rights Reserved, Copyright (c) FUJITSU LIMITED 1995
*/
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <nl_types.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include<X11/Xlib.h>
#include<X11/Xutil.h>
#include<X11/Xatom.h>
#include <Xm/Xm.h>
#include <Xm/Form.h>
#include <Xm/PushB.h>
#include <Xm/Text.h>
#include <Xm/TextF.h>
#include <Xm/Label.h>
#include <Xm/SeparatoG.h>
#include <Xm/List.h>
#include <Xm/ToggleB.h>
#include <Xm/MessageB.h>
#include "FaLib.h"
#include "falxlfd.h"
#include "selectxlfd.h"
#include "excutil.h"
char *shell_n[] = { "pop0", "pop1", "pop2", "pop3" } ;
char *list_n[] = { "list0", "list1", "list2", "list3" } ;
#ifdef DEBUG
#undef Dprintf
#define Dprintf fprintf
#else
#define Dprintf
#endif /* DEBUG */
/*
* There is no public header file for this function (only an
* internal header XmStringI.h).
*/
extern XtPointer _XmStringUngenerate (XmString string,
XmStringTag tag,
XmTextType tag_type,
XmTextType output_type);
extern Rsrc resource;
extern Exc_data *ed;
extern ListData *ld;
extern fal_utyerror;
extern fal_utyderror;
extern fal_utyexists;
extern char *maintitle;
FalFontID fid;
/*
* parameters
*/
char *fullPathName = NULL ;
FalFontDataList *font_L ;
FalxCodeList *CodeList ;
FalxStyleList *StyleList ;
FalxSizeList *SizeList ;
FalxUdcArea *UdcArea ;
int SelectedOffset ;
int UdcAreaCount ;
int getmask ;
FalxFontDataBuff KeyBuff ;
void PopupSelectXLFD() ;
Widget xlfdDialog, xlfdWform,
slctBLabel[BUTTONITEMS],slctBText[BUTTONITEMS], slctButton[BUTTONITEMS],
listPop[BUTTONITEMS], listW[BUTTONITEMS],
separatorW, errorMD, msgBox ;
extern Widget cpyDialog ;
extern Widget toplevel;
/*
* tmp
*/
int fontcheck(char *fontfile, char *mode)
/*
* If fontfile can't be opend, return -1.
* If fontfile is editted by other UDC client, return 1.
* normary return 0.
*/
{
int chk_fd;
if (strcmp(mode, "r") == 0) {
if ((chk_fd = open(fontfile, O_RDONLY)) < 0) {
return (-1);
}
} else if (strcmp(mode, "w") == 0) {
if ((chk_fd = open(fontfile, O_RDWR)) < 0) {
return (-1);
}
}
if (isLock(chk_fd) == 1) {
close(chk_fd);
return(1);
}
close(chk_fd);
return (0);
}
void setallcode(ListData *ld)
{
int i, code, codenum;
int *codep;
int code1, code2;
codenum = 0;
for (i = 0; i < UdcAreaCount; i++) {
codenum += (abs(UdcArea[i].udc_end - UdcArea[i].udc_start) + 1);
}
ld->allcode = (int *) calloc(codenum, sizeof(int));
ld->allcode_num = codenum;
codep = ld->allcode;
for (i = 0; i < UdcAreaCount; i++) {
code1 = smaller(UdcArea[i].udc_start, UdcArea[i].udc_end);
code2 = bigger(UdcArea[i].udc_start, UdcArea[i].udc_end);
for (code = code1; code <= code2; code++) {
*codep = code;
codep++;
}
}
}
FalFontID openfont()
{
int protect_key = FAL_FONT_DISPLAY;
int codeset;
FalFontID fontid;
fontid = NULL;
codeset = font_L->list[0].cd_set;
if ((fontid = FalOpenFont(fullPathName, protect_key, codeset))
== FAL_ERROR) {
fprintf(stderr, "FalOpenFont error\n");
return ((FalFontID) NULL);
}
return (fontid);
}
void makelist(ListData *ld)
{
char *pattern;
int code;
int *existcodep, *allcodep;
int existcode_num;
int i;
/* FalFontinfo fontinfo;*/
/* FalQueryFont(fid, &fontinfo);*/
ld->existcode = (int *) calloc(ld->allcode_num, sizeof(int));
existcodep = ld->existcode ;
allcodep = ld->allcode;
existcode_num = 0;
for (i = 0; i < ld->allcode_num; i++) {
code = *allcodep;
pattern = FalReadFont(fid, code, NULL, NULL);
if (fal_utyexists == 0) {
*existcodep = *allcodep;
existcodep++;
existcode_num++;
}
allcodep++;
}
ld->existcode_num = existcode_num;
}
void setexistcode(ListData *ld)
{
int *codep, *allcodep;
int i;
/* open font */
fid = openfont();
makelist(ld);
/* close font */
if (fid != NULL)
FalCloseFont(fid);
}
char i2c(int num)
{
char c;
if ((0 <= num) && (num <= 9))
c = '0' + num;
else if ((10 <= num) && (num <= 15))
c = 'a' + (num - 10);
else
fprintf(stderr,"error in i2c\n");
return c;
}
char *i2s(int code)
{
char buf[8];
char *number;
char *cp;
int i;
int tmp;
int len;
tmp = code;
for (i = 0; ; i++) {
if (tmp < 16) {
buf[i] = i2c(tmp);
buf[i+1] = NULL;
break;
}
buf[i] = i2c(tmp % 16);
tmp = tmp / 16;
}
len = strlen(buf);
number = (char *) calloc(len+3, sizeof(char));
cp = number;
memcpy(cp, "0x", 2);
cp += 2;
for (i = len - 1; i >= 0; i--) {
*cp = buf[i];
cp++;
}
*cp = NULL;
return (number);
}
void setexistcode_c(ListData *ld)
{
int i;
char **code_cp;
int *codep;
if (ld->existcode_num == 0) {
return;
}
ld->existcode_c = (char **) calloc(ld->existcode_num, sizeof(char *));
code_cp = ld->existcode_c;
codep = ld->existcode;
for (i = 0; i < ld->existcode_num; i++) {
*code_cp = i2s(*codep);
code_cp++;
codep++;
}
}
void getexistcode(ListData *ld)
{
setallcode(ld);
setexistcode(ld);
setexistcode_c(ld);
}
/****************************************************************
* common functions *
***************************************************************/
/*
* pop up and down dialog box
*/
void
xlfdPopupDialog(w)
Widget w;
{
if (! XtIsManaged(w))
XtManageChild(w);
else
XRaiseWindow(XtDisplayOfObject(w), XtWindow(XtParent(w)));
}
void
xlfdPopdownDialog(w)
Widget w;
{
if (XtIsManaged(w)){
XtUnmanageChild(w);
}
}
/*
* get pixel width
*/
Dimension
GetPixelWidth( w, columns, width )
Widget w ;
int columns ;
Dimension *width ;
{
Arg args[1] ;
XtSetArg( args[0], XmNwidth, width ) ;
XtGetValues( w , args, 1 ) ;
return( *width / (Dimension)columns ) ;
}
/****************************************************************
* callbacks *
***************************************************************/
void quit(w, client_data, call_data)
Widget w;
caddr_t *client_data, *call_data;
{
char *msg;
int ans;
msg = GETMESSAGE(6, 2, "Do you want to terminate udcexchange?");
AskUser(ed->toplevel, ed, msg, &ans, "question");
if (ans == 1) {/* terminate ok */
FalxFreeCodeList( CodeList ) ;
FalxFreeStyleList( StyleList ) ;
FalxFreeSizeList( SizeList ) ;
FalxFreeFontList( font_L ) ;
excterminate(ed);
}
}
/*
* Unmanage widgets
*/
int
ClearText( num, slctBText )
int num ;
Widget *slctBText ;
{
int i ;
/* toggle button unset */
for( i=0; i<BUTTONITEMS; i++ ){
if( i>num ){
XmTextSetString( slctBText[i], "" );
}
}
return ;
}
int
ClearButtons( num, slctButton )
int num ;
Widget *slctButton ;
{
int i, cnt ;
Boolean isSet ;
Arg args[5] ;
/* toggle button unset */
for( i=0; i<BUTTONITEMS; i++ ){
if( i != num ){
cnt = 0;
XtSetArg( args[cnt], XmNset, &isSet ); cnt++;
XtGetValues( slctButton[i], args, cnt );
if( isSet == True ){
cnt = 0;
XtSetArg( args[cnt], XmNset, False ); cnt++;
XtSetValues( slctButton[i], args, cnt );
}
}
}
return ;
}
/*
* get text field position
*/
int
GetPositionOfLists( num, xlfdDialog, listPop, slctBText, x, y )
int num ;
Widget xlfdDialog ;
Widget *listPop ;
Widget *slctBText ;
Position *x ;
Position *y ;
{
int i ;
Position tbx, tby, tx, ty ;
Dimension theight ;
Arg args[10] ;
i = 0;
XtSetArg(args[i], XmNx, &tbx ); i++;
XtSetArg(args[i], XmNy, &tby ); i++;
XtGetValues( xlfdDialog, args, i);
i = 0;
XtSetArg(args[i], XmNx, &tx ); i++;
XtSetArg(args[i], XmNy, &ty ); i++;
XtSetArg(args[i], XmNheight, &theight ); i++;
if( num==BUTTONITEMS-1 )
XtGetValues( slctBText[num], args, i ) ;
else
XtGetValues( XtParent(slctBText[num]), args, i ) ; /* ScrolledText */
/* determine the position of list */
*x = tx + tbx + CX ;
if( num==BUTTONITEMS-1 ){
*y = ty + tby + (Position)theight + 14 + CY ;
}else{
*y = ty + tby + (Position)theight + CY ;
}
for( i=0; i<BUTTONITEMS; i++ ){
if( XtIsManaged( listPop[i] ) ) XtUnmanageChild( listPop[i] );
}
if( !XtIsManaged( listPop[num] ) ) XtManageChild( listPop[num] );
return ;
}
void listEH(w, num, event)
Widget w ;
int num ;
XButtonEvent *event;
{
int i, j, ITEM_COUNT;
Arg args[10];
XmString *xms ;
char *str ;
int rtn ;
Position x, y ;
/*
* get list items
*/
ITEM_COUNT = 0;
rtn = GetItemsToDisplay( num, &ITEM_COUNT, &xms ) ;
switch( rtn ){
case FALX_TRY_NEXT :
fprintf( stderr, "There are no fonts that was required.\n" ) ;
XmTextSetString( slctBText[0], " " );
ClearText( -1, slctBText ) ;
FalxFreeDataBuff( FALX_ALL, &KeyBuff ) ;
getmask = 0 ;
return ;
case 0 :
break ;
default :
fprintf( stderr, "GetItemsToDisplay() error.\n" ) ;
exit(-1) ;
}
if( num == 0 && ITEM_COUNT == 1 ){
str = (char *) _XmStringUngenerate((XmString) xms[0], NULL,
XmMULTIBYTE_TEXT, XmMULTIBYTE_TEXT);
if (str)
XmTextSetString(slctBText[num], str );
return ;
}
if( ITEM_COUNT < 0 ){
exit(-1) ;
}
/*
* get text field position
*/
GetPositionOfLists( num, xlfdDialog, listPop, slctBText, &x, &y ) ;
i = 0;
XtSetArg(args[i], XmNx, x ) ; i++;
XtSetArg(args[i], XmNy, y ) ; i++;
XtSetValues(listPop[num], args, i );
/*
* set list items
*/
i = 0;
XtSetArg (args[i], XmNitems, xms ); i++;
XtSetArg (args[i], XmNitemCount, ITEM_COUNT ); i++;
XtSetValues(listW[num], args, i );
/*
* pop up list
*/
XtPopup( listPop[num], XtGrabNone );
}
void listPrintCB(w, num, call_data)
Widget w;
int num ;
XmListCallbackStruct *call_data;
{
char *str ;
/* clear text fields and unset buttons */
ClearButtons( num, slctButton ) ;
str = (char *) _XmStringUngenerate((XmString) call_data->item, NULL,
XmMULTIBYTE_TEXT, XmMULTIBYTE_TEXT);
if (str) {
XmTextSetString(slctBText[num], str);
}
#if 0
/* set key data */
if( SetKeyBuff( num, str ) ){
exit(-1) ;
}
#endif /* 0 */
if( XtIsManaged( listPop[num] ) ) XtUnmanageChild( listPop[num] );
}
void OpenWindow(w, client_data, call_data)
Widget w;
caddr_t client_data, *call_data;
{
int r ;
int i ;
int ans;
char *msg;
char *msg1;
char *msg2;
char *msg3;
char *str, buff[512] ;
msg = GETMESSAGE(6, 4, "No UDCs exist in this font");
msg1 = GETMESSAGE(6, 6, "XLFD name isn't selected");
msg2 = GETMESSAGE(6, 8, "Can't open the font file");
msg3 = GETMESSAGE(6, 10, "The font file is used by other UDC client.");
/* get font file name (str: XLFD name) */
str = XmTextGetString( slctBText[0] );
if (( str == NULL ) || (strcmp(str, "") == 0)) {
AskUser(w, ed, msg1, &ans, "error");
return;
}
if( fullPathName != NULL ){
free( fullPathName ) ;
}
SelectedOffset = FalxSearchFontFileName( str, font_L, buff ) ;
if( SelectedOffset < 0 ){
exit(-1) ;
}
if( (fullPathName = strdup( buff )) == NULL ){
exit(-1) ;
}
UdcAreaCount = FalxGetGlyphIndexInfo( str, font_L, &UdcArea ) ;
if( UdcAreaCount < 0 ){
exit(-1) ;
}
if( fullPathName != NULL ){
Dprintf( stderr, "OpenWindow() : full path name = %s\n", fullPathName );
}
for( i=0; i<UdcAreaCount; i++ ){
Dprintf( stderr, "OpenWindow() : start(%d) = 0x%x\n", i, UdcArea[i].udc_start );
Dprintf( stderr, "OpenWindow() : end (%d) = 0x%x\n", i, UdcArea[i].udc_end );
}
if ((ed->xlfdname = strdup(str)) == NULL) {
exit (-1);
}
if ((ed->fontfile = strdup(fullPathName)) == NULL) {
exit (-1);
}
/* getxlfd(ed);*/
/* initialize ld */
if ((ld = (ListData *) malloc(sizeof(ListData))) == NULL) {
excerror(ed, EXCERRMALLOC, "selcharcd", "exit");
}
memset(ld, 0x00, sizeof(ListData));
ld->ed = ed;
if (ed->function == EXPORT) {
r = fontcheck(ed->fontfile, "r");
if (r == -1) { /* file open error */
AskUser(ld->ed->toplevel, ld->ed, msg2, &ans, "error");
return;
} else if (r == 1) { /* file is being editted by other UDC client */
AskUser(ld->ed->toplevel, ld->ed, msg3, &ans, "error");
return;
}
/* get existing UDC code */
getexistcode(ld);
if (ld->existcode_num == 0) {
AskUser(ld->ed->toplevel, ld->ed, msg, &ans, "error");
return;
}
XtUnmanageChild(xlfdDialog);
selcharcd(ed);
} else if (ed->function == IMPORT) {
r = fontcheck(ed->fontfile, "w");
if (r == -1) { /* file open error */
AskUser(ld->ed->toplevel, ld->ed, msg2, &ans, "error");
return;
} else if (r == 1) { /* file is being editted by other UDC client */
AskUser(ld->ed->toplevel, ld->ed, msg3, &ans, "error");
return;
}
/* get existing UDC code */
getexistcode(ld);
XtUnmanageChild(xlfdDialog);
getcharcd(ed);
}
}
/****************************************************************
* functions for create window view
****************************************************************/
#define SetLabel( cnt ){ \
switch( cnt ){ \
case 0 : buf = resource.xlfd_label ; break ; \
case 1 : buf = resource.code_label ; break ; \
case 2 : buf = resource.style_label; break ; \
case 3 : buf = resource.size_label ; break ; \
} \
xms = XmStringCreateLocalized( buf ); \
}
int
CreateXLFDLabelAndText( owner, slctBLabel, slctBText, slctButton )
Widget owner ;
Widget *slctBLabel ;
Widget *slctBText ;
Widget *slctButton ;
{
Widget _slctBLabel ;
Widget _slctBText ;
Widget _slctButton ;
int i, j;
Arg args[16];
char *buf ;
XmString xms ;
/*
* create XLFD titles
*/
i = 0;
XtSetArg( args[i], XmNx, 20 ) ; i++ ;
XtSetArg( args[i], XmNheight, 20 ) ; i++ ;
XtSetArg( args[i], XmNtopAttachment, XmATTACH_FORM ) ; i++ ;
XtSetArg( args[i], XmNtopOffset, 20 ) ; i++ ;
/*
_slctBLabel = XmCreateLabelGadget( owner , "xlfdlabel", args, i );
*/
_slctBLabel = XmCreateLabel( owner , "xlfdlabel", args, i );
XtManageChild( _slctBLabel );
/*
* create text fields to display XLFD font name
*/
i = 0;
XtSetArg( args[i], XmNleftAttachment, XmATTACH_FORM ) ; i++ ;
XtSetArg( args[i], XmNleftOffset, 20 ) ; i++ ;
XtSetArg( args[i], XmNtopAttachment, XmATTACH_WIDGET ); i++ ;
XtSetArg( args[i], XmNtopOffset, 5 ) ; i++ ;
XtSetArg (args[i], XmNtopWidget, _slctBLabel ); i++;
XtSetArg( args[i], XmNcolumns, XLFD_COLUMNS ) ; i++ ;
XtSetArg( args[i], XmNspacing, 0 ) ; i++ ;
XtSetArg( args[i], XmNeditMode, XmSINGLE_LINE_EDIT ) ; i++ ;
XtSetArg( args[i], XmNscrollBarDisplayPolicy, XmAS_NEEDED ) ; i++ ;
XtSetArg( args[i], XmNscrollingPolicy, XmAPPLICATION_DEFINED ) ; i++ ;
/*
XtSetArg( args[i], XmNscrollingPolicy, XmAUTOMATIC ) ; i++ ;
XtSetArg( args[i], XmNlistSizePolicy, XmCONSTANT ) ; i++ ;
XtSetArg( args[i], XmNwidth, 600 ) ; i++ ;
XtSetArg( args[i], XmNfontList, fixed ) ; i++ ;
XtSetArg( args[i], XmNeditable, True ) ; i++ ;
XtSetArg( args[i], XmNlistSizePolicy, XmVARIABLE ) ; i++ ;
*/
_slctBText = XmCreateScrolledText( owner , "xlfdtext", args, i );
XtManageChild( _slctBText );
/*
* create XLFD select buttons
*/
i = 0;
XtSetArg( args[i], XmNindicatorType, XmONE_OF_MANY ) ; i++ ;
XtSetArg (args[i], XmNtopWidget, _slctBText ); i++;
XtSetArg( args[i], XmNtopAttachment, XmATTACH_OPPOSITE_WIDGET ) ; i++ ;
XtSetArg( args[i], XmNtopOffset, 15 ) ; i++ ;
XtSetArg( args[i], XmNleftAttachment, XmATTACH_WIDGET ) ; i++ ;
XtSetArg( args[i], XmNleftWidget, _slctBText ) ; i++ ;
XtSetArg( args[i], XmNleftOffset, 5 ) ; i++ ; /* WIDTH */
XtSetArg( args[i], XmNrightAttachment, XmATTACH_FORM ) ; i++ ;
XtSetArg( args[i], XmNrightOffset, 5 ) ; i++ ; /* WIDTH */
xms = XmStringCreateLocalized( "" );
XtSetArg( args[i], XmNlabelString, xms ) ; i++ ;
/*
_slctButton = XmCreateToggleButtonGadget( owner , "xlfdbtn", args, i);
*/
_slctButton = XmCreateToggleButton( owner , "xlfdbtn", args, i);
XtManageChild( _slctButton );
*slctBLabel = _slctBLabel ;
*slctBText = _slctBText ;
*slctButton = _slctButton ;
}
int
CreateOtherLabelAndText( num, owner, baseForm,
slctBLabel, topW, slctBText, slctButton )
int num ;
Widget owner ;
Widget baseForm ;
Widget *slctBLabel ;
Widget topW ;
Widget *slctBText ;
Widget *slctButton ;
{
Widget _slctBLabel ;
Widget _slctBText ;
Widget _slctButton ;
int i, j;
Arg args[16];
char *buf ;
XmString xms ;
if( num < 1 ) return(0) ;
/*
* create key titles
*/
i = 0;
XtSetArg ( args[i], XmNtopWidget,
(num==1) ? baseForm : topW ); i++;
XtSetArg( args[i], XmNx, 20 ) ; i++ ;
XtSetArg( args[i], XmNheight, 20 ) ; i++ ;
XtSetArg( args[i], XmNtopAttachment, XmATTACH_WIDGET ) ; i++ ;
/* DEBUG
XtSetArg( args[i], XmNtopOffset, 20 ) ; i++ ;
*/
XtSetArg( args[i], XmNtopOffset, 36 ) ; i++ ;
SetLabel(num) ;
XtSetArg( args[i], XmNlabelString, xms ) ; i++ ;
/*
_slctBLabel = XmCreateLabelGadget( owner , "label", args, i);
*/
_slctBLabel = XmCreateLabel( owner , "label", args, i);
XtManageChild( _slctBLabel );
/*
* create text fields to display selected keys
*/
i = 0;
XtSetArg( args[i], XmNtopAttachment, XmATTACH_OPPOSITE_WIDGET ) ; i++ ;
XtSetArg( args[i], XmNtopOffset, -5 ) ; i++ ;
XtSetArg (args[i], XmNtopWidget, _slctBLabel ); i++;
XtSetArg( args[i], XmNrightAttachment, XmATTACH_OPPOSITE_WIDGET ) ; i++ ;
XtSetArg( args[i], XmNrightOffset, 0 ) ; i++ ;
XtSetArg (args[i], XmNrightWidget, baseForm ); i++;
XtSetArg( args[i], XmNcolumns, KEY_COLUMNS ) ; i++ ;
XtSetArg( args[i], XmNspacing, 0 ) ; i++ ;
XtSetArg( args[i], XmNeditMode, XmSINGLE_LINE_EDIT ) ; i++ ;
XtSetArg( args[i], XmNscrollBarDisplayPolicy, XmAS_NEEDED ) ; i++ ;
XtSetArg( args[i], XmNscrollingPolicy, XmAPPLICATION_DEFINED ) ; i++ ;
/*
XtSetArg( args[i], XmNscrollingPolicy, XmAUTOMATIC ) ; i++ ;
XtSetArg( args[i], XmNlistSizePolicy, XmCONSTANT ) ; i++ ;
XtSetArg( args[i], XmNfontList, fixed ) ; i++ ;
XtSetArg( args[i], XmNlistSizePolicy, XmVARIABLE ) ; i++ ;
*/
if( num==BUTTONITEMS-1 )
_slctBText = XmCreateText( owner , "text" , args, i );
else
_slctBText = XmCreateScrolledText( owner , "text" , args, i );
XtManageChild( _slctBText );
/*
* create select buttons
*/
i = 0;
XtSetArg( args[i], XmNindicatorType, XmONE_OF_MANY ) ; i++ ;
XtSetArg( args[i], XmNtopAttachment, XmATTACH_OPPOSITE_WIDGET ) ; i++ ;
XtSetArg( args[i], XmNtopOffset, 5 ) ; i++ ;
XtSetArg (args[i], XmNtopWidget, _slctBLabel ); i++;
XtSetArg( args[i], XmNleftAttachment, XmATTACH_WIDGET ) ; i++ ;
XtSetArg( args[i], XmNleftWidget, _slctBText ) ; i++ ;
XtSetArg( args[i], XmNleftOffset, 5 ) ; i++ ; /* WIDTH */
xms = XmStringCreateLocalized( "" );
XtSetArg( args[i], XmNlabelString, xms ) ; i++ ;
/*
_slctButton = XmCreateToggleButtonGadget( owner , "button", args, i);
*/
_slctButton = XmCreateToggleButton( owner , "button", args, i);
XtManageChild( _slctButton );
*slctBLabel = _slctBLabel ;
*slctBText = _slctBText ;
*slctButton = _slctButton ;
}
/*
* create pop up lists
*/
Widget
xlfdCreateScrolledList ( owner, name, args, n )
Widget owner ;
char *name ;
Arg *args ;
int n ;
{
Widget listW ;
XtSetArg( args[n], XmNselectionPolicy, XmSINGLE_SELECT ) ;n++ ;
XtSetArg( args[n], XmNlistSpacing, 4 ) ; n++ ;
XtSetArg( args[n], XmNlistSizePolicy, XmCONSTANT ) ; n++ ;
XtSetArg( args[n], XmNscrollBarDisplayPolicy, XmAS_NEEDED ) ; n++ ;
listW = XmCreateScrolledList( owner, name, args, n );
XtManageChild( listW );
return( listW );
}
/*
* create selection window view
*/
void
PopupSelectXLFD( top )
Widget top ;
{
int n, i, j;
Arg args[16];
char *buf ;
XmString xms ;
Dimension pix, xwidth, kwidth ;
if( xlfdDialog == NULL ){
/*
* create base window
*/
n = 0 ;
XtSetArg( args[n], XmNautoUnmanage, False ) ; n++ ;
XtSetArg( args[n], XmNtitle, maintitle ) ; n++ ;
XtSetArg( args[n], XmNnoResize, True ) ; n++ ;
xms = XmStringCreateLocalized( resource.exec_label ) ;
XtSetArg( args[n], XmNokLabelString, xms ) ; n++ ;
xms = XmStringCreateLocalized( resource.quit_label) ;
XtSetArg( args[n], XmNhelpLabelString, xms ) ; n++ ;
Dprintf( stdout, "(PopupSelectXLFD)XmCreateTemplateDialog: start\n" ) ;
xlfdDialog = XmCreateTemplateDialog( top, "SelectDialog", args, n );
Dprintf( stdout, "(PopupSelectXLFD)XmCreateTemplateDialog: end\n" ) ;
n = 0 ;
xlfdWform = XmCreateForm( xlfdDialog, "BaseForm", args, n );
XtManageChild( xlfdWform );
/*
* create XLFD columns
*/
Dprintf( stdout, "(PopupSelectXLFD)CreateXLFDLabelAndText : start\n" ) ;
CreateXLFDLabelAndText( xlfdWform ,
&slctBLabel[0], &slctBText[0], &slctButton[0] ) ;
n = 0 ;
SetLabel(0) ;
XtSetArg( args[n], XmNlabelString, xms ) ; n++ ;
XtSetValues( slctBLabel[0], args, n ) ;
Dprintf( stdout, "(PopupSelectXLFD)CreateXLFDLabelAndText : end\n" ) ;
/*
* create other key columns
*/
Dprintf( stdout, "(PopupSelectXLFD)CreateOtherLabelAndText :start\n" ) ;
for( j=1; j<BUTTONITEMS; j++ ){
CreateOtherLabelAndText( j, xlfdWform, slctBText[0],
&slctBLabel[j], slctBLabel[j-1], &slctBText[j], &slctButton[j] ) ;
}
Dprintf( stdout, "(PopupSelectXLFD)CreateOtherLabelAndText : end\n" ) ;
/* set bottom offsets */
n = 0 ;
XtSetArg( args[n], XmNbottomAttachment, XmATTACH_FORM ) ; n++ ;
XtSetArg( args[n], XmNbottomOffset, 36 ) ; n++ ;
XtSetValues( slctBLabel[BUTTONITEMS-1], args, n ) ;
/* get pixel size */
pix = GetPixelWidth( slctBText[0], XLFD_COLUMNS, &xwidth ) ;
/* xwidth += pix / 2 ; */
kwidth = pix * KEY_COLUMNS + pix / 2 ;
/*
* create popup shells
*/
for( j=0; j<BUTTONITEMS; j++ ) {
n = 0;
listPop[j] = XtCreatePopupShell( shell_n[j], overrideShellWidgetClass,
xlfdWform , args, n );
}
/*
* create popup lists
*/
for( j=0; j<BUTTONITEMS; j++ ) {
n = 0 ;
XtSetArg( args[n], XmNvisibleItemCount, (j==0)? 10 : 5 ) ; n++ ;
if( j==0 ){
XtSetArg( args[n], XmNwidth, xwidth ) ; n++ ;
}else{
XtSetArg( args[n], XmNwidth, kwidth ) ; n++ ;
XtSetArg( args[n], XmNlistMarginWidth, 0 ) ; n++ ;
}
listW[j] = xlfdCreateScrolledList( listPop[j], list_n[j], args, n );
}
/*
* Error_Messege
*/
#if 0
n = 0 ;
XtSetArg( args[n], XmNokLabelString, "OK" ) ; n++ ;
XtSetArg( args[n], XmNcancelLabelString,"Cancel" ) ; n++ ;
errorMD = XmCreateMessageDialog(toplevel, "ed0", NULL, 0);
msgBox = XmMessageBoxGetChild(errorMD, XmDIALOG_HELP_BUTTON);
XtUnmanageChild(msgBox);
#endif /* 0 */
/*
* add callbacks
*/
for( i=0; i<BUTTONITEMS; i++ )
XtAddEventHandler( slctButton[i], ButtonReleaseMask, False, (XtEventHandler) listEH, (XtPointer) i );
for( i=0; i<BUTTONITEMS; i++ )
XtAddCallback(listW[i], XmNsingleSelectionCallback, (XtCallbackProc) listPrintCB, (XtPointer) i );
XtAddCallback( xlfdDialog, XmNokCallback, (XtCallbackProc) OpenWindow, NULL );
XtAddCallback( xlfdDialog, XmNhelpCallback,(XtCallbackProc) quit,NULL );
#if 0
XtAddCallback( errorMD, XmNcancelCallback, (XtCallbackProc) quit, NULL);
#endif /* 0 */
}
/*
* pop up select window
*/
Dprintf( stdout, "(PopupSelectXLFD)xlfdPopupDialog : start\n" ) ;
xlfdPopupDialog( xlfdDialog );
Dprintf( stdout, "(PopupSelectXLFD)xlfdPopupDialog : end\n" ) ;
Dprintf( stdout, " : end\n" ) ;
}
#undef SetLabel
Reference in New Issue View Git Blame Copy Permalink