Return to util.c CVS log

Up to [Research Unix] / researchv9 / X11 / src / X.V11R1 / clients / xedit

Annotation of researchv9/X11/src/X.V11R1/clients/xedit/util.c, revision 1.1

1.1     ! root        1: #ifndef lint
        !             2: static char rcs_id[] = "$Header: util.c,v 1.6 87/09/11 08:22:16 toddb Exp $";
        !             3: #endif
        !             4: 
        !             5: /*
        !             6:  *                       COPYRIGHT 1987
        !             7:  *                DIGITAL EQUIPMENT CORPORATION
        !             8:  *                    MAYNARD, MASSACHUSETTS
        !             9:  *                     ALL RIGHTS RESERVED.
        !            10:  *
        !            11:  * THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE AND
        !            12:  * SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT CORPORATION.
        !            13:  * DIGITAL MAKES NO REPRESENTATIONS ABOUT THE SUITABILITY OF THIS SOFTWARE FOR
        !            14:  * ANY PURPOSE.  IT IS SUPPLIED "AS IS" WITHOUT EXPRESS OR IMPLIED WARRANTY.
        !            15:  *
        !            16:  * IF THE SOFTWARE IS MODIFIED IN A MANNER CREATING DERIVATIVE COPYRIGHT RIGHTS,
        !            17:  * APPROPRIATE LEGENDS MAY BE PLACED ON THE DERIVATIVE WORK IN ADDITION TO THAT
        !            18:  * SET FORTH ABOVE.
        !            19:  *
        !            20:  *
        !            21:  * Permission to use, copy, modify, and distribute this software and its
        !            22:  * documentation for any purpose and without fee is hereby granted, provided
        !            23:  * that the above copyright notice appear in all copies and that both that
        !            24:  * copyright notice and this permission notice appear in supporting documentation,
        !            25:  * and that the name of Digital Equipment Corporation not be used in advertising
        !            26:  * or publicity pertaining to distribution of the software without specific, 
        !            27:  * written prior permission.
        !            28:  */
        !            29: 
        !            30: #include "xedit.h"
        !            31: 
        !            32: XeditPrintf(fmt, arg1, arg2, arg3, arg4)
        !            33:   char *fmt;
        !            34: {
        !            35:   char buf[1024];
        !            36:   XtTextBlock text;
        !            37:   
        !            38:   XtTextPosition pos = (*messsource->scan)(messsource, 0, XtstFile, XtsdRight,1,0);
        !            39:     sprintf(buf, fmt, arg1, arg2, arg3, arg4);
        !            40:     text.length = strlen(buf);
        !            41:     text.ptr = buf;
        !            42:     QXtTextReplace(CurDpy, messwindow, pos, pos, &text);
        !            43:     QXtTextSetInsertionPoint(CurDpy, messwindow, pos + text.length);
        !            44: }
        !            45: 
        !            46: Window makeCommandButton(box, name, function)
        !            47:   Window box;
        !            48:   char *name;
        !            49:   int (*function)();
        !            50: {
        !            51:   int numargs;
        !            52:   Arg args[3];
        !            53:     numargs = 0;
        !            54:     MakeArg(XtNlabel, (caddr_t)name);
        !            55:     MakeArg(XtNfunction, (caddr_t)function);
        !            56:     MakeArg(XtNname, (caddr_t)name);
        !            57:     return(QXtCommandCreate(CurDpy, box, args, numargs));
        !            58: }
        !            59: /*
        !            60: Window makeBooleanButton(box, name, value)
        !            61:   Window box;
        !            62:   char *name;
        !            63:   int *value;
        !            64: {
        !            65:   Arg args[2];
        !            66:   int numargs;
        !            67:     numargs = 0;
        !            68:     MakeArg(XtNlabel, (caddr_t)name);
        !            69:     MakeArg(XtNvalue, (caddr_t)value);
        !            70:     return(QXtBooleanCreate(CurDpy, box, args, numargs));
        !            71: }
        !            72: */
        !            73: 
        !            74: Window makeStringBox(parentBox, string, length)
        !            75:   Window parentBox;
        !            76:   char *string;
        !            77: {
        !            78:   XtEditType edittype;
        !            79:   Arg args[4];
        !            80:   Window StringW;
        !            81:   int numargs;
        !            82:     numargs = 0;
        !            83:     MakeArg(XtNtextOptions, (caddr_t)(/* editable |*/ resizeWidth));
        !            84:     MakeArg(XtNeditType, (caddr_t)XttextEdit);
        !            85:     MakeArg(XtNstring,(caddr_t)string); 
        !            86:     MakeArg(XtNwidth,  (caddr_t)length);
        !            87:     StringW = QXtTextStringCreate(CurDpy, parentBox, args, numargs);
        !            88:     return(StringW);  
        !            89: }
        !            90:  
        !            91: FixScreen(from)
        !            92:     XtTextPosition from;
        !            93: {
        !            94:     XtTextPosition to;
        !            95:     if(from >= 0){
        !            96:         to = (*source->getLastPos)(source) + 10;
        !            97:        QXtTextInvalidate(CurDpy,textwindow, (from > 0 ) ? from -1 : from, to); 
        !            98:        QXtTextSetInsertionPoint(CurDpy, textwindow, from); 
        !            99:     } else {
        !           100:        Feep();
        !           101:     }
        !           102: }
        !           103: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.