11  * 1. Redistributions of source code must retain the above copyright
54 memstream_grow(struct memstream *ms, fpos_t newoff)  in memstream_grow()  argument
60 		newsize = SSIZE_MAX - 1;  in memstream_grow()
63 	if (newsize > ms->len) {  in memstream_grow()
64 		buf = realloc(*ms->bufp, newsize + 1);  in memstream_grow()
67 			fprintf(stderr, "MS: %p growing from %zd to %zd\n",  in memstream_grow()
68 			    ms, ms->len, newsize);  in memstream_grow()
70 			memset(buf + ms->len + 1, 0, newsize - ms->len);  in memstream_grow()
71 			*ms->bufp = buf;  in memstream_grow()
72 			ms->len = newsize;  in memstream_grow()
73 			return (1);  in memstream_grow()
77 	return (1);  in memstream_grow()
81 memstream_update(struct memstream *ms)  in memstream_update()  argument
84 	assert(ms->len >= 0 && ms->offset >= 0);  in memstream_update()
85 	*ms->sizep = ms->len < ms->offset ? ms->len : ms->offset;  in memstream_update()
91 	struct memstream *ms;  in memstream_write()  local
94 	ms = cookie;  in memstream_write()
95 	if (!memstream_grow(ms, ms->offset + len))  in memstream_write()
96 		return (-1);  in memstream_write()
97 	tocopy = ms->len - ms->offset;  in memstream_write()
100 	memcpy(*ms->bufp + ms->offset, buf, tocopy);  in memstream_write()
101 	ms->offset += tocopy;  in memstream_write()
102 	memstream_update(ms);  in memstream_write()
104 	fprintf(stderr, "MS: write(%p, %d) = %zd\n", ms, len, tocopy);  in memstream_write()
112 	struct memstream *ms;  in memstream_seek()  local
117 	ms = cookie;  in memstream_seek()
119 	old = ms->offset;  in memstream_seek()
125 		ms->offset = pos;  in memstream_seek()
133 			if (pos + ms->len < 0) {  in memstream_seek()
136 				    "MS: bad SEEK_END: pos %jd, len %zd\n",  in memstream_seek()
137 				    (intmax_t)pos, ms->len);  in memstream_seek()
140 				return (-1);  in memstream_seek()
143 			if (FPOS_MAX - ms->len < pos) {  in memstream_seek()
146 				    "MS: bad SEEK_END: pos %jd, len %zd\n",  in memstream_seek()
147 				    (intmax_t)pos, ms->len);  in memstream_seek()
150 				return (-1);  in memstream_seek()
153 		ms->offset = ms->len + pos;  in memstream_seek()
156 	memstream_update(ms);  in memstream_seek()
158 	fprintf(stderr, "MS: seek(%p, %jd, %d) %jd -> %jd\n", ms, (intmax_t)pos,  in memstream_seek()
159 	    whence, (intmax_t)old, (intmax_t)ms->offset);  in memstream_seek()
161 	return (ms->offset);  in memstream_seek()
175 	struct memstream *ms;  in open_memstream()  local
183 	*bufp = calloc(1, 1);  in open_memstream()
186 	ms = malloc(sizeof(*ms));  in open_memstream()
187 	if (ms == NULL) {  in open_memstream()
194 	ms->bufp = bufp;  in open_memstream()
195 	ms->sizep = sizep;  in open_memstream()
196 	ms->len = 0;  in open_memstream()
197 	ms->offset = 0;  in open_memstream()
198 	memstream_update(ms);  in open_memstream()
199 	fp = funopen(ms, NULL, memstream_write, memstream_seek,  in open_memstream()
203 		free(ms);  in open_memstream()
209 	fwide(fp, -1);  in open_memstream()