xref: /freebsd/contrib/nvi/vi/v_put.c (revision aa0a1e58)
1 /*-
2  * Copyright (c) 1992, 1993, 1994
3  *	The Regents of the University of California.  All rights reserved.
4  * Copyright (c) 1992, 1993, 1994, 1995, 1996
5  *	Keith Bostic.  All rights reserved.
6  *
7  * See the LICENSE file for redistribution information.
8  */
9 
10 #include "config.h"
11 
12 #ifndef lint
13 static const char sccsid[] = "@(#)v_put.c	10.5 (Berkeley) 3/6/96";
14 #endif /* not lint */
15 
16 #include <sys/types.h>
17 #include <sys/queue.h>
18 #include <sys/time.h>
19 
20 #include <bitstring.h>
21 #include <limits.h>
22 #include <stdio.h>
23 
24 #include "../common/common.h"
25 #include "vi.h"
26 
27 static void	inc_buf __P((SCR *, VICMD *));
28 
29 /*
30  * v_Put -- [buffer]P
31  *	Insert the contents of the buffer before the cursor.
32  *
33  * PUBLIC: int v_Put __P((SCR *, VICMD *));
34  */
35 int
36 v_Put(sp, vp)
37 	SCR *sp;
38 	VICMD *vp;
39 {
40 	u_long cnt;
41 
42 	if (F_ISSET(vp, VC_ISDOT))
43 		inc_buf(sp, vp);
44 
45 	/*
46 	 * !!!
47 	 * Historic vi did not support a count with the 'p' and 'P'
48 	 * commands.  It's useful, so we do.
49 	 */
50 	for (cnt = F_ISSET(vp, VC_C1SET) ? vp->count : 1; cnt--;) {
51 		if (put(sp, NULL,
52 		    F_ISSET(vp, VC_BUFFER) ? &vp->buffer : NULL,
53 		    &vp->m_start, &vp->m_final, 0))
54 			return (1);
55 		vp->m_start = vp->m_final;
56 		if (INTERRUPTED(sp))
57 			return (1);
58 	}
59 	return (0);
60 }
61 
62 /*
63  * v_put -- [buffer]p
64  *	Insert the contents of the buffer after the cursor.
65  *
66  * PUBLIC: int v_put __P((SCR *, VICMD *));
67  */
68 int
69 v_put(sp, vp)
70 	SCR *sp;
71 	VICMD *vp;
72 {
73 	u_long cnt;
74 
75 	if (F_ISSET(vp, VC_ISDOT))
76 		inc_buf(sp, vp);
77 
78 	/*
79 	 * !!!
80 	 * Historic vi did not support a count with the 'p' and 'P'
81 	 * commands.  It's useful, so we do.
82 	 */
83 	for (cnt = F_ISSET(vp, VC_C1SET) ? vp->count : 1; cnt--;) {
84 		if (put(sp, NULL,
85 		    F_ISSET(vp, VC_BUFFER) ? &vp->buffer : NULL,
86 		    &vp->m_start, &vp->m_final, 1))
87 			return (1);
88 		vp->m_start = vp->m_final;
89 		if (INTERRUPTED(sp))
90 			return (1);
91 	}
92 	return (0);
93 }
94 
95 /*
96  * !!!
97  * Historical whackadoo.  The dot command `puts' the numbered buffer
98  * after the last one put.  For example, `"4p.' would put buffer #4
99  * and buffer #5.  If the user continued to enter '.', the #9 buffer
100  * would be repeatedly output.  This was not documented, and is a bit
101  * tricky to reconstruct.  Historical versions of vi also dropped the
102  * contents of the default buffer after each put, so after `"4p' the
103  * default buffer would be empty.  This makes no sense to me, so we
104  * don't bother.  Don't assume sequential order of numeric characters.
105  *
106  * And, if that weren't exciting enough, failed commands don't normally
107  * set the dot command.  Well, boys and girls, an exception is that
108  * the buffer increment gets done regardless of the success of the put.
109  */
110 static void
111 inc_buf(sp, vp)
112 	SCR *sp;
113 	VICMD *vp;
114 {
115 	CHAR_T v;
116 
117 	switch (vp->buffer) {
118 	case '1':
119 		v = '2';
120 		break;
121 	case '2':
122 		v = '3';
123 		break;
124 	case '3':
125 		v = '4';
126 		break;
127 	case '4':
128 		v = '5';
129 		break;
130 	case '5':
131 		v = '6';
132 		break;
133 	case '6':
134 		v = '7';
135 		break;
136 	case '7':
137 		v = '8';
138 		break;
139 	case '8':
140 		v = '9';
141 		break;
142 	default:
143 		return;
144 	}
145 	VIP(sp)->sdot.buffer = vp->buffer = v;
146 }
147