#ifndef lint #ifdef sccs static char sccsid[] = "@(#)item_set.c 20.104 93/06/28"; #endif #endif /* * (c) Copyright 1989 Sun Microsystems, Inc. Sun design patents * pending in the U.S. and foreign countries. See LEGAL NOTICE * file for terms of the license. */ #include #include #include Xv_public struct pr_size xv_pf_textwidth(); #ifdef OW_I18N extern struct pr_size xv_pf_textwidth_wc(); #endif /* OW_I18N */ Xv_private int panel_item_parent(); Xv_private void win_set_no_focus(); Xv_private Graphics_info *xv_init_olgx(); static void item_adjust_label_size(); extern Notify_value panel_base_event_handler(); Pkg_private Xv_opaque item_set_avlist(item_public, avlist) Panel_item item_public; Attr_avlist avlist; { Attr_avlist attrs; Item_info *ip = ITEM_PRIVATE(item_public); Panel_image *label = &ip->label; Panel_info *panel = ip->panel; int check_wants_focus = FALSE; #ifdef ATTR_CONSUME_BUGS_FIXED int consumed; #endif Rect deltas; Xv_Drawable_info *info; int item_x; short item_x_changed = FALSE; int item_y; short item_y_changed = FALSE; int label_boxed = image_boxed(label); Xv_opaque label_data = 0; short label_font_changed = FALSE; int label_inverted = image_inverted(label); struct pr_size label_size; short label_size_changed = FALSE; int label_type = -1; /* -1 = no new label yet */ short label_width_changed = FALSE; int label_x; short label_x_changed = FALSE; int label_y; short label_y_changed = FALSE; short layout_changed = FALSE; int next_col_gap; int next_row_gap; short potential_new_rect = FALSE; Xv_opaque pw; /* paint window */ Panel_setting saved_repaint = ip->repaint; int start_new_col = FALSE; int start_new_row = FALSE; int value_x; short value_x_changed = FALSE; int value_y; short value_y_changed = FALSE; int wants_focus; /* If a client has called panel_item_parent this item may not * have a parent; do nothing in this case. */ if (panel == NULL) { return ((Xv_opaque) XV_ERROR); } for (attrs = avlist; *attrs; attrs = attr_next(attrs)) { #ifdef ATTR_CONSUME_BUGS_FIXED consumed = TRUE; #endif switch (attrs[0]) { case PANEL_EVENT_PROC: ip->ops.panel_op_handle_event = (void (*) ()) attrs[1]; break; case XV_SHOW: if ((int) attrs[1]) { if (hidden(ip)) { ip->flags &= ~HIDDEN; if (ip->ops.panel_op_restore) (*ip->ops.panel_op_restore) (ITEM_PUBLIC(ip)); panel_update_extent(panel, ip->rect); } } else if (!hidden(ip)) { panel_clear_item(ip); ip->flags |= HIDDEN; if (ip->ops.panel_op_remove) (*ip->ops.panel_op_remove) (ITEM_PUBLIC(ip)); } check_wants_focus = wants_key(ip); break; case PANEL_CHILD_CARET_ITEM: ip->child_kbd_focus_item = (Panel_item) attrs[1]; break; case PANEL_ITEM_OWNER: ip->owner = (Panel_item) attrs[1]; break; /* PANEL_ITEM_X attr must still be supported in addition to XV_X * and XV_Y because they can be used on the panel. When used * on the panel PANEL_ITEM_X != XV_X on the panel. */ case XV_X: case PANEL_ITEM_X: item_x = (int) attrs[1]; ip->flags |= ITEM_X_FIXED; item_x_changed = TRUE; potential_new_rect = TRUE; break; case XV_Y: case PANEL_ITEM_Y: item_y = (int) attrs[1]; ip->flags |= ITEM_Y_FIXED; item_y_changed = TRUE; potential_new_rect = TRUE; break; case PANEL_NEXT_COL: next_col_gap = (int) attrs[1]; if (next_col_gap == 0) next_col_gap = 1; start_new_col = TRUE; ip->flags |= ITEM_X_FIXED | ITEM_Y_FIXED; break; case PANEL_NEXT_ROW: next_row_gap = (int) attrs[1]; if (next_row_gap == 0) next_row_gap = 1; start_new_row = TRUE; ip->flags |= ITEM_X_FIXED | ITEM_Y_FIXED; break; case PANEL_LABEL_X: label_x = (int) attrs[1]; ip->flags |= LABEL_X_FIXED; label_x_changed = TRUE; potential_new_rect = TRUE; break; case PANEL_LABEL_Y: label_y = (int) attrs[1]; ip->flags |= LABEL_Y_FIXED; label_y_changed = TRUE; potential_new_rect = TRUE; break; case PANEL_VALUE_FONT: if (ip->value_font != panel->std_font) xv_set(ip->value_font, XV_DECREMENT_REF_COUNT, 0); if (attrs[1]) { int three_d; ip->value_font = (Xv_Font) attrs[1]; #ifdef OW_I18N ip->value_fontset_id = (XFontSet) xv_get(ip->value_font, FONT_SET_ID); #else ip->value_font_xid = (XID) xv_get(ip->value_font, XV_XID); #endif /* OW_I18N */ if (ip->value_font != panel->std_font) xv_set(ip->value_font, XV_INCREMENT_REF_COUNT, 0); three_d = panel->status.three_d ? TRUE : FALSE; ip->value_ginfo = xv_init_olgx(PANEL_PUBLIC(panel), &three_d, attrs[1]); } else { ip->value_font = panel->std_font; #ifdef OW_I18N ip->value_fontset_id = panel->std_fontset_id; #else ip->value_font_xid = panel->std_font_xid; #endif /* OW_I18N */ ip->value_ginfo = panel->ginfo; } break; case PANEL_VALUE_X: value_x = (int) attrs[1]; ip->flags |= VALUE_X_FIXED; value_x_changed = TRUE; potential_new_rect = TRUE; break; case PANEL_VALUE_Y: value_y = (int) attrs[1]; ip->flags |= VALUE_Y_FIXED; value_y_changed = TRUE; potential_new_rect = TRUE; break; case PANEL_LABEL_IMAGE: label_type = PIT_SVRIM; label_data = attrs[1]; potential_new_rect = TRUE; break; #ifdef OW_I18N case PANEL_LABEL_STRING: label_type = PIT_STRING; /* Panel will only process wchar_t strings. Make temp space for * this string and free it at the end of this routine. * panel_make_image will do the real malloc for this string. * Note: Can optimize this code for performance. */ label_data = (Xv_opaque) _xv_mbstowcsdup((char *)attrs[1]); potential_new_rect = TRUE; break; case PANEL_LABEL_STRING_WCS: label_type = PIT_STRING; label_data = (Xv_opaque) panel_strsave_wc((wchar_t *)attrs[1]); potential_new_rect = TRUE; break; #else case PANEL_LABEL_STRING: label_type = PIT_STRING; label_data = attrs[1]; potential_new_rect = TRUE; break; #endif /* OW_I18N */ case PANEL_LABEL_FONT: panel_image_set_font(&ip->label, (Xv_Font) attrs[1]); if (attrs[1]) { int three_d = panel->status.three_d ? TRUE : FALSE; image_ginfo(&ip->label) = xv_init_olgx(PANEL_PUBLIC(panel), &three_d, attrs[1]); panel->status.three_d = three_d; } label_font_changed = TRUE; potential_new_rect = TRUE; break; case PANEL_LABEL_BOLD: if (ip->item_type == PANEL_MESSAGE_ITEM) { if (attrs[1] != image_bold(&ip->label)) { if (attrs[1]) { panel_image_set_font(&ip->label, panel->bold_font); image_set_bold(&ip->label, TRUE); } else { panel_image_set_font(&ip->label, panel->std_font); image_set_bold(&ip->label, FALSE); } label_font_changed = TRUE; potential_new_rect = TRUE; } } break; case PANEL_LABEL_BOXED: label_boxed = (int) attrs[1]; image_set_boxed(label, label_boxed); break; case PANEL_LABEL_INVERTED: label_inverted = (int) attrs[1]; image_set_inverted(label, label_inverted); break; case PANEL_LABEL_WIDTH: if (ip->label_width != (int) attrs[1]) { ip->label_width = (int) attrs[1]; label_width_changed = TRUE; } break; case PANEL_LAYOUT: switch ((Panel_setting) attrs[1]) { case PANEL_HORIZONTAL: case PANEL_VERTICAL: ip->layout = (Panel_setting) attrs[1]; layout_changed = TRUE; potential_new_rect = TRUE; break; default: /* invalid layout */ break; } break; case PANEL_MENU_ITEM: if (attrs[1]) ip->flags |= IS_MENU_ITEM; else ip->flags &= ~IS_MENU_ITEM; break; #ifdef OW_I18N case PANEL_NOTIFY_PROC: ip->notify = (int (*) ()) attrs[1]; ip->flags &= ~WCHAR_NOTIFY; if (!ip->notify) ip->notify = panel_nullproc; break; case PANEL_NOTIFY_PROC_WCS: ip->notify_wc = (int (*) ()) attrs[1]; ip->flags |= WCHAR_NOTIFY; if (!ip->notify_wc) ip->notify_wc = panel_nullproc; break; #else case PANEL_NOTIFY_PROC: ip->notify = (int (*) ()) attrs[1]; if (!ip->notify) ip->notify = panel_nullproc; break; #endif /* OW_I18N */ case PANEL_NOTIFY_STATUS: ip->notify_status = (int) attrs[1]; break; case PANEL_PAINT: ip->repaint = (Panel_setting) attrs[1]; break; case PANEL_ACCEPT_KEYSTROKE: if (attrs[1]) { check_wants_focus = !wants_key(ip); ip->flags |= WANTS_KEY; } else { check_wants_focus = wants_key(ip); ip->flags &= ~WANTS_KEY; } break; case PANEL_ITEM_MENU: if (ip->menu) xv_set(ip->menu, XV_DECREMENT_REF_COUNT, 0); if (ip->menu = (Xv_opaque) attrs[1]) xv_set(ip->menu, XV_INCREMENT_REF_COUNT, 0); if (label_type == -1) { label_type = label->im_type; /* force label (image) to be * remade */ if (label_type == PIT_STRING) #ifdef OW_I18N { if (label_data) xv_free(label_data); label_data = (Xv_opaque) panel_strsave_wc(image_string_wc(label)); } #else label_data = (Xv_opaque) image_string(label); #endif /* OW_I18N */ else label_data = (Xv_opaque) image_svrim(label); } break; case PANEL_CLIENT_DATA: ip->client_data = attrs[1]; break; case PANEL_BUSY: if (attrs[1]) ip->flags |= BUSY; else ip->flags &= ~BUSY; ip->flags |= BUSY_MODIFIED; break; case PANEL_INACTIVE: if (attrs[1]) { ip->flags |= INACTIVE; if (panel->kbd_focus_item == ip) { /* Item has keyboard focus: Move keyboard focus to next * item that wants keystrokes, if any. */ panel_yield_kbd_focus(panel); panel->kbd_focus_item = panel_next_kbd_focus(panel, TRUE); if (panel->kbd_focus_item) panel_accept_kbd_focus(panel); } } else ip->flags &= ~INACTIVE; check_wants_focus = wants_key(ip); break; case PANEL_ITEM_COLOR: DRAWABLE_INFO_MACRO(panel->paint_window->pw, info); if (xv_depth(info) > 1) ip->color_index = (int) attrs[1]; break; case PANEL_OPS_VECTOR: ip->ops = *(Panel_ops *) attrs[1]; if (panel->event_proc) ip->ops.panel_op_handle_event = (void (*) ()) panel->event_proc; break; case PANEL_ITEM_DEAF: if (attrs[1]) ip->flags |= DEAF; else ip->flags &= ~DEAF; break; case PANEL_ITEM_WANTS_ADJUST: if (attrs[1]) ip->flags |= WANTS_ADJUST; else ip->flags &= ~WANTS_ADJUST; break; /* OW_I18N: May need to add a wchar_t parallel attribute??? * * PANEL_ITEM_WANTS_WC */ case PANEL_ITEM_WANTS_ISO: if (attrs[1]) ip->flags |= WANTS_ISO; else ip->flags &= ~WANTS_ISO; break; case PANEL_ITEM_LABEL_RECT: ip->label_rect = *(Rect *) attrs[1]; break; case PANEL_ITEM_VALUE_RECT: ip->value_rect = *(Rect *) attrs[1]; break; case PANEL_ITEM_RECT: case XV_RECT: ip->rect = *(Rect *) attrs[1]; break; case PANEL_POST_EVENTS: if (attrs[1]) { ip->flags |= POST_EVENTS; notify_set_event_func(item_public, panel_base_event_handler, NOTIFY_IMMEDIATE); } else ip->flags &= ~POST_EVENTS; break; case XV_END_CREATE: #ifdef ATTR_CONSUME_BUGS_FIXED consumed = FALSE; #endif /* Append the new item to the list of items in the panel. * Note: This is done at XV_END_CREATE time since an item * might create an imbedded item, in which case the imbedded * item needs to be listed first in the panel item list. * Examples of this are PANEL_NUMERIC_TEXT, PANEL_SLIDER * and PANEL_LIST, each of which create an imbedded PANEL_TEXT * item. */ panel_append(ip); ip->flags |= CREATED; panel_check_item_layout(ip); check_wants_focus = TRUE; /* * for scrolling computations, note new extent of panel, tell * scrollbars */ if (!hidden(ip)) panel_update_extent(panel, ip->rect); break; default: #ifdef ATTR_CONSUME_BUGS_FIXED consumed = FALSE; #endif /* Note: xv_check_bad_attr is not called since item_set_avlist * may be called via xv_super_set_avlist in one of the * panel item set routines. */ break; } #ifdef ATTR_CONSUME_BUGS_FIXED /* BUG ALERT: Item set routines call xv_super_set_avlist, * which calls this routine. If this routine consumes attrs, * then when xv_super_set_avlist returns to the item set routines, * the switch (attrs[0]) which then gets executed will not see * the attributes item_set_avlist just consumed. */ if (consumed) ATTR_CONSUME(attrs[0]); #endif } if (check_wants_focus) { wants_focus = panel_wants_focus(panel); PANEL_EACH_PAINT_WINDOW(panel, pw) win_set_no_focus(pw, !wants_focus); PANEL_END_EACH_PAINT_WINDOW } /* * Handle any item position changes. */ if (start_new_row) { if (!item_x_changed) item_x = PANEL_ITEM_X_START; item_y = panel->lowest_bottom + (next_row_gap >= 0 ? next_row_gap : panel->item_y_offset); } if (start_new_col) { if (!item_y_changed) item_y = PANEL_ITEM_Y_START; item_x = panel->rightmost_right + (next_col_gap >= 0 ? next_col_gap : panel->item_x_offset); panel->current_col_x = item_x; } if (start_new_row || start_new_col || item_x_changed || item_y_changed) { rect_construct(&deltas, 0, 0, 0, 0); /* compute item offset */ if (start_new_row || start_new_col || item_x_changed) deltas.r_left = item_x - ip->rect.r_left; if (start_new_row || start_new_col || item_y_changed) deltas.r_top = item_y - ip->rect.r_top; if (deltas.r_left || deltas.r_top) /* * ITEM_X or ITEM_Y has changed, so re-layout item in order to * cause the entire item to change position. */ panel_item_layout(ip, &deltas); } /* * Now handle label size changes . */ /* * update label font & boldness if needed. Note that this may be set * again below if a new label string or image has been given. */ if (is_string(label) && label_font_changed) { #ifdef OW_I18N label_size = xv_pf_textwidth_wc(STRLEN(image_string_wc(label)), image_font(label), image_string_wc(label)); #else label_size = xv_pf_textwidth(strlen(image_string(label)), image_font(label), image_string(label)); #endif /* OW_I18N */ if (ip->label_width) label_size.x = ip->label_width; item_adjust_label_size(ip->item_type, PIT_STRING, &label_size, ip->menu ? TRUE : FALSE, panel->ginfo); ip->label_rect.r_width = label_size.x; ip->label_rect.r_height = label_size.y; label_size_changed = TRUE; } /* free old label, allocate new */ if (set(label_type)) { /* Note: panel_make_image sets label->im_type */ label_size = panel_make_image(image_font(label), label, label_type, label_data, image_bold(label), label_inverted); if (ip->label_width) label_size.x = ip->label_width; item_adjust_label_size(ip->item_type, image_type(label), &label_size, ip->menu ? TRUE : FALSE, panel->ginfo); ip->label_rect.r_width = label_size.x; ip->label_rect.r_height = label_size.y; label_size_changed = TRUE; } if (!label_size_changed && !rect_isnull(&ip->label_rect) && label_width_changed) { /* Adjust the label width */ ip->label_rect.r_width = ip->label_width + 2*ButtonEndcap_Width(panel->ginfo); if (ip->menu) ip->label_rect.r_width += 2*MenuMark_Width(panel->ginfo); label_size_changed = TRUE; } /* * use default positions for label or value if not specified. */ if (layout_changed || label_size_changed || label_x_changed || label_y_changed) { /* * layout, label position or size has changed, so re-compute default * value position. */ if (label_x_changed) ip->label_rect.r_left = label_x; if (label_y_changed) ip->label_rect.r_top = label_y; /* now move the value if it's not fixed */ fix_positions(ip); } if (value_x_changed || value_y_changed) { /* * value position has changed, so re-compute default label position. */ rect_construct(&deltas, 0, 0, 0, 0); if (value_x_changed) { deltas.r_left = value_x - ip->value_rect.r_left; ip->value_rect.r_left = value_x; } if (value_y_changed) { deltas.r_top = value_y - ip->value_rect.r_top; ip->value_rect.r_top = value_y; } if (deltas.r_left || deltas.r_top) { /* * VALUE_X or VALUE_Y has changed, so tell item to shift all its * components (choices, marks etc.). */ if (ip->ops.panel_op_layout) (*ip->ops.panel_op_layout) (ITEM_PUBLIC(ip), &deltas); /* now move the label if it's not fixed */ fix_positions(ip); } } /* make sure the item rect encloses the label and value */ ip->rect = panel_enclosing_rect(&ip->label_rect, &ip->value_rect); /* for scrolling computations, note new extent of panel, tell scrollbars */ if (potential_new_rect && !hidden(ip)) panel_update_extent(panel, ip->rect); if (panel->status.painted && !panel->no_redisplay_item) panel_redisplay_item(ip, ip->repaint); /* * Restore the item's original repaint behavior. This allows clients to * specify a 'one time' repaint policy for this call only. */ ip->repaint = saved_repaint; return XV_OK; } /* Adjust size for borders around label */ static void item_adjust_label_size(item_type, label_type, size, menu_attached, ginfo) Panel_item_type item_type; int label_type; /* PIT_STRING or PIT_SVRIM */ struct pr_size *size; int menu_attached; /* boolean */ Graphics_info *ginfo; { if (item_type != PANEL_BUTTON_ITEM) return; if (label_type == PIT_STRING) { size->x += 2*ButtonEndcap_Width(ginfo); size->y = Button_Height(ginfo); } else { size->x += OLGX_VAR_HEIGHT_BTN_MARGIN; size->y += OLGX_VAR_HEIGHT_BTN_MARGIN; } if (menu_attached) { size->x += 2*MenuMark_Width(ginfo); if (size->y < MenuMark_Height(ginfo)) size->y = MenuMark_Height(ginfo); } } /* fix_positions - of label and value rects */ static fix_positions(ip) register Item_info *ip; { if (!value_fixed(ip)) { struct rect deltas; /* compute the value position which is to the right of the label */ /* remember the old value rect position */ rect_construct(&deltas, 0, 0, 0, 0); deltas.r_left = ip->value_rect.r_left; deltas.r_top = ip->value_rect.r_top; switch (ip->layout) { case PANEL_HORIZONTAL: /* after => to right of */ ip->value_rect.r_left = rect_right(&ip->label_rect) + 1 + (ip->label_rect.r_width ? LABEL_X_GAP : 0); ip->value_rect.r_top = ip->label_rect.r_top; break; case PANEL_VERTICAL: /* after => below */ ip->value_rect.r_left = ip->label_rect.r_left; ip->value_rect.r_top = rect_bottom(&ip->label_rect) + 1 + (ip->label_rect.r_height ? LABEL_Y_GAP : 0); break; } /* delta is new postion minus old position */ deltas.r_left = ip->value_rect.r_left - deltas.r_left; deltas.r_top = ip->value_rect.r_top - deltas.r_top; if (deltas.r_left || deltas.r_top) /* * VALUE_X or VALUE_Y has changed, so tell item to shift all its * components (choices, marks etc.). */ if (ip->ops.panel_op_layout) (*ip->ops.panel_op_layout) (ITEM_PUBLIC(ip), &deltas); } panel_fix_label_position(ip); } Pkg_private panel_fix_label_position(ip) register Item_info *ip; { if (label_fixed(ip)) return; /* compute the label position as before the value. */ switch (ip->layout) { case PANEL_HORIZONTAL: /* before => to left of */ ip->label_rect.r_left = ip->value_rect.r_left; if (ip->label_rect.r_width > 0) ip->label_rect.r_left -= ip->label_rect.r_width + LABEL_X_GAP; ip->label_rect.r_top = ip->value_rect.r_top; break; case PANEL_VERTICAL: /* before => above */ ip->label_rect.r_left = ip->value_rect.r_left; ip->label_rect.r_top = ip->value_rect.r_top; if (ip->label_rect.r_height > 0) ip->label_rect.r_top -= ip->label_rect.r_height + LABEL_Y_GAP; break; } } /**************************************************************** panel_item_parent panel_item_parent has been supplied for internal SPD use only. In particular the information management (database) group uses it. The function is designed to let a client unparent and reparent a panel item. One can implement a cache of items with this function where the items are shared between multiple panels. We provided this routine rather then making XV_OWNER settable because too much of the item code expects to have a parent. We would have had to rewrite too much of the panel code to make this work from an attribute. As it is we provide this functionality by letting the client use this routine to unset and reset an item's parent. While an item has no parent a user can't set any of its attributes. Code has been put in to prevent this. The client can however get an items attributes that aren't depenedent on the panel. If the item's attriibute does depend on the panel NULL is returned. The parent parameter is used to both reset and unset an item's parent. If parent == NULL then the item will not have a parent after it is removed from its current panel. If the parent != NULL then the item will be reparented to parent ****************************************************************/ Xv_private panel_item_parent(item, parent) Panel_item item; Panel parent; { register Item_info *ip = ITEM_PRIVATE(item); register Panel_info *new_panel = NULL; register Panel_info *current_panel = ip->panel; if (parent != NULL) { new_panel = PANEL_PRIVATE(parent); } if (current_panel != NULL) { /* clear the item */ if (!current_panel->status.destroying) { if (ip->item_type == PANEL_TEXT_ITEM && ip == current_panel->kbd_focus_item) { panel_text_caret_on(current_panel, FALSE); } panel_clear_item(ip); } /* unlink the item */ panel_unlink(ip, FALSE);/* unlink is not part of a destroy */ } if (new_panel != NULL) { ip->panel = new_panel; /* relink the item */ panel_append(ip); if (ip->ops.panel_op_restore) (*ip->ops.panel_op_restore) (ITEM_PUBLIC(ip)); /* don't repaint -- the client is probably doing a set */ /* right after this to reposition the item */ } }