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
|
/*
* Copyright (c) 2003 Gunnar Ritter
*
* This software is provided 'as-is', without any express or implied
* warranty. In no event will the authors be held liable for any damages
* arising from the use of this software.
*
* Permission is granted to anyone to use this software for any purpose,
* including commercial applications, and to alter it and redistribute
* it freely, subject to the following restrictions:
*
* 1. The origin of this software must not be misrepresented; you must not
* claim that you wrote the original software. If you use this software
* in a product, an acknowledgment in the product documentation would be
* appreciated but is not required.
*
* 2. Altered source versions must be plainly marked as such, and must not be
* misrepresented as being the original software.
*
* 3. This notice may not be removed or altered from any source distribution.
*/
/* Sccsid @(#)ib_getw.c 1.5 (gritter) 7/16/04 */
#include <stdlib.h>
#include <string.h>
#include "iblok.h"
#include "mbtowi.h"
char *
ib_getw(struct iblok *ip, wint_t *wc, int *len)
{
size_t rest;
int c, i, n;
i = 0;
rest = ip->ib_mend - ip->ib_mcur;
if (rest && ip->ib_mcur > ip->ib_mbuf) {
do
ip->ib_mbuf[i] = ip->ib_mcur[i];
while (i++, --rest);
} else if (ip->ib_incompl) {
ip->ib_incompl = 0;
*wc = WEOF;
ip->ib_mend = ip->ib_mcur = NULL;
return NULL;
}
if (i == 0) {
c = ib_get(ip);
if (c == EOF) {
*wc = WEOF;
ip->ib_mend = ip->ib_mcur = NULL;
return NULL;
}
ip->ib_mbuf[i++] = (char)c;
}
if (ip->ib_mbuf[0] & 0200) {
while (ip->ib_mbuf[i-1] != '\n' && i < ip->ib_mb_cur_max &&
ip->ib_incompl == 0) {
c = ib_get(ip);
if (c != EOF)
ip->ib_mbuf[i++] = (char)c;
else
ip->ib_incompl = 1;
}
n = mbtowi(wc, ip->ib_mbuf, i);
if (n < 0) {
*len = 1;
*wc = WEOF;
} else if (n == 0) {
*len = 1;
*wc = '\0';
} else
*len = n;
} else {
*wc = ip->ib_mbuf[0];
*len = n = 1;
}
ip->ib_mcur = &ip->ib_mbuf[*len];
ip->ib_mend = &ip->ib_mcur[i - *len];
return ip->ib_mbuf;
}
|
