home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Programmierung / SOURCE.mdf / programm / windows / c / uw260 / str_demo.c < prev    next >
Encoding:
Text File  |  1994-04-23  |  20.4 KB  |  487 lines
  1. /****************************************************************************/
  2. /*                                                                          */
  3. /* STR_DEMO.C                                                               */
  4. /*                                                                          */
  5. /* We have had several customers experience difficulty understanding the    */
  6. /* wn_gets function.  This is understandable, it is somewhat confusing.     */
  7. /* This demo will help you understand the features, including several new   */
  8. /* powerful features, and implement simpler forms to get basic items        */
  9. /* such as time, date, phone numbers, etc.  The modified wn_gets is fully   */
  10. /* compatible with the previous version so none of your code need change.   */
  11. /* However, a new function called wn_gets_ll (which wn_gets calls)          */
  12. /* has added the capability to uppercase the first char of each word,       */
  13. /* strip the mask completely, only strip the end, or not strip at all.      */
  14. /* It can also get input right-to-left, clear the entry on the first valid  */
  15. /* key, and return when the last character of the input is typed.           */
  16. /* Most importantly, it can allow the input of a string longer than the     */
  17. /* display width of the field and will scroll within this region auto-      */
  18. /* matically!  It can also display arrows to show the user that the string  */
  19. /* has data to the left or right of the current display field.              */
  20. /*                                                                          */
  21. /* Two newer capabilities of wn_gets_ll are the validation function hook,   */
  22. /* which can be called on each valid key pressed, and the gets hook, which  */
  23. /* is called on wn_gets_ll entry, exit, and for every key pressed.  We will */
  24. /* use the validation hook to show how you can do simple date validation,   */
  25. /* and we will use the gets hook to print out the text, mask and template   */
  26. /* strings for each key pressed, as well as make the F1 key perform a clear */
  27. /* on the input.                                                            */
  28. /*                                                                          */
  29. /* Note:  Compile this file with the warning "parameter 'ident' is never    */
  30. /*        used" turned off, as we don't have to actually use each parameter */
  31. /*        included in the validation and gets hook functions.               */
  32. /*                                                                          */
  33. /*------------------------- flags for wn_gets_ll ---------------------------*/
  34. /*                                                                          */
  35. /* G_STRIP          strips the entire mask from the string.                 */
  36. /*                * 12/04/91 = 120491, (432)-555-3421 = 4325553421          */
  37. /*                                                                          */
  38. /* G_STRIP_END      strips the end of the string only only.                 */
  39. /*                * John Doe______ = John Doe                               */
  40. /*                                                                          */
  41. /* G_UP_FST_CHAR    converts the first letter of each word to uppercase.    */
  42. /*                * this is a test = This Is A Test                         */
  43. /*                                                                          */
  44. /* G_ARROW          displays left and right arrows if display width is less */
  45. /*                  than field width. NOTE: This requires an additional     */
  46. /*                  screen/window space before and after the field.         */
  47. /*                                                                          */
  48. /* G_RIGHT_TO_LEFT  gets input from the right side of the string, scooting  */
  49. /*                  characters over to the left for each valid press.       */
  50. /*                                                                          */
  51. /* G_CLEAR_ON_FIRST clears out the entry when the first valid key is        */
  52. /*                  pressed.  This saves a CTRL-Y keystroke to clear the    */
  53. /*                  entry.                                                  */
  54. /*                                                                          */
  55. /* G_EXIT_ON_FILL   causes the routine to exit whenever the last valid key  */
  56. /*                  is pressed.  This saves an extra <Enter> press.         */
  57. /*                                                                          */
  58. /*--------------------------------------------------------------------------*/
  59. /*                                                                          */
  60. /* Understanding these few flags and looking at the below examples make     */
  61. /* a very complex input routine much more managable!                        */
  62. /*                                                                          */
  63. /****************************************************************************/
  64. #include <stdlib.h>
  65. #include "uw.h"
  66. #include "uw_globx.h"
  67. #include "uw_keys.h"
  68.  
  69.  
  70. /*-------------------------- a few global variables ------------------------*/
  71. WINDOW Main_wn;
  72. char name1[32],  name2[32],  name3[32],
  73.      phone1[16], phone2[16], phone3[16],
  74.      date1[16],  date2[16],  date3[16],
  75.      time1[16],  time2[16],  time3[16];
  76.  
  77.  
  78. /*-------------------------- just some prototypes --------------------------*/
  79. void msg_line( char *msg );
  80. int my_gets(char *s, int max_len, int disp_width, int flags, int clear, WINDOW *wnp);
  81. int my_get_phone(char *s, int disp_width, int flags, WINDOW *wnp);
  82. int my_get_date(char *s, int disp_width, int flags, int clear, WINDOW *wnp);
  83. int my_get_time(char *s, int disp_width, int flags, WINDOW *wnp);
  84. int date_vld(char *w, char *t, char *m, int pos, int max_pos, WINDOW *wnp );
  85. int time_vld(char *w, char *t, char *m, int pos, int max_pos, WINDOW *wnp );
  86. int super_hook( char *text, char *tplt, char *mask, int pos,
  87.                 int max_pos, int p_flag, EVENT *eventp, WINDOW *wnp );
  88.  
  89.  
  90. /*********/
  91. /* ~main */
  92. /*       ********************************************************************/
  93. /****************************************************************************/
  94. int main()
  95. {
  96.   int r;
  97.   WINDOW *wnp;
  98.  
  99.   init_video(80, 25);
  100.   init_clock(0x3333);
  101.   wnp = &Main_wn;
  102.   wn_create( 0, 0, V_cols-1, V_rows-1, DBL_BDR, WN_NORMAL, wnp );
  103.   wn_color( WHITE, BLUE, wnp );
  104.   wn_bdr_color( WHITE, BLUE, wnp );
  105.   wn_set(wnp);
  106.   wnp->inside = OFF;
  107.   wn_plst(CENTERED, 0, "<<< EnQue's String Entry Demonstration >>>", wnp);
  108.   wn_color(LIGHTGRAY, BLUE, wnp);
  109.   wn_plst(CENTERED, 1, "F1 is translated to CTRL-Y and parameters displayed by the new gets hook.", wnp);
  110.  
  111.   /* NOTE:
  112.      When we use set_gets_hook or set_validation_func, we can just call the
  113.      name of the function when using good old "C", but we have to do the
  114.      wild-looking function pointer cast when we use the C++ compiler.
  115.      If you rename this "C" file to a "CPP" file and compile under Turbo or
  116.      Borland C++ you will get a "Type mismatch in parameter func_ptr"
  117.      compiler error (not warning) if you just use the function name without
  118.      the cast!
  119.   */
  120.  
  121. #if defined(__cplusplus) && !defined(__WATCOMC__)
  122.   set_gets_hook( (int (*)(...)) super_hook );
  123. #else
  124.   set_gets_hook( super_hook );
  125. #endif
  126.  
  127.   wn_color( WHITE, BLUE, wnp );
  128.   wnp->inside = ON;
  129.  
  130. /*---------- display full width and convert first char to uppercase --------*/
  131.   r = 2;
  132.   msg_line("Entry with first letters capped and no strip");
  133.   wn_plst(  2, r, "Enter your name  : ", wnp );
  134.   my_gets(name1, 22, 22, G_UP_FST_CHAR, 1, wnp);
  135.   wn_plst( 50, r, name1, wnp );
  136.  
  137. /*----------- display full width with strip to end and exit on fill --------*/
  138.   r++;
  139.   msg_line("Entry with strip to end and exit on fill");
  140.   wn_plst(  2, r, "Enter your name  : ", wnp );
  141.   my_gets(name2, 22, 22, G_STRIP_END | G_EXIT_ON_FILL, 1, wnp);
  142.   wn_plst( 50, r, name2, wnp );
  143.  
  144. /*---------- display only 6 characters, strip the entire mask, -------------*/
  145. /*---------- convert first char, and display arrows...         -------------*/
  146.   r++;
  147.   msg_line("Entry with first letters capped, strip, scrolling, and arrow chars");
  148.   wn_plst(  2, r, "Enter your name  :  ", wnp );
  149.   my_gets(name3, 22, 6, G_STRIP | G_UP_FST_CHAR | G_ARROW, 1, wnp);
  150.   wn_plst( 50, r, name3, wnp );
  151.  
  152. /*---------- display full width, strip the entire mask, --------------------*/
  153. /*---------- convert first char, and clear on first key --------------------*/
  154.   r++;
  155.   msg_line("Entry with first letters capped, strip, and clear on first");
  156.   wn_plst(  2, r, "Enter your name  : ", wnp );
  157. /*  my_gets(name3, 22, 22, G_STRIP | G_UP_FST_CHAR | G_CLEAR_ON_FIRST, 0, wnp);*/
  158.   my_gets(name3, 22, 22, G_STRIP | G_UP_FST_CHAR | G_INSERT | G_MOVE_TO_END, 0, wnp);
  159.   wn_plst( 50, r, name3, wnp );
  160.  
  161. /*--------- display full width, strip to end, enter right-to-left ----------*/
  162.   r += 2;
  163.   msg_line("Right-to-left entry with strip to end");
  164.   wn_plst(  2, r, "Enter your phone # : ", wnp );
  165.   my_get_phone(phone1, 14, G_STRIP_END | G_RIGHT_TO_LEFT, wnp);
  166.   wn_plst( 50, r, phone1, wnp );
  167.  
  168. /*------------------- display full width, don't strip mask -----------------*/
  169. /*------------------- and exit when the last char is entered ---------------*/
  170.   r++;
  171.   msg_line("Entry without strip and exit on fill");
  172.   wn_plst(  2, r, "Enter your phone # : ", wnp );
  173.   my_get_phone(phone2, 14, G_EXIT_ON_FILL, wnp);
  174.   wn_plst( 50, r, phone2, wnp );
  175.  
  176. /*----------------- display 5 chars and strip the entire mask --------------*/
  177.   r++;
  178.   msg_line("Entry with strip and scrolling, but without arrow chars");
  179.   wn_plst(  2, r, "Enter your phone # : ", wnp );
  180.   my_get_phone(phone3, 5, G_STRIP, wnp);
  181.   wn_plst( 50, r, phone3, wnp );
  182.  
  183. #if defined(__cplusplus) && !defined(__WATCOMC__)
  184.   set_validation_func( (int (*)(...)) time_vld );
  185. #else
  186.   set_validation_func( date_vld );
  187. #endif
  188.  
  189. /*--------------- display full width, strip the entire mask,----------------*/
  190. /*--------------- use the validation hook to validate the date -------------*/
  191. /*--------------- and exit when the last char is entered -------------------*/
  192.   r += 2;
  193.   msg_line("Entry with strip, validation, and exit on fill");
  194.   wn_plst(  2, r, "Enter today's date: ", wnp );
  195.   my_get_date(date1, 8, G_STRIP | G_VALIDATE | G_EXIT_ON_FILL, 1, wnp);
  196.   wn_plst( 50, r, date1, wnp );
  197.  
  198. /*------------------- display full width, don't strip mask, ----------------*/
  199. /*------------------- get the input right-to-left, and ---------------------*/
  200. /*------------------- exit when the last char is entered -------------------*/
  201.   r++;
  202.   msg_line("Right-to-left entry without strip and with exit on fill");
  203.   wn_plst(  2, r, "Enter today's date: ", wnp );
  204.   my_get_date(date2, 8, G_RIGHT_TO_LEFT | G_EXIT_ON_FILL, 0, wnp);
  205.   wn_plst( 50, r, date2, wnp );
  206.  
  207. /*----------------- display 5 chars, strip the entire mask, ----------------*/
  208. /*----------------- and display with arrows --------------------------------*/
  209.   r++;
  210.   msg_line("Entry with strip, scrolling, and arrow characters");
  211.   wn_plst(  2, r, "Enter today's date:  ", wnp );
  212.   my_get_date(date3, 2, G_STRIP | G_ARROW, 1, wnp);
  213.   wn_plst( 50, r, date3, wnp );
  214.  
  215. #if defined(__cplusplus) && !defined(__WATCOMC__)
  216.   set_validation_func( (int (*)(...)) time_vld );
  217. #else
  218.   set_validation_func( time_vld );
  219. #endif
  220.  
  221. /*--------------- display full width and strip to the end ------------------*/
  222. /*--------------- geting the input right-to-left ---------------------------*/
  223.   r += 2;
  224.   msg_line("Right-to-left entry with strip to end");
  225.   wn_plst(  2, r, "Enter current time: ", wnp );
  226.   my_get_time(time1, 5, G_STRIP_END | G_RIGHT_TO_LEFT, wnp);
  227.   wn_plst( 50, r, time1, wnp );
  228.  
  229. /*------------- display full width, don't strip mask -----------------------*/
  230. /*------------- and use the validation hook to validate the time -----------*/
  231.   r++;
  232.   msg_line("Entry without strip and with validation");
  233.   wn_plst(  2, r, "Enter current time: ", wnp );
  234.   my_get_time(time2, 5, G_VALIDATE, wnp);
  235.   wn_plst( 50, r, time2, wnp );
  236.  
  237. /*----------------- display 5 chars and strip the entire mask, -------------*/
  238. /*----------------- displaying arrows for scrolling ------------------------*/
  239.   r++;
  240.   msg_line("Entry with strip, scrolling, and arrow characters");
  241.   wn_plst(  2, r, "Enter current time:  ", wnp );
  242.   my_get_time(time3, 2, G_STRIP | G_ARROW, wnp);
  243.   wn_plst( 50, r, time3, wnp );
  244.   set_validation_func( NULL );
  245.  
  246.   set_gets_hook(NULL);
  247.  
  248.   msg_line("Demo complete, press any key to quit!");
  249.   wait_event();
  250.   wn_destroy(wnp);
  251.   end_video();
  252.   return(0);
  253. }
  254. /*** end of main ***/
  255.  
  256. /*************/
  257. /* ~msg_line */
  258. /*           ****************************************************************/
  259. /* Display the message at the last line on the screen.                      */
  260. /****************************************************************************/
  261. void msg_line( char *msg )
  262. {
  263.   push(Main_wn.att);
  264.   push(Main_wn.inside);
  265.   Main_wn.inside = OFF;
  266.   wn_color(BLACK, LIGHTGRAY, &Main_wn);
  267.   mv_cs(0, 24, &Main_wn);
  268.   wn_claol(&Main_wn);
  269.   wn_plst(CENTERED, 24, msg, &Main_wn);
  270.   pop(Main_wn.inside);
  271.   pop(Main_wn.att);
  272. }
  273. /*** end of message_line ***/
  274.  
  275. /************/
  276. /* ~my_gets */
  277. /*          *****************************************************************/
  278. /* This routine just sets up the mask and template strings and calls the    */
  279. /* wn_gets_ll function.                                                     */
  280. /****************************************************************************/
  281. int my_gets(char *s, int max_len, int disp_width, int flags, int clear, WINDOW *wnp)
  282. {
  283.   char mask[81], tplt[81];
  284.  
  285.   if( clear )
  286.     setmem(s,max_len,0);
  287.   setmem(mask,max_len,'_'), mask[max_len] = '\0';
  288.   setmem(tplt,max_len,'*'), tplt[max_len] = '\0';
  289.   return(wn_gets_ll(s, mask, tplt, swap_nibbles(wnp->att),
  290.     flags, disp_width, wnp));
  291. }
  292. /*** end of my_gets ***/
  293.  
  294. /*****************/
  295. /* ~my_get_phone */
  296. /*               ************************************************************/
  297. /* This routine just sets up the mask and template strings and calls the    */
  298. /* wn_gets_ll function.                                                     */
  299. /****************************************************************************/
  300. int my_get_phone(char *s, int disp_width, int flags, WINDOW *wnp)
  301. {
  302.   char *mask, *tplt;
  303.  
  304.   setmem(s,15,0);
  305.   mask = "(___)-___-____";
  306.   tplt = " ###  ### ####";
  307.   return(wn_gets_ll(s, mask, tplt, swap_nibbles(wnp->att),
  308.     flags, disp_width, wnp));
  309. }
  310. /*** end of my_get_phone ***/
  311.  
  312. /****************/
  313. /* ~my_get_date */
  314. /*              *************************************************************/
  315. /* This routine just sets up the mask and template strings and calls the    */
  316. /* wn_gets_ll function.                                                     */
  317. /****************************************************************************/
  318. int my_get_date(char *s, int disp_width, int flags, int clear, WINDOW *wnp)
  319. {
  320.   char *mask, *tplt;
  321.  
  322.   if( clear )
  323.     setmem(s,9,0);
  324.   mask = "__/__/__";
  325.   tplt = "## ## ##";
  326.   return(wn_gets_ll(s, mask, tplt, swap_nibbles(wnp->att),
  327.     flags, disp_width, wnp));
  328. }
  329. /*** end of my_get_date ***/
  330.  
  331. /****************/
  332. /* ~my_get_time */
  333. /*              *************************************************************/
  334. /* This routine just sets up the mask and template strings and calls the    */
  335. /* wn_gets_ll function.                                                     */
  336. /****************************************************************************/
  337. int my_get_time(char *s, int disp_width, int flags, WINDOW *wnp)
  338. {
  339.   char *mask, *tplt;
  340.  
  341.   setmem(s,6,0);
  342.   mask = "__:__";
  343.   tplt = "## ##";
  344.   return(wn_gets_ll(s, mask, tplt, swap_nibbles(wnp->att),
  345.     flags, disp_width, wnp));
  346. }
  347. /*** end of my_get_time ***/
  348.  
  349. /*************/
  350. /* ~date_vld */
  351. /*           ****************************************************************/
  352. /* This is the validation function for dates.  The format is mm/dd/yy.      */
  353. /****************************************************************************/
  354. int date_vld(char *w, char *t, char *m, int pos, int max_pos, WINDOW *wnp )
  355. {
  356.   int ok = 1;
  357.  
  358.   if( !range('0',w[0],'1') && (w[0] != m[0]) )
  359.       ok = 0, w[0] = m[0];
  360.   if( w[0] == '0' )
  361.   {
  362.     if( !range('1',w[1],'9') && (w[1] != m[1]) )
  363.         ok = 0, w[1] = m[1];
  364.   }
  365.   else if( w[0] == '1' )
  366.   {
  367.     if( !range('0',w[1],'2') && (w[1] != m[1]) )
  368.         ok = 0, w[1] = m[1];
  369.   }
  370.  
  371.   if( !range('0',w[3],'3') && (w[3] != m[3]) )
  372.       ok = 0, w[3] = m[3];;
  373.   if( w[3] == '3' )
  374.   {
  375.     if( !range('0',w[4],'1') && (w[4] != m[4]) )
  376.         ok = 0, w[4] = m[4];;
  377.   }else{
  378.     if( !range('0',w[4],'9') && (w[4] != m[4]) )
  379.         ok = 0, w[4] = m[4];;
  380.   }
  381.   if( !range('0',w[6],'9') && (w[6] != m[6]) )
  382.       ok = 0, w[6] = m[6];;
  383.   if( !range('0',w[7],'9') && (w[7] != m[7]) )
  384.       ok = 0, w[7] = m[7];;
  385.  
  386.   if( !ok )
  387.   {
  388.     tone(1024,20);
  389.     wn_plst( CENTERED, 18, "Invalid Date - Hit any key to continue", wnp );
  390.     wait_event();
  391.     wn_claol(wnp);
  392.     return(0);
  393.   }
  394.   return(1);
  395. }
  396. /*** end of date_vld ***/
  397.  
  398. /*************/
  399. /* ~time_vld */
  400. /*           ****************************************************************/
  401. /* This is the validation function for time.  The format is hh:mm.          */
  402. /****************************************************************************/
  403. int time_vld(char *w, char *t, char *m, int pos, int max_pos, WINDOW *wnp )
  404. {
  405.   int ok = 1;
  406.  
  407.   if( !range('0',w[0],'2') && (w[0] != m[0]) )
  408.       ok = 0, w[0] = m[0];
  409.  
  410.   if( w[0] == '2' )
  411.   {
  412.     if( !range('0',w[1],'3') && (w[1] != m[1]) )
  413.         ok = 0, w[1] = m[1];
  414.   }else{
  415.     if( !range('0',w[1],'9') && (w[1] != m[1]) )
  416.         ok = 0, w[1] = m[1];
  417.   }
  418.   if( !range('0',w[3],'5') && (w[3] != m[3]) )
  419.       ok = 0, w[3] = m[3];;
  420.   if( !range('0',w[4],'9') && (w[4] != m[4]) )
  421.       ok = 0, w[4] = m[4];;
  422.  
  423.   if( !ok )
  424.   {
  425.     tone(1024,20);
  426.     wn_plst( CENTERED, 18, "Invalid Time - Hit any key to continue", wnp );
  427.     wait_event();
  428.     wn_claol(wnp);
  429.     return(0);
  430.   }
  431.   return(1);
  432. }
  433. /*** end of time_vld ***/
  434.  
  435. /***************/
  436. /* ~super_hook */
  437. /*             **************************************************************/
  438. /* This is the overall wn_gets_ll "super" hook.  We will use it for all     */
  439. /* entries in this demo to show the parameters on the fly!  Note that this  */
  440. /* function is only called when you call set_gets_hook(super_hook).  When   */
  441. /* you want the wn_gets_ll function quit calling this function, just use    */
  442. /* set_gets_hook(NULL).                                                     */
  443. /* Notice that the display here at the bottom of the window stays "one      */
  444. /* behind" the regular display above!  This is because this function is     */
  445. /* called from withing wn_gets_ll BEFORE the key is processed.  What this   */
  446. /* means to you is that you can take the key in the event and set it to     */
  447. /* something you like better!!!  We will take the F1 key and translate it   */
  448. /* into a CTRL-Y, commonly used to clear a string.                          */
  449. /****************************************************************************/
  450. int super_hook( char *text, char *tplt, char *mask, int pos,
  451.                 int max_pos, int p_flag, EVENT *eventp, WINDOW *wnp )
  452. {
  453.   switch(p_flag)
  454.   {
  455.     case H_ENTRY:                               /* wn_gets_ll start         */
  456.       break;
  457.  
  458.     case H_EXIT:                                /* wn_gets_ll end           */
  459.       break;
  460.  
  461.     case H_PROCESS:                             /* each wn_gets_ll key!     */
  462.       if (eventp->key == KEY_F1)                /* make F1 clear the entry! */
  463.         eventp->key = KEY_CTRL_Y;
  464.       break;
  465.   }
  466.   push(wnp->csr_x);                             /* we need to save the att  */
  467.   push(wnp->csr_y);                             /* and window cursor, since */
  468.   push(wnp->att);                               /* we are being called from */
  469.   wn_color(YELLOW, BLUE, wnp);                  /* within wn_gets_ll!       */
  470.   mv_cs(10, 19, wnp);
  471.   wn_printf(wnp, "    Text: %-25s     Pos: %02d", text, pos);
  472.   wn_cleol(wnp);
  473.   mv_cs(10, 20, wnp);
  474.   wn_printf(wnp, "    Mask: %-25s Max Pos: %02d", mask, max_pos);
  475.   wn_cleol(wnp);
  476.   mv_cs(10, 21, wnp);
  477.   wn_printf(wnp, "Template: %-25s     Key: 0x%04X", tplt, eventp->key);
  478.   wn_cleol(wnp);
  479.   pop(wnp->att);
  480.   pop(wnp->csr_y);
  481.   pop(wnp->csr_x);
  482.   return(1);
  483. }
  484. /*** end of super_hook ***/
  485.  
  486. /**** END OF FILE ****/
  487.