#ifndef lint #ifdef sccs static char sccsid[] = "@(#)txt_search.c 20.45 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. */ /* * Text search popup frame creation and support. */ #include #include #include #include #include #include #include #include #include #include #include #include #include #define MAX_DISPLAY_LENGTH 50 #define MAX_STR_LENGTH 1024 Menu direction_menu; Pkg_private Panel_item search_panel_items[]; #define DONT_RING_BELL 0x00000000 #define RING_IF_NOT_FOUND 0x00000001 #define RING_IF_ONLY_ONE 0x00000002 #define HELP_INFO(s) XV_HELP_DATA, s, #define DIRECTION_VIEW 1 /* unique key for textsw view handle */ /* for find and replace */ typedef enum { FIND_ITEM = 0, FIND_STRING_ITEM = 1, REPLACE_ITEM = 2, REPLACE_STRING_ITEM = 3, FIND_THEN_REPLACE_ITEM = 4, REPLACE_THEN_FIND_ITEM = 5, REPLACE_ALL_ITEM = 6, WRAP_ITEM = 7 } Search_panel_item_enum; Pkg_private Textsw_view_handle text_view_frm_p_itm(); Pkg_private Es_index textsw_do_search_proc(view, direction, ring_bell_status, wrapping_off, is_global) Textsw_view_handle view; unsigned direction; unsigned ring_bell_status; int wrapping_off; int is_global; { Textsw_folio folio = FOLIO_FOR_VIEW(view); Es_index first, last_plus_one; CHAR buf[MAX_STR_LENGTH]; int str_len; Es_index start_pos; if (!textsw_get_selection(view, &first, &last_plus_one, NULL, 0)) first = last_plus_one = EV_GET_INSERT(folio->views); if (direction == EV_FIND_DEFAULT) first = last_plus_one; STRNCPY(buf, (CHAR *) panel_get(search_panel_items[(int) FIND_STRING_ITEM], #ifdef OW_I18N PANEL_VALUE_WCS, NULL), #else PANEL_VALUE, NULL), #endif MAX_STR_LENGTH); str_len = STRLEN(buf); start_pos = (direction & EV_FIND_BACKWARD) ? first : (first - str_len); textsw_find_pattern(folio, &first, &last_plus_one, buf, str_len, direction); if (wrapping_off) { if (direction == EV_FIND_DEFAULT) first = (start_pos > last_plus_one) ? ES_CANNOT_SET : first; else first = (start_pos < last_plus_one) ? ES_CANNOT_SET : first; } if ((first == ES_CANNOT_SET) || (last_plus_one == ES_CANNOT_SET)) { if (ring_bell_status & RING_IF_NOT_FOUND) (void) window_bell(WINDOW_FROM_VIEW(view)); return (ES_CANNOT_SET); } else { if ((ring_bell_status & RING_IF_ONLY_ONE) && (first == start_pos)) (void) window_bell(WINDOW_FROM_VIEW(view)); if (!is_global) textsw_possibly_normalize_and_set_selection( VIEW_REP_TO_ABS(view), first, last_plus_one, EV_SEL_PRIMARY); else #ifdef OW_I18N textsw_set_selection_wcs(VIEW_REP_TO_ABS(view), first, last_plus_one , EV_SEL_PRIMARY); #else textsw_set_selection(VIEW_REP_TO_ABS(view), first, last_plus_one, EV_SEL_PRIMARY); #endif (void) textsw_set_insert(folio, last_plus_one); textsw_record_find(folio, buf, str_len, (int) direction); return ((direction == EV_FIND_DEFAULT) ? last_plus_one : first); } } Pkg_private void search_event_proc(item, event) Panel_item item; Event *event; { Panel panel = panel_get(item, XV_OWNER, 0); Textsw_view_handle view = text_view_frm_p_itm(item); extern Menu direction_menu; (void) xv_set(direction_menu, XV_KEY_DATA, DIRECTION_VIEW, view, 0); if (event_action(event) == ACTION_MENU && event_is_down(event)) { (void) menu_show(direction_menu, panel, event, 0); } else { (void) panel_default_handle_event(item, event); } } static void find_forwards_action_proc(menu, item) Menu menu; Menu_item item; { Textsw_view_handle view = (Textsw_view_handle) xv_get(menu, XV_KEY_DATA, DIRECTION_VIEW); int wrapping_off = (int) panel_get(search_panel_items[(int) WRAP_ITEM], PANEL_VALUE, NULL); (void) textsw_do_search_proc(view, EV_FIND_DEFAULT, (RING_IF_NOT_FOUND | RING_IF_ONLY_ONE), wrapping_off, FALSE); } static void find_backwards_action_proc(menu, item) Menu menu; Menu_item item; { Textsw_view_handle view = (Textsw_view_handle) xv_get(menu, XV_KEY_DATA, DIRECTION_VIEW); int wrapping_off = (int) panel_get(search_panel_items[(int) WRAP_ITEM], PANEL_VALUE, NULL); (void) textsw_do_search_proc(view, EV_FIND_BACKWARD, (RING_IF_NOT_FOUND | RING_IF_ONLY_ONE), wrapping_off, FALSE); } static int do_replace_proc(view) Textsw_view_handle view; { Textsw textsw = VIEW_REP_TO_ABS(view); CHAR buf[MAX_STR_LENGTH]; int selection_found; int first, last_plus_one; if (selection_found = textsw_get_selection(view, &first, &last_plus_one, NULL, 0)) { STRNCPY(buf, (CHAR *) panel_get( search_panel_items[(int) REPLACE_STRING_ITEM], #ifdef OW_I18N PANEL_VALUE_WCS, NULL), #else PANEL_VALUE, NULL), #endif MAX_STR_LENGTH); textsw_replace(textsw, first, last_plus_one, buf, STRLEN(buf)); } return (selection_found); } static void do_replace_all_proc(view, do_replace_first, direction) Textsw_view_handle view; int do_replace_first; unsigned direction; { Textsw_folio folio = FOLIO_FOR_VIEW(view); int start_checking = FALSE; /* See if now is the time to * check for wrap point */ Es_index cur_pos, prev_pos, cur_mark_pos; Ev_mark_object mark; int exit_loop = FALSE; int first_time = TRUE, process_aborted; int wrapping_off = (int) panel_get(search_panel_items[(int) WRAP_ITEM], PANEL_VALUE, NULL); int string_length_diff; #ifdef OW_I18N /* int saved_cursor_type = view->cursor_type; */ #endif /* OW_I18N */ if (do_replace_first) (void) do_replace_proc(view); process_aborted = FALSE; cur_mark_pos = prev_pos = cur_pos = textsw_do_search_proc(view, direction, RING_IF_NOT_FOUND, wrapping_off, TRUE); exit_loop = (cur_pos == ES_CANNOT_SET); #ifdef OW_I18N string_length_diff = STRLEN((CHAR *) panel_get( search_panel_items[(int) REPLACE_STRING_ITEM], PANEL_VALUE_WCS, NULL)) - STRLEN((CHAR *) panel_get( search_panel_items[(int) FIND_STRING_ITEM], PANEL_VALUE_WCS, NULL)); /* Note: should use busy cursor since no update for global replace */ /* textsw_set_cursor(FOLIO_REP_TO_ABS(folio), CURSOR_BUSY_PTR); */ #else string_length_diff = STRLEN((CHAR *) panel_get( search_panel_items[(int) REPLACE_STRING_ITEM], PANEL_VALUE, NULL)) - STRLEN((CHAR *) panel_get( search_panel_items[(int) FIND_STRING_ITEM], PANEL_VALUE, NULL)); #endif while (!process_aborted && !exit_loop) { if (start_checking) { cur_mark_pos = textsw_find_mark_internal(folio, mark); exit_loop = (direction == EV_FIND_DEFAULT) ? (cur_mark_pos <= cur_pos) : (cur_mark_pos >= cur_pos); } else { /* Did we wrap around the file already */ if (!first_time && (prev_pos == cur_pos)) /* Only one instance of the pattern in the file. */ start_checking = TRUE; else start_checking = (direction == EV_FIND_DEFAULT) ? (prev_pos > cur_pos) : (cur_pos > prev_pos); /* * This is a special case Start search at the first instance of * the pattern in the file. */ if (start_checking) { cur_mark_pos = textsw_find_mark_internal(folio, mark); exit_loop = (direction == EV_FIND_DEFAULT) ? (cur_mark_pos <= cur_pos) : (cur_mark_pos >= cur_pos); } } if (!exit_loop) { (void) do_replace_proc(view); if (first_time) { mark = textsw_add_mark_internal(folio, cur_mark_pos, TEXTSW_MARK_MOVE_AT_INSERT); first_time = FALSE; } prev_pos = cur_pos + string_length_diff; cur_pos = textsw_do_search_proc(view, direction, DONT_RING_BELL, wrapping_off, TRUE); exit_loop = (cur_pos == ES_CANNOT_SET); } } #ifdef OW_I18N /* Note: should reset cursor from busy cursor for global replace */ /* textsw_set_cursor(FOLIO_REP_TO_ABS(folio), saved_cursor_type); */ #endif /* OW_I18N */ if (prev_pos != ES_CANNOT_SET) #ifdef OW_I18N textsw_normalize_view_wc(VIEW_REP_TO_ABS(view), prev_pos); #else /* OW_I18N */ textsw_normalize_view(VIEW_REP_TO_ABS(view), prev_pos); #endif /* OW_I18N */ if (process_aborted) window_bell(VIEW_REP_TO_ABS(view)); } static Panel_setting search_cmd_proc(item, event) Panel_item item; Event *event; { Textsw_view_handle view = text_view_frm_p_itm(item); Textsw_folio folio = FOLIO_FOR_VIEW(view); int wrapping_off = (int) panel_get(search_panel_items[(int) WRAP_ITEM], PANEL_VALUE, NULL); if (item == search_panel_items[(int) FIND_ITEM]) { (void) textsw_do_search_proc(view, EV_FIND_DEFAULT, (RING_IF_NOT_FOUND | RING_IF_ONLY_ONE), wrapping_off); } else if (item == search_panel_items[(int) REPLACE_ITEM]) { if (TXTSW_IS_READ_ONLY(folio) || !do_replace_proc(view)) { (void) window_bell(VIEW_REP_TO_ABS(view)); } } else if (item == search_panel_items[(int) FIND_THEN_REPLACE_ITEM]) { if (!TXTSW_IS_READ_ONLY(folio)) { if (textsw_do_search_proc(view, EV_FIND_DEFAULT, RING_IF_NOT_FOUND, wrapping_off) != ES_CANNOT_SET) (void) do_replace_proc(view); } } else if (item == search_panel_items[(int) REPLACE_THEN_FIND_ITEM]) { if (!TXTSW_IS_READ_ONLY(folio)) { (void) do_replace_proc(view); (void) textsw_do_search_proc(view, EV_FIND_DEFAULT, RING_IF_NOT_FOUND, wrapping_off); } } else if (item == search_panel_items[(int) REPLACE_ALL_ITEM]) { (void) do_replace_all_proc(view, FALSE, EV_FIND_DEFAULT); } return PANEL_NEXT; } static void create_search_items(panel, view) Panel panel; Textsw_view_handle view; { static char *search = "Find"; static char *replace = "Replace"; static char *all = "Replace All"; static char *search_replace = "Find then Replace"; static char *replace_search = "Replace then Find"; static char *backward = "Backward"; static char *forward = "Forward"; static int init_str = 0; CHAR search_string[MAX_STR_LENGTH]; int dummy; Pkg_private void search_event_proc(); if (!init_str) { /* * FIX_ME: The current gettext/dgettext return the uniq * pointer for all messages, but future version and/or * different implementation may behave differently. If it is * the case, you should wrap around following gettext by * strdup call. */ search = XV_MSG("Find"); replace = XV_MSG("Replace"); all = XV_MSG("Replace All"); search_replace = XV_MSG("Find then Replace"); replace_search = XV_MSG("Replace then Find"); backward = XV_MSG("Backward"); forward = XV_MSG("Forward"); init_str = 1; } search_string[0] = NULL; (void) textsw_get_selection(view, &dummy, &dummy, search_string, MAX_STR_LENGTH); direction_menu = xv_create(NULL, MENU, MENU_ITEM, MENU_STRING, forward, MENU_VALUE, 1, HELP_INFO("textsw:mdirforward") MENU_ACTION_PROC, find_forwards_action_proc, 0, MENU_ITEM, MENU_STRING, backward, MENU_VALUE, 2, MENU_ACTION_PROC, find_backwards_action_proc, HELP_INFO("textsw:mdirbackward") 0, HELP_INFO("textsw:mdirection") 0); search_panel_items[(int) FIND_ITEM] = panel_create_item(panel, PANEL_BUTTON, PANEL_LABEL_STRING, search, /* * PANEL_NOTIFY_PROC, search_cmd_proc, */ PANEL_EVENT_PROC, search_event_proc, PANEL_ITEM_MENU, direction_menu, HELP_INFO("textsw:find") 0); search_panel_items[(int) FIND_STRING_ITEM] = panel_create_item(panel, PANEL_TEXT, PANEL_LABEL_Y, ATTR_ROW(0), PANEL_VALUE_DISPLAY_LENGTH, MAX_DISPLAY_LENGTH, PANEL_VALUE_STORED_LENGTH, MAX_STR_LENGTH, PANEL_LABEL_STRING, " :", #ifdef OW_I18N PANEL_VALUE_WCS, search_string, #else PANEL_VALUE, search_string, #endif HELP_INFO("textsw:findstring") 0); search_panel_items[(int) REPLACE_ITEM] = panel_create_item(panel, PANEL_BUTTON, PANEL_LABEL_X, ATTR_COL(0), PANEL_LABEL_Y, ATTR_ROW(1), PANEL_LABEL_STRING, replace, PANEL_NOTIFY_PROC, search_cmd_proc, HELP_INFO("textsw:replace") 0); search_panel_items[(int) REPLACE_STRING_ITEM] = panel_create_item(panel, PANEL_TEXT, PANEL_LABEL_Y, ATTR_ROW(1), PANEL_VALUE_DISPLAY_LENGTH, MAX_DISPLAY_LENGTH, PANEL_VALUE_STORED_LENGTH, MAX_STR_LENGTH, PANEL_LABEL_STRING, ":", HELP_INFO("textsw:replacestring") 0); search_panel_items[(int) FIND_THEN_REPLACE_ITEM] = panel_create_item(panel, PANEL_BUTTON, PANEL_LABEL_X, ATTR_COL(0), PANEL_LABEL_Y, ATTR_ROW(2), PANEL_LABEL_STRING, search_replace, PANEL_NOTIFY_PROC, search_cmd_proc, HELP_INFO("textsw:findreplace") 0); search_panel_items[(int) REPLACE_THEN_FIND_ITEM] = panel_create_item(panel, PANEL_BUTTON, PANEL_LABEL_STRING, replace_search, PANEL_NOTIFY_PROC, search_cmd_proc, HELP_INFO("textsw:replacefind") 0); search_panel_items[(int) REPLACE_ALL_ITEM] = panel_create_item(panel, PANEL_BUTTON, PANEL_LABEL_STRING, all, PANEL_NOTIFY_PROC, search_cmd_proc, HELP_INFO("textsw:replaceall") 0); search_panel_items[(int) WRAP_ITEM] = panel_create_item(panel, PANEL_CYCLE, PANEL_CHOICE_STRINGS, XV_MSG("All Text"), XV_MSG("To End"), 0, HELP_INFO("textsw:wrap") 0); if (search_string[0] != NULL) xv_set(panel, PANEL_CARET_ITEM, search_panel_items[(int) REPLACE_STRING_ITEM], 0); else { xv_set(panel, PANEL_CARET_ITEM, search_panel_items[(int) FIND_STRING_ITEM], 0); } } Pkg_private Panel textsw_create_search_panel(frame, view) Frame frame; Textsw_view_handle view; { Panel panel; panel = (Panel) xv_get(frame, FRAME_CMD_PANEL, HELP_INFO("textsw:searchpanel") 0); (void) create_search_items(panel, view); return (panel); }