Return to GetButton.c CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / X / xwm

Annotation of 43BSD/contrib/X/xwm/GetButton.c, revision 1.1

1.1     ! root        1: #include <X/mit-copyright.h>
        !             2: 
        !             3: /* Copyright    Massachusetts Institute of Technology    1985  */
        !             4: 
        !             5: /*
        !             6:  *     GetButton - This subroutine is used by the X Window Manager (xwm)
        !             7:  *     to acquire button events.  It waits for a button event to occur
        !             8:  *     and handles all event traffic in the interim.
        !             9:  *
        !            10:  *     File:           GetButton.c
        !            11:  */
        !            12: #ifndef lint
        !            13: static char *rcsid_GetButton_c = "$Header: GetButton.c,v 10.5 86/02/01 16:09:26 tony Rel $";
        !            14: #endif
        !            15: 
        !            16: #include "xwm.h"
        !            17: 
        !            18: Bool GetButton(button_event)
        !            19:     XButtonEvent *button_event;        /* Button event packet. */
        !            20: {
        !            21:     XKeyPressedEvent *kp_event;        /* Key pressed event. */
        !            22:     char *icon_str;            /* Icon's name string. */
        !            23:     register int icon_str_len; /* Icon name string lenght.  */
        !            24:     register int key_char;     /* Key press character code. */
        !            25:     register int icon_x;       /* Icon window X coordinate. */
        !            26:     register int icon_y;       /* Icon window Y coordinate. */
        !            27:     register int icon_w;       /* Icon window width. */
        !            28:     register int icon_h;       /* Icon window height. */    
        !            29:     int status;                        /* Routine call return status. */
        !            30:     Window icon;               /* Icon window. */
        !            31:     WindowInfo icon_info;      /* Icon window info structure. */
        !            32:     char *kbd_str;             /* Keyboard string      */
        !            33:     int nbytes;                        /* Keyboard string length       */
        !            34:     int i;                     /* loop over the string         */
        !            35:     Bool name_changed = FALSE;  /* if TRUE, must redisplay */
        !            36: 
        !            37:     /*
        !            38:      * Get next event from input queue and store it in the event packet
        !            39:      * passed to GetButton.
        !            40:      */
        !            41:     XNextEvent(button_event);
        !            42: 
        !            43:     /*
        !            44:      * The event occured on the root window, it must be a mouse
        !            45:      * button event. 
        !            46:      */
        !            47:     if (button_event->window == RootWindow) {
        !            48:        return(TRUE);
        !            49:     }
        !            50: 
        !            51:     /*
        !            52:      * Ok, if the event is not on the root window it must be an event on
        !            53:      * one of the icons owned by xwm.
        !            54:      */
        !            55:     icon = button_event->window;
        !            56: 
        !            57:     /*
        !            58:      * If the event is an UnmapWindow event then delete the icon window
        !            59:      * and return FALSE.
        !            60:      */
        !            61:     if (button_event->type == UnmapWindow) {
        !            62:        XDestroyWindow(icon);
        !            63:        return(FALSE);
        !            64:     }
        !            65: 
        !            66:     /*
        !            67:      * If it is not an UnmapWindow event then it must be either an 
        !            68:      * ExposeWindow event or a KeyPressed event.
        !            69:      */
        !            70:      
        !            71:     /*
        !            72:      * Find out current information about the icon window.
        !            73:      */
        !            74:     status = XQueryWindow(icon, &icon_info);
        !            75:     if (status == FAILURE) return(FALSE);
        !            76: 
        !            77:     /*
        !            78:      * Initialize the icon position variables.
        !            79:      */
        !            80:     icon_x = icon_info.x;
        !            81:     icon_y = icon_info.y;
        !            82: 
        !            83:     /*
        !            84:      * Get the name of the window associated with the icon and
        !            85:      * determine its lenght.
        !            86:      */
        !            87:     status = XFetchName(icon_info.assoc_wind, &icon_str);
        !            88:     if (status == FAILURE) return(FALSE);
        !            89:     icon_str_len = icon_str ? strlen(icon_str) : 0;
        !            90: 
        !            91:     /*
        !            92:      * If the event is a window exposure event and the icon's name string
        !            93:      * is not of zero length, simply repaint the text in the icon window
        !            94:      * and return FALSE.
        !            95:      */
        !            96:     if (button_event->type == ExposeWindow) {
        !            97:        XClear(icon);
        !            98:        if (icon_str_len != 0) {
        !            99:            XTextPad (
        !           100:                icon,
        !           101:                IPadding, IPadding,
        !           102:                icon_str, icon_str_len,
        !           103:                IFont, 0, 0, 
        !           104:                ITextForground, ITextBackground,
        !           105:                GXcopy, AllPlanes
        !           106:            );
        !           107:            /*
        !           108:             * Remember to free the icon name string.  (Oh Bother! Said Poo.)
        !           109:             */
        !           110:            free (icon_str);
        !           111:        }
        !           112:        return(FALSE);
        !           113:     }
        !           114: 
        !           115:     /*
        !           116:      * If we have gotten this far event can only be a key pressed event.
        !           117:      */
        !           118:     kp_event = (XKeyPressedEvent *) button_event;
        !           119: 
        !           120:     /* 
        !           121:      * We convert the key pressed event to ascii.
        !           122:      */
        !           123:     kbd_str = XLookupMapping(kp_event, &nbytes);
        !           124:     for (i = 0; i < nbytes; i++) {
        !           125:            key_char = kbd_str[i];
        !           126:            /*
        !           127:             * If the key was <DELETE>, then delete a character from the end of
        !           128:             * the name.
        !           129:             *
        !           130:             * If the key was <CTRL-U>, then wipe out the entire window name.
        !           131:             *
        !           132:             * All other ctrl keys are squashed.
        !           133:             *
        !           134:             * All printable characters are appended to the window's name, which
        !           135:             * may have to be grown to allow for the extra length.
        !           136:             */
        !           137:            if (key_char == '\177') {
        !           138:                /*
        !           139:                 * <DELETE>
        !           140:                 */
        !           141:                if (icon_str_len > 0) {
        !           142:                    icon_str_len--;
        !           143:                    icon_str[icon_str_len] = '\0';
        !           144:                    name_changed = TRUE;
        !           145:                    }
        !           146:                }
        !           147:            else if (key_char == '\025') {
        !           148:                /*
        !           149:                 * <CTRL-U>
        !           150:                 */
        !           151:                if (icon_str_len > 0) {
        !           152:                    icon_str_len = 0;
        !           153:                    *icon_str = '\0';
        !           154:                    name_changed = TRUE;
        !           155:                    }
        !           156:                }
        !           157:            else if (key_char < IFontInfo.firstchar 
        !           158:                  || key_char > IFontInfo.lastchar)
        !           159:                /*
        !           160:                 * Any other random (non-printable) key: ignore it.
        !           161:                 */
        !           162:                /* do nothing */ ;
        !           163:            else {
        !           164:                /*
        !           165:                 * ASCII Alphanumerics.
        !           166:                 */
        !           167:                if (icon_str == NULL)
        !           168:                    icon_str = (char *)malloc(icon_str_len + 2);
        !           169:                else
        !           170:                    icon_str = (char *)realloc(icon_str, (icon_str_len + 2));
        !           171:                if (icon_str == NULL) {
        !           172:                    errno = ENOMEM;
        !           173:                    Error("GetButton -> Realloc of window name string memory failed.");
        !           174:                }
        !           175:                icon_str[icon_str_len] = key_char;
        !           176:                icon_str[icon_str_len + 1] = '\0';
        !           177:                icon_str_len += 1;
        !           178:                name_changed = TRUE;
        !           179:        }
        !           180:     }
        !           181:     
        !           182:     if (name_changed) {
        !           183:        /*
        !           184:         * Now that we have changed the size of the icon we have to reconfigure
        !           185:         * it so that everything looks good.  Oh yes, don't forget to move the
        !           186:         * mouse so that it stays in the window!
        !           187:         */
        !           188: 
        !           189:        /*
        !           190:         * Set the window name to the new string.
        !           191:         */
        !           192:        XStoreName(icon_info.assoc_wind, icon_str);
        !           193: 
        !           194:        /*
        !           195:         * Determine the new icon window configuration.
        !           196:         */
        !           197:        icon_h = IFontInfo.height + (IPadding << 1);
        !           198:        icon_w = XQueryWidth(icon_str, IFont);
        !           199:        if (icon_w == 0) {
        !           200:            icon_w = icon_h;
        !           201:        }
        !           202:        else {
        !           203:            icon_w += (IPadding << 1);
        !           204:        }
        !           205: 
        !           206:        if (icon_x < 0) icon_x = 0;
        !           207:        if (icon_y < 0) icon_y = 0;
        !           208:        if (icon_x - 1 + icon_w + (IBorderWidth << 1) > ScreenWidth) {
        !           209:            icon_x = ScreenWidth - icon_w - (IBorderWidth << 1) + 1;
        !           210:        }
        !           211:        if (icon_y - 1 + icon_h + (IBorderWidth << 1) > ScreenHeight) {
        !           212:            icon_y = ScreenHeight - icon_h - (IBorderWidth << 1) + 1;
        !           213:        }
        !           214: 
        !           215:        XConfigureWindow(icon, icon_x, icon_y, icon_w, icon_h);
        !           216:        XWarpMouse(icon, (icon_w >> 1), (icon_h >> 1));
        !           217:     }
        !           218: 
        !           219:     /* 
        !           220:      * Free the local storage and return FALSE.
        !           221:      */
        !           222:     if (icon_str) free(icon_str);
        !           223:     return(FALSE);
        !           224: }

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