diff options
Diffstat (limited to 'libshouldbeinlibc/=line.c')
| -rw-r--r-- | libshouldbeinlibc/=line.c | 147 |
1 files changed, 147 insertions, 0 deletions
diff --git a/libshouldbeinlibc/=line.c b/libshouldbeinlibc/=line.c new file mode 100644 index 00000000..30fefcb5 --- /dev/null +++ b/libshouldbeinlibc/=line.c @@ -0,0 +1,147 @@ +/* Simple output formatting functions + + Copyright (C) 1995 Free Software Foundation, Inc. + + Written by Miles Bader <miles@gnu.ai.mit.edu> + + This file is part of the GNU Hurd. + + The GNU Hurd is free software; you can redistribute it and/or + modify it under the terms of the GNU General Public License as + published by the Free Software Foundation; either version 2, or (at + your option) any later version. + + The GNU Hurd is distributed in the hope that it will be useful, but + WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software + Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ + +#include <malloc.h> +#include <string.h> +#include <ctype.h> + +#include <line.h> + +/* Return a new line structure, which will output to STREAM. WIDTH is the + maximum number of characters per line. If enough memory can't be + allocated, 0 is returned. */ +struct line * +make_line (FILE *stream, unsigned width) +{ + struct line *line = malloc (sizeof (struct line)); + if (line) + { + line->buf = malloc (width + 2); + if (line->buf) + { + line->max = line->buf + width; + line->point = line->buf; + line->stream = stream; + } + else + { + free (line); + line = 0; + } + } + return line; +} + +/* Free LINE and any resources it uses. */ +void +line_free (struct line *line) +{ + if (line->point > line->buf) + line_newline (line, 0); + free (line->buf); + free (line); +} + +/* Adds the text in STR to LINE, wrapping words as necessary to fit. + LMARGIN is the left margin used when wrapping; whitespace is deleted at + wrap-points. Newlines in STR are honoured by adding a newline and + indenting to LMARGIN; any following whitespace is kept. */ +void +line_fill (struct line *line, char *str, unsigned lmargin) +{ + while (*str) + { + char *word_end = str; + + while (*word_end == ' ') + word_end++; + + if (*word_end == '\n') + { + if (line_column (line) > lmargin) + line_newline (line, lmargin); + str = word_end + 1; + } + else if (*word_end) + { + char *word_start = word_end; + while (*word_end && !isspace (*word_end)) + word_end++; + if (line_left (line, word_end - str) >= 0) + { + line_write (line, str, word_end - str); + str = word_end; + } + else + /* Word won't fit on the current line, move to the next one. */ + { + line_newline (line, lmargin); + str = word_start; /* Omit spaces when wrapping. */ + } + } + } +} + +/* Clean up after a printf to LINE, to take care of any newlines that might + have been added. ADDED is the amount the printf has added to the line. + We take care of updating LINE's point. */ +void +_line_cleanup_printf (struct line *line, unsigned added) +{ + char *point = line->point, *new_point = point + added, *last_nl = new_point; + + while (last_nl > point) + if (*--last_nl == '\n') + /* There's a newline; deal. */ + { + last_nl++; + fwrite (line->buf, 1, last_nl - line->buf, line->stream); + if (last_nl < new_point) + bcopy (last_nl, line->buf, new_point - last_nl); + new_point -= (last_nl - line->buf); + break; + } + + line->point = new_point; +} + +/* Add STR, of length LEN, to LINE. */ +void +line_write (struct line *line, char *str, unsigned len) +{ + char *end = memchr (str, '\n', len) ?: str + len; + unsigned line_len = end - str; + char *p = line->point, *max = line->max; + if (line_len > max - p) + line_len = max - p; + bcopy (str, p, line_len); + p += line_len; + if (line_len == len) + line->point = p; + else + { + char *buf = line->buf; + fwrite (buf, 1, p - buf, line->stream); + line->point = buf; + line_write (line, end + 1, len - line_len - 1); + } +} |