home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Spezial / SPEZIAL2_97.zip / SPEZIAL2_97.iso / ANWEND / EDITOR / NVI179B / NVI179B.ZIP / ip / ip_main.c < prev    next >
C/C++ Source or Header  |  1996-10-13  |  3KB  |  166 lines
  1. /*-
  2.  * Copyright (c) 1996
  3.  *    Keith Bostic.  All rights reserved.
  4.  *
  5.  * See the LICENSE file for redistribution information.
  6.  */
  7.  
  8. #include "config.h"
  9.  
  10. #ifndef lint
  11. static const char sccsid[] = "@(#)ip_main.c    8.3 (Berkeley) 10/13/96";
  12. #endif /* not lint */
  13.  
  14. #include <sys/types.h>
  15. #include <sys/queue.h>
  16.  
  17. #include <bitstring.h>
  18. #include <ctype.h>
  19. #include <errno.h>
  20. #include <stdio.h>
  21.  
  22. #include "../common/common.h"
  23. #include "ip.h"
  24.  
  25. static void       ip_func_std __P((GS *));
  26. static IP_PRIVATE *ip_init __P((GS *, char *));
  27. static void       perr __P((char *, char *));
  28.  
  29. /*
  30.  * main --
  31.  *      This is the main loop for the vi-as-library editor.
  32.  */
  33. int
  34. ip_main(argc, argv, gp, ip_arg)
  35.     int argc;
  36.     char *argv[], *ip_arg;
  37.     GS *gp;
  38. {
  39.     EVENT ev;
  40.     IP_PRIVATE *ipp;
  41.     IP_BUF ipb;
  42.     int rval;
  43.  
  44.     /* Create and partially initialize the IP structure. */
  45.     if ((ipp = ip_init(gp, ip_arg)) == NULL)
  46.         return (1);
  47.  
  48.     /* Add the terminal type to the global structure. */
  49.     if ((OG_D_STR(gp, GO_TERM) =
  50.         OG_STR(gp, GO_TERM) = strdup("ip_curses")) == NULL)
  51.         perr(gp->progname, NULL);
  52.  
  53.     /*
  54.      * Figure out how big the screen is -- read events until we get
  55.      * the rows and columns.
  56.      */
  57.     do {
  58.         if (ip_event(NULL, &ev, 0, 0))
  59.             return (1);
  60.     } while (ev.e_event != E_EOF && ev.e_event != E_ERR &&
  61.         ev.e_event != E_QUIT && ev.e_event != E_WRESIZE &&
  62.         ev.e_event != E_SIGHUP && ev.e_event != E_SIGTERM);
  63.     if (ev.e_event != E_WRESIZE)
  64.         return (1);
  65.  
  66.     /* Run ex/vi. */
  67.     rval = editor(gp, argc, argv);
  68.  
  69.     /* Clean up the screen. */
  70.     (void)ip_quit(gp);
  71.  
  72.     /* Free the global and IP private areas. */
  73. #if defined(DEBUG) || defined(PURIFY) || defined(LIBRARY)
  74.     free(ipp);
  75.     free(gp);
  76. #endif
  77.  
  78.     return (rval);
  79. }
  80.  
  81. /*
  82.  * ip_init --
  83.  *    Create and partially initialize the GS structure.
  84.  */
  85. static IP_PRIVATE *
  86. ip_init(gp, ip_arg)
  87.     GS *gp;
  88.     char *ip_arg;
  89. {
  90.     IP_PRIVATE *ipp;
  91.     char *ep;
  92.  
  93.     /* Allocate the IP private structure. */
  94.     CALLOC_NOMSG(NULL, ipp, IP_PRIVATE *, 1, sizeof(IP_PRIVATE));
  95.     if (ipp == NULL)
  96.         perr(gp->progname,  NULL);
  97.     gp->ip_private = ipp;
  98.  
  99.     /*
  100.      * Crack ip_arg -- it's of the form #.#, where the first number is the
  101.      * file descriptor from the screen, the second is the file descriptor
  102.      * to the screen.
  103.      */
  104.     if (!isdigit(ip_arg[0]))
  105.         goto usage;
  106.     ipp->i_fd = strtol(ip_arg, &ep, 10);
  107.     if (ep[0] != '.' || !isdigit(ep[1]))
  108.         goto usage;
  109.     ipp->o_fd = strtol(++ep, &ep, 10);
  110.     if (ep[0] != '\0') {
  111. usage:        ip_usage();
  112.         return (NULL);
  113.     }
  114.  
  115.     /* Initialize the list of ip functions. */
  116.     ip_func_std(gp);
  117.  
  118.     return (ipp);
  119. }
  120.  
  121. /*
  122.  * ip_func_std --
  123.  *    Initialize the standard ip functions.
  124.  */
  125. static void
  126. ip_func_std(gp)
  127.     GS *gp;
  128. {
  129.     gp->scr_addstr = ip_addstr;
  130.     gp->scr_attr = ip_attr;
  131.     gp->scr_baud = ip_baud;
  132.     gp->scr_bell = ip_bell;
  133.     gp->scr_busy = ip_busy;
  134.     gp->scr_clrtoeol = ip_clrtoeol;
  135.     gp->scr_cursor = ip_cursor;
  136.     gp->scr_deleteln = ip_deleteln;
  137.     gp->scr_event = ip_event;
  138.     gp->scr_ex_adjust = ip_ex_adjust;
  139.     gp->scr_fmap = ip_fmap;
  140.     gp->scr_insertln = ip_insertln;
  141.     gp->scr_keyval = ip_keyval;
  142.     gp->scr_move = ip_move;
  143.     gp->scr_msg = NULL;
  144.     gp->scr_optchange = ip_optchange;
  145.     gp->scr_refresh = ip_refresh;
  146.     gp->scr_rename = ip_rename;
  147.     gp->scr_screen = ip_screen;
  148.     gp->scr_suspend = ip_suspend;
  149.     gp->scr_usage = ip_usage;
  150. }
  151.  
  152. /*
  153.  * perr --
  154.  *    Print system error.
  155.  */
  156. static void
  157. perr(name, msg)
  158.     char *name, *msg;
  159. {
  160.     (void)fprintf(stderr, "%s:", name);
  161.     if (msg != NULL)
  162.         (void)fprintf(stderr, "%s:", msg);
  163.     (void)fprintf(stderr, "%s\n", strerror(errno));
  164.     exit(1);
  165. }
  166.