From 7fc7de8808cabfc22347ad9ca0c51600a2d49550 Mon Sep 17 00:00:00 2001 From: Daniel LEVAI Date: Sat, 8 Oct 2011 20:29:28 -0500 Subject: system/ksh-openbsd: Renamed from "ksh" and updated to 20110909 Signed-off-by: Robby Workman --- system/ksh-openbsd/README | 14 + system/ksh-openbsd/doinst.sh | 4 + system/ksh-openbsd/ksh-openbsd.SlackBuild | 101 ++ system/ksh-openbsd/ksh-openbsd.info | 10 + ...-ksh-vi-mode-complete-as-command-on-Ctrl-f.diff | 152 +++ system/ksh-openbsd/patches/02-remove_fp.diff | 217 ++++ ...-Ctrl-l-in-insert-mode-to-clear-the-screen.diff | 45 + ...e-Ctrl-f-in-command-mode-behave-the-same-a.diff | 26 + ...expansions-like-a-menu-with-numbers-in-vi-.diff | 105 ++ ...-remove-backslashes-in-filenames-using-lex.diff | 118 +++ ...compensate-for-cursor-move-on-command-mode.diff | 55 + ...m-the-list-of-characters-blocking-addition.diff | 37 + .../patches/09a-new_history_implementation.diff | 584 ++++++++++ .../09b-linux-new_history_implementation.diff | 36 + system/ksh-openbsd/patches/10-ksh_mb_binds.diff | 1115 ++++++++++++++++++++ system/ksh-openbsd/patches/linux/Makefile.diff | 58 + system/ksh-openbsd/patches/linux/c_sh_c.diff | 49 + system/ksh-openbsd/patches/linux/charclass_h.diff | 36 + system/ksh-openbsd/patches/linux/emacs_c.diff | 10 + system/ksh-openbsd/patches/linux/eval_c.diff | 19 + system/ksh-openbsd/patches/linux/history_c.diff | 10 + system/ksh-openbsd/patches/linux/jobs_c.diff | 22 + system/ksh-openbsd/patches/linux/lex_c.diff | 11 + system/ksh-openbsd/patches/linux/main_c.diff | 15 + system/ksh-openbsd/patches/linux/misc_c.diff | 12 + .../ksh-openbsd/patches/linux/posix_signals_h.diff | 128 +++ system/ksh-openbsd/patches/linux/sh_h.diff | 10 + system/ksh-openbsd/patches/linux/strlcat_c.diff | 65 ++ system/ksh-openbsd/patches/linux/strlcat_h.diff | 7 + system/ksh-openbsd/patches/linux/strlcpy_c.diff | 61 ++ system/ksh-openbsd/patches/linux/strlcpy_h.diff | 7 + system/ksh-openbsd/patches/linux/trap_c.diff | 45 + system/ksh-openbsd/patches/linux/var_c.diff | 53 + system/ksh-openbsd/patches/linux/vi_c.diff | 10 + system/ksh-openbsd/slack-desc | 18 + 35 files changed, 3265 insertions(+) create mode 100644 system/ksh-openbsd/README create mode 100644 system/ksh-openbsd/doinst.sh create mode 100644 system/ksh-openbsd/ksh-openbsd.SlackBuild create mode 100644 system/ksh-openbsd/ksh-openbsd.info create mode 100644 system/ksh-openbsd/patches/01-ksh-vi-mode-complete-as-command-on-Ctrl-f.diff create mode 100644 system/ksh-openbsd/patches/02-remove_fp.diff create mode 100644 system/ksh-openbsd/patches/03-ksh-vi-Ctrl-l-in-insert-mode-to-clear-the-screen.diff create mode 100644 system/ksh-openbsd/patches/04-ksh-vi-make-Ctrl-f-in-command-mode-behave-the-same-a.diff create mode 100644 system/ksh-openbsd/patches/05-ksh-print-expansions-like-a-menu-with-numbers-in-vi-.diff create mode 100644 system/ksh-openbsd/patches/06-ksh-remove-backslashes-in-filenames-using-lex.diff create mode 100644 system/ksh-openbsd/patches/07-ksh-vi-compensate-for-cursor-move-on-command-mode.diff create mode 100644 system/ksh-openbsd/patches/08-Remove-from-the-list-of-characters-blocking-addition.diff create mode 100644 system/ksh-openbsd/patches/09a-new_history_implementation.diff create mode 100644 system/ksh-openbsd/patches/09b-linux-new_history_implementation.diff create mode 100644 system/ksh-openbsd/patches/10-ksh_mb_binds.diff create mode 100644 system/ksh-openbsd/patches/linux/Makefile.diff create mode 100644 system/ksh-openbsd/patches/linux/c_sh_c.diff create mode 100644 system/ksh-openbsd/patches/linux/charclass_h.diff create mode 100644 system/ksh-openbsd/patches/linux/emacs_c.diff create mode 100644 system/ksh-openbsd/patches/linux/eval_c.diff create mode 100644 system/ksh-openbsd/patches/linux/history_c.diff create mode 100644 system/ksh-openbsd/patches/linux/jobs_c.diff create mode 100644 system/ksh-openbsd/patches/linux/lex_c.diff create mode 100644 system/ksh-openbsd/patches/linux/main_c.diff create mode 100644 system/ksh-openbsd/patches/linux/misc_c.diff create mode 100644 system/ksh-openbsd/patches/linux/posix_signals_h.diff create mode 100644 system/ksh-openbsd/patches/linux/sh_h.diff create mode 100644 system/ksh-openbsd/patches/linux/strlcat_c.diff create mode 100644 system/ksh-openbsd/patches/linux/strlcat_h.diff create mode 100644 system/ksh-openbsd/patches/linux/strlcpy_c.diff create mode 100644 system/ksh-openbsd/patches/linux/strlcpy_h.diff create mode 100644 system/ksh-openbsd/patches/linux/trap_c.diff create mode 100644 system/ksh-openbsd/patches/linux/var_c.diff create mode 100644 system/ksh-openbsd/patches/linux/vi_c.diff create mode 100644 system/ksh-openbsd/slack-desc (limited to 'system/ksh-openbsd') diff --git a/system/ksh-openbsd/README b/system/ksh-openbsd/README new file mode 100644 index 0000000000..56d8252f8e --- /dev/null +++ b/system/ksh-openbsd/README @@ -0,0 +1,14 @@ +This package is a patched version of the OpenBSD ksh, which is based on +the original PD-ksh, but heavily modified and maintained by OpenBSD +developers. "Patched" means ported to Linux. +You can download the source package from a mirror listed in the +slackbuild's info file, or you can always checkout the latest source +from OpenBSD's repository. + +PD-ksh is a clone of the AT&T Korn shell. + +PD-ksh has most of the ksh88 features, not much of the ksh93 features, +and a number of its own features. It is free and quite portable - you +should be able to compile it easily on pretty much any unix box. +The vi editing mode is better (IMHO) than that of ksh88 or ksh93 +(command/file completion using tab (optional), less buggy). diff --git a/system/ksh-openbsd/doinst.sh b/system/ksh-openbsd/doinst.sh new file mode 100644 index 0000000000..63941d1bac --- /dev/null +++ b/system/ksh-openbsd/doinst.sh @@ -0,0 +1,4 @@ +if ! grep -q '/bin/pdksh' etc/shells ; then + printf "/bin/pdksh\n" >> etc/shells ; +fi + diff --git a/system/ksh-openbsd/ksh-openbsd.SlackBuild b/system/ksh-openbsd/ksh-openbsd.SlackBuild new file mode 100644 index 0000000000..d9b1830856 --- /dev/null +++ b/system/ksh-openbsd/ksh-openbsd.SlackBuild @@ -0,0 +1,101 @@ +#!/bin/sh + +# Copyright (c) 2010 Daniel LEVAI +# All rights reserved. +# +# Redistribution and use in source and binary forms, with or without +# modification, are permitted provided that the following conditions are met: +# * Redistributions of source code must retain the above copyright +# notice, this list of conditions and the following disclaimer. +# * Redistributions in binary form must reproduce the above copyright +# notice, this list of conditions and the following disclaimer in the +# documentation and/or other materials provided with the distribution. +# * Neither the name of the nor the +# names of its contributors may be used to endorse or promote products +# derived from this software without specific prior written permission. +# +# THIS SOFTWARE IS PROVIDED ''AS IS'' AND ANY +# EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED +# WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE +# DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER BE LIABLE FOR ANY +# DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES +# (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; +# LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND +# ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT +# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS +# SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + +# Build script for the Linux port of OpenBSD's ksh + +PRGNAM=ksh-openbsd +VERSION=20110911 +BUILD=${BUILD:-1} +TAG=${TAG:-_SBo} + +if [ -z "$ARCH" ]; then + case "$( uname -m )" in + i?86) ARCH=i486 ;; + arm*) ARCH=arm ;; + *) ARCH=$( uname -m ) ;; + esac +fi + +CWD=$(pwd) +TMP=${TMP:-/tmp/SBo} +PKG=$TMP/package-$PRGNAM +OUTPUT=${OUTPUT:-/tmp} + +if [ "${ARCH}" == "i486" ];then + SLKCFLAGS='-march=i486 -mtune=i686' + LIBDIRSUFFIX="" +elif [ "$ARCH" == "i686" ]; then + SLKCFLAGS="-march=i686 -mtune=i686" + LIBDIRSUFFIX="" +elif [ "${ARCH}" == "x86_64" ];then + SLKCFLAGS='-fPIC' + LIBDIRSUFFIX="64" +else + SLKCFLAGS="-O2" + LIBDIRSUFFIX="" +fi + +set -e + +rm -Rf $PKG +mkdir -p $TMP $PKG $OUTPUT +cd $TMP +rm -Rf $PRGNAM +tar xvf $CWD/$PRGNAM.tar.gz +cd $PRGNAM +chown -R root:root . +find . \ + \( -perm 777 -o -perm 775 -o -perm 711 -o -perm 555 -o -perm 511 \) \ + -exec chmod 755 {} \; -o \ + \( -perm 666 -o -perm 664 -o -perm 600 -o -perm 444 -o -perm 440 -o -perm 400 \) \ + -exec chmod 644 {} \; + +for patch in "${CWD}"/patches/linux/*.diff;do + patch -p1 < "${patch}" +done +for patch in "${CWD}"/patches/*.diff;do + patch -p0 < "${patch}" +done + +CFLAGS="$SLKCFLAGS $(getconf LFS_CFLAGS)" make +make install DESTDIR=$PKG + +strip --strip-unneeded $PKG/bin/pdksh +gzip -9 $PKG/usr/man/man1/pdksh.1 + +mkdir -p $PKG/usr/doc/$PRGNAM-$VERSION +cp -a \ + INSTALL LEGAL NOTES PROJECTS README \ + $PKG/usr/doc/$PRGNAM-$VERSION +cat $CWD/$PRGNAM.SlackBuild > $PKG/usr/doc/$PRGNAM-$VERSION/$PRGNAM.SlackBuild + +mkdir -p $PKG/install +cat $CWD/slack-desc > $PKG/install/slack-desc +cat $CWD/doinst.sh > $PKG/install/doinst.sh + +cd $PKG +/sbin/makepkg -l y -c n $OUTPUT/$PRGNAM-$VERSION-$ARCH-$BUILD$TAG.${PKGTYPE:-tgz} diff --git a/system/ksh-openbsd/ksh-openbsd.info b/system/ksh-openbsd/ksh-openbsd.info new file mode 100644 index 0000000000..9b7616b254 --- /dev/null +++ b/system/ksh-openbsd/ksh-openbsd.info @@ -0,0 +1,10 @@ +PRGNAM="ksh-openbsd" +VERSION="20110909" +HOMEPAGE="http://leva.ecentrum.hu/slackbuilds/ksh-openbsd.tar.gz" +DOWNLOAD="http://leva.ecentrum.hu/slackbuilds/ksh-openbsd.tar.gz" +MD5SUM="636c07775c9d8cd049f670fc916501e7" +DOWNLOAD_x86_64="" +MD5SUM_x86_64="" +MAINTAINER="Daniel LEVAI" +EMAIL="leva@ecentrum.hu" +APPROVED="rworkman" diff --git a/system/ksh-openbsd/patches/01-ksh-vi-mode-complete-as-command-on-Ctrl-f.diff b/system/ksh-openbsd/patches/01-ksh-vi-mode-complete-as-command-on-Ctrl-f.diff new file mode 100644 index 0000000000..86a7a56c77 --- /dev/null +++ b/system/ksh-openbsd/patches/01-ksh-vi-mode-complete-as-command-on-Ctrl-f.diff @@ -0,0 +1,152 @@ +From 6af44d2fa0cdcba11368cf4eee141e42bf0dd422 Mon Sep 17 00:00:00 2001 +From: Alexander Polakov +Date: Sun, 29 May 2011 14:55:46 +0400 +Subject: [PATCH 1/8] ksh/vi mode: complete as command on Ctrl-f. + + * adds a flag for x_cf_glob() to force completion like it was a command + * new argument for complete_word() to pass the flag + * reuse print_expansions() unused argument to pass the flag + + Why: useful for sudo or one-liner completion + XXX: use different key combination? +--- + edit.c | 2 ++ + edit.h | 7 ++++--- + vi.c | 22 +++++++++++----------- + 3 files changed, 17 insertions(+), 14 deletions(-) + +diff --git edit.c edit.c +index 6c357a7..0b1ff7d 100644 +--- edit.c ++++ edit.c +@@ -599,6 +599,8 @@ x_cf_glob(int flags, const char *buf, int buflen, int pos, int *startp, + len = x_locate_word(buf, buflen, pos, startp, &is_command); + if (!(flags & XCF_COMMAND)) + is_command = 0; ++ if (flags & XCF_FORCE_COMMAND) ++ is_command = 1; + /* Don't do command globing on zero length strings - it takes too + * long and isn't very useful. File globs are more likely to be + * useful, so allow these. +diff --git edit.h edit.h +index f966fe4..9c75ffc 100644 +--- edit.h ++++ edit.h +@@ -38,9 +38,10 @@ typedef struct { + EXTERN X_chars edchars; + + /* x_cf_glob() flags */ +-#define XCF_COMMAND BIT(0) /* Do command completion */ +-#define XCF_FILE BIT(1) /* Do file completion */ +-#define XCF_FULLPATH BIT(2) /* command completion: store full path */ ++#define XCF_COMMAND BIT(0) /* Do command completion */ ++#define XCF_FILE BIT(1) /* Do file completion */ ++#define XCF_FULLPATH BIT(2) /* command completion: store full path */ ++#define XCF_FORCE_COMMAND BIT(3) /* Force completion as a command */ + #define XCF_COMMAND_FILE (XCF_COMMAND|XCF_FILE) + + /* edit.c */ +diff --git vi.c vi.c +index 889b35a..e4173c7 100644 +--- vi.c ++++ vi.c +@@ -58,7 +58,7 @@ static int newcol(int, int); + static void display(char *, char *, int); + static void ed_mov_opt(int, char *); + static int expand_word(int); +-static int complete_word(int, int); ++static int complete_word(int, int, int); + static int print_expansions(struct edstate *, int); + static int char_len(int); + static void x_vi_zotc(int); +@@ -651,7 +651,7 @@ vi_insert(int ch) + break; + + case Ctrl('f'): +- complete_word(0, 0); ++ complete_word(0, 0, XCF_FORCE_COMMAND); + break; + + case Ctrl('e'): +@@ -660,7 +660,7 @@ vi_insert(int ch) + + case Ctrl('i'): + if (Flag(FVITABCOMPLETE)) { +- complete_word(0, 0); ++ complete_word(0, 0, 0); + break; + } + /* FALLTHROUGH */ +@@ -1111,14 +1111,14 @@ vi_cmd(int argcnt, const char *cmd) + + case '=': /* at&t ksh */ + case Ctrl('e'): /* Nonstandard vi/ksh */ +- print_expansions(es, 1); ++ print_expansions(es, 0); + break; + + + case Ctrl('i'): /* Nonstandard vi/ksh */ + if (!Flag(FVITABCOMPLETE)) + return -1; +- complete_word(1, argcnt); ++ complete_word(1, argcnt, 0); + break; + + case Ctrl('['): /* some annoying at&t ksh's */ +@@ -1126,7 +1126,7 @@ vi_cmd(int argcnt, const char *cmd) + return -1; + case '\\': /* at&t ksh */ + case Ctrl('f'): /* Nonstandard vi/ksh */ +- complete_word(1, argcnt); ++ complete_word(1, argcnt, 0); + break; + + +@@ -1939,7 +1939,7 @@ expand_word(int command) + } + + static int +-complete_word(int command, int count) ++complete_word(int command, int count, int flags) + { + static struct edstate *buf; + int rval = 0; +@@ -1953,7 +1953,7 @@ complete_word(int command, int count) + + /* Undo previous completion */ + if (command == 0 && expanded == COMPLETE && buf) { +- print_expansions(buf, 0); ++ print_expansions(buf, flags); + expanded = PRINT; + return 0; + } +@@ -1971,7 +1971,7 @@ complete_word(int command, int count) + /* XCF_FULLPATH for count 'cause the menu printed by print_expansions() + * was done this way. + */ +- nwords = x_cf_glob(XCF_COMMAND_FILE | (count ? XCF_FULLPATH : 0), ++ nwords = x_cf_glob(XCF_COMMAND_FILE | (count ? XCF_FULLPATH : 0) | flags, + es->cbuf, es->linelen, es->cursor, + &start, &end, &words, &is_command); + if (nwords == 0) { +@@ -2044,14 +2044,14 @@ complete_word(int command, int count) + } + + static int +-print_expansions(struct edstate *e, int command) ++print_expansions(struct edstate *e, int flags) + { + int nwords; + int start, end; + char **words; + int is_command; + +- nwords = x_cf_glob(XCF_COMMAND_FILE|XCF_FULLPATH, ++ nwords = x_cf_glob(XCF_COMMAND_FILE|XCF_FULLPATH|flags, + e->cbuf, e->linelen, e->cursor, + &start, &end, &words, &is_command); + if (nwords == 0) { +-- +1.7.5 + diff --git a/system/ksh-openbsd/patches/02-remove_fp.diff b/system/ksh-openbsd/patches/02-remove_fp.diff new file mode 100644 index 0000000000..25817d0a56 --- /dev/null +++ b/system/ksh-openbsd/patches/02-remove_fp.diff @@ -0,0 +1,217 @@ +Remove disabled FP support. +From Okan Demirmen. +Index: ksh_limval.h +=================================================================== +RCS file: /home/okan/hack/open/cvs/src/bin/ksh/ksh_limval.h,v +retrieving revision 1.2 +diff -u -p -r1.2 ksh_limval.h +--- ksh_limval.h 18 Dec 2004 20:55:52 -0000 1.2 ++++ ksh_limval.h 14 Mar 2011 10:03:41 -0000 +@@ -4,10 +4,6 @@ + + /* limits.h is included in sh.h */ + +-#ifndef DMAXEXP +-# define DMAXEXP 128 /* should be big enough */ +-#endif +- + #ifndef BITS + # define BITS(t) (CHAR_BIT * sizeof(t)) + #endif +Index: shf.c +=================================================================== +RCS file: /home/okan/hack/open/cvs/src/bin/ksh/shf.c,v +retrieving revision 1.15 +diff -u -p -r1.15 shf.c +--- shf.c 2 Apr 2006 00:48:33 -0000 1.15 ++++ shf.c 14 Mar 2011 10:03:19 -0000 +@@ -705,15 +705,7 @@ shf_smprintf(const char *fmt, ...) + return shf_sclose(&shf); /* null terminates */ + } + +-#undef FP /* if you want floating point stuff */ +- + #define BUF_SIZE 128 +-#define FPBUF_SIZE (DMAXEXP+16)/* this must be > +- * MAX(DMAXEXP, log10(pow(2, DSIGNIF))) +- * + ceil(log10(DMAXEXP)) + 8 (I think). +- * Since this is hard to express as a +- * constant, just use a large buffer. +- */ + + /* + * What kinda of machine we on? Hopefully the C compiler will optimize +@@ -744,18 +736,6 @@ shf_smprintf(const char *fmt, ...) + #define FL_NUMBER 0x200 /* a number was formated %[douxefg] */ + + +-#ifdef FP +-#include +- +-static double +-my_ceil(double d) +-{ +- double i; +- +- return d - modf(d, &i) + (d < 0 ? -1 : 1); +-} +-#endif /* FP */ +- + int + shf_vfprintf(struct shf *shf, const char *fmt, va_list args) + { +@@ -769,17 +749,6 @@ shf_vfprintf(struct shf *shf, const char + char numbuf[(BITS(long) + 2) / 3 + 1]; + /* this stuff for dealing with the buffer */ + int nwritten = 0; +-#ifdef FP +- /* should be in +- * extern double frexp(); +- */ +- extern char *ecvt(); +- +- double fpnum; +- int expo, decpt; +- char style; +- char fpbuf[FPBUF_SIZE]; +-#endif /* FP */ + + if (!fmt) + return 0; +@@ -946,134 +915,6 @@ shf_vfprintf(struct shf *shf, const char + precision = len; /* no loss */ + } + break; +- +-#ifdef FP +- case 'e': +- case 'g': +- case 'f': +- { +- char *p; +- +- /* +- * This could probably be done better, +- * but it seems to work. Note that gcvt() +- * is not used, as you cannot tell it to +- * not strip the zeros. +- */ +- flags |= FL_NUMBER; +- if (!(flags & FL_DOT)) +- precision = 6; /* default */ +- /* +- * Assumes doubles are pushed on +- * the stack. If this is not so, then +- * FL_LONG/FL_SHORT should be checked. +- */ +- fpnum = va_arg(args, double); +- s = fpbuf; +- style = c; +- /* +- * This is the same as +- * expo = ceil(log10(fpnum)) +- * but doesn't need -lm. This is an +- * approximation as expo is rounded up. +- */ +- (void) frexp(fpnum, &expo); +- expo = my_ceil(expo / LOG2_10); +- +- if (expo < 0) +- expo = 0; +- +- p = ecvt(fpnum, precision + 1 + expo, +- &decpt, &tmp); +- if (c == 'g') { +- if (decpt < -4 || decpt > precision) +- style = 'e'; +- else +- style = 'f'; +- if (decpt > 0 && (precision -= decpt) < 0) +- precision = 0; +- } +- if (tmp) +- *s++ = '-'; +- else if (flags & FL_PLUS) +- *s++ = '+'; +- else if (flags & FL_BLANK) +- *s++ = ' '; +- +- if (style == 'e') +- *s++ = *p++; +- else { +- if (decpt > 0) { +- /* Overflow check - should +- * never have this problem. +- */ +- if (decpt > &fpbuf[sizeof(fpbuf)] - s - 8) +- decpt = &fpbuf[sizeof(fpbuf)] - s - 8; +- (void) memcpy(s, p, decpt); +- s += decpt; +- p += decpt; +- } else +- *s++ = '0'; +- } +- +- /* print the fraction? */ +- if (precision > 0) { +- *s++ = '.'; +- /* Overflow check - should +- * never have this problem. +- */ +- if (precision > &fpbuf[sizeof(fpbuf)] - s - 7) +- precision = &fpbuf[sizeof(fpbuf)] - s - 7; +- for (tmp = decpt; tmp++ < 0 && +- precision > 0 ; precision--) +- *s++ = '0'; +- tmp = strlen(p); +- if (precision > tmp) +- precision = tmp; +- /* Overflow check - should +- * never have this problem. +- */ +- if (precision > &fpbuf[sizeof(fpbuf)] - s - 7) +- precision = &fpbuf[sizeof(fpbuf)] - s - 7; +- (void) memcpy(s, p, precision); +- s += precision; +- /* +- * `g' format strips trailing +- * zeros after the decimal. +- */ +- if (c == 'g' && !(flags & FL_HASH)) { +- while (*--s == '0') +- ; +- if (*s != '.') +- s++; +- } +- } else if (flags & FL_HASH) +- *s++ = '.'; +- +- if (style == 'e') { +- *s++ = (flags & FL_UPPER) ? 'E' : 'e'; +- if (--decpt >= 0) +- *s++ = '+'; +- else { +- *s++ = '-'; +- decpt = -decpt; +- } +- p = &numbuf[sizeof(numbuf)]; +- for (tmp = 0; tmp < 2 || decpt ; tmp++) { +- *--p = '0' + decpt % 10; +- decpt /= 10; +- } +- tmp = &numbuf[sizeof(numbuf)] - p; +- (void) memcpy(s, p, tmp); +- s += tmp; +- } +- +- len = s - fpbuf; +- s = fpbuf; +- precision = len; +- break; +- } +-#endif /* FP */ + + case 's': + if (!(s = va_arg(args, char *))) + + diff --git a/system/ksh-openbsd/patches/03-ksh-vi-Ctrl-l-in-insert-mode-to-clear-the-screen.diff b/system/ksh-openbsd/patches/03-ksh-vi-Ctrl-l-in-insert-mode-to-clear-the-screen.diff new file mode 100644 index 0000000000..21a57ffb42 --- /dev/null +++ b/system/ksh-openbsd/patches/03-ksh-vi-Ctrl-l-in-insert-mode-to-clear-the-screen.diff @@ -0,0 +1,45 @@ +From 13ef2cd4206ed541fe1dae46c91a339fba5cf5cf Mon Sep 17 00:00:00 2001 +From: Alexander Polakov +Date: Sun, 29 May 2011 15:12:31 +0400 +Subject: [PATCH 3/8] ksh/vi: Ctrl-l in insert mode to clear the screen. + + Why: typing "clear" is too slow. +--- + ksh.1 | 3 +++ + vi.c | 6 ++++++ + 2 files changed, 9 insertions(+), 0 deletions(-) + +diff --git ksh.1 ksh.1 +index f4b5815..01130ea 100644 +--- ksh.1 ++++ ksh.1 +@@ -5215,6 +5215,9 @@ List all the commands or files that match the current big-word. + Macro expansion. + Execute the commands found in the alias + .Ar c . ++.It ^L ++Clear the screen leaving the current line at the top of the ++screen. + .El + .Pp + Intra-line movement commands: +diff --git vi.c vi.c +index e4173c7..d0de478 100644 +--- vi.c ++++ vi.c +@@ -646,6 +646,12 @@ vi_insert(int ch) + return redo_insert(lastac - 1); + + /* { Begin nonstandard vi commands */ ++ case Ctrl('l'): ++ /* Use ANSI escape codes to clear the screen */ ++ x_puts("\033[2J\033[0;0H"); ++ redraw_line(0); ++ break; ++ + case Ctrl('x'): + expand_word(0); + break; +-- +1.7.5 + diff --git a/system/ksh-openbsd/patches/04-ksh-vi-make-Ctrl-f-in-command-mode-behave-the-same-a.diff b/system/ksh-openbsd/patches/04-ksh-vi-make-Ctrl-f-in-command-mode-behave-the-same-a.diff new file mode 100644 index 0000000000..6978789ec9 --- /dev/null +++ b/system/ksh-openbsd/patches/04-ksh-vi-make-Ctrl-f-in-command-mode-behave-the-same-a.diff @@ -0,0 +1,26 @@ +From 90f648bf6182d558ff6489caefb52240fb2eab4e Mon Sep 17 00:00:00 2001 +From: Alexander Polakov +Date: Sun, 29 May 2011 15:34:55 +0400 +Subject: [PATCH 4/8] ksh/vi: make Ctrl-f in command mode behave the same as + in insert. + +--- + vi.c | 2 +- + 1 files changed, 1 insertions(+), 1 deletions(-) + +diff --git vi.c vi.c +index d0de478..6eb5d8c 100644 +--- vi.c ++++ vi.c +@@ -1132,7 +1132,7 @@ vi_cmd(int argcnt, const char *cmd) + return -1; + case '\\': /* at&t ksh */ + case Ctrl('f'): /* Nonstandard vi/ksh */ +- complete_word(1, argcnt, 0); ++ complete_word(1, argcnt, XCF_FORCE_COMMAND); + break; + + +-- +1.7.5 + diff --git a/system/ksh-openbsd/patches/05-ksh-print-expansions-like-a-menu-with-numbers-in-vi-.diff b/system/ksh-openbsd/patches/05-ksh-print-expansions-like-a-menu-with-numbers-in-vi-.diff new file mode 100644 index 0000000000..135f5054c3 --- /dev/null +++ b/system/ksh-openbsd/patches/05-ksh-print-expansions-like-a-menu-with-numbers-in-vi-.diff @@ -0,0 +1,105 @@ +From 91ebd29a64451742b65115fc27034c6a3d154f90 Mon Sep 17 00:00:00 2001 +From: Alexander Polakov +Date: Sun, 29 May 2011 15:41:53 +0400 +Subject: [PATCH 5/8] ksh: print expansions like a "menu" (with numbers) in vi + mode + + * adds an extra argument to x_print_expansions() + - preserves the emacs mode behaviour + + Why: in vi mode one can use the expansion number to + complete the word, but w/o numbers printed you + have to *count* expansions with your eyes to + find out the number. Stupid, huh? +--- + edit.c | 7 +++++-- + edit.h | 2 +- + emacs.c | 4 ++-- + vi.c | 4 ++-- + 4 files changed, 10 insertions(+), 7 deletions(-) + +diff --git edit.c edit.c +index 0b1ff7d..9cdcc6d 100644 +--- edit.c ++++ edit.c +@@ -292,7 +292,7 @@ static void glob_path(int flags, const char *pat, XPtrV *wp, + const char *path); + + void +-x_print_expansions(int nwords, char *const *words, int is_command) ++x_print_expansions(int nwords, char *const *words, int is_command, int menu) + { + int use_copy = 0; + int prefix_len; +@@ -330,7 +330,10 @@ x_print_expansions(int nwords, char *const *words, int is_command) + */ + x_putc('\r'); + x_putc('\n'); +- pr_list(use_copy ? (char **) XPptrv(l) : words); ++ if (menu) ++ pr_menu(use_copy ? (char **) XPptrv(l) : words); ++ else ++ pr_list(use_copy ? (char **) XPptrv(l) : words); + + if (use_copy) + XPfree(l); /* not x_free_words() */ +diff --git edit.h edit.h +index 37ccf28..258affe 100644 +--- edit.h ++++ edit.h +@@ -52,7 +52,7 @@ void x_puts(const char *); + bool x_mode(bool); + int promptlen(const char *, const char **); + int x_do_comment(char *, int, int *); +-void x_print_expansions(int, char *const *, int); ++void x_print_expansions(int, char *const *, int, int); + int x_cf_glob(int, const char *, int, int, int *, int *, char ***, int *); + int x_longest_prefix(int , char *const *); + int x_basename(const char *, const char *); +diff --git emacs.c emacs.c +index 0bfda96..3b2d083 100644 +--- emacs.c ++++ emacs.c +@@ -1684,7 +1684,7 @@ do_complete(int flags, /* XCF_{COMMAND,FILE,COMMAND_FILE} */ + } + + if (type == CT_LIST) { +- x_print_expansions(nwords, words, is_command); ++ x_print_expansions(nwords, words, is_command, 0); + x_redraw(0); + x_free_words(nwords, words); + return; +@@ -1707,7 +1707,7 @@ do_complete(int flags, /* XCF_{COMMAND,FILE,COMMAND_FILE} */ + } + + if (type == CT_COMPLIST && !completed) { +- x_print_expansions(nwords, words, is_command); ++ x_print_expansions(nwords, words, is_command, 0); + completed = 1; + } + +diff --git vi.c vi.c +index 6eb5d8c..95d192c 100644 +--- vi.c ++++ vi.c +@@ -1990,7 +1990,7 @@ complete_word(int command, int count, int flags) + count--; + if (count >= nwords) { + vi_error(); +- x_print_expansions(nwords, words, is_command); ++ x_print_expansions(nwords, words, is_command, 1); + x_free_words(nwords, words); + redraw_line(0); + return -1; +@@ -2064,7 +2064,7 @@ print_expansions(struct edstate *e, int flags) + vi_error(); + return -1; + } +- x_print_expansions(nwords, words, is_command); ++ x_print_expansions(nwords, words, is_command, 1); + x_free_words(nwords, words); + redraw_line(0); + return 0; +-- +1.7.5 + diff --git a/system/ksh-openbsd/patches/06-ksh-remove-backslashes-in-filenames-using-lex.diff b/system/ksh-openbsd/patches/06-ksh-remove-backslashes-in-filenames-using-lex.diff new file mode 100644 index 0000000000..04ca29f6f1 --- /dev/null +++ b/system/ksh-openbsd/patches/06-ksh-remove-backslashes-in-filenames-using-lex.diff @@ -0,0 +1,118 @@ +From 458d69d8f10d582fd7a546eabc1b555bb7337627 Mon Sep 17 00:00:00 2001 +From: Alexander Polakov +Date: Sun, 29 May 2011 16:05:58 +0400 +Subject: [PATCH 6/8] ksh: remove backslashes in filenames using lex. + + * this also removes the check for matching pattern and + returned filename. if it returns 1 name, then it must + be the filename of an existing file, right? i think + so. + + * change stat() to lstat() to complete broken links + (from LEVAI Daniel). + + Why: + + * less ugly code + * working completion for special characters like [], () and so + * suggested by martynas +--- + edit.c | 31 +++++++------------------------ + lex.c | 4 ++++ + lex.h | 1 + + 3 files changed, 12 insertions(+), 24 deletions(-) + +diff --git edit.c edit.c +index 9cdcc6d..01c2fe6 100644 +--- edit.c ++++ edit.c +@@ -351,7 +351,7 @@ x_file_glob(int flags, const char *str, int slen, char ***wordsp) + { + char *toglob; + char **words; +- int nwords, i, idx, escaping; ++ int nwords; + XPtrV w; + struct source *s, *sold; + +@@ -360,20 +360,6 @@ x_file_glob(int flags, const char *str, int slen, char ***wordsp) + + toglob = add_glob(str, slen); + +- /* remove all escaping backward slashes */ +- escaping = 0; +- for (i = 0, idx = 0; toglob[i]; i++) { +- if (toglob[i] == '\\' && !escaping) { +- escaping = 1; +- continue; +- } +- +- toglob[idx] = toglob[i]; +- idx++; +- if (escaping) escaping = 0; +- } +- toglob[idx] = '\0'; +- + /* + * Convert "foo*" (toglob) to an array of strings (words) + */ +@@ -381,7 +367,7 @@ x_file_glob(int flags, const char *str, int slen, char ***wordsp) + s = pushs(SWSTR, ATEMP); + s->start = s->str = toglob; + source = s; +- if (yylex(ONEWORD) != LWORD) { ++ if (yylex(ONEWORD|RMBKSLSH) != LWORD) { + source = sold; + internal_errorf(0, "fileglob: substitute error"); + return 0; +@@ -397,15 +383,12 @@ x_file_glob(int flags, const char *str, int slen, char ***wordsp) + if (nwords == 1) { + struct stat statb; + +- /* Check if globbing failed (returned glob pattern), +- * but be careful (E.g. toglob == "ab*" when the file +- * "ab*" exists is not an error). +- * Also, check for empty result - happens if we tried +- * to glob something which evaluated to an empty +- * string (e.g., "$FOO" when there is no FOO, etc). ++ /* Check if file exists, also, check for empty ++ * result - happens if we tried to glob something ++ * which evaluated to an empty string (e.g., ++ * "$FOO" when there is no FOO, etc). + */ +- if ((strcmp(words[0], toglob) == 0 && +- stat(words[0], &statb) < 0) || ++ if((lstat(words[0], &statb) < 0) || + words[0][0] == '\0') { + x_free_words(nwords, words); + words = NULL; +diff --git lex.c lex.c +index ef741c6..fe3d91d 100644 +--- lex.c ++++ lex.c +@@ -299,6 +299,10 @@ yylex(int cf) + } + /* FALLTHROUGH */ + default: ++ if (cf & RMBKSLSH) { ++ *wp++ = QCHAR, *wp++ = c; ++ break; ++ } + Xcheck(ws, wp); + if (c) { /* trailing \ is lost */ + *wp++ = CHAR, *wp++ = '\\'; +diff --git lex.h lex.h +index 0904fbd..6a0dbf9 100644 +--- lex.h ++++ lex.h +@@ -113,6 +113,7 @@ typedef union { + #define CMDWORD BIT(8) /* parsing simple command (alias related) */ + #define HEREDELIM BIT(9) /* parsing <<,<<- delimiter */ + #define HEREDOC BIT(10) /* parsing heredoc */ ++#define RMBKSLSH BIT(11) /* remove backslashes */ + + #define HERES 10 /* max << in line */ + +-- +1.7.5 + diff --git a/system/ksh-openbsd/patches/07-ksh-vi-compensate-for-cursor-move-on-command-mode.diff b/system/ksh-openbsd/patches/07-ksh-vi-compensate-for-cursor-move-on-command-mode.diff new file mode 100644 index 0000000000..ce51064a01 --- /dev/null +++ b/system/ksh-openbsd/patches/07-ksh-vi-compensate-for-cursor-move-on-command-mode.diff @@ -0,0 +1,55 @@ +From fc2058b4b6a64d66fe1ee318bccea42b4569d31f Mon Sep 17 00:00:00 2001 +From: Alexander Polakov +Date: Sun, 29 May 2011 19:23:17 +0400 +Subject: [PATCH 7/8] ksh/vi: compensate for cursor move on command mode + + * move completion cursor one position right if the + character is space + * when we enter command mode, cursor is moved one + position left, and the space on the end is "lost". + So we are trying to complete "ls" instead of file + while having "ls " and "file.c" when having "file.c ". +--- + vi.c | 15 ++++++++++++++- + 1 files changed, 14 insertions(+), 1 deletions(-) + +diff --git vi.c vi.c +index 95d192c..0bac6be 100644 +--- vi.c ++++ vi.c +@@ -1956,6 +1956,7 @@ complete_word(int command, int count, int flags) + int match_len; + int is_unique; + int is_command; ++ int pos; + + /* Undo previous completion */ + if (command == 0 && expanded == COMPLETE && buf) { +@@ -1974,11 +1975,23 @@ complete_word(int command, int count, int flags) + buf = 0; + } + ++ /* XXX: hack. When we enter command mode, the cursor is moved ++ * one position left. This means that the space at the end is ++ * eaten and file completion becomes command completion. ++ * (see x_locate_word() for more on this) ++ */ ++ pos = es->cursor; ++ if (command) { ++ pos += (isspace(es->cbuf[es->cursor]) ? 1 : 0); ++ if (pos > es->linelen) ++ pos = es->linelen; ++ } ++ + /* XCF_FULLPATH for count 'cause the menu printed by print_expansions() + * was done this way. + */ + nwords = x_cf_glob(XCF_COMMAND_FILE | (count ? XCF_FULLPATH : 0) | flags, +- es->cbuf, es->linelen, es->cursor, ++ es->cbuf, es->linelen, pos, + &start, &end, &words, &is_command); + if (nwords == 0) { + vi_error(); +-- +1.7.5 + diff --git a/system/ksh-openbsd/patches/08-Remove-from-the-list-of-characters-blocking-addition.diff b/system/ksh-openbsd/patches/08-Remove-from-the-list-of-characters-blocking-addition.diff new file mode 100644 index 0000000000..9326e8072d --- /dev/null +++ b/system/ksh-openbsd/patches/08-Remove-from-the-list-of-characters-blocking-addition.diff @@ -0,0 +1,37 @@ +From 5fc8a0ae3c807bd57c8e8d55531770914ea6670a Mon Sep 17 00:00:00 2001 +From: Alexander Polakov +Date: Mon, 20 Jun 2011 00:35:46 +0400 +Subject: [PATCH 8/8] Remove $ from the list of characters blocking * + addition. + +This allows things like $HOME/bi complete to /home/username/bin. +--- + edit.c | 8 ++++---- + 1 files changed, 4 insertions(+), 4 deletions(-) + +diff --git edit.c edit.c +index 01c2fe6..2702dab 100644 +--- edit.c ++++ edit.c +@@ -627,14 +627,14 @@ add_glob(const char *str, int slen) + + /* + * If the pathname contains a wildcard (an unquoted '*', +- * '?', or '[') or parameter expansion ('$'), or a ~username +- * with no trailing slash, then it is globbed based on that +- * value (i.e., without the appended '*'). ++ * '?', or '[') or a ~username with no trailing slash, ++ * then it is globbed based on that value (i.e., without ++ * the appended '*'). + */ + for (s = toglob; *s; s++) { + if (*s == '\\' && s[1]) + s++; +- else if (*s == '*' || *s == '[' || *s == '?' || *s == '$' || ++ else if ((*s == '*' || *s == '[' || *s == '?') || + (s[1] == '(' /*)*/ && strchr("+@!", *s))) + break; + else if (*s == '/') +-- +1.7.5 + diff --git a/system/ksh-openbsd/patches/09a-new_history_implementation.diff b/system/ksh-openbsd/patches/09a-new_history_implementation.diff new file mode 100644 index 0000000000..d083b42554 --- /dev/null +++ b/system/ksh-openbsd/patches/09a-new_history_implementation.diff @@ -0,0 +1,584 @@ +From: Marco Peereboom +To: tech@openbsd.org +Subject: ksh history corruption + +I have had enough of corrupt ksh history so I had a look at the code to +try to fix it. The magical code was very magical so I basically deleted +most of it and made ksh history into a flat text file. It handles +multiple ksh instances writing to the same text file with locks just +like the current ksh does. I haven't noticed any differences in +behavior running this. + +Code is much simpler and it shaves ~4k of the binary too. + +Index: alloc.c +=================================================================== +RCS file: /cvs/src/bin/ksh/alloc.c,v +retrieving revision 1.8 +diff -u -p -r1.8 alloc.c +--- alloc.c 21 Jul 2008 17:30:08 -0000 1.8 ++++ alloc.c 30 Aug 2011 18:05:47 -0000 +@@ -62,7 +62,7 @@ alloc(size_t size, Area *ap) + { + struct link *l; + +- l = malloc(sizeof(struct link) + size); ++ l = calloc(1, sizeof(struct link) + size); + if (l == NULL) + internal_errorf(1, "unable to allocate memory"); + l->next = ap->freelist; +Index: history.c +=================================================================== +RCS file: /cvs/src/bin/ksh/history.c,v +retrieving revision 1.39 +diff -u -p -r1.39 history.c +--- history.c 19 May 2010 17:36:08 -0000 1.39 ++++ history.c 31 Aug 2011 19:33:24 -0000 +@@ -11,8 +11,7 @@ + * a) the original in-memory history mechanism + * b) a more complicated mechanism done by pc@hillside.co.uk + * that more closely follows the real ksh way of doing +- * things. You need to have the mmap system call for this +- * to work on your system ++ * things. + */ + + #include "sh.h" +@@ -22,19 +21,10 @@ + # include + # include + +-/* +- * variables for handling the data file +- */ +-static int histfd; +-static int hsize; +- +-static int hist_count_lines(unsigned char *, int); +-static int hist_shrink(unsigned char *, int); +-static unsigned char *hist_skip_back(unsigned char *,int *,int); +-static void histload(Source *, unsigned char *, int); +-static void histinsert(Source *, int, unsigned char *); +-static void writehistfile(int, char *); +-static int sprinkle(int); ++static void writehistfile(FILE *); ++static FILE *history_open(int *); ++static int history_load(FILE *, Source *); ++static void history_close(FILE *); + + static int hist_execute(char *); + static int hist_replace(char **, const char *, const char *, int); +@@ -45,8 +35,8 @@ static void histbackup(void); + static char **current; /* current position in history[] */ + static char *hname; /* current name of history file */ + static int hstarted; /* set after hist_init() called */ +-static Source *hist_source; +- ++static Source *hist_source; ++static struct stat last_sb; + + int + c_fc(char **wp) +@@ -529,15 +519,10 @@ sethistfile(const char *name) + /* if the name is the same as the name we have */ + if (hname && strcmp(hname, name) == 0) + return; +- + /* + * its a new name - possibly + */ +- if (histfd) { +- /* yes the file is open */ +- (void) close(histfd); +- histfd = 0; +- hsize = 0; ++ if (hname) { + afree(hname, APERM); + hname = NULL; + /* let's reset the history */ +@@ -577,18 +562,26 @@ init_histvec(void) + void + histsave(int lno, const char *cmd, int dowrite) + { +- char **hp; +- char *c, *cp; ++ char **hp; ++ char *c, *cp; ++ int changed; ++ FILE *f = NULL; ++ ++ if (dowrite) { ++ f = history_open(&changed); ++ if (f && changed) { ++ /* reset history */ ++ histptr = history - 1; ++ hist_source->line = 0; ++ history_load(f, hist_source); ++ } ++ } + + c = str_save(cmd, APERM); + if ((cp = strchr(c, '\n')) != NULL) + *cp = '\0'; + +- if (histfd && dowrite) +- writehistfile(lno, c); +- + hp = histptr; +- + if (++hp >= history + histsize) { /* remove oldest command */ + afree((void*)*history, APERM); + for (hp = history; hp < history + histsize - 1; hp++) +@@ -596,371 +589,125 @@ histsave(int lno, const char *cmd, int d + } + *hp = c; + histptr = hp; +-} +- +-/* +- * Write history data to a file nominated by HISTFILE +- * if HISTFILE is unset then history still happens, but +- * the data is not written to a file +- * All copies of ksh looking at the file will maintain the +- * same history. This is ksh behaviour. +- * +- * This stuff uses mmap() +- * if your system ain't got it - then you'll have to undef HISTORYFILE +- */ + +-/* +- * Open a history file +- * Format is: +- * Bytes 1, 2: HMAGIC - just to check that we are dealing with +- * the correct object +- * Then follows a number of stored commands +- * Each command is +- * +- */ +-#define HMAGIC1 0xab +-#define HMAGIC2 0xcd +-#define COMMAND 0xff ++ if (dowrite && f) { ++ writehistfile(f); ++ history_close(f); ++ } ++} + +-void +-hist_init(Source *s) ++static FILE * ++history_open(int *changed) + { +- unsigned char *base; +- int lines; +- int fd; +- +- if (Flag(FTALKING) == 0) +- return; +- +- hstarted = 1; +- +- hist_source = s; +- +- hname = str_val(global("HISTFILE")); +- if (hname == NULL) +- return; +- hname = str_save(hname, APERM); ++ int fd; ++ FILE *f = NULL; ++ struct stat sb; + +- retry: +- /* we have a file and are interactive */ +- if ((fd = open(hname, O_RDWR|O_CREAT|O_APPEND, 0600)) < 0) +- return; +- +- histfd = savefd(fd); +- if (histfd != fd) ++ if ((fd = open(hname, O_RDWR | O_CREAT | O_EXLOCK, 0600)) == -1) ++ return (NULL); ++ f = fdopen(fd, "r+"); ++ if (f == NULL) { + close(fd); ++ goto bad; ++ } + +- (void) flock(histfd, LOCK_EX); ++ if (fstat(fileno(f), &sb) == -1) ++ goto bad; ++ if (timespeccmp(&sb.st_mtim, &last_sb.st_mtim, ==)) ++ *changed = 0; ++ else ++ *changed = 1; + +- hsize = lseek(histfd, 0L, SEEK_END); ++ return (f); ++bad: ++ if (f) ++ fclose(f); + +- if (hsize == 0) { +- /* add magic */ +- if (sprinkle(histfd)) { +- hist_finish(); +- return; +- } +- } +- else if (hsize > 0) { +- /* +- * we have some data +- */ +- base = (unsigned char *)mmap(0, hsize, PROT_READ, +- MAP_FILE|MAP_PRIVATE, histfd, 0); +- /* +- * check on its validity +- */ +- if (base == MAP_FAILED || *base != HMAGIC1 || base[1] != HMAGIC2) { +- if (base != MAP_FAILED) +- munmap((caddr_t)base, hsize); +- hist_finish(); +- if (unlink(hname) != 0) +- return; +- goto retry; +- } +- if (hsize > 2) { +- lines = hist_count_lines(base+2, hsize-2); +- if (lines > histsize) { +- /* we need to make the file smaller */ +- if (hist_shrink(base, hsize)) +- if (unlink(hname) != 0) +- return; +- munmap((caddr_t)base, hsize); +- hist_finish(); +- goto retry; +- } +- } +- histload(hist_source, base+2, hsize-2); +- munmap((caddr_t)base, hsize); +- } +- (void) flock(histfd, LOCK_UN); +- hsize = lseek(histfd, 0L, SEEK_END); ++ return (NULL); + } + +-typedef enum state { +- shdr, /* expecting a header */ +- sline, /* looking for a null byte to end the line */ +- sn1, /* bytes 1 to 4 of a line no */ +- sn2, sn3, sn4 +-} State; ++static void ++history_close(FILE *f) ++{ ++ fflush(f); ++ fstat(fileno(f), &last_sb); ++ fclose(f); ++} + + static int +-hist_count_lines(unsigned char *base, int bytes) ++history_load(FILE *f, Source *s) + { +- State state = shdr; +- int lines = 0; ++ char *p, line[LINE + 1]; ++ uint32_t i; + +- while (bytes--) { +- switch (state) { +- case shdr: +- if (*base == COMMAND) +- state = sn1; ++ /* just read it all; will auto resize history upon next command */ ++ for (i = 1; ; i++) { ++ p = fgets(line, sizeof line, f); ++ if (p == NULL || feof(f) || ferror(f)) + break; +- case sn1: +- state = sn2; break; +- case sn2: +- state = sn3; break; +- case sn3: +- state = sn4; break; +- case sn4: +- state = sline; break; +- case sline: +- if (*base == '\0') +- lines++, state = shdr; ++ if ((p = strchr(line, '\n')) == NULL) { ++ bi_errorf("history file is corrupt"); ++ return (1); + } +- base++; ++ *p = '\0'; ++ ++ s->line = i; ++ s->cmd_offset = i; ++ histsave(i, (char *)line, 0); + } +- return lines; ++ ++ return (0); + } + +-/* +- * Shrink the history file to histsize lines +- */ +-static int +-hist_shrink(unsigned char *oldbase, int oldbytes) ++void ++hist_init(Source *s) + { +- int fd; +- char nfile[1024]; +- struct stat statb; +- unsigned char *nbase = oldbase; +- int nbytes = oldbytes; +- +- nbase = hist_skip_back(nbase, &nbytes, histsize); +- if (nbase == NULL) +- return 1; +- if (nbase == oldbase) +- return 0; +- +- /* +- * create temp file +- */ +- (void) shf_snprintf(nfile, sizeof(nfile), "%s.%d", hname, procpid); +- if ((fd = open(nfile, O_CREAT | O_TRUNC | O_WRONLY, 0600)) < 0) +- return 1; ++ FILE *f = NULL; ++ int changed; + +- if (sprinkle(fd)) { +- close(fd); +- unlink(nfile); +- return 1; +- } +- if (write(fd, nbase, nbytes) != nbytes) { +- close(fd); +- unlink(nfile); +- return 1; +- } +- /* +- * worry about who owns this file +- */ +- if (fstat(histfd, &statb) >= 0) +- fchown(fd, statb.st_uid, statb.st_gid); +- close(fd); ++ if (Flag(FTALKING) == 0) ++ return; + +- /* +- * rename +- */ +- if (rename(nfile, hname) < 0) +- return 1; +- return 0; +-} ++ hstarted = 1; + ++ hist_source = s; + +-/* +- * find a pointer to the data `no' back from the end of the file +- * return the pointer and the number of bytes left +- */ +-static unsigned char * +-hist_skip_back(unsigned char *base, int *bytes, int no) +-{ +- int lines = 0; +- unsigned char *ep; ++ hname = str_val(global("HISTFILE")); ++ if (hname == NULL) ++ return; ++ hname = str_save(hname, APERM); + +- for (ep = base + *bytes; --ep > base; ) { +- /* this doesn't really work: the 4 byte line number that is +- * encoded after the COMMAND byte can itself contain the +- * COMMAND byte.... +- */ +- for (; ep > base && *ep != COMMAND; ep--) +- ; +- if (ep == base) +- break; +- if (++lines == no) { +- *bytes = *bytes - ((char *)ep - (char *)base); +- return ep; +- } +- } +- return NULL; +-} ++ f = history_open(&changed); ++ if (f == NULL) ++ return; + +-/* +- * load the history structure from the stored data +- */ +-static void +-histload(Source *s, unsigned char *base, int bytes) +-{ +- State state; +- int lno = 0; +- unsigned char *line = NULL; +- +- for (state = shdr; bytes-- > 0; base++) { +- switch (state) { +- case shdr: +- if (*base == COMMAND) +- state = sn1; +- break; +- case sn1: +- lno = (((*base)&0xff)<<24); +- state = sn2; +- break; +- case sn2: +- lno |= (((*base)&0xff)<<16); +- state = sn3; +- break; +- case sn3: +- lno |= (((*base)&0xff)<<8); +- state = sn4; +- break; +- case sn4: +- lno |= (*base)&0xff; +- line = base+1; +- state = sline; +- break; +- case sline: +- if (*base == '\0') { +- /* worry about line numbers */ +- if (histptr >= history && lno-1 != s->line) { +- /* a replacement ? */ +- histinsert(s, lno, line); +- } +- else { +- s->line = lno; +- s->cmd_offset = lno; +- histsave(lno, (char *)line, 0); +- } +- state = shdr; +- } +- } +- } ++ history_load(f, s); ++ history_close(f); + } + +-/* +- * Insert a line into the history at a specified number +- */ + static void +-histinsert(Source *s, int lno, unsigned char *line) ++writehistfile(FILE *f) + { +- char **hp; ++ int i; ++ char *cmd; + +- if (lno >= s->line-(histptr-history) && lno <= s->line) { +- hp = &histptr[lno-s->line]; +- if (*hp) +- afree((void*)*hp, APERM); +- *hp = str_save((char *)line, APERM); +- } +-} ++ if (ftruncate(fileno(f), 0) == -1) ++ return; ++ rewind(f); + +-/* +- * write a command to the end of the history file +- * This *MAY* seem easy but it's also necessary to check +- * that the history file has not changed in size. +- * If it has - then some other shell has written to it +- * and we should read those commands to update our history +- */ +-static void +-writehistfile(int lno, char *cmd) +-{ +- int sizenow; +- unsigned char *base; +- unsigned char *new; +- int bytes; +- unsigned char hdr[5]; +- +- (void) flock(histfd, LOCK_EX); +- sizenow = lseek(histfd, 0L, SEEK_END); +- if (sizenow != hsize) { +- /* +- * Things have changed +- */ +- if (sizenow > hsize) { +- /* someone has added some lines */ +- bytes = sizenow - hsize; +- base = (unsigned char *)mmap(0, sizenow, +- PROT_READ, MAP_FILE|MAP_PRIVATE, histfd, 0); +- if (base == MAP_FAILED) +- goto bad; +- new = base + hsize; +- if (*new != COMMAND) { +- munmap((caddr_t)base, sizenow); +- goto bad; +- } +- hist_source->line--; +- histload(hist_source, new, bytes); +- hist_source->line++; +- lno = hist_source->line; +- munmap((caddr_t)base, sizenow); +- hsize = sizenow; +- } else { +- /* it has shrunk */ +- /* but to what? */ +- /* we'll give up for now */ +- goto bad; +- } ++ for (i = 0; i < histsize; i++) { ++ cmd = history[i]; ++ if (cmd == NULL) ++ break; ++ if (fprintf(f, "%s\n", cmd) == -1) ++ return; + } +- /* +- * we can write our bit now +- */ +- hdr[0] = COMMAND; +- hdr[1] = (lno>>24)&0xff; +- hdr[2] = (lno>>16)&0xff; +- hdr[3] = (lno>>8)&0xff; +- hdr[4] = lno&0xff; +- (void) write(histfd, hdr, 5); +- (void) write(histfd, cmd, strlen(cmd)+1); +- hsize = lseek(histfd, 0L, SEEK_END); +- (void) flock(histfd, LOCK_UN); +- return; +-bad: +- hist_finish(); + } + + void + hist_finish(void) + { +- (void) flock(histfd, LOCK_UN); +- (void) close(histfd); +- histfd = 0; + } +- +-/* +- * add magic to the history file +- */ +-static int +-sprinkle(int fd) +-{ +- static unsigned char mag[] = { HMAGIC1, HMAGIC2 }; +- +- return(write(fd, mag, 2) != 2); +-} +- + #else /* HISTORY */ + + /* No history to be compiled in: dummy routines to avoid lots more ifdefs */ + diff --git a/system/ksh-openbsd/patches/09b-linux-new_history_implementation.diff b/system/ksh-openbsd/patches/09b-linux-new_history_implementation.diff new file mode 100644 index 0000000000..06b0b03980 --- /dev/null +++ b/system/ksh-openbsd/patches/09b-linux-new_history_implementation.diff @@ -0,0 +1,36 @@ +Linux specific modifications: + - #include stdint.h for uint32_t + - #define timespeccmp() which is sys/time.h in OpenBSD + - Linux doesn't have any LOCK flags for open(2), so use flock(2) instead + +--- ../ksh-openbsd49/history.c 2011-09-01 08:09:51.486181269 +0200 ++++ history.c 2011-09-01 08:08:59.657181265 +0200 +@@ -17,11 +17,17 @@ + #include "sh.h" + #include + #include "strlcat.h" ++#include "stdint.h" + + #ifdef HISTORY + # include + # include + ++#define timespeccmp(tsp, usp, cmp) \ ++ (((tsp)->tv_sec == (usp)->tv_sec) ? \ ++ ((tsp)->tv_nsec cmp (usp)->tv_nsec) : \ ++ ((tsp)->tv_sec cmp (usp)->tv_sec)) ++ + static void writehistfile(FILE *); + static FILE *history_open(int *); + static int history_load(FILE *, Source *); +@@ -604,7 +610,9 @@ + FILE *f = NULL; + struct stat sb; + +- if ((fd = open(hname, O_RDWR | O_CREAT | O_EXLOCK, 0600)) == -1) ++ if ((fd = open(hname, O_RDWR | O_CREAT, 0600)) == -1) ++ return (NULL); ++ if (flock(fd, LOCK_EX) == -1) + return (NULL); + f = fdopen(fd, "r+"); + if (f == NULL) { diff --git a/system/ksh-openbsd/patches/10-ksh_mb_binds.diff b/system/ksh-openbsd/patches/10-ksh_mb_binds.diff new file mode 100644 index 0000000000..7af3fd3ee6 --- /dev/null +++ b/system/ksh-openbsd/patches/10-ksh_mb_binds.diff @@ -0,0 +1,1115 @@ +From: Marco Peereboom +Cc: OpenBSD tech +On Fri, Sep 02, 2011 at 10:41:51AM +1000, Damien Miller wrote: +> Hi, +> +> While people are excited about hacking on ksh(1) - let me add my wish: +> unrestricted multibyte character binding so I can have ctrl-left_arrow +> (^[[1;5D on my terminal) bound to backward-word and so forth. +> +> Last time I checked the code for bind could only handle a couple of +> characters after ^[ +> +> -d + +Here you go... + +---------------- 8< ---------------- + + +Index: Makefile +=================================================================== +RCS file: /cvs/src/bin/ksh/Makefile,v +retrieving revision 1.27 +diff -u -p -r1.27 Makefile +--- Makefile.orig 2011-09-07 09:26:01.000000000 +0200 ++++ Makefile 2011-09-07 09:32:19.217691920 +0200 +@@ -16,8 +16,6 @@ + misc.o path.o shf.o syn.o table.o trap.o tree.o tty.o var.o \ + version.o vi.o strlcpy.o strlcat.o + +-CLEANFILES+= emacs.out +- + all: $(PROG) + + CFLAGS+=-Wall +@@ -31,12 +29,7 @@ + install -m644 --no-target-directory ksh.1 $(MANDIR)/man1/pdksh.1 + + clean: +- rm -f $(OBJS) $(PROG) emacs.out +- +-.depend emacs.o: emacs.out +- +-emacs.out: emacs.c +- /bin/sh emacs-gen.sh emacs.c > emacs.out ++ rm -f $(OBJS) $(PROG) + + check test: + /usr/bin/perl ${.CURDIR}/tests/th -s ${.CURDIR}/tests -p ./ksh -C \ +Index: emacs.c +=================================================================== +RCS file: /cvs/src/bin/ksh/emacs.c,v +retrieving revision 1.44 +diff -u -p -r1.44 emacs.c +--- emacs.c 5 Sep 2011 04:50:33 -0000 1.44 ++++ emacs.c 6 Sep 2011 22:36:35 -0000 +@@ -6,6 +6,9 @@ + * created by Ron Natalie at BRL + * modified by Doug Kingston, Doug Gwyn, and Lou Salkind + * adapted to PD ksh by Eric Gisin ++ * ++ * partial rewrite by Marco Peereboom ++ * under the same license + */ + + #include "config.h" +@@ -13,6 +16,7 @@ + + #include "sh.h" + #include ++#include + #include + #include + #include "edit.h" +@@ -37,12 +41,6 @@ struct x_ftab { + short xf_flags; + }; + +-struct x_defbindings { +- u_char xdb_func; /* XFUNC_* */ +- unsigned char xdb_tab; +- unsigned char xdb_char; +-}; +- + #define XF_ARG 1 /* command takes number prefix */ + #define XF_NOBIND 2 /* not allowed to bind to function */ + #define XF_PREFIX 4 /* function sets prefix */ +@@ -51,10 +49,6 @@ struct x_defbindings { + #define is_cfs(c) (c == ' ' || c == '\t' || c == '"' || c == '\'') + #define is_mfs(c) (!(isalnum(c) || c == '_' || c == '$')) /* Separator for motion */ + +-# define CHARMASK 0xFF /* 8-bit character mask */ +-# define X_NTABS 3 /* normal, meta1, meta2 */ +-#define X_TABSZ (CHARMASK+1) /* size of keydef tables etc */ +- + /* Arguments for do_complete() + * 0 = enumerate M-= complete as much as possible and then list + * 1 = complete M-Esc +@@ -66,6 +60,17 @@ typedef enum { + CT_COMPLIST /* complete and then list (if non-exact) */ + } Comp_type; + ++/* keybindings */ ++struct kb_entry { ++ TAILQ_ENTRY(kb_entry) entry; ++ unsigned char *seq; ++ int len; ++ struct x_ftab *ftab; ++ void *args; ++}; ++TAILQ_HEAD(kb_list, kb_entry); ++struct kb_list kblist = TAILQ_HEAD_INITIALIZER(kblist); ++ + /* { from 4.9 edit.h */ + /* + * The following are used for my horizontal scrolling stuff +@@ -91,20 +96,18 @@ static int x_arg_defaulted;/* x_arg not + + static int xlp_valid; + /* end from 4.9 edit.h } */ ++static int x_tty; /* are we on a tty? */ ++static int x_bind_quiet; /* be quiet when binding keys */ ++static int (*x_last_command)(int); + +-static int x_prefix1 = CTRL('['), x_prefix2 = CTRL('X'); + static char **x_histp; /* history position */ + static int x_nextcmd; /* for newline-and-next */ + static char *xmp; /* mark pointer */ +-static u_char x_last_command; +-static u_char (*x_tab)[X_TABSZ]; /* key definition */ +-static char *(*x_atab)[X_TABSZ]; /* macro definitions */ +-static unsigned char x_bound[(X_TABSZ * X_NTABS + 7) / 8]; + #define KILLSIZE 20 + static char *killstack[KILLSIZE]; + static int killsp, killtp; +-static int x_curprefix; +-static char *macroptr; ++static int x_literal_set; ++static int x_arg_set; + static int prompt_skip; + static int prompt_redraw; + +@@ -123,9 +126,6 @@ static int x_search(char *, int, in + static int x_match(char *, char *); + static void x_redraw(int); + static void x_push(int); +-static char * x_mapin(const char *, Area *); +-static char * x_mapout(int); +-static void x_print(int, int); + static void x_adjust(void); + static void x_e_ungetc(int); + static int x_e_getc(void); +@@ -137,18 +137,66 @@ static char *x_lastcp(void); + static void do_complete(int, Comp_type); + static int x_emacs_putbuf(const char *, size_t); + ++/* proto's for keybindings */ ++static int x_abort(int); ++static int x_beg_hist(int); ++static int x_comp_comm(int); ++static int x_comp_file(int); ++static int x_complete(int); ++static int x_del_back(int); ++static int x_del_bword(int); ++static int x_del_char(int); ++static int x_del_fword(int); ++static int x_del_line(int); ++static int x_draw_line(int); ++static int x_end_hist(int); ++static int x_end_of_text(int); ++static int x_enumerate(int); ++static int x_eot_del(int); ++static int x_error(int); ++static int x_goto_hist(int); ++static int x_ins_string(int); ++static int x_insert(int); ++static int x_kill(int); ++static int x_kill_region(int); ++static int x_list_comm(int); ++static int x_list_file(int); ++static int x_literal(int); ++static int x_meta_yank(int); ++static int x_mv_back(int); ++static int x_mv_begin(int); ++static int x_mv_bword(int); ++static int x_mv_end(int); ++static int x_mv_forw(int); ++static int x_mv_fword(int); ++static int x_newline(int); ++static int x_next_com(int); ++static int x_nl_next_com(int); ++static int x_noop(int); ++static int x_prev_com(int); ++static int x_prev_histword(int); ++static int x_search_char_forw(int); ++static int x_search_char_back(int); ++static int x_search_hist(int); ++static int x_set_mark(int); ++static int x_stuff(int); ++static int x_stuffreset(int); ++static int x_transpose(int); ++static int x_version(int); ++static int x_xchg_point_mark(int); ++static int x_yank(int); ++static int x_comp_list(int); ++static int x_expand(int); ++static int x_fold_capitalize(int); ++static int x_fold_lower(int); ++static int x_fold_upper(int); ++static int x_set_arg(int); ++static int x_comment(int); ++#ifdef DEBUG ++static int x_debug_info(int); ++#endif + +-/* The lines between START-FUNC-TAB .. END-FUNC-TAB are run through a +- * script (emacs-gen.sh) that generates emacs.out which contains: +- * - function declarations for x_* functions +- * - defines of the form XFUNC_ where is function +- * name, sans leading x_. +- * Note that the script treats #ifdef and { 0, 0, 0} specially - use with +- * caution. +- */ +-#include "emacs.out" + static const struct x_ftab x_ftab[] = { +-/* @START-FUNC-TAB@ */ + { x_abort, "abort", 0 }, + { x_beg_hist, "beginning-of-history", 0 }, + { x_comp_comm, "complete-command", 0 }, +@@ -173,8 +221,6 @@ static const struct x_ftab x_ftab[] = { + { x_list_comm, "list-command", 0 }, + { x_list_file, "list-file", 0 }, + { x_literal, "quote", 0 }, +- { x_meta1, "prefix-1", XF_PREFIX }, +- { x_meta2, "prefix-2", XF_PREFIX }, + { x_meta_yank, "yank-pop", 0 }, + { x_mv_back, "backward-char", XF_ARG }, + { x_mv_begin, "beginning-of-line", 0 }, +@@ -212,111 +258,22 @@ static const struct x_ftab x_ftab[] = { + { 0, 0, 0 }, + #endif + { 0, 0, 0 }, +-/* @END-FUNC-TAB@ */ +-}; +- +-static struct x_defbindings const x_defbindings[] = { +- { XFUNC_del_back, 0, CTRL('?') }, +- { XFUNC_del_bword, 1, CTRL('?') }, +- { XFUNC_eot_del, 0, CTRL('D') }, +- { XFUNC_del_back, 0, CTRL('H') }, +- { XFUNC_del_bword, 1, CTRL('H') }, +- { XFUNC_del_bword, 1, 'h' }, +- { XFUNC_mv_bword, 1, 'b' }, +- { XFUNC_mv_fword, 1, 'f' }, +- { XFUNC_del_fword, 1, 'd' }, +- { XFUNC_mv_back, 0, CTRL('B') }, +- { XFUNC_mv_forw, 0, CTRL('F') }, +- { XFUNC_search_char_forw, 0, CTRL(']') }, +- { XFUNC_search_char_back, 1, CTRL(']') }, +- { XFUNC_newline, 0, CTRL('M') }, +- { XFUNC_newline, 0, CTRL('J') }, +- { XFUNC_end_of_text, 0, CTRL('_') }, +- { XFUNC_abort, 0, CTRL('G') }, +- { XFUNC_prev_com, 0, CTRL('P') }, +- { XFUNC_next_com, 0, CTRL('N') }, +- { XFUNC_nl_next_com, 0, CTRL('O') }, +- { XFUNC_search_hist, 0, CTRL('R') }, +- { XFUNC_beg_hist, 1, '<' }, +- { XFUNC_end_hist, 1, '>' }, +- { XFUNC_goto_hist, 1, 'g' }, +- { XFUNC_mv_end, 0, CTRL('E') }, +- { XFUNC_mv_begin, 0, CTRL('A') }, +- { XFUNC_draw_line, 0, CTRL('L') }, +- { XFUNC_meta1, 0, CTRL('[') }, +- { XFUNC_meta2, 0, CTRL('X') }, +- { XFUNC_kill, 0, CTRL('K') }, +- { XFUNC_yank, 0, CTRL('Y') }, +- { XFUNC_meta_yank, 1, 'y' }, +- { XFUNC_literal, 0, CTRL('^') }, +- { XFUNC_comment, 1, '#' }, +-#if defined(TIOCSTI) +- { XFUNC_stuff, 0, CTRL('T') }, +-#else +- { XFUNC_transpose, 0, CTRL('T') }, +-#endif +- { XFUNC_complete, 1, CTRL('[') }, +- { XFUNC_comp_list, 0, CTRL('I') }, +- { XFUNC_comp_list, 1, '=' }, +- { XFUNC_enumerate, 1, '?' }, +- { XFUNC_expand, 1, '*' }, +- { XFUNC_comp_file, 1, CTRL('X') }, +- { XFUNC_comp_comm, 2, CTRL('[') }, +- { XFUNC_list_comm, 2, '?' }, +- { XFUNC_list_file, 2, CTRL('Y') }, +- { XFUNC_set_mark, 1, ' ' }, +- { XFUNC_kill_region, 0, CTRL('W') }, +- { XFUNC_xchg_point_mark, 2, CTRL('X') }, +- { XFUNC_literal, 0, CTRL('V') }, +-#ifdef DEBUG +- { XFUNC_debug_info, 1, CTRL('H') }, +-#endif +- { XFUNC_prev_histword, 1, '.' }, +- { XFUNC_prev_histword, 1, '_' }, +- { XFUNC_set_arg, 1, '0' }, +- { XFUNC_set_arg, 1, '1' }, +- { XFUNC_set_arg, 1, '2' }, +- { XFUNC_set_arg, 1, '3' }, +- { XFUNC_set_arg, 1, '4' }, +- { XFUNC_set_arg, 1, '5' }, +- { XFUNC_set_arg, 1, '6' }, +- { XFUNC_set_arg, 1, '7' }, +- { XFUNC_set_arg, 1, '8' }, +- { XFUNC_set_arg, 1, '9' }, +- { XFUNC_fold_upper, 1, 'U' }, +- { XFUNC_fold_upper, 1, 'u' }, +- { XFUNC_fold_lower, 1, 'L' }, +- { XFUNC_fold_lower, 1, 'l' }, +- { XFUNC_fold_capitalize, 1, 'C' }, +- { XFUNC_fold_capitalize, 1, 'c' }, +- /* These for ansi arrow keys: arguablely shouldn't be here by +- * default, but its simpler/faster/smaller than using termcap +- * entries. +- */ +- { XFUNC_meta2, 1, '[' }, +- { XFUNC_meta2, 1, 'O' }, +- { XFUNC_prev_com, 2, 'A' }, +- { XFUNC_next_com, 2, 'B' }, +- { XFUNC_mv_forw, 2, 'C' }, +- { XFUNC_mv_back, 2, 'D' }, + }; + + int + x_emacs(char *buf, size_t len) + { +- int c; +- const char *p; +- int i; +- u_char f; ++ struct kb_entry *k, *kmatch = NULL; ++ char line[LINE + 1]; ++ int at = 0, submatch, ret, c; ++ const char *p; + + xbp = xbuf = buf; xend = buf + len; + xlp = xcp = xep = buf; + *xcp = 0; + xlp_valid = true; + xmp = NULL; +- x_curprefix = 0; + x_histp = histptr + 1; +- x_last_command = XFUNC_error; + + xx_cols = x_cols; + x_col = promptlen(prompt, &p); +@@ -343,42 +300,91 @@ x_emacs(char *buf, size_t len) + x_nextcmd = -1; + } + ++ line[0] = '\0'; ++ x_literal_set = 0; ++ x_arg = -1; ++ x_last_command = NULL; + while (1) { + x_flush(); + if ((c = x_e_getc()) < 0) + return 0; + +- if (ISMETA(c)) { +- c = META(c); +- x_curprefix = 1; ++ line[at++] = c; ++ line[at] = '\0'; ++ ++ if (x_arg == -1) { ++ x_arg = 1; ++ x_arg_defaulted = 1; + } + +- f = x_curprefix == -1 ? XFUNC_insert : +- x_tab[x_curprefix][c&CHARMASK]; ++ if (x_literal_set) { ++ /* literal, so insert it */ ++ x_literal_set = 0; ++ submatch = 0; ++ } else { ++ submatch = 0; ++ kmatch = NULL; ++ TAILQ_FOREACH(k, &kblist, entry) { ++ if (at > k->len) ++ continue; + +- if (macroptr && f == XFUNC_ins_string) +- f = XFUNC_insert; ++ if (!bcmp(k->seq, line, at)) { ++ /* sub match */ ++ submatch++; ++ if (k->len == at) ++ kmatch = k; ++ } + +- if (!(x_ftab[f].xf_flags & XF_PREFIX) && +- x_last_command != XFUNC_set_arg) { +- x_arg = 1; +- x_arg_defaulted = 1; ++ /* see if we can abort search early */ ++ if (submatch > 1) ++ break; ++ } ++ } ++ ++ if (submatch == 1 && kmatch) { ++ if (kmatch->ftab->xf_func == x_ins_string && ++ kmatch->args) { ++ /* insert macro string */ ++ x_ins(kmatch->args); ++ } ++ ret = kmatch->ftab->xf_func(c); ++ } else { ++ if (submatch) ++ continue; ++ if (at == 1) ++ ret = x_insert(c); ++ else ++ ret = x_error(c); /* not matched meta sequence */ + } +- i = c | (x_curprefix << 8); +- x_curprefix = 0; +- switch (i = (*x_ftab[f].xf_func)(i)) { ++ ++ switch (ret) { + case KSTD: +- if (!(x_ftab[f].xf_flags & XF_PREFIX)) +- x_last_command = f; ++ if (kmatch) ++ x_last_command = kmatch->ftab->xf_func; ++ else ++ x_last_command = NULL; + break; + case KEOL: +- i = xep - xbuf; +- return i; +- case KINTR: /* special case for interrupt */ ++ ret = xep - xbuf; ++ return (ret); ++ break; ++ case KINTR: + trapsig(SIGINT); + x_mode(false); + unwind(LSHELL); ++ x_arg = -1; ++ break; ++ default: ++ bi_errorf("invalid return code"); /* can't happen */ + } ++ ++ /* reset meta sequence */ ++ at = 0; ++ line[0] = '\0'; ++ if (x_arg_set) ++ x_arg_set = 0; /* reset args next time around */ ++ else ++ x_arg = -1; + } + } + +@@ -404,15 +410,6 @@ x_insert(int c) + static int + x_ins_string(int c) + { +- if (macroptr) { +- x_e_putc(BEL); +- return KSTD; +- } +- macroptr = x_atab[c>>8][c & CHARMASK]; +- if (macroptr && !*macroptr) { +- /* XXX bell? */ +- macroptr = (char *) 0; +- } + return KSTD; + } + +@@ -849,6 +846,21 @@ x_eot_del(int c) + return (x_del_char(c)); + } + ++static void * ++kb_find_hist_func(char c) ++{ ++ struct kb_entry *k; ++ char line[LINE + 1]; ++ ++ line[0] = c; ++ line[1] = '\0'; ++ TAILQ_FOREACH(k, &kblist, entry) ++ if (!strcmp(k->seq, line)) ++ return (k->ftab->xf_func); ++ ++ return (x_insert); ++} ++ + /* reverse incremental history search */ + static int + x_search_hist(int c) +@@ -856,7 +868,7 @@ x_search_hist(int c) + int offset = -1; /* offset of match in xbuf, else -1 */ + char pat [256+1]; /* pattern buffer */ + char *p = pat; +- u_char f; ++ int (*f)(int); + + *p = '\0'; + while (1) { +@@ -867,12 +879,12 @@ x_search_hist(int c) + x_flush(); + if ((c = x_e_getc()) < 0) + return KSTD; +- f = x_tab[0][c&CHARMASK]; ++ f = kb_find_hist_func(c); + if (c == CTRL('[')) + break; +- else if (f == XFUNC_search_hist) ++ else if (f == x_search_hist) + offset = x_search(pat, 0, offset); +- else if (f == XFUNC_del_back) { ++ else if (f == x_del_back) { + if (p == pat) { + offset = -1; + break; +@@ -884,7 +896,7 @@ x_search_hist(int c) + else + offset = x_search(pat, 1, offset); + continue; +- } else if (f == XFUNC_insert) { ++ } else if (f == x_insert) { + /* add char to pattern */ + /* overflow check... */ + if (p >= &pat[sizeof(pat) - 1]) { +@@ -1104,21 +1116,7 @@ x_transpose(int c) + static int + x_literal(int c) + { +- x_curprefix = -1; +- return KSTD; +-} +- +-static int +-x_meta1(int c) +-{ +- x_curprefix = 1; +- return KSTD; +-} +- +-static int +-x_meta2(int c) +-{ +- x_curprefix = 2; ++ x_literal_set = 1; + return KSTD; + } + +@@ -1174,7 +1172,7 @@ static int + x_meta_yank(int c) + { + int len; +- if ((x_last_command != XFUNC_yank && x_last_command != XFUNC_meta_yank) || ++ if ((x_last_command != x_yank && x_last_command != x_meta_yank) || + killstack[killtp] == 0) { + killtp = killsp; + x_e_puts("\nyank something first"); +@@ -1242,175 +1240,231 @@ x_stuff(int c) + } + + static char * +-x_mapin(const char *cp, Area *area) ++kb_encode(const char *s) + { +- char *new, *op; ++ static char l[LINE + 1]; ++ int at = 0; + +- op = new = str_save(cp, area); +- while (*cp) { +- /* XXX -- should handle \^ escape? */ +- if (*cp == '^') { +- cp++; +- if (*cp >= '?') /* includes '?'; ASCII */ +- *op++ = CTRL(*cp); ++ l[at] = '\0'; ++ while (*s) { ++ if (*s == '^') { ++ s++; ++ if (*s >= '?') ++ l[at++] = CTRL(*s); + else { +- *op++ = '^'; +- cp--; ++ l[at++] = '^'; ++ s--; + } + } else +- *op++ = *cp; +- cp++; ++ l[at++] = *s; ++ l[at] = '\0'; ++ s++; + } +- *op = '\0'; +- +- return new; ++ return (l); + } + + static char * +-x_mapout(int c) ++kb_decode(const char *s) + { +- static char buf[8]; +- char *p = buf; ++ static char l[LINE + 1]; ++ int i, at = 0; + +- if (iscntrl(c)) { +- *p++ = '^'; +- *p++ = UNCTRL(c); +- } else +- *p++ = c; +- *p = 0; +- return buf; ++ l[0] = '\0'; ++ for (i = 0; i < strlen(s); i++) { ++ if (iscntrl(s[i])) { ++ l[at++] = '^'; ++ l[at++] = UNCTRL(s[i]); ++ } else ++ l[at++] = s[i]; ++ l[at] = '\0'; ++ } ++ ++ return (l); ++} ++ ++static int ++kb_match(char *s) ++{ ++ int len = strlen(s); ++ struct kb_entry *k; ++ ++ TAILQ_FOREACH(k, &kblist, entry) { ++ if (len > k->len) ++ continue; ++ ++ if (!bcmp(k->seq, s, len)) ++ return (1); ++ } ++ ++ return (0); + } + + static void +-x_print(int prefix, int key) ++kb_del(struct kb_entry *k) + { +- if (prefix == 1) +- shprintf("%s", x_mapout(x_prefix1)); +- if (prefix == 2) +- shprintf("%s", x_mapout(x_prefix2)); +- shprintf("%s = ", x_mapout(key)); +- if (x_tab[prefix][key] != XFUNC_ins_string) +- shprintf("%s\n", x_ftab[x_tab[prefix][key]].xf_name); +- else +- shprintf("'%s'\n", x_atab[prefix][key]); ++ TAILQ_REMOVE(&kblist, k, entry); ++ if (k->args) ++ free(k->args); ++ afree(k, AEDIT); ++} ++ ++static struct kb_entry * ++kb_add_string(void *func, void *args, char *str) ++{ ++ int i, count; ++ struct kb_entry *k; ++ struct x_ftab *xf = NULL; ++ ++ for (i = 0; i < NELEM(x_ftab); i++) ++ if (x_ftab[i].xf_func == func) { ++ xf = (struct x_ftab *)&x_ftab[i]; ++ break; ++ } ++ if (xf == NULL) ++ return (NULL); ++ ++ if (kb_match(str)) { ++ if (x_bind_quiet == 0) ++ bi_errorf("duplicate binding for %s", kb_decode(str)); ++ return (NULL); ++ } ++ count = strlen(str); ++ ++ k = alloc(sizeof *k + count + 1, AEDIT); ++ k->seq = (unsigned char *)(k + 1); ++ k->len = count; ++ k->ftab = xf; ++ k->args = args ? strdup(args) : NULL; ++ ++ strlcpy(k->seq, str, count + 1); ++ ++ TAILQ_INSERT_TAIL(&kblist, k, entry); ++ ++ return (k); ++} ++ ++static struct kb_entry * ++kb_add(void *func, void *args, ...) ++{ ++ va_list ap; ++ int i, count; ++ char l[LINE + 1]; ++ ++ va_start(ap, args); ++ count = 0; ++ while (va_arg(ap, unsigned int) != 0) ++ count++; ++ va_end(ap); ++ ++ va_start(ap, args); ++ for (i = 0; i <= count /* <= is correct */; i++) ++ l[i] = (unsigned char)va_arg(ap, unsigned int); ++ va_end(ap); ++ ++ return (kb_add_string(func, args, l)); ++} ++ ++static void ++kb_print(struct kb_entry *k) ++{ ++ if (!(k->ftab->xf_flags & XF_NOBIND)) ++ shprintf("%s = %s\n", ++ kb_decode(k->seq), k->ftab->xf_name); ++ else if (k->args) { ++ shprintf("%s = ", kb_decode(k->seq)); ++ shprintf("'%s'\n", kb_decode(k->args)); ++ } + } + + int +-x_bind( const char *a1, const char *a2, ++x_bind(const char *a1, const char *a2, + int macro, /* bind -m */ + int list) /* bind -l */ + { +- u_char f; +- int prefix, key; +- char *sp = NULL; +- char *m1, *m2; ++ int i; ++ struct kb_entry *k; ++ char in[LINE + 1]; + +- if (x_tab == NULL) { ++ if (x_tty == 0) { + bi_errorf("cannot bind, not a tty"); +- return 1; ++ return (1); + } + +- /* List function names */ + if (list) { +- for (f = 0; f < NELEM(x_ftab); f++) +- if (x_ftab[f].xf_name && +- !(x_ftab[f].xf_flags & XF_NOBIND)) +- shprintf("%s\n", x_ftab[f].xf_name); +- return 0; ++ /* show all function names */ ++ for (i = 0; i < NELEM(x_ftab); i++) { ++ if (x_ftab[i].xf_name == NULL) ++ continue; ++ if (x_ftab[i].xf_name && ++ !(x_ftab[i].xf_flags & XF_NOBIND)) ++ shprintf("%s\n", x_ftab[i].xf_name); ++ } ++ return (0); + } + + if (a1 == NULL) { +- for (prefix = 0; prefix < X_NTABS; prefix++) +- for (key = 0; key < X_TABSZ; key++) { +- f = x_tab[prefix][key]; +- if (f == XFUNC_insert || f == XFUNC_error || +- (macro && f != XFUNC_ins_string)) +- continue; +- x_print(prefix, key); +- } +- return 0; +- } +- +- m2 = m1 = x_mapin(a1, ATEMP); +- prefix = key = 0; +- for (;; m1++) { +- key = *m1 & CHARMASK; +- if (x_tab[prefix][key] == XFUNC_meta1) +- prefix = 1; +- else if (x_tab[prefix][key] == XFUNC_meta2) +- prefix = 2; +- else +- break; ++ /* show all bindings */ ++ TAILQ_FOREACH(k, &kblist, entry) ++ kb_print(k); ++ return (0); + } +- afree(m2, ATEMP); + ++ snprintf(in, sizeof in, "%s", kb_encode(a1)); + if (a2 == NULL) { +- x_print(prefix, key); +- return 0; ++ /* print binding */ ++ TAILQ_FOREACH(k, &kblist, entry) ++ if (!strcmp(k->seq, in)) { ++ kb_print(k); ++ return (0); ++ } ++ shprintf("%s = %s\n", kb_decode(a1), "auto-insert"); ++ return (0); + } + +- if (*a2 == 0) +- f = XFUNC_insert; +- else if (!macro) { +- for (f = 0; f < NELEM(x_ftab); f++) +- if (x_ftab[f].xf_name && +- strcmp(x_ftab[f].xf_name, a2) == 0) +- break; +- if (f == NELEM(x_ftab) || x_ftab[f].xf_flags & XF_NOBIND) { +- bi_errorf("%s: no such function", a2); +- return 1; ++ if (strlen(a2) == 0) { ++ /* clear binding */ ++ TAILQ_FOREACH(k, &kblist, entry) ++ if (!strcmp(k->seq, in)) ++ kb_del(k); ++ return (0); ++ } ++ ++ /* set binding */ ++ if (macro) { ++ /* delete old mapping */ ++ TAILQ_FOREACH(k, &kblist, entry) ++ if (!strcmp(k->seq, in)) ++ kb_del(k); ++ kb_add_string(x_ins_string, kb_encode(a2), in); ++ return (0); ++ } ++ ++ /* set non macro binding */ ++ for (i = 0; i < NELEM(x_ftab); i++) { ++ if (x_ftab[i].xf_name == NULL) ++ continue; ++ if (!strcmp(x_ftab[i].xf_name, a2)) { ++ /* delete old mapping */ ++ TAILQ_FOREACH(k, &kblist, entry) ++ if (!strcmp(k->seq, in)) ++ kb_del(k); ++ kb_add_string(x_ftab[i].xf_func, NULL, in); ++ return (0); + } +-#if 0 /* This breaks the bind commands that map arrow keys */ +- if (f == XFUNC_meta1) +- x_prefix1 = key; +- if (f == XFUNC_meta2) +- x_prefix2 = key; +-#endif /* 0 */ +- } else { +- f = XFUNC_ins_string; +- sp = x_mapin(a2, AEDIT); + } +- +- if (x_tab[prefix][key] == XFUNC_ins_string && x_atab[prefix][key]) +- afree((void *)x_atab[prefix][key], AEDIT); +- x_tab[prefix][key] = f; +- x_atab[prefix][key] = sp; +- +- /* Track what the user has bound so x_emacs_keys() won't toast things */ +- if (f == XFUNC_insert) +- x_bound[(prefix * X_TABSZ + key) / 8] &= +- ~(1 << ((prefix * X_TABSZ + key) % 8)); +- else +- x_bound[(prefix * X_TABSZ + key) / 8] |= +- (1 << ((prefix * X_TABSZ + key) % 8)); +- +- return 0; ++ bi_errorf("%s: no such function", a2); ++ return (1); + } + + void + x_init_emacs(void) + { +- int i, j; + char *locale; + ++ x_tty = 1; + ainit(AEDIT); + x_nextcmd = -1; + +- x_tab = (u_char (*)[X_TABSZ]) alloc(sizeofN(*x_tab, X_NTABS), AEDIT); +- for (j = 0; j < X_TABSZ; j++) +- x_tab[0][j] = XFUNC_insert; +- for (i = 1; i < X_NTABS; i++) +- for (j = 0; j < X_TABSZ; j++) +- x_tab[i][j] = XFUNC_error; +- for (i = 0; i < NELEM(x_defbindings); i++) +- x_tab[(unsigned char)x_defbindings[i].xdb_tab][x_defbindings[i].xdb_char] +- = x_defbindings[i].xdb_func; +- +- x_atab = (char *(*)[X_TABSZ]) alloc(sizeofN(*x_atab, X_NTABS), AEDIT); +- for (i = 1; i < X_NTABS; i++) +- for (j = 0; j < X_TABSZ; j++) +- x_atab[i][j] = NULL; +- + /* Determine if we can translate meta key or use 8-bit AscII + * XXX - It would be nice if there was a locale attribute to + * determine if the locale is 7-bit or not. +@@ -1418,36 +1472,134 @@ x_init_emacs(void) + locale = setlocale(LC_CTYPE, NULL); + if (locale == NULL || !strcmp(locale, "C") || !strcmp(locale, "POSIX")) + Flag(FEMACSUSEMETA) = 1; +-} + +-static void bind_if_not_bound(int p, int k, int func); +- +-static void +-bind_if_not_bound(int p, int k, int func) +-{ +- /* Has user already bound this key? If so, don't override it */ +- if (x_bound[((p) * X_TABSZ + (k)) / 8] & +- (1 << (((p) * X_TABSZ + (k)) % 8))) +- return; ++ /* new keybinding stuff */ ++ TAILQ_INIT(&kblist); + +- x_tab[p][k] = func; ++ /* man page order */ ++ kb_add(x_abort, NULL, CTRL('G'), 0); ++ kb_add(x_mv_back, NULL, CTRL('B'), 0); ++ kb_add(x_mv_back, NULL, CTRL('X'), CTRL('D'), 0); ++ kb_add(x_mv_bword, NULL, CTRL('['), 'b', 0); ++ kb_add(x_beg_hist, NULL, CTRL('['), '<', 0); ++ kb_add(x_mv_begin, NULL, CTRL('A'), 0); ++ kb_add(x_fold_capitalize, NULL, CTRL('['), 'C', 0); ++ kb_add(x_fold_capitalize, NULL, CTRL('['), 'c', 0); ++ kb_add(x_comment, NULL, CTRL('['), '#', 0); ++ kb_add(x_complete, NULL, CTRL('['), CTRL('['), 0); ++ kb_add(x_comp_comm, NULL, CTRL('X'), CTRL('['), 0); ++ kb_add(x_comp_file, NULL, CTRL('['), CTRL('X'), 0); ++ kb_add(x_comp_list, NULL, CTRL('I'), 0); ++ kb_add(x_comp_list, NULL, CTRL('['), '=', 0); ++ kb_add(x_del_back, NULL, CTRL('?'), 0); ++ kb_add(x_del_back, NULL, CTRL('H'), 0); ++ /* x_del_char not assigned by default */ ++ kb_add(x_del_bword, NULL, CTRL('['), CTRL('?'), 0); ++ kb_add(x_del_bword, NULL, CTRL('['), CTRL('H'), 0); ++ kb_add(x_del_bword, NULL, CTRL('['), 'h', 0); ++ kb_add(x_del_fword, NULL, CTRL('['), 'd', 0); ++ kb_add(x_next_com, NULL, CTRL('N'), 0); ++ kb_add(x_next_com, NULL, CTRL('X'), 'B', 0); ++ kb_add(x_fold_lower, NULL, CTRL('['), 'L', 0); ++ kb_add(x_fold_lower, NULL, CTRL('['), 'l', 0); ++ kb_add(x_end_hist, NULL, CTRL('['), '>', 0); ++ kb_add(x_mv_end, NULL, CTRL('E'), 0); ++ /* how to handle: eot: ^_, underneath copied from original keybindings */ ++ kb_add(x_end_of_text, NULL, CTRL('_'), 0); ++ kb_add(x_eot_del, NULL, CTRL('D'), 0); ++ /* error */ ++ kb_add(x_xchg_point_mark, NULL, CTRL('X'), CTRL('X'), 0); ++ kb_add(x_expand, NULL, CTRL('['), '*', 0); ++ kb_add(x_mv_forw, NULL, CTRL('F'), 0); ++ kb_add(x_mv_forw, NULL, CTRL('X'), 'C', 0); ++ kb_add(x_mv_fword, NULL, CTRL('['), 'f', 0); ++ kb_add(x_goto_hist, NULL, CTRL('['), 'g', 0); ++ /* kill-line */ ++ kb_add(x_del_bword, NULL, CTRL('W'), 0); /* not what man says */ ++ kb_add(x_kill, NULL, CTRL('K'), 0); ++ kb_add(x_enumerate, NULL, CTRL('['), '?', 0); ++ kb_add(x_list_comm, NULL, CTRL('X'), '?', 0); ++ kb_add(x_list_file, NULL, CTRL('X'), CTRL('Y'), 0); ++ kb_add(x_newline, NULL, CTRL('J'), 0); ++ kb_add(x_newline, NULL, CTRL('M'), 0); ++ kb_add(x_nl_next_com, NULL, CTRL('O'), 0); ++ /* no-op */ ++ kb_add(x_prev_histword, NULL, CTRL('['), '.', 0); ++ kb_add(x_prev_histword, NULL, CTRL('['), '_', 0); ++ /* how to handle: quote: ^^ */ ++ kb_add(x_draw_line, NULL, CTRL('L'), 0); ++ kb_add(x_search_char_back, NULL, CTRL('['), CTRL(']'), 0); ++ kb_add(x_search_char_forw, NULL, CTRL(']'), 0); ++ kb_add(x_search_hist, NULL, CTRL('R'), 0); ++ kb_add(x_set_mark, NULL, CTRL('['), ' ', 0); ++#if defined(TIOCSTI) ++ kb_add(x_stuff, NULL, CTRL('T'), 0); ++ /* stuff-reset */ ++#else ++ kb_add(x_transpose, NULL, CTRL('T'), 0); ++#endif ++ kb_add(x_prev_com, NULL, CTRL('P'), 0); ++ kb_add(x_prev_com, NULL, CTRL('X'), 'A', 0); ++ kb_add(x_fold_upper, NULL, CTRL('['), 'U', 0); ++ kb_add(x_fold_upper, NULL, CTRL('['), 'u', 0); ++ kb_add(x_literal, NULL, CTRL('V'), 0); ++ kb_add(x_literal, NULL, CTRL('^'), 0); ++ kb_add(x_yank, NULL, CTRL('Y'), 0); ++ kb_add(x_meta_yank, NULL, CTRL('['), 'y', 0); ++ /* man page ends here */ ++ ++ /* arrow keys */ ++ kb_add(x_prev_com, NULL, CTRL('['), '[', 'A', 0); /* up */ ++ kb_add(x_next_com, NULL, CTRL('['), '[', 'B', 0); /* down */ ++ kb_add(x_mv_forw, NULL, CTRL('['), '[', 'C', 0); /* right */ ++ kb_add(x_mv_back, NULL, CTRL('['), '[', 'D', 0); /* left */ ++ kb_add(x_prev_com, NULL, CTRL('['), 'O', 'A', 0); /* up */ ++ kb_add(x_next_com, NULL, CTRL('['), 'O', 'B', 0); /* down */ ++ kb_add(x_mv_forw, NULL, CTRL('['), 'O', 'C', 0); /* right */ ++ kb_add(x_mv_back, NULL, CTRL('['), 'O', 'D', 0); /* left */ ++ ++ /* more navigation keys */ ++ kb_add(x_mv_begin, NULL, CTRL('['), '[', 'H', 0); /* home */ ++ kb_add(x_mv_end, NULL, CTRL('['), '[', 'F', 0); /* end */ ++ kb_add(x_mv_begin, NULL, CTRL('['), 'O', 'H', 0); /* home */ ++ kb_add(x_mv_end, NULL, CTRL('['), 'O', 'F', 0); /* end */ ++ ++ /* can't be bound */ ++ kb_add(x_set_arg, NULL, CTRL('['), '0', 0); ++ kb_add(x_set_arg, NULL, CTRL('['), '1', 0); ++ kb_add(x_set_arg, NULL, CTRL('['), '2', 0); ++ kb_add(x_set_arg, NULL, CTRL('['), '3', 0); ++ kb_add(x_set_arg, NULL, CTRL('['), '4', 0); ++ kb_add(x_set_arg, NULL, CTRL('['), '5', 0); ++ kb_add(x_set_arg, NULL, CTRL('['), '6', 0); ++ kb_add(x_set_arg, NULL, CTRL('['), '7', 0); ++ kb_add(x_set_arg, NULL, CTRL('['), '8', 0); ++ kb_add(x_set_arg, NULL, CTRL('['), '9', 0); ++ ++ /* ctrl arrow keys */ ++ kb_add(x_mv_end, NULL, CTRL('['), '[', '1', ';', '5', 'A', 0); /* ctrl up */ ++ kb_add(x_mv_begin, NULL, CTRL('['), '[', '1', ';', '5', 'B', 0); /* ctrl down */ ++ kb_add(x_mv_fword, NULL, CTRL('['), '[', '1', ';', '5', 'C', 0); /* ctrl right */ ++ kb_add(x_mv_bword, NULL, CTRL('['), '[', '1', ';', '5', 'D', 0); /* ctrl left */ + } + + void + x_emacs_keys(X_chars *ec) + { ++ x_bind_quiet = 1; + if (ec->erase >= 0) { +- bind_if_not_bound(0, ec->erase, XFUNC_del_back); +- bind_if_not_bound(1, ec->erase, XFUNC_del_bword); ++ kb_add(x_del_back, NULL, ec->erase, 0); ++ kb_add(x_del_bword, NULL, CTRL('['), ec->erase, 0); + } + if (ec->kill >= 0) +- bind_if_not_bound(0, ec->kill, XFUNC_del_line); ++ kb_add(x_del_line, NULL, ec->kill, 0); + if (ec->werase >= 0) +- bind_if_not_bound(0, ec->werase, XFUNC_del_bword); ++ kb_add(x_del_bword, NULL, ec->werase, 0); + if (ec->intr >= 0) +- bind_if_not_bound(0, ec->intr, XFUNC_abort); ++ kb_add(x_abort, NULL, ec->intr, 0); + if (ec->quit >= 0) +- bind_if_not_bound(0, ec->quit, XFUNC_noop); ++ kb_add(x_noop, NULL, ec->quit, 0); ++ x_bind_quiet = 0; + } + + static int +@@ -1704,18 +1856,10 @@ x_e_getc(void) + if (unget_char >= 0) { + c = unget_char; + unget_char = -1; +- } else { +- if (macroptr) { +- c = *macroptr++; +- if (!c) { +- macroptr = NULL; +- c = x_getc(); +- } +- } else +- c = x_getc(); +- } ++ } else ++ c = x_getc(); + +- return c <= CHARMASK ? c : (c & CHARMASK); ++ return c; + } + + static void +@@ -1787,7 +1931,6 @@ + int n = 0; + int first = 1; + +- c &= CHARMASK; /* strip command prefix */ + for (; c >= 0 && isdigit(c); c = x_e_getc(), first = 0) { + n = n * 10 + (c - '0'); + if (n < 0 || n > LINE) { +@@ -1802,6 +1945,7 @@ x_set_arg(int c) + x_e_ungetc(c); + x_arg = n; + x_arg_defaulted = 0; ++ x_arg_set = 1; + } + return KSTD; + } + diff --git a/system/ksh-openbsd/patches/linux/Makefile.diff b/system/ksh-openbsd/patches/linux/Makefile.diff new file mode 100644 index 0000000000..7c9ca8f8ca --- /dev/null +++ b/system/ksh-openbsd/patches/linux/Makefile.diff @@ -0,0 +1,58 @@ +--- ksh-openbsd_cvs/Makefile 2010-02-23 12:49:12.000000000 +0100 ++++ ksh-openbsd_cvs.new/Makefile 2010-04-01 21:21:23.498239164 +0200 +@@ -1,28 +1,43 @@ +-# $OpenBSD: Makefile,v 1.27 2009/03/03 20:01:01 millert Exp $ ++ifdef ${PREFIX} ++PREFIX=${PREFIX} ++else ++PREFIX=/usr ++endif ++BINDIR=${DESTDIR}/bin ++MANDIR=${DESTDIR}${PREFIX}/man + + PROG= ksh + SRCS= alloc.c c_ksh.c c_sh.c c_test.c c_ulimit.c edit.c emacs.c eval.c \ + exec.c expr.c history.c io.c jobs.c lex.c mail.c main.c mknod.c \ + misc.c path.c shf.c syn.c table.c trap.c tree.c tty.c var.c \ +- version.c vi.c +- +-DEFS= -Wall +-CFLAGS+=${DEFS} -I. -I${.CURDIR} -I${.CURDIR}/../../lib/libc/gen +-MAN= ksh.1 sh.1 ++ version.c vi.c strlcpy.c strlcat.c ++OBJS= alloc.o c_ksh.o c_sh.o c_test.o c_ulimit.o edit.o emacs.o eval.o \ ++ exec.o expr.o history.o io.o jobs.o lex.o mail.o main.o mknod.o \ ++ misc.o path.o shf.o syn.o table.o trap.o tree.o tty.o var.o \ ++ version.o vi.o strlcpy.o strlcat.o + + CLEANFILES+= emacs.out + +-LINKS= ${BINDIR}/ksh ${BINDIR}/rksh +-LINKS+= ${BINDIR}/ksh ${BINDIR}/sh +-MLINKS= ksh.1 rksh.1 ++all: $(PROG) ++ ++CFLAGS+=-Wall ++$(PROG): $(OBJS) ++ gcc $(OBJS) -o ksh ++ ++install: ++ install -m755 -d $(BINDIR) ++ install -m755 --strip --no-target-directory ksh $(BINDIR)/pdksh ++ install -m755 -d $(MANDIR)/man1 ++ install -m644 --no-target-directory ksh.1 $(MANDIR)/man1/pdksh.1 ++ ++clean: ++ rm -f $(OBJS) $(PROG) emacs.out + + .depend emacs.o: emacs.out + + emacs.out: emacs.c +- /bin/sh ${.CURDIR}/emacs-gen.sh ${.CURDIR}/emacs.c > emacs.out ++ /bin/sh emacs-gen.sh emacs.c > emacs.out + + check test: + /usr/bin/perl ${.CURDIR}/tests/th -s ${.CURDIR}/tests -p ./ksh -C \ + pdksh,sh,ksh,posix,posix-upu +- +-.include diff --git a/system/ksh-openbsd/patches/linux/c_sh_c.diff b/system/ksh-openbsd/patches/linux/c_sh_c.diff new file mode 100644 index 0000000000..09b74c7a0b --- /dev/null +++ b/system/ksh-openbsd/patches/linux/c_sh_c.diff @@ -0,0 +1,49 @@ +--- ksh-openbsd_cvs/c_sh.c 2010-03-27 17:25:30.000000000 +0100 ++++ ksh-openbsd_cvs.new/c_sh.c 2010-04-01 21:01:24.132137763 +0200 +@@ -837,19 +837,13 @@ c_mknod(char **wp) + { + int argc, optc, ismkfifo = 0, ret; + char **argv; +- void *set = NULL; +- mode_t mode = 0, oldmode = 0; ++ mode_t mode = 0, old_umask = -1; + + while ((optc = ksh_getopt(wp, &builtin_opt, "m:")) != -1) { + switch (optc) { + case 'm': +- set = setmode(builtin_opt.optarg); +- if (set == NULL) { +- bi_errorf("invalid file mode"); +- return 1; +- } +- mode = getmode(set, DEFFILEMODE); +- free(set); ++ old_umask = umask(0); ++ mode |= strtoul(builtin_opt.optarg, NULL, 8); + break; + default: + goto usage; +@@ -866,18 +860,17 @@ c_mknod(char **wp) + } else if (argc != 4) + goto usage; + +- if (set) +- oldmode = umask(0); +- else +- mode = DEFFILEMODE; ++ if (old_umask == -1) ++ mode |= DEFFILEMODE; + + if (ismkfifo) + ret = domkfifo(argc, argv, mode); + else + ret = domknod(argc, argv, mode); + +- if (set) +- umask(oldmode); ++ if (old_umask != -1) ++ umask(old_umask); ++ + return ret; + usage: + builtin_argv0 = NULL; diff --git a/system/ksh-openbsd/patches/linux/charclass_h.diff b/system/ksh-openbsd/patches/linux/charclass_h.diff new file mode 100644 index 0000000000..05e7957075 --- /dev/null +++ b/system/ksh-openbsd/patches/linux/charclass_h.diff @@ -0,0 +1,36 @@ +--- ksh-openbsd_cvs/charclass.h 1970-01-01 01:00:00.000000000 +0100 ++++ ksh-openbsd_cvs.new/charclass.h 2010-04-01 21:01:24.132137763 +0200 +@@ -0,0 +1,33 @@ ++/* ++ * Public domain, 2008, Todd C. Miller ++ * ++ * $OpenBSD: charclass.h,v 1.1 2008/10/01 23:04:13 millert Exp $ ++ */ ++ ++#include ++ ++#define isblank(c) __isctype((c), _ISblank) ++ ++/* ++ * POSIX character class support for fnmatch() and glob(). ++ */ ++static struct cclass { ++ const char *name; ++ int (*isctype)(int); ++} cclasses[] = { ++ { "alnum", isalnum }, ++ { "alpha", isalpha }, ++// { "blank", isblank }, ++ { "cntrl", iscntrl }, ++ { "digit", isdigit }, ++ { "graph", isgraph }, ++ { "lower", islower }, ++ { "print", isprint }, ++ { "punct", ispunct }, ++ { "space", isspace }, ++ { "upper", isupper }, ++ { "xdigit", isxdigit }, ++ { NULL, NULL } ++}; ++ ++#define NCCLASSES (sizeof(cclasses) / sizeof(cclasses[0]) - 1) diff --git a/system/ksh-openbsd/patches/linux/emacs_c.diff b/system/ksh-openbsd/patches/linux/emacs_c.diff new file mode 100644 index 0000000000..4bf6c2a6bc --- /dev/null +++ b/system/ksh-openbsd/patches/linux/emacs_c.diff @@ -0,0 +1,10 @@ +--- ksh-openbsd_cvs/emacs.c 2010-02-23 12:49:15.000000000 +0100 ++++ ksh-openbsd_cvs.new/emacs.c 2010-04-01 21:01:24.133232595 +0200 +@@ -16,6 +16,7 @@ + #include + #include + #include "edit.h" ++#include "strlcpy.h" + + static Area aedit; + #define AEDIT &aedit /* area for kill ring and macro defns */ diff --git a/system/ksh-openbsd/patches/linux/eval_c.diff b/system/ksh-openbsd/patches/linux/eval_c.diff new file mode 100644 index 0000000000..9d580d8a63 --- /dev/null +++ b/system/ksh-openbsd/patches/linux/eval_c.diff @@ -0,0 +1,19 @@ +--- ksh.orig/eval.c.orig 2011-03-27 14:33:38.000000000 +0200 ++++ ksh/eval.c 2011-03-27 15:08:25.986119913 +0200 +@@ -8,6 +8,7 @@ + #include + #include + #include ++#include "strlcpy.h" + + /* + * string expansion +@@ -692,7 +693,7 @@ + int c; + int state; /* next state: XBASE, XARG, XSUB, XNULLSUB */ + int stype; /* substitution type */ +- int slen; ++ int slen = 0; + char *p; + struct tbl *vp; + diff --git a/system/ksh-openbsd/patches/linux/history_c.diff b/system/ksh-openbsd/patches/linux/history_c.diff new file mode 100644 index 0000000000..674e33781e --- /dev/null +++ b/system/ksh-openbsd/patches/linux/history_c.diff @@ -0,0 +1,10 @@ +--- ksh-openbsd_cvs/history.c 2010-02-23 12:49:16.000000000 +0100 ++++ ksh-openbsd_cvs.new/history.c 2010-04-01 21:01:24.133232595 +0200 +@@ -17,6 +17,7 @@ + + #include "sh.h" + #include ++#include "strlcat.h" + + #ifdef HISTORY + # include diff --git a/system/ksh-openbsd/patches/linux/jobs_c.diff b/system/ksh-openbsd/patches/linux/jobs_c.diff new file mode 100644 index 0000000000..e50ffd3a94 --- /dev/null +++ b/system/ksh-openbsd/patches/linux/jobs_c.diff @@ -0,0 +1,22 @@ +--- ksh-openbsd_cvs/jobs.c 2010-02-23 12:49:17.000000000 +0100 ++++ ksh-openbsd_cvs.new/jobs.c 2010-04-01 21:01:24.133232595 +0200 +@@ -21,6 +21,19 @@ + #include + #include + #include "tty.h" ++#include "strlcpy.h" ++ ++#ifndef CHILD_MAX ++# if defined(HAVE_SYSCONF) && defined(_SC_CHILD_MAX) ++# define CHILD_MAX sysconf(_SC_CHILD_MAX) ++# else /* _SC_CHILD_MAX */ ++# ifdef _POSIX_CHILD_MAX ++# define CHILD_MAX ((_POSIX_CHILD_MAX) * 2) ++# else /* _POSIX_CHILD_MAX */ ++# define CHILD_MAX 20 ++# endif /* _POSIX_CHILD_MAX */ ++# endif /* _SC_CHILD_MAX */ ++#endif /* !CHILD_MAX */ + + /* Order important! */ + #define PRUNNING 0 diff --git a/system/ksh-openbsd/patches/linux/lex_c.diff b/system/ksh-openbsd/patches/linux/lex_c.diff new file mode 100644 index 0000000000..40fd4234f1 --- /dev/null +++ b/system/ksh-openbsd/patches/linux/lex_c.diff @@ -0,0 +1,11 @@ +--- ksh-openbsd_cvs/lex.c 2010-02-23 12:49:19.000000000 +0100 ++++ ksh-openbsd_cvs.new/lex.c 2010-04-01 21:01:24.134232647 +0200 +@@ -7,6 +7,8 @@ + #include "sh.h" + #include + #include ++#include ++#include "strlcpy.h" + + + /* Structure to keep track of the lexing state and the various pieces of info diff --git a/system/ksh-openbsd/patches/linux/main_c.diff b/system/ksh-openbsd/patches/linux/main_c.diff new file mode 100644 index 0000000000..a5d90620c1 --- /dev/null +++ b/system/ksh-openbsd/patches/linux/main_c.diff @@ -0,0 +1,15 @@ +--- ksh-openbsd_cvs/main.c 2010-02-23 12:49:19.000000000 +0100 ++++ ksh-openbsd_cvs.new/main.c 2010-04-01 21:01:24.134232647 +0200 +@@ -9,7 +9,12 @@ + #include "sh.h" + #include + #include ++#include "strlcpy.h" + ++/* on Linux we do not have _PW_NAME_LEN, but libc6 allows us 32 character usernames */ ++#ifndef _PW_NAME_LEN ++# define _PW_NAME_LEN 31 ++#endif + extern char **environ; + + /* diff --git a/system/ksh-openbsd/patches/linux/misc_c.diff b/system/ksh-openbsd/patches/linux/misc_c.diff new file mode 100644 index 0000000000..9b09fba62c --- /dev/null +++ b/system/ksh-openbsd/patches/linux/misc_c.diff @@ -0,0 +1,12 @@ +--- ksh-openbsd_cvs/misc.c 2010-02-23 12:49:20.000000000 +0100 ++++ ksh-openbsd_cvs.new/misc.c 2010-04-01 21:01:24.134232647 +0200 +@@ -7,7 +7,9 @@ + #include "sh.h" + #include + #include /* for MAXPATHLEN */ ++#include + #include "charclass.h" ++#include "strlcpy.h" + + short ctypes [UCHAR_MAX+1]; /* type bits for unsigned char */ + diff --git a/system/ksh-openbsd/patches/linux/posix_signals_h.diff b/system/ksh-openbsd/patches/linux/posix_signals_h.diff new file mode 100644 index 0000000000..2d6b8cec4d --- /dev/null +++ b/system/ksh-openbsd/patches/linux/posix_signals_h.diff @@ -0,0 +1,128 @@ +--- ksh-openbsd_cvs/posix_signals.h 1970-01-01 01:00:00.000000000 +0100 ++++ ksh-openbsd_cvs.new/posix_signals.h 2010-04-01 21:01:24.134232647 +0200 +@@ -0,0 +1,125 @@ ++/* ++ * Copyright (c) 1988, 1993, 1994 ++ * The Regents of the University of California. All rights reserved. ++ * ++ * Redistribution and use in source and binary forms, with or without ++ * modification, are permitted provided that the following conditions ++ * are met: ++ * 1. Redistributions of source code must retain the above copyright ++ * notice, this list of conditions and the following disclaimer. ++ * 2. Redistributions in binary form must reproduce the above copyright ++ * notice, this list of conditions and the following disclaimer in the ++ * documentation and/or other materials provided with the distribution. ++ * 3. All advertising materials mentioning features or use of this software ++ * must display the following acknowledgement: ++ * This product includes software developed by the University of ++ * California, Berkeley and its contributors. ++ * 4. Neither the name of the University nor the names of its contributors ++ * may be used to endorse or promote products derived from this software ++ * without specific prior written permission. ++ * ++ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND ++ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE ++ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ++ * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE ++ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL ++ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS ++ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) ++ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT ++ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY ++ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF ++ * SUCH DAMAGE. ++ */ ++/* ++ Taken from misc-utils/kill.c in the util-linux-ng package. ++ ftp://ftp.kernel.org/pub/linux/utils/util-linux-ng/ ++ */ ++ ++#ifndef POSIX_SIGNALS_H ++#define POSIX_SIGNALS_H ++ ++struct signv { ++ char *name; ++ int val; ++} sys_signame[NSIG] = { ++ /* POSIX signals */ ++ { "HUP", SIGHUP }, /* 1 */ ++ { "INT", SIGINT }, /* 2 */ ++ { "QUIT", SIGQUIT }, /* 3 */ ++ { "ILL", SIGILL }, /* 4 */ ++ { "ABRT", SIGABRT }, /* 6 */ ++ { "FPE", SIGFPE }, /* 8 */ ++ { "KILL", SIGKILL }, /* 9 */ ++ { "SEGV", SIGSEGV }, /* 11 */ ++ { "PIPE", SIGPIPE }, /* 13 */ ++ { "ALRM", SIGALRM }, /* 14 */ ++ { "TERM", SIGTERM }, /* 15 */ ++ { "USR1", SIGUSR1 }, /* 10 (arm,i386,m68k,ppc), 30 (alpha,sparc*), 16 (mips) */ ++ { "USR2", SIGUSR2 }, /* 12 (arm,i386,m68k,ppc), 31 (alpha,sparc*), 17 (mips) */ ++ { "CHLD", SIGCHLD }, /* 17 (arm,i386,m68k,ppc), 20 (alpha,sparc*), 18 (mips) */ ++ { "CONT", SIGCONT }, /* 18 (arm,i386,m68k,ppc), 19 (alpha,sparc*), 25 (mips) */ ++ { "STOP", SIGSTOP }, /* 19 (arm,i386,m68k,ppc), 17 (alpha,sparc*), 23 (mips) */ ++ { "TSTP", SIGTSTP }, /* 20 (arm,i386,m68k,ppc), 18 (alpha,sparc*), 24 (mips) */ ++ { "TTIN", SIGTTIN }, /* 21 (arm,i386,m68k,ppc,alpha,sparc*), 26 (mips) */ ++ { "TTOU", SIGTTOU }, /* 22 (arm,i386,m68k,ppc,alpha,sparc*), 27 (mips) */ ++ /* Miscellaneous other signals */ ++#ifdef SIGTRAP ++ { "TRAP", SIGTRAP }, /* 5 */ ++#endif ++#ifdef SIGIOT ++ { "IOT", SIGIOT }, /* 6, same as SIGABRT */ ++#endif ++#ifdef SIGEMT ++ { "EMT", SIGEMT }, /* 7 (mips,alpha,sparc*) */ ++#endif ++#ifdef SIGBUS ++ { "BUS", SIGBUS }, /* 7 (arm,i386,m68k,ppc), 10 (mips,alpha,sparc*) */ ++#endif ++#ifdef SIGSYS ++ { "SYS", SIGSYS }, /* 12 (mips,alpha,sparc*) */ ++#endif ++#ifdef SIGSTKFLT ++ { "STKFLT", SIGSTKFLT }, /* 16 (arm,i386,m68k,ppc) */ ++#endif ++#ifdef SIGURG ++ { "URG", SIGURG }, /* 23 (arm,i386,m68k,ppc), 16 (alpha,sparc*), 21 (mips) */ ++#endif ++#ifdef SIGIO ++ { "IO", SIGIO }, /* 29 (arm,i386,m68k,ppc), 23 (alpha,sparc*), 22 (mips) */ ++#endif ++#ifdef SIGPOLL ++ { "POLL", SIGPOLL }, /* same as SIGIO */ ++#endif ++#ifdef SIGCLD ++ { "CLD", SIGCLD }, /* same as SIGCHLD (mips) */ ++#endif ++#ifdef SIGXCPU ++ { "XCPU", SIGXCPU }, /* 24 (arm,i386,m68k,ppc,alpha,sparc*), 30 (mips) */ ++#endif ++#ifdef SIGXFSZ ++ { "XFSZ", SIGXFSZ }, /* 25 (arm,i386,m68k,ppc,alpha,sparc*), 31 (mips) */ ++#endif ++#ifdef SIGVTALRM ++ { "VTALRM", SIGVTALRM }, /* 26 (arm,i386,m68k,ppc,alpha,sparc*), 28 (mips) */ ++#endif ++#ifdef SIGPROF ++ { "PROF", SIGPROF }, /* 27 (arm,i386,m68k,ppc,alpha,sparc*), 29 (mips) */ ++#endif ++#ifdef SIGPWR ++ { "PWR", SIGPWR }, /* 30 (arm,i386,m68k,ppc), 29 (alpha,sparc*), 19 (mips) */ ++#endif ++#ifdef SIGINFO ++ { "INFO", SIGINFO }, /* 29 (alpha) */ ++#endif ++#ifdef SIGLOST ++ { "LOST", SIGLOST }, /* 29 (arm,i386,m68k,ppc,sparc*) */ ++#endif ++#ifdef SIGWINCH ++ { "WINCH", SIGWINCH }, /* 28 (arm,i386,m68k,ppc,alpha,sparc*), 20 (mips) */ ++#endif ++#ifdef SIGUNUSED ++ { "UNUSED", SIGUNUSED }, /* 31 (arm,i386,m68k,ppc) */ ++#endif ++}; /* sys_signame[] */ ++ ++#endif /* POSIX_SIGNALS_H */ diff --git a/system/ksh-openbsd/patches/linux/sh_h.diff b/system/ksh-openbsd/patches/linux/sh_h.diff new file mode 100644 index 0000000000..df6de9c4c9 --- /dev/null +++ b/system/ksh-openbsd/patches/linux/sh_h.diff @@ -0,0 +1,10 @@ +--- ksh-openbsd_cvs/sh.h 2010-02-23 12:49:21.000000000 +0100 ++++ ksh-openbsd_cvs.new/sh.h 2010-04-01 21:01:24.135232661 +0200 +@@ -16,6 +16,7 @@ + #include + #include + #include ++#define __USE_GNU /* needed for setresuid() and setresgid() */ + #include + #include + #include diff --git a/system/ksh-openbsd/patches/linux/strlcat_c.diff b/system/ksh-openbsd/patches/linux/strlcat_c.diff new file mode 100644 index 0000000000..1137522fcb --- /dev/null +++ b/system/ksh-openbsd/patches/linux/strlcat_c.diff @@ -0,0 +1,65 @@ +--- ksh-openbsd_cvs/strlcat.c 1970-01-01 01:00:00.000000000 +0100 ++++ ksh-openbsd_cvs.new/strlcat.c 2010-04-01 21:01:24.135232661 +0200 +@@ -0,0 +1,62 @@ ++/* $OpenBSD: strlcat.c,v 1.13 2005/08/08 08:05:37 espie Exp $ */ ++ ++/* ++ * Copyright (c) 1998 Todd C. Miller ++ * ++ * Permission to use, copy, modify, and distribute this software for any ++ * purpose with or without fee is hereby granted, provided that the above ++ * copyright notice and this permission notice appear in all copies. ++ * ++ * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES ++ * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF ++ * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ++ * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES ++ * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ++ * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF ++ * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. ++ */ ++ ++/* OPENBSD ORIGINAL: lib/libc/string/strlcat.c */ ++ ++// #include "includes.h" ++#ifndef HAVE_STRLCAT ++ ++#include ++#include ++ ++/* ++ * Appends src to string dst of size siz (unlike strncat, siz is the ++ * full size of dst, not space left). At most siz-1 characters ++ * will be copied. Always NUL terminates (unless siz <= strlen(dst)). ++ * Returns strlen(src) + MIN(siz, strlen(initial dst)). ++ * If retval >= siz, truncation occurred. ++ */ ++size_t ++strlcat(char *dst, const char *src, size_t siz) ++{ ++ char *d = dst; ++ const char *s = src; ++ size_t n = siz; ++ size_t dlen; ++ ++ /* Find the end of dst and adjust bytes left but don't go past end */ ++ while (n-- != 0 && *d != '\0') ++ d++; ++ dlen = d - dst; ++ n = siz - dlen; ++ ++ if (n == 0) ++ return(dlen + strlen(s)); ++ while (*s != '\0') { ++ if (n != 1) { ++ *d++ = *s; ++ n--; ++ } ++ s++; ++ } ++ *d = '\0'; ++ ++ return(dlen + (s - src)); /* count does not include NUL */ ++} ++ ++#endif /* !HAVE_STRLCAT */ diff --git a/system/ksh-openbsd/patches/linux/strlcat_h.diff b/system/ksh-openbsd/patches/linux/strlcat_h.diff new file mode 100644 index 0000000000..60eb6361f7 --- /dev/null +++ b/system/ksh-openbsd/patches/linux/strlcat_h.diff @@ -0,0 +1,7 @@ +--- ksh-openbsd_cvs/strlcat.h 1970-01-01 01:00:00.000000000 +0100 ++++ ksh-openbsd_cvs.new/strlcat.h 2010-04-01 21:01:24.135232661 +0200 +@@ -0,0 +1,4 @@ ++#ifndef STRLCAT_H ++#define STRLCAT_H ++size_t strlcat(char *, const char *, size_t); ++#endif /* STRLCAT_H */ diff --git a/system/ksh-openbsd/patches/linux/strlcpy_c.diff b/system/ksh-openbsd/patches/linux/strlcpy_c.diff new file mode 100644 index 0000000000..a08f2614bf --- /dev/null +++ b/system/ksh-openbsd/patches/linux/strlcpy_c.diff @@ -0,0 +1,61 @@ +--- ksh-openbsd_cvs/strlcpy.c 1970-01-01 01:00:00.000000000 +0100 ++++ ksh-openbsd_cvs.new/strlcpy.c 2010-04-01 21:01:24.145380963 +0200 +@@ -0,0 +1,58 @@ ++/* $OpenBSD: strlcpy.c,v 1.10 2005/08/08 08:05:37 espie Exp $ */ ++ ++/* ++ * Copyright (c) 1998 Todd C. Miller ++ * ++ * Permission to use, copy, modify, and distribute this software for any ++ * purpose with or without fee is hereby granted, provided that the above ++ * copyright notice and this permission notice appear in all copies. ++ * ++ * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES ++ * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF ++ * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ++ * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES ++ * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ++ * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF ++ * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. ++ */ ++ ++/* OPENBSD ORIGINAL: lib/libc/string/strlcpy.c */ ++ ++// #include "includes.h" ++#ifndef HAVE_STRLCPY ++ ++#include ++#include ++ ++/* ++ * Copy src to string dst of size siz. At most siz-1 characters ++ * will be copied. Always NUL terminates (unless siz == 0). ++ * Returns strlen(src); if retval >= siz, truncation occurred. ++ */ ++size_t ++strlcpy(char *dst, const char *src, size_t siz) ++{ ++ char *d = dst; ++ const char *s = src; ++ size_t n = siz; ++ ++ /* Copy as many bytes as will fit */ ++ if (n != 0 && --n != 0) { ++ do { ++ if ((*d++ = *s++) == 0) ++ break; ++ } while (--n != 0); ++ } ++ ++ /* Not enough room in dst, add NUL and traverse rest of src */ ++ if (n == 0) { ++ if (siz != 0) ++ *d = '\0'; /* NUL-terminate dst */ ++ while (*s++) ++ ; ++ } ++ ++ return(s - src - 1); /* count does not include NUL */ ++} ++ ++#endif /* !HAVE_STRLCPY */ diff --git a/system/ksh-openbsd/patches/linux/strlcpy_h.diff b/system/ksh-openbsd/patches/linux/strlcpy_h.diff new file mode 100644 index 0000000000..d9f75cd41e --- /dev/null +++ b/system/ksh-openbsd/patches/linux/strlcpy_h.diff @@ -0,0 +1,7 @@ +--- ksh-openbsd_cvs/strlcpy.h 1970-01-01 01:00:00.000000000 +0100 ++++ ksh-openbsd_cvs.new/strlcpy.h 2010-04-01 21:01:24.145380963 +0200 +@@ -0,0 +1,4 @@ ++#ifndef STRLCPY_H ++#define STRLCPY_H ++size_t strlcpy(char *, const char *, size_t); ++#endif /* STRLCPY_H */ diff --git a/system/ksh-openbsd/patches/linux/trap_c.diff b/system/ksh-openbsd/patches/linux/trap_c.diff new file mode 100644 index 0000000000..10f067ff06 --- /dev/null +++ b/system/ksh-openbsd/patches/linux/trap_c.diff @@ -0,0 +1,45 @@ +--- ksh-openbsd_cvs/trap.c 2010-02-23 12:49:23.000000000 +0100 ++++ ksh-openbsd_cvs.new/trap.c 2010-04-01 21:30:25.819238979 +0200 +@@ -5,6 +5,7 @@ + */ + + #include "sh.h" ++#include "posix_signals.h" /* sys_signame[] */ + + Trap sigtraps[NSIG + 1]; + +@@ -13,20 +14,29 @@ static struct sigaction Sigact_ign, Siga + void + inittraps(void) + { +- int i; ++ int i, j; + +- /* Populate sigtraps based on sys_signame and sys_siglist. */ +- for (i = 0; i <= NSIG; i++) { ++ /* Populate sigtraps based on posix_signals.h */ ++ for (i = 1; i < NSIG; i++) { + sigtraps[i].signal = i; + if (i == SIGERR_) { + sigtraps[i].name = "ERR"; + sigtraps[i].mess = "Error handler"; + } else { +- sigtraps[i].name = sys_signame[i]; +- sigtraps[i].mess = sys_siglist[i]; ++ for(j = 0; j < NSIG; j++) /* find the corresponding SIGNAL number's name in the sys_signame[] array */ ++ { ++ if( sys_signame[j].val == sigtraps[i].signal ) /* we got a match */ ++ { ++ sigtraps[i].name = sys_signame[j].name; ++ break; ++ } ++ } ++ sigtraps[i].mess = strsignal(sigtraps[i].signal); + } + } ++ sigtraps[SIGEXIT_].signal = SIGEXIT_; + sigtraps[SIGEXIT_].name = "EXIT"; /* our name for signal 0 */ ++ sigtraps[SIGEXIT_].mess = "Exited"; + + sigemptyset(&Sigact_ign.sa_mask); + Sigact_ign.sa_flags = 0; /* interruptible */ diff --git a/system/ksh-openbsd/patches/linux/var_c.diff b/system/ksh-openbsd/patches/linux/var_c.diff new file mode 100644 index 0000000000..9483a3b4ce --- /dev/null +++ b/system/ksh-openbsd/patches/linux/var_c.diff @@ -0,0 +1,53 @@ +--- ksh-openbsd_cvs/var.c 2010-02-23 12:49:23.000000000 +0100 ++++ ksh-openbsd_cvs.new/var.c 2010-04-01 21:01:24.145380963 +0200 +@@ -5,6 +5,7 @@ + #include "ksh_limval.h" + #include + #include ++#include "strlcpy.h" + + /* + * Variables +@@ -865,12 +866,6 @@ makenv(void) + } + + /* +- * Someone has set the srand() value, therefore from now on +- * we return values from rand() instead of arc4random() +- */ +-int use_rand = 0; +- +-/* + * Called after a fork in parent to bump the random number generator. + * Done to ensure children will not get the same random number sequence + * if the parent doesn't use $RANDOM. +@@ -878,8 +873,7 @@ int use_rand = 0; + void + change_random(void) + { +- if (use_rand) +- rand(); ++ rand(); + } + + /* +@@ -926,10 +920,7 @@ getspec(struct tbl *vp) + break; + case V_RANDOM: + vp->flag &= ~SPECIAL; +- if (use_rand) +- setint(vp, (long) (rand() & 0x7fff)); +- else +- setint(vp, (long) (arc4random() & 0x7fff)); ++ setint(vp, (long) (rand() & 0x7fff)); + vp->flag |= SPECIAL; + break; + #ifdef HISTORY +@@ -1030,7 +1021,6 @@ setspec(struct tbl *vp) + case V_RANDOM: + vp->flag &= ~SPECIAL; + srand((unsigned int)intval(vp)); +- use_rand = 1; + vp->flag |= SPECIAL; + break; + case V_SECONDS: diff --git a/system/ksh-openbsd/patches/linux/vi_c.diff b/system/ksh-openbsd/patches/linux/vi_c.diff new file mode 100644 index 0000000000..9372933d8e --- /dev/null +++ b/system/ksh-openbsd/patches/linux/vi_c.diff @@ -0,0 +1,10 @@ +--- ksh-openbsd_cvs/vi.c 2010-02-23 12:49:24.000000000 +0100 ++++ ksh-openbsd_cvs.new/vi.c 2010-04-01 21:01:24.146107949 +0200 +@@ -13,6 +13,7 @@ + #include + #include /* completion */ + #include "edit.h" ++#include "strlcpy.h" + + #define CMDLEN 2048 + #define Ctrl(c) (c&0x1f) diff --git a/system/ksh-openbsd/slack-desc b/system/ksh-openbsd/slack-desc new file mode 100644 index 0000000000..784fb59009 --- /dev/null +++ b/system/ksh-openbsd/slack-desc @@ -0,0 +1,18 @@ +# HOW TO EDIT THIS FILE: +# The "handy ruler" below makes it easier to edit a package description. Line +# up the first '|' above the ':' following the base package name, and the '|' +# on the right side marks the last column you can put a character in. You must +# make exactly 11 lines for the formatting to be correct. It's also +# customary to leave one space after the ':'. + + |-----handy-ruler------------------------------------------------------| +ksh-openbsd: ksh-openbsd (OpenBSD ksh ported to Linux) +ksh-openbsd: +ksh-openbsd: This package is a patched and ported version of the OpenBSD ksh, +ksh-openbsd: which is based on the original PD-ksh, but heavily modified and +ksh-openbsd: maintained by OpenBSD developers. +ksh-openbsd: "Ported" means ported to Linux. "Patched" means it includes patches +ksh-openbsd: (improvements, bug fixes) separate from the OpenBSD tree. +ksh-openbsd: +ksh-openbsd: +ksh-openbsd: -- cgit v1.2.3-65-gdbad