2N/A * The contents of this file are subject to the terms of the 2N/A * Common Development and Distribution License, Version 1.0 only 2N/A * (the "License"). You may not use this file except in compliance 2N/A * See the License for the specific language governing permissions 2N/A * and limitations under the License. 2N/A * When distributing Covered Code, include this CDDL HEADER in each 2N/A * If applicable, add the following below this CDDL HEADER, with the 2N/A * fields enclosed by brackets "[]" replaced with your own identifying 2N/A * information: Portions Copyright [yyyy] [name of copyright owner] 2N/A * Copyright 1997 Sun Microsystems, Inc. All rights reserved. 2N/A * Use is subject to license terms. 2N/A/* Copyright (c) 1988 AT&T */ 2N/A/* All Rights Reserved */ 2N/A * University Copyright- Copyright (c) 1982, 1986, 1988 2N/A * The Regents of the University of California 2N/A * All Rights Reserved 2N/A * University Acknowledgment- Portions of this document are derived from 2N/A * software developed by the University of California, Berkeley, and its 2N/A#
pragma ident "%Z%%M% %I% %E% SMI" 2N/A * Insert to 'win' at most n chars of a string 2N/A * starting at (cury, curx). However, if n <= 0, 2N/A * insert the entire string. 2N/A * \n, \t, \r, \b are treated in the same way 2N/A * as other control chars. 2N/A unsigned char *
sp = (
unsigned char *)
tsp;
2N/A /* only insert at the start of a character */ 2N/A /* compute total length of the insertion */ 2N/A /* see if the entire character is defined */ 2N/A for (k = x +
1;
sp[k] !=
'\0' && k <= m; ++k) {
2N/A /* recompute # of columns used */ 2N/A /* skip an appropriate number of bytes */ 2N/A /* length of chars to be shifted */ 2N/A /* number of chars insertible */ 2N/A /* insert new data */ 2N/A /* act as if we are adding characters */ 2N/A for (; n > 0; --n, ++
sp) {
2N/A /* multi-byte characters */ 2N/A /* single byte character */ 2N/A /* update the change structure */