1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
|
/*-
* Copyright (c) 1996
* Keith Bostic. All rights reserved.
*
* See the LICENSE file for redistribution information.
*/
#include "config.h"
#ifndef lint
static const char sccsid[] = "$Id: ip_send.c,v 8.10 2001/06/25 15:19:25 skimo Exp $ (Berkeley) $Date: 2001/06/25 15:19:25 $";
#endif /* not lint */
#include <sys/types.h>
#include <sys/queue.h>
#include <bitstring.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include "../common/common.h"
#include "ip.h"
/*
* vi_send --
* Construct and send an IP buffer.
*
* PUBLIC: int vi_send __P((int, char *, IP_BUF *));
*/
int
vi_send(int ofd, char *fmt, IP_BUF *ipbp)
{
static char *bp;
static size_t blen;
size_t off;
u_int32_t ilen;
int nlen, n, nw;
char *p;
/*
* Have not created the channel to vi yet? -- RAZ
*
* XXX
* How is that possible!?!?
*
* We'll soon find out.
*/
if (ofd == 0) {
fprintf(stderr, "No channel\n");
abort();
}
if (blen == 0 && (bp = malloc(blen = 512)) == NULL)
return (1);
p = bp;
nlen = 0;
*p++ = ipbp->code;
nlen += IPO_CODE_LEN;
if (fmt != NULL)
for (; *fmt != '\0'; ++fmt)
switch (*fmt) {
case '1': /* Value #1. */
ilen = htonl(ipbp->val1);
goto value;
case '2': /* Value #2. */
ilen = htonl(ipbp->val2);
goto value;
case '3': /* Value #3. */
ilen = htonl(ipbp->val3);
value: nlen += IPO_INT_LEN;
if (nlen >= blen) {
blen = blen * 2 + nlen;
off = p - bp;
if ((bp = realloc(bp, blen)) == NULL)
return (1);
p = bp + off;
}
memcpy(p, &ilen, IPO_INT_LEN);
p += IPO_INT_LEN;
break;
case 'a': /* String #1. */
case 'b': /* String #2. */
ilen = *fmt == 'a' ? ipbp->len1 : ipbp->len2;
nlen += IPO_INT_LEN + ilen;
if (nlen >= blen) {
blen = blen * 2 + nlen;
off = p - bp;
if ((bp = realloc(bp, blen)) == NULL)
return (1);
p = bp + off;
}
ilen = htonl(ilen);
memcpy(p, &ilen, IPO_INT_LEN);
p += IPO_INT_LEN;
if (*fmt == 'a') {
memcpy(p, ipbp->str1, ipbp->len1);
p += ipbp->len1;
} else {
memcpy(p, ipbp->str2, ipbp->len2);
p += ipbp->len2;
}
break;
}
for (n = p - bp, p = bp; n > 0; n -= nw, p += nw)
if ((nw = write(ofd, p, n)) < 0)
return (1);
return (0);
}
|
