home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #3 / NN_1993_3.iso / spool / comp / windows / x / motif / 8780 < prev    next >
Encoding:
Text File  |  1993-01-23  |  15.2 KB  |  485 lines
  1. Path: sparky!uunet!olivea!pagesat!netsys!agate!ucbvax!lilbit.UUCP!prakash
  2. From: prakash@lilbit.UUCP (Prakash Baskaran)
  3. Newsgroups: comp.windows.x.motif
  4. Subject: Re: Text widgets - solution with one stroke "delay"
  5. Message-ID: <9301222210.AA04057@lilbit.tdtech.com>
  6. Date: 22 Jan 93 17:10:10 GMT
  7. Sender: daemon@ucbvax.BERKELEY.EDU
  8. Distribution: inet
  9. Organization: The Internet
  10. Lines: 473
  11.  
  12. > 
  13. > On Jan 21,  5:49pm, Prakash Baskaran wrote:
  14. >
  15. >  2.  As the user moves around in the text widget using arrow keys or
  16. >  mouse, I would like to show the x,y ( column and line number) in the
  17. >  text widget.  Any good ways to do these?
  18. > 
  19.  
  20. Hello:
  21.  
  22. I used to following technique to solve the problem.  It works allright
  23. -execpt- that I get the answer one "stroke" later.  I am using
  24. XmNmotionVerifyCallback to return the x, y position of my cursor. And
  25. I get x,y position for the previous click or movement for my current
  26. movement and the current positions are printed for the next movement.
  27. Obviously I am missing something trivial.  Can any one guess what it
  28. is ?
  29.  
  30. The following is the editor.c of the volume 6, where I have inserted my
  31. code.  Though I get the x,y positions, I guess it would take lots of
  32. time for bigger texts.  
  33.  
  34. prakash
  35.  
  36. _____________________________________________________________________________
  37.  
  38. Prakash Baskaran        
  39. T.D. Technologies, Inc.            12000 Fairhill Rd, #616
  40. 12608 Cedar Rd.                Cleveland, OH 44120
  41. Cleveland Hts, OH 44106            (216) 791 3554
  42. (216) 371 9777
  43.  
  44.         lilbit!prakash@skybridge.scl.cwru.edu
  45.  
  46. Disclaimer:  Ya...  It's all mine.
  47. _____________________________________________________________________________
  48.  
  49.  
  50.  
  51.  
  52. _________
  53. cut here
  54. ____________________________
  55.  
  56. /* Written by Dan Heller.  Copyright 1991, O'Reilly && Associates.
  57.  * This program is freely distributable without licensing fees and
  58.  * is provided without guarantee or warrantee expressed or implied.
  59.  * This program is -not- in the public domain.
  60.  */
  61.  
  62. /* editor.c -- create a full-blown Motif editor application complete
  63.  * with a menubar, facilities to read and write files, text search
  64.  * and replace, clipboard support and so forth.
  65.  */
  66. #include <Xm/Text.h>
  67. #include <Xm/LabelG.h>
  68. #include <Xm/PushBG.h>
  69. #include <Xm/RowColumn.h>
  70. #include <Xm/MainW.h>
  71. #include <Xm/PanedW.h>
  72. #include <Xm/FileSB.h>
  73. #include <X11/Xos.h>
  74. #include <stdio.h>
  75. #include <sys/types.h>
  76. #include <sys/stat.h>
  77.  
  78. Widget text_w, search_w, replace_w, text_output;
  79.  
  80. char  *select_to_beginning ( pos, w )
  81.      XmTextPosition pos;
  82.      Widget w;
  83. {
  84.   char *full_text;
  85.   char *sel_text;
  86.   
  87.   full_text = XmTextGetString ( w );
  88.   sel_text = (char *) malloc ( (pos) * sizeof (char) );
  89.   strncpy ( sel_text, full_text, pos);
  90.   return (sel_text);
  91. }
  92.  
  93. void get_number_of_lines_and_chars (selection, lines, chars, pos)
  94.      char *selection;
  95.      int *lines, *chars, pos;
  96. {
  97.   int i;
  98.   
  99.   for ( i=0; i<pos; i++ )
  100.     {
  101.       if (selection[i] == '\n') 
  102.     {
  103.       (*lines)++;
  104.       (*chars) = 0;
  105.     }
  106.       (*chars)++;
  107.     }
  108. }
  109.  
  110. void cursor_moved (cb,  w, cbs )
  111.      Widget cb, w;
  112.      XmTextVerifyCallbackStruct *cbs;
  113. {
  114.   char *selection;
  115.   int lines = 0, chars = 0;
  116.   
  117.   if (cbs->reason != XmCR_MOVING_INSERT_CURSOR ) return;
  118.  
  119.   selection = select_to_beginning ( cbs->currInsert, w );
  120.   get_number_of_lines_and_chars (selection, &lines, &chars, cbs->currInsert);
  121.   printf ("x:y = %d, %d\n", lines, chars);
  122.   XtFree ( selection );
  123. }
  124.  
  125.  
  126. main(argc, argv)
  127. int argc;
  128. char *argv[];
  129. {
  130.     XtAppContext  app;
  131.     Widget        toplevel, main_w, menubar, pane, rowcol, pb;
  132.     void          file_cb(), cut_paste(), search_cb();
  133.     Arg           args[5];
  134.     XmString      new, save, quit, quit_acc, file, edit, cut,
  135.                   clear, copy, paste, search, next, find, replace;
  136.  
  137.     toplevel = XtVaAppInitialize(&app, "Demos",
  138.         NULL, 0, &argc, argv, NULL, NULL);
  139.     
  140.     main_w = XtVaCreateWidget("main_w",
  141.         xmMainWindowWidgetClass, toplevel, NULL);
  142.  
  143.     /* Create a simple MenuBar that contains three menus */
  144.     file = XmStringCreateSimple("File");
  145.     edit = XmStringCreateSimple("Edit");
  146.     search = XmStringCreateSimple("Search");
  147.     menubar = XmVaCreateSimpleMenuBar(main_w, "menubar",
  148.         XmVaCASCADEBUTTON, file, 'F',
  149.         XmVaCASCADEBUTTON, edit, 'E',
  150.         XmVaCASCADEBUTTON, search, 'S',
  151.         NULL);
  152.     XmStringFree(file);
  153.     XmStringFree(edit);
  154.     XmStringFree(search);
  155.  
  156.     /* First menu is the File menu -- callback is file_cb() */
  157.     new = XmStringCreateSimple("New ...");
  158.     save = XmStringCreateSimple("Save ...");
  159.     quit = XmStringCreateSimple("Quit");
  160.     quit_acc = XmStringCreateSimple("Ctrl-C");
  161.     XmVaCreateSimplePulldownMenu(menubar, "file_menu", 0, file_cb,
  162.         XmVaPUSHBUTTON, new, 'N', NULL, NULL,
  163.         XmVaPUSHBUTTON, save, 'S', NULL, NULL,
  164.         XmVaSEPARATOR,
  165.         XmVaPUSHBUTTON, quit, 'Q', "Ctrl<Key>c", quit_acc,
  166.         NULL);
  167.     XmStringFree(new);
  168.     XmStringFree(save);
  169.     XmStringFree(quit);
  170.     XmStringFree(quit_acc);
  171.  
  172.     /* ...create the "Edit" menu --  callback is cut_paste() */
  173.     cut = XmStringCreateSimple("Cut");      /* create a simple    */
  174.     copy = XmStringCreateSimple("Copy");    /* pulldown menu that */
  175.     clear = XmStringCreateSimple("Clear");  /* has these menu     */
  176.     paste = XmStringCreateSimple("Paste");  /* items in it.       */
  177.     XmVaCreateSimplePulldownMenu(menubar, "edit_menu", 1, cut_paste,
  178.         XmVaPUSHBUTTON, cut, 'C', NULL, NULL,
  179.         XmVaPUSHBUTTON, copy, 'o', NULL, NULL,
  180.         XmVaPUSHBUTTON, paste, 'P', NULL, NULL,
  181.         XmVaSEPARATOR,
  182.         XmVaPUSHBUTTON, clear, 'l', NULL, NULL,
  183.         NULL);
  184.     XmStringFree(cut);
  185.     XmStringFree(copy);
  186.     XmStringFree(paste);
  187.  
  188.     /* create the "Search" menu -- callback is search_cb() */
  189.     next = XmStringCreateSimple("Find Next");
  190.     find = XmStringCreateSimple("Show All");
  191.     replace = XmStringCreateSimple("Replace Text");
  192.     XmVaCreateSimplePulldownMenu(menubar, "search_menu", 2, search_cb,
  193.         XmVaPUSHBUTTON, next, 'F', NULL, NULL,
  194.         XmVaPUSHBUTTON, find, 'S', NULL, NULL,
  195.         XmVaPUSHBUTTON, replace, 'R', NULL, NULL,
  196.         XmVaSEPARATOR,
  197.         XmVaPUSHBUTTON, clear, 'C', NULL, NULL,
  198.         NULL);
  199.     XmStringFree(next);
  200.     XmStringFree(find);
  201.     XmStringFree(replace);
  202.     XmStringFree(clear);
  203.  
  204.     XtManageChild(menubar);
  205.  
  206.     /* create a standard vertical PanedWindow... */
  207.     pane = XtVaCreateWidget("pane",
  208.         xmPanedWindowWidgetClass, main_w, NULL);
  209.  
  210.     /* create horizontal RowColumn inside the pane... */
  211.     rowcol = XtVaCreateWidget("rowcol",
  212.         xmRowColumnWidgetClass, pane,
  213.         XmNorientation,  XmHORIZONTAL,
  214.         XmNpacking,      XmPACK_TIGHT,
  215.         NULL);
  216.     /* Create two Text widgets with Labels... */
  217.     XtVaCreateManagedWidget("Search Pattern:",
  218.         xmLabelGadgetClass, rowcol, NULL);
  219.     search_w = XtVaCreateManagedWidget("search_text",
  220.         xmTextWidgetClass, rowcol, NULL);
  221.     XtVaCreateManagedWidget("     Replace Pattern:",
  222.         xmLabelGadgetClass, rowcol, NULL);
  223.     replace_w = XtVaCreateManagedWidget("replace_text",
  224.         xmTextWidgetClass, rowcol, NULL);
  225.     XtManageChild(rowcol);
  226.  
  227.     text_output = XtVaCreateManagedWidget("text_out",
  228.         xmTextWidgetClass, pane,
  229.         XmNeditable,              False,
  230.         XmNcursorPositionVisible, False,
  231.         XmNshadowThickness,       0,
  232.         XmNsensitive,             False,
  233.         NULL);
  234.  
  235.     XtSetArg(args[0], XmNrows,      10);
  236.     XtSetArg(args[1], XmNcolumns,   80);
  237.     XtSetArg(args[2], XmNeditMode,  XmMULTI_LINE_EDIT);
  238.     text_w = XmCreateScrolledText(pane, "text_w", args, 3);
  239.     XtManageChild(text_w);
  240.  
  241.     XtAddCallback ( text_w, XmNmotionVerifyCallback, cursor_moved, text_w);
  242.     
  243.     XtManageChild(pane);
  244.     XtManageChild(main_w);
  245.  
  246.     XtRealizeWidget(toplevel);
  247.     XtAppMainLoop(app);
  248. }
  249.  
  250. /* callback routine for "Ok" button in FileSelectionDialogs */
  251. void
  252. open_file(dialog, save, cbs)
  253. Widget dialog;
  254. int save;         /* actually, item_no from "new" or "save" */
  255. XmFileSelectionBoxCallbackStruct *cbs;
  256. {
  257.     char buf[BUFSIZ], *filename, *text;
  258.     struct stat statb;
  259.     long len;
  260.     FILE *fp;
  261.  
  262.     if (!XmStringGetLtoR(cbs->value,
  263.         XmSTRING_DEFAULT_CHARSET, &filename))
  264.         return; /* must have been an internal error */
  265.  
  266.     if (!*filename) {
  267.         XtFree(filename);
  268.         XBell(XtDisplay(text_w), 50);
  269.         XmTextSetString(text_output, "Choose a file.");
  270.         return; /* nothing typed */
  271.     }
  272.  
  273.     if (save) {
  274.         if (!(fp = fopen(filename, "w"))) {
  275.             perror(filename);
  276.             sprintf(buf, "Can't save to %s.", filename);
  277.             XmTextSetString(text_output, buf);
  278.             XtFree(filename);
  279.             return;
  280.         }
  281.         /* saving -- get text from Text widget... */
  282.         text = XmTextGetString(text_w);
  283.         len = XmTextGetLastPosition(text_w);
  284.         /* write it to file (check for error) */
  285.         if (fwrite(text, sizeof(char), len, fp) != len)
  286.             strcpy(buf, "Warning: did not write entire file!");
  287.         else {
  288.             /* make sure a newline terminates file */
  289.             if (text[len-1] != '\n')
  290.                 fputc('\n', fp);
  291.             sprintf(buf, "Saved %ld bytes to %s.", len, filename);
  292.         }
  293.     } else {
  294.         /* make sure the file is a regular text file and open it */
  295.         if (stat(filename, &statb) == -1 ||
  296.                 (statb.st_mode & S_IFMT) != S_IFREG ||
  297.                 !(fp = fopen(filename, "r"))) {
  298.             perror(filename);
  299.             sprintf(buf, "Can't read %s.", filename);
  300.             XmTextSetString(text_output, buf);
  301.             XtFree(filename);
  302.             return;
  303.         }
  304.         /* put the contents of the file in the Text widget by
  305.          * allocating enough space for the entire file, reading the
  306.          * file into the space, and using XmTextSetString() to show
  307.          * the file.
  308.          */
  309.         len = statb.st_size;
  310.         if (!(text = XtMalloc((unsigned)(len+1)))) /* +1 for NULL */
  311.             sprintf(buf, "%s: XtMalloc(%ld) failed", len, filename);
  312.         else {
  313.             if (fread(text, sizeof(char), len, fp) != len)
  314.                 sprintf(buf, "Warning: did not read entire file!");
  315.             else
  316.                 sprintf(buf, "Loaded %ld bytes from %s.",
  317.                     len, filename);
  318.             text[len] = 0; /* NULL-terminate */
  319.             XmTextSetString(text_w, text);
  320.         }
  321.     }
  322.     XmTextSetString(text_output, buf); /* purge output message */
  323.  
  324.     /* free all allocated space. */
  325.     XtFree(text);
  326.     XtFree(filename);
  327.     fclose(fp);
  328. }
  329.  
  330. /* a menu item from the "File" pulldown menu was selected */
  331. void
  332. file_cb(w, item_no, cbs)
  333. Widget w;
  334. int item_no;  /* pulldown menu item number */
  335. XmAnyCallbackStruct *cbs;  /* unused here */
  336. {
  337.     static Widget open_dialog, save_dialog;
  338.     Widget        dialog = NULL;
  339.     XmString      str, title;
  340.  
  341.     if (item_no == 2)
  342.         exit(0);
  343.  
  344.     if (item_no == 0 && open_dialog)
  345.         dialog = open_dialog;
  346.     else if (item_no == 1 && save_dialog)
  347.         dialog = save_dialog;
  348.  
  349.     if (dialog) {
  350.         XtManageChild(dialog);
  351.         /* make sure that dialog is raised to top of window stack */
  352.         XMapRaised(XtDisplay(dialog), XtWindow(XtParent(dialog)));
  353.         return;
  354.     }
  355.     dialog = XmCreateFileSelectionDialog(text_w, "Files", NULL, 0);
  356.     XtAddCallback(dialog, XmNcancelCallback, XtUnmanageChild, NULL);
  357.     XtAddCallback(dialog, XmNokCallback, open_file, item_no);
  358.     if (item_no == 0) {
  359.         str = XmStringCreateSimple("Open");
  360.         title = XmStringCreateSimple("Open File");
  361.         open_dialog = dialog;
  362.     } else {
  363.         str = XmStringCreateSimple("Save");
  364.         title = XmStringCreateSimple("Save File");
  365.         save_dialog = dialog;
  366.     }
  367.     XtVaSetValues(dialog,
  368.         XmNokLabelString, str,
  369.         XmNdialogTitle,   title,
  370.         NULL);
  371.     XmStringFree(str);
  372.     XmStringFree(title);
  373.     XtManageChild(dialog);
  374. }
  375.  
  376. /* a menu item from the "Search" pulldown menu was selected */
  377. void
  378. search_cb(w, item_no, cbs)
  379. Widget w;
  380. int item_no;  /* pulldown menu item number */
  381. XmAnyCallbackStruct *cbs;  /* unused here */
  382. {
  383. #define FIND_NEXT 0
  384. #define FIND_ALL  1
  385. #define REPLACE   2
  386. #define CLEAR     3
  387.     char *search_pat, *p, *string, *new_pat, buf[32];
  388.     XmTextPosition pos = 0;
  389.     int len, nfound = 0;
  390.     int search_len, pattern_len;
  391.  
  392.     if (item_no == CLEAR) {
  393.         pos = XmTextGetLastPosition(text_w);
  394.         XmTextSetHighlight(text_w, 0, pos, XmHIGHLIGHT_NORMAL);
  395.         return;
  396.     }
  397.  
  398.     if (!(string = XmTextGetString(text_w)) || !*string) {
  399.         XmTextSetString(text_output, "No text to search.");
  400.         return;
  401.     }
  402.     if (!(search_pat = XmTextGetString(search_w)) || !*search_pat) {
  403.         XmTextSetString(text_output, "Specify a search pattern.");
  404.         XtFree(string);
  405.         return;
  406.     }
  407.  
  408.     new_pat = XmTextGetString(replace_w);
  409.     search_len = strlen(search_pat);
  410.     pattern_len = strlen(new_pat);
  411.  
  412.     /* start searching at current cursor position + 1 */
  413.     if (item_no == FIND_NEXT)
  414.         pos = XmTextGetCursorPosition(text_w) + 1;
  415.     for (p = &string[pos]; p = index(p, *search_pat); p++)
  416.         if (!strncmp(p, search_pat, search_len)) {
  417.             nfound++;
  418.             /* get the position where pattern was found */
  419.             pos = (XmTextPosition)(p-string);
  420.             if (item_no == REPLACE) {
  421.                 /* replace the text position + strlen(new_pat) */
  422.                 XmTextReplace(text_w, pos, pos + search_len, new_pat);
  423.                 /* "string" has changed -- get the new value */
  424.         XtFree(string);
  425.         string = XmTextGetString(text_w);
  426.                 /* continue search -after- replacement */
  427.                 p = &string[pos + pattern_len];
  428.             } else if (item_no == FIND_ALL)
  429.                 XmTextSetHighlight(text_w, pos, pos+search_len,
  430.                     XmHIGHLIGHT_SELECTED);
  431.             else
  432.                 break;
  433.         }
  434.     if (item_no == FIND_NEXT && nfound == 0) {
  435.         /* search from beginning till we've passed "pos" */
  436.         for (p = string; p = index(p, *search_pat); p++)
  437.             if (p - string > pos ||
  438.                     !strncmp(p, search_pat, search_len)) {
  439.                 nfound++;
  440.                 break;
  441.             }
  442.     }
  443.     if (nfound == 0)
  444.         XmTextSetString(text_output, "Pattern not found.");
  445.     else {
  446.         switch (item_no) {
  447.             case FIND_NEXT :
  448.                 pos = (XmTextPosition)(p - string);
  449.                 sprintf(buf, "Pattern found at position %ld.", pos);
  450.                 XmTextSetInsertionPosition(text_w, pos);
  451.                 break;
  452.             case FIND_ALL :
  453.                 sprintf(buf, "Found %d occurrences.", nfound);
  454.                 break;
  455.             case REPLACE :
  456.             default :
  457.                 sprintf(buf, "Made %d replacements.", nfound);
  458.         }
  459.         XmTextSetString(text_output, buf);
  460.     }
  461.     XtFree(string);
  462.     XtFree(search_pat);
  463.     XtFree(new_pat);
  464. }
  465.  
  466. /* the callback routine for the items in the edit menu */
  467. void
  468. cut_paste(widget, num)
  469. Widget widget;  /* the menu item (pushbutton) that was selected */
  470. int num;        /* the menu item number */
  471. {
  472.     Boolean result = True;
  473.  
  474.     switch (num) {
  475.         case 0 : result = XmTextCut(text_w, CurrentTime); break;
  476.         case 1 : result = XmTextCopy(text_w, CurrentTime); break;
  477.         case 2 : result = XmTextPaste(text_w);
  478.         case 3 : XmTextClearSelection(text_w, CurrentTime); break;
  479.     }
  480.     if (result == False)
  481.         XmTextSetString(text_output, "There is no selection.");
  482.     else
  483.         XmTextSetString(text_output, NULL);
  484. }
  485.