column(1): Sync with FreeBSD (mainly for multibyte char support).
authorSascha Wildner <saw@online.de>
Mon, 30 Dec 2013 03:26:44 +0000 (04:26 +0100)
committerSascha Wildner <saw@online.de>
Mon, 30 Dec 2013 03:26:44 +0000 (04:26 +0100)
usr.bin/column/Makefile
usr.bin/column/column.1
usr.bin/column/column.c

index a0adda3..baa97b4 100644 (file)
@@ -1,5 +1,5 @@
 #      @(#)Makefile    8.1 (Berkeley) 6/6/93
-# $DragonFly: src/usr.bin/column/Makefile,v 1.3 2007/08/27 16:50:52 pavalos Exp $
+# $FreeBSD: head/usr.bin/column/Makefile 90415 2002-02-08 22:31:43Z markm $
 
 PROG=  column
 
index c83561f..b2a52ef 100644 (file)
@@ -26,9 +26,9 @@
 .\" SUCH DAMAGE.
 .\"
 .\"     @(#)column.1   8.1 (Berkeley) 6/6/93
-.\" $FreeBSD: src/usr.bin/column/column.1,v 1.5.2.4 2001/08/16 13:16:46 ru Exp $
+.\" $FreeBSD: head/usr.bin/column/column.1 216370 2010-12-11 08:32:16Z joel $
 .\"
-.Dd June 6, 1993
+.Dd December 30, 2013
 .Dt COLUMN 1
 .Os
 .Sh NAME
@@ -71,13 +71,14 @@ Useful for pretty-printing displays.
 Fill columns before filling rows.
 .El
 .Sh ENVIRONMENT
-.Bl -tag -width COLUMNS
-.It Ev COLUMNS
-The environment variable
-.Ev COLUMNS
-is used to determine the size of
-the screen if no other information is available.
-.El
+The
+.Ev COLUMNS , LANG , LC_ALL
+and
+.Ev LC_CTYPE
+environment variables affect the execution of
+.Nm
+as described in
+.Xr environ 7 .
 .Sh EXIT STATUS
 .Ex -std
 .Sh EXAMPLES
@@ -94,3 +95,7 @@ The
 .Nm
 command appeared in
 .Bx 4.3 Reno .
+.Sh BUGS
+Input lines are limited to
+.Dv LINE_MAX
+(2048) bytes in length.
index ef6c729..c50228e 100644 (file)
@@ -26,8 +26,7 @@
  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  * SUCH DAMAGE.
  *
- * $FreeBSD: src/usr.bin/column/column.c,v 1.4.6.2 2001/08/02 01:34:19 obrien Exp $
- * $DragonFly: src/usr.bin/column/column.c,v 1.6 2006/10/08 09:12:32 corecode Exp $
+ * $FreeBSD: head/usr.bin/column/column.c 227159 2011-11-06 08:14:34Z ed $
  *
  * @(#) Copyright (c) 1989, 1993, 1994 The Regents of the University of California.  All rights reserved.
  * @(#)column.c        8.4 (Berkeley) 5/4/95
 
 #include <sys/types.h>
 #include <sys/ioctl.h>
+#include <sys/param.h>
 
-#include <ctype.h>
 #include <err.h>
 #include <limits.h>
+#include <locale.h>
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
 #include <unistd.h>
+#include <wchar.h>
+#include <wctype.h>
 
 #define        TAB     8
 
-void  c_columnate(void);
-void  input(FILE *);
-void  maketbl(void);
-void  print(void);
-void  r_columnate(void);
-void  usage(void);
+static void    c_columnate(void);
+static void    input(FILE *);
+static void    maketbl(void);
+static void    print(void);
+static void    r_columnate(void);
+static void    usage(void);
+static int     width(const wchar_t *);
 
-int termwidth = 80;            /* default terminal width */
+static int     termwidth = 80;         /* default terminal width */
 
-int entries;                   /* number of records */
-int eval;                      /* exit value */
-int maxlength;                 /* longest record */
-char **list;                   /* array of pointers to records */
-const char *separator = "\t "; /* field separator for table option */
+static int     entries;                /* number of records */
+static int     eval;                   /* exit value */
+static int     maxlength;              /* longest record */
+static wchar_t **list;                 /* array of pointers to records */
+static const wchar_t *separator = L"\t "; /* field separator for table option */
 
 int
 main(int argc, char **argv)
@@ -68,6 +71,11 @@ main(int argc, char **argv)
        FILE *fp;
        int ch, tflag, xflag;
        char *p;
+       const char *src;
+       wchar_t *newsep;
+       size_t seplen;
+
+       setlocale(LC_ALL, "");
 
        if (ioctl(1, TIOCGWINSZ, &win) == -1 || !win.ws_col) {
                if ((p = getenv("COLUMNS")))
@@ -82,7 +90,15 @@ main(int argc, char **argv)
                        termwidth = atoi(optarg);
                        break;
                case 's':
-                       separator = optarg;
+                       src = optarg;
+                       seplen = mbsrtowcs(NULL, &src, 0, NULL);
+                       if (seplen == (size_t)-1)
+                               err(1, "bad separator");
+                       newsep = malloc((seplen + 1) * sizeof(wchar_t));
+                       if (newsep == NULL)
+                               err(1, NULL);
+                       mbsrtowcs(newsep, &src, seplen + 1, NULL);
+                       separator = newsep;
                        break;
                case 't':
                        tflag = 1;
@@ -111,7 +127,7 @@ main(int argc, char **argv)
        if (!entries)
                exit(eval);
 
-       maxlength = (maxlength + TAB) & ~(TAB - 1);
+       maxlength = roundup(maxlength + 1, TAB);
        if (tflag)
                maketbl();
        else if (maxlength >= termwidth)
@@ -123,35 +139,36 @@ main(int argc, char **argv)
        exit(eval);
 }
 
-void
+static void
 c_columnate(void)
 {
        int chcnt, col, cnt, endcol, numcols;
-       char **lp;
+       wchar_t **lp;
 
        numcols = termwidth / maxlength;
        endcol = maxlength;
        for (chcnt = col = 0, lp = list;; ++lp) {
-               chcnt += printf("%s", *lp);
+               wprintf(L"%ls", *lp);
+               chcnt += width(*lp);
                if (!--entries)
                        break;
                if (++col == numcols) {
                        chcnt = col = 0;
                        endcol = maxlength;
-                       putchar('\n');
+                       putwchar('\n');
                } else {
-                       while ((cnt = ((chcnt + TAB) & ~(TAB - 1))) <= endcol) {
-                               (void)putchar('\t');
+                       while ((cnt = roundup(chcnt + 1, TAB)) <= endcol) {
+                               (void)putwchar('\t');
                                chcnt = cnt;
                        }
                        endcol += maxlength;
                }
        }
        if (chcnt)
-               putchar('\n');
+               putwchar('\n');
 }
 
-void
+static void
 r_columnate(void)
 {
        int base, chcnt, cnt, col, endcol, numcols, numrows, row;
@@ -164,53 +181,56 @@ r_columnate(void)
        for (row = 0; row < numrows; ++row) {
                endcol = maxlength;
                for (base = row, chcnt = col = 0; col < numcols; ++col) {
-                       chcnt += printf("%s", list[base]);
+                       wprintf(L"%ls", list[base]);
+                       chcnt += width(list[base]);
                        if ((base += numrows) >= entries)
                                break;
-                       while ((cnt = ((chcnt + TAB) & ~(TAB - 1))) <= endcol) {
-                               (void)putchar('\t');
+                       while ((cnt = roundup(chcnt + 1, TAB)) <= endcol) {
+                               (void)putwchar('\t');
                                chcnt = cnt;
                        }
                        endcol += maxlength;
                }
-               putchar('\n');
+               putwchar('\n');
        }
 }
 
-void
+static void
 print(void)
 {
        int cnt;
-       char **lp;
+       wchar_t **lp;
 
        for (cnt = entries, lp = list; cnt--; ++lp)
-               (void)printf("%s\n", *lp);
+               (void)wprintf(L"%ls\n", *lp);
 }
 
 typedef struct _tbl {
-       char **list;
+       wchar_t **list;
        int cols, *len;
 } TBL;
 #define        DEFCOLS 25
 
-void
+static void
 maketbl(void)
 {
        TBL *t;
        int coloff, cnt;
-       char *p, **lp;
+       wchar_t *p, **lp;
        int *lens, maxcols;
        TBL *tbl;
-       char **cols;
+       wchar_t **cols;
+       wchar_t *last;
 
        if ((t = tbl = calloc(entries, sizeof(TBL))) == NULL)
-               err(1, NULL);
-       if ((cols = calloc((maxcols = DEFCOLS), sizeof(char *))) == NULL)
-               err(1, NULL);
+               err(1, (char *)NULL);
+       if ((cols = calloc((maxcols = DEFCOLS), sizeof(*cols))) == NULL)
+               err(1, (char *)NULL);
        if ((lens = calloc(maxcols, sizeof(int))) == NULL)
-               err(1, NULL);
+               err(1, (char *)NULL);
        for (cnt = 0, lp = list; cnt < entries; ++cnt, ++lp, ++t) {
-               for (coloff = 0, p = *lp; (cols[coloff] = strtok(p, separator));
+               for (coloff = 0, p = *lp;
+                   (cols[coloff] = wcstok(p, separator, &last));
                    p = NULL)
                        if (++coloff == maxcols) {
                                if (!(cols = realloc(cols, ((u_int)maxcols +
@@ -222,63 +242,79 @@ maketbl(void)
                                    0, DEFCOLS * sizeof(int));
                                maxcols += DEFCOLS;
                        }
-               if ((t->list = calloc(coloff, sizeof(char *))) == NULL)
-                       err(1, NULL);
+               if ((t->list = calloc(coloff, sizeof(*t->list))) == NULL)
+                       err(1, (char *)NULL);
                if ((t->len = calloc(coloff, sizeof(int))) == NULL)
-                       err(1, NULL);
+                       err(1, (char *)NULL);
                for (t->cols = coloff; --coloff >= 0;) {
                        t->list[coloff] = cols[coloff];
-                       t->len[coloff] = strlen(cols[coloff]);
+                       t->len[coloff] = width(cols[coloff]);
                        if (t->len[coloff] > lens[coloff])
                                lens[coloff] = t->len[coloff];
                }
        }
        for (cnt = 0, t = tbl; cnt < entries; ++cnt, ++t) {
                for (coloff = 0; coloff < t->cols  - 1; ++coloff)
-                       (void)printf("%s%*s", t->list[coloff],
-                           lens[coloff] - t->len[coloff] + 2, " ");
-               (void)printf("%s\n", t->list[coloff]);
+                       (void)wprintf(L"%ls%*ls", t->list[coloff],
+                           lens[coloff] - t->len[coloff] + 2, L" ");
+               (void)wprintf(L"%ls\n", t->list[coloff]);
        }
 }
 
 #define        DEFNUM          1000
 #define        MAXLINELEN      (LINE_MAX + 1)
 
-void
+static void
 input(FILE *fp)
 {
        static int maxentry;
        int len;
-       char *p, buf[MAXLINELEN];
+       wchar_t *p, buf[MAXLINELEN];
 
        if (!list)
-               if ((list = calloc((maxentry = DEFNUM), sizeof(char *))) ==
+               if ((list = calloc((maxentry = DEFNUM), sizeof(*list))) ==
                    NULL)
-                       err(1, NULL);
-       while (fgets(buf, MAXLINELEN, fp)) {
-               for (p = buf; *p && isspace(*p); ++p);
+                       err(1, (char *)NULL);
+       while (fgetws(buf, MAXLINELEN, fp)) {
+               for (p = buf; *p && iswspace(*p); ++p);
                if (!*p)
                        continue;
-               if (!(p = strchr(p, '\n'))) {
+               if (!(p = wcschr(p, L'\n'))) {
                        warnx("line too long");
                        eval = 1;
                        continue;
                }
-               *p = '\0';
-               len = p - buf;
+               *p = L'\0';
+               len = width(buf);
                if (maxlength < len)
                        maxlength = len;
                if (entries == maxentry) {
                        maxentry += DEFNUM;
                        if (!(list = realloc(list,
-                           (u_int)maxentry * sizeof(char *))))
+                           (u_int)maxentry * sizeof(*list))))
                                err(1, NULL);
                }
-               list[entries++] = strdup(buf);
+               list[entries] = malloc((wcslen(buf) + 1) * sizeof(wchar_t));
+               if (list[entries] == NULL)
+                       err(1, NULL);
+               wcscpy(list[entries], buf);
+               entries++;
        }
 }
 
-void
+/* Like wcswidth(), but ignores non-printing characters. */
+static int
+width(const wchar_t *wcs)
+{
+       int w, cw;
+
+       for (w = 0; *wcs != L'\0'; wcs++)
+               if ((cw = wcwidth(*wcs)) > 0)
+                       w += cw;
+       return (w);
+}
+
+static void
 usage(void)
 {