BSD 4_3_Net_2 release

[unix-history] / usr / src / lib / libcurses / addbytes.c

/*
* Copyright (c) 1987 Regents of the University of California.
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
*    notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
*    notice, this list of conditions and the following disclaimer in the
*    documentation and/or other materials provided with the distribution.
* 3. All advertising materials mentioning features or use of this software
*    must display the following acknowledgement:
*      This product includes software developed by the University of
*      California, Berkeley and its contributors.
* 4. Neither the name of the University nor the names of its contributors
*    may be used to endorse or promote products derived from this software
*    without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*/

#ifndef lint
static char sccsid[] = "@(#)addbytes.c  5.4 (Berkeley) 6/1/90";
#endif /* not lint */

# include       "curses.ext"

/*
*      This routine adds the character to the current position
*
*/
waddbytes(win, bytes, count)
reg WINDOW      *win;
reg char        *bytes;
reg int         count;
{
#define SYNCH_OUT()     {win->_cury = y; win->_curx = x;}
#define SYNCH_IN()      {y = win->_cury; x = win->_curx;}
       reg int         x, y;
       reg int         newx;

       SYNCH_IN();
# ifdef FULLDEBUG
       fprintf(outf, "ADDBYTES('%c') at (%d, %d)\n", c, y, x);
# endif
       while (count--) {
           register int c;
           static char blanks[] = "        ";

           c = *bytes++;
           switch (c) {
             case '\t':
                   SYNCH_IN();
                   if (waddbytes(win, blanks, 8-(x%8)) == ERR) {
                       return ERR;
                   }
                   SYNCH_OUT();
                   break;

             default:
# ifdef FULLDEBUG
                   fprintf(outf, "ADDBYTES: 1: y = %d, x = %d, firstch = %d, lastch = %d\n", y, x, win->_firstch[y], win->_lastch[y]);
# endif
                   if (win->_flags & _STANDOUT)
                           c |= _STANDOUT;
                   {
# ifdef FULLDEBUG
                           fprintf(outf, "ADDBYTES(%0.2o, %d, %d)\n", win, y, x);
# endif
                           if (win->_y[y][x] != c) {
                                   newx = x + win->_ch_off;
                                   if (win->_firstch[y] == _NOCHANGE) {
                                           win->_firstch[y] =
                                                           win->_lastch[y] = newx;
                                   } else if (newx < win->_firstch[y])
                                           win->_firstch[y] = newx;
                                   else if (newx > win->_lastch[y])
                                           win->_lastch[y] = newx;
# ifdef FULLDEBUG
                                   fprintf(outf, "ADDBYTES: change gives f/l: %d/%d [%d/%d]\n",
                                           win->_firstch[y], win->_lastch[y],
                                           win->_firstch[y] - win->_ch_off,
                                           win->_lastch[y] - win->_ch_off);
# endif
                           }
                   }
                   win->_y[y][x++] = c;
                   if (x >= win->_maxx) {
                           x = 0;
   newline:
                           if (++y >= win->_maxy)
                                   if (win->_scroll) {
                                           SYNCH_OUT();
                                           scroll(win);
                                           SYNCH_IN();
                                           --y;
                                   }
                                   else
                                           return ERR;
                   }
# ifdef FULLDEBUG
                   fprintf(outf, "ADDBYTES: 2: y = %d, x = %d, firstch = %d, lastch = %d\n", y, x, win->_firstch[y], win->_lastch[y]);
# endif
                   break;
             case '\n':
                   SYNCH_OUT();
                   wclrtoeol(win);
                   SYNCH_IN();
                   if (!NONL)
                           x = 0;
                   goto newline;
             case '\r':
                   x = 0;
                   break;
             case '\b':
                   if (--x < 0)
                           x = 0;
                   break;
           }
   }
   SYNCH_OUT();
   return OK;
}