home *** CD-ROM | disk | FTP | other *** search
/ Dream 52 / Amiga_Dream_52.iso / Linux / Divers / lyx-0.13.2.tar.gz / lyx-0.13.2.tar / lyx-0.13.2 / src / lyxfr1.C < prev    next >
C/C++ Source or Header  |  1998-04-23  |  8KB  |  325 lines
  1. /* This file is part of
  2. * ======================================================
  3. * 
  4. *           LyX, The Document Processor
  5. *      
  6. *        Copyright (C) 1995 Matthias Ettrich,
  7. *           Copyright (C) 1995-1998 The LyX Team.
  8. *
  9. *======================================================*/
  10.  
  11. #include <config.h>
  12.  
  13. #include <ctype.h>
  14. #include <string.h>
  15. #include <stdlib.h>
  16.  
  17. #ifdef __GNUG__
  18. #pragma implementation
  19. #endif
  20.  
  21. #include "LString.h"
  22. #include "lyx_main.h"
  23. #include FORMS_H_LOCATION
  24. #include "form1.h"
  25. #include "lyxfr0.h"
  26. #include "lyxfr1.h"
  27. #include "lyxfunc.h"
  28. #include "lyxscreen.h"
  29. #include "error.h"
  30. #include "lyxtext.h"
  31. #include "gettext.h"
  32. #include "LyXView.h"
  33. #include "lyx_gui_misc.h"
  34.  
  35. extern BufferView *current_view; // called too many times in this file...
  36.  
  37. // Maximum length copied from the current selection to the search string
  38. const int LYXSEARCH_MAXLEN =  128;
  39.  
  40. // function prototypes
  41.  
  42. bool IsLetterCharOrDigit(char ch);
  43.  
  44. // If nothing selected, select the word at the cursor.
  45. // Returns the current selection
  46. // Note: this function should be in LyXText!
  47. LString const GetSelectionOrWordAtCursor(LyXText *lt);
  48.  
  49. // Returns the current selection. If nothing is selected or if the selection
  50. // spans 2 paragraphs, an empty string is returned.
  51. LString const GetCurrentSelectionAsString(LyXText *lt);
  52.  
  53. // This is a copy of SetSelectionOverString from text.C
  54. // It does the same, but uses only the length as a parameter
  55. void SetSelectionOverLenChars(LyXText *lt, int len);
  56.  
  57. //-------------------------------------------------------------
  58.  
  59. bool IsLetterCharOrDigit(char ch)
  60. {
  61.     return IsLetterChar(ch) || isdigit(ch);
  62. }
  63.  
  64.  
  65. // Returns the current selection. If nothing is selected or if the selection
  66. // spans 2 paragraphs, an empty string is returned.
  67. LString const GetCurrentSelectionAsString(LyXText *lt) 
  68. {
  69.     LyXParagraph     *par;
  70.     int         pos;
  71.     int        endpos;
  72.     int        i;
  73.     char        sz[LYXSEARCH_MAXLEN];
  74.     char        ch;
  75.     bool        fPrevIsSpace;
  76.  
  77.     sz[0] = 0;
  78.     par = lt->cursor.par;
  79.     if (lt->selection && (lt->sel_cursor.par == par)) {
  80.         // (selected) and (begin/end in same paragraph)
  81.         pos = lt->sel_start_cursor.pos;
  82.         endpos = lt->sel_end_cursor.pos;
  83.         i = 0;
  84.         fPrevIsSpace = false;
  85.         while ((i < LYXSEARCH_MAXLEN-2) && 
  86.             (pos < par->Last()) && (pos < endpos)) {
  87.             ch = par->GetChar(pos);
  88.  
  89.             //HB??: Maybe (ch <= ' ') 
  90.             if ((ch == ' ') || ((unsigned char)ch <= LYX_META_INSET)) {
  91.                 // consecutive spaces --> 1 space char
  92.                 if (fPrevIsSpace) {
  93.                     pos++;        // Next text pos
  94.                     continue;    // same search pos
  95.                 }
  96.                 sz[i] = ' ';
  97.                 fPrevIsSpace = true;
  98.             } else {
  99.                 sz[i] = ch;
  100.                 fPrevIsSpace = false;
  101.             }
  102.             pos++;
  103.             i++;
  104.         } 
  105.         sz[i] = 0;
  106.     }
  107.     return LString(sz);
  108. }
  109.  
  110.  
  111. // If nothing selected, select the word at the cursor.
  112. // Returns the current selection
  113. LString const GetSelectionOrWordAtCursor(LyXText *lt) 
  114. {
  115.     lt->SelectWordWhenUnderCursor();
  116.     return GetCurrentSelectionAsString(lt);
  117. }
  118.  
  119.  
  120. // This is a copy of SetSelectionOverString from text.C
  121. // It does the same, but uses only the length as a parameter
  122. void SetSelectionOverLenChars(LyXText *lt, int len)
  123. {
  124.     lt->sel_cursor = lt->cursor;
  125.     int i;
  126.     for (i=0; i < len; i++)
  127.         lt->CursorRight();
  128.     lt->SetSelection();
  129. }
  130.  
  131.  
  132. //------------------------------
  133.  
  134. void LyXFindReplace1::StartSearch()
  135. {
  136.     LyXFindReplace0::StartSearch();
  137.     SetReplaceEnabled(!current_view->currentBuffer()->isReadonly());
  138.  
  139.     if (lsSearch.empty()) 
  140.         SetSearchString(GetSelectionOrWordAtCursor(current_view->currentBuffer()->text));
  141. }    
  142.  
  143.  
  144. void LyXFindReplace1::SearchReplaceCB()
  145. {
  146.     if (!current_view->getScreen())
  147.         return;
  148.     if (current_view->currentBuffer()->isReadonly())
  149.             return;
  150.     if (!current_view->currentBuffer()->text->selection) {
  151.         LyXBell();
  152.         return;
  153.     }
  154.     LString const replacestring = ReplaceString();
  155.  
  156.     current_view->getScreen()->HideCursor();
  157.     current_view->currentBuffer()->update(-2);
  158.  
  159.     // clear the selection (if there is any) 
  160.     current_view->getScreen()->ToggleSelection(false);
  161.     current_view->currentBuffer()->text->
  162.         ReplaceSelectionWithString(replacestring.c_str());
  163.     current_view->currentBuffer()->text->
  164.         SetSelectionOverString(replacestring.c_str());
  165.     current_view->currentBuffer()->update(1); 
  166. }
  167.  
  168.  
  169. void LyXFindReplace1::SearchCB(bool fForward)
  170. {
  171.     LyXText        *ltCur;
  172.  
  173.     if (!current_view->getScreen())
  174.         return;
  175.    
  176.     current_view->getScreen()->HideCursor();
  177.     current_view->currentBuffer()->update(-2);
  178.     ltCur = current_view->currentBuffer()->text;
  179.     if (ltCur->selection) 
  180.         ltCur->cursor = fForward ? ltCur->sel_end_cursor :
  181.                                                  ltCur->sel_start_cursor;
  182.  
  183.     ReInitFromForm();
  184.     iLenSelected = SearchString().length();
  185.    
  186.     if (!ValidSearchData() ||
  187.         (fForward ? SearchForward(ltCur) : SearchBackward(ltCur))) {
  188.         current_view->currentBuffer()->update(-2);
  189.  
  190.         // clear the selection (if there is any) 
  191.         current_view->getScreen()->ToggleSelection();
  192.         current_view->currentBuffer()->text->ClearSelection();
  193.  
  194.         // set the new selection 
  195.         SetSelectionOverLenChars(current_view->currentBuffer()->text, iLenSelected);
  196.         current_view->getScreen()->ToggleSelection(false);
  197.     } else 
  198.         LyXBell();    
  199.    
  200.     if (current_view->getWorkArea()->focus)
  201.         current_view->getScreen()->ShowCursor();
  202. }
  203.  
  204.  
  205. // if the string can be found: return true and set the cursor to
  206. // the new position 
  207. // (was: LyXText::SearchForward(char const* string) in text2.C )
  208. bool LyXFindReplace1::SearchForward(LyXText *lt)
  209. {
  210.     LyXParagraph *par;
  211.     int pos;
  212.  
  213.     par = lt->cursor.par;
  214.     pos = lt->cursor.pos;
  215.  
  216.     while (par && !IsSearchStringInText(par,pos)) {
  217.         if (pos<par->Last()-1)
  218.             pos++;
  219.         else {
  220.             pos = 0;
  221.             par = par->Next();
  222.         }
  223.     }
  224.     if (par) {
  225.         lt->SetCursor(par,pos);
  226.         return true;
  227.     } else
  228.         return false;
  229. }
  230.  
  231.  
  232. // if the string can be found: return true and set the cursor to
  233. // the new position 
  234. // (was: LyXText::SearchBackward(char const* string) in text2.C )
  235. bool LyXFindReplace1::SearchBackward(LyXText *lt)
  236. {
  237.     LyXParagraph *par = lt->cursor.par;
  238.     int pos = lt->cursor.pos;
  239.  
  240.     do {
  241.         if (pos>0)
  242.             pos--;
  243.         else {
  244.             // We skip empty paragraphs (Asger)
  245.             do {
  246.                 par = par->Previous();
  247.                 if (par)
  248.                     pos = par->Last()-1;
  249.             } while (par && pos<0);
  250.         }
  251.     } while (par && !IsSearchStringInText(par,pos));
  252.   
  253.     if (par) {
  254.         lt->SetCursor(par,pos);
  255.         return true;
  256.     } else
  257.         return false;
  258. }
  259.  
  260.  
  261. /* Compares 2 char values. 
  262. return value is
  263.     > 0 if chSearch > ch2
  264.     = 0 if chSearch == ch2
  265.     < 0 if chSearch < ch2
  266. */
  267. int LyXFindReplace1::CompareChars(char chSearch, char chText)
  268. {
  269.     if (CaseSensitive())
  270.         return (chSearch - chText);
  271.     return (toupper((unsigned char) chSearch) - toupper((unsigned char) chText));
  272. }
  273.  
  274.  
  275. // returns true if the search string is at the specified position 
  276. // (Copied from the original "LyXText::IsStringInText" in text2.C )
  277. bool LyXFindReplace1::IsSearchStringInText(LyXParagraph *par, int pos)
  278. {
  279.     const char    *szSearch;
  280.     char        chSrch = 0;
  281.     char        chText;
  282.     bool        fPrevIsSpace;
  283.     int        iText;
  284.     int         iSrch;
  285.  
  286.     szSearch = SearchString().c_str();
  287.  
  288.     if (par) {
  289.         fPrevIsSpace = false;
  290.         iText = 0; iSrch = 0;
  291.         while (pos+iText < par->Last() && 
  292.                        (chSrch = szSearch[iSrch]) != 0) {
  293.             chText = par->GetChar(pos+iText);
  294.             if ((chText == ' ') || 
  295.                             ((unsigned char)chText <= LYX_META_INSET)) 
  296.             {
  297.                 if (fPrevIsSpace) {
  298.                     iText++;  // next Text pos
  299.                     continue; // same search pos
  300.                 }
  301.                 chText = ' ';                
  302.                 fPrevIsSpace = true;
  303.             } else
  304.                 fPrevIsSpace = false;
  305.             if (CompareChars(chSrch, chText) != 0)
  306.                 break;
  307.         
  308.             iSrch++;
  309.             iText++;
  310.         }
  311.  
  312.         if (!szSearch[iSrch]) {
  313.             if ((!MatchWord()) ||
  314.                 (((pos <= 0) || (!IsLetterCharOrDigit(par->GetChar(pos-1)))) &&
  315.                  ((pos+iText >= par->Last()) || 
  316.                   (!IsLetterCharOrDigit(par->GetChar(pos + iText))))))
  317.             {
  318.                 iLenSelected = iText;
  319.                 return true;
  320.             }
  321.         }
  322.     }
  323.     return false;
  324. }
  325.