head 1.11; access; symbols perseant-exfatfs-base-20250801:1.11 perseant-exfatfs-base-20240630:1.11 perseant-exfatfs:1.11.0.36 perseant-exfatfs-base:1.11 cjep_sun2x:1.11.0.34 cjep_sun2x-base:1.11 cjep_staticlib_x-base1:1.11 cjep_staticlib_x:1.11.0.32 cjep_staticlib_x-base:1.11 phil-wifi-20200421:1.11 phil-wifi-20200411:1.11 phil-wifi-20200406:1.11 pgoyette-compat-merge-20190127:1.11 pgoyette-compat-20190127:1.11 pgoyette-compat-20190118:1.11 pgoyette-compat-1226:1.11 pgoyette-compat-1126:1.11 pgoyette-compat-1020:1.11 pgoyette-compat-0930:1.11 pgoyette-compat-0906:1.11 pgoyette-compat-0728:1.11 pgoyette-compat-0625:1.11 pgoyette-compat-0521:1.11 pgoyette-compat-0502:1.11 pgoyette-compat-0422:1.11 pgoyette-compat-0415:1.11 pgoyette-compat-0407:1.11 pgoyette-compat-0330:1.11 pgoyette-compat-0322:1.11 pgoyette-compat-0315:1.11 pgoyette-compat:1.11.0.30 pgoyette-compat-base:1.11 perseant-stdc-iso10646:1.11.0.28 perseant-stdc-iso10646-base:1.11 prg-localcount2-base3:1.11 prg-localcount2-base2:1.11 prg-localcount2-base1:1.11 prg-localcount2:1.11.0.26 prg-localcount2-base:1.11 pgoyette-localcount-20170426:1.11 bouyer-socketcan-base1:1.11 pgoyette-localcount-20170320:1.11 bouyer-socketcan:1.11.0.24 bouyer-socketcan-base:1.11 pgoyette-localcount-20170107:1.11 pgoyette-localcount-20161104:1.11 localcount-20160914:1.11 pgoyette-localcount-20160806:1.11 pgoyette-localcount-20160726:1.11 pgoyette-localcount:1.11.0.22 pgoyette-localcount-base:1.11 netbsd-5-2-3-RELEASE:1.11 netbsd-5-1-5-RELEASE:1.11 yamt-pagecache-base9:1.11 yamt-pagecache-tag8:1.11 tls-earlyentropy:1.11.0.18 tls-earlyentropy-base:1.11 riastradh-xf86-video-intel-2-7-1-pre-2-21-15:1.11 riastradh-drm2-base3:1.11 netbsd-5-2-2-RELEASE:1.11 netbsd-5-1-4-RELEASE:1.11 netbsd-5-2-1-RELEASE:1.11 netbsd-5-1-3-RELEASE:1.11 agc-symver:1.11.0.20 agc-symver-base:1.11 tls-maxphys-base:1.11 yamt-pagecache-base8:1.11 netbsd-5-2:1.11.0.16 yamt-pagecache-base7:1.11 netbsd-5-2-RELEASE:1.11 netbsd-5-2-RC1:1.11 yamt-pagecache-base6:1.11 yamt-pagecache-base5:1.11 yamt-pagecache-base4:1.11 netbsd-5-1-2-RELEASE:1.11 netbsd-5-1-1-RELEASE:1.11 yamt-pagecache-base3:1.11 yamt-pagecache-base2:1.11 yamt-pagecache:1.11.0.14 yamt-pagecache-base:1.11 bouyer-quota2-nbase:1.11 bouyer-quota2:1.11.0.12 bouyer-quota2-base:1.11 matt-nb5-pq3:1.11.0.10 matt-nb5-pq3-base:1.11 netbsd-5-1:1.11.0.8 netbsd-5-1-RELEASE:1.11 netbsd-5-1-RC4:1.11 netbsd-5-1-RC3:1.11 netbsd-5-1-RC2:1.11 netbsd-5-1-RC1:1.11 netbsd-5-0-2-RELEASE:1.11 netbsd-5-0-1-RELEASE:1.11 jym-xensuspend-nbase:1.11 netbsd-5-0:1.11.0.6 netbsd-5-0-RELEASE:1.11 netbsd-5-0-RC4:1.11 netbsd-5-0-RC3:1.11 netbsd-5-0-RC2:1.11 jym-xensuspend:1.11.0.4 jym-xensuspend-base:1.11 netbsd-5-0-RC1:1.11 netbsd-5:1.11.0.2 netbsd-5-base:1.11 matt-mips64-base2:1.10 matt-mips64:1.10.0.32 mjf-devfs2:1.10.0.30 mjf-devfs2-base:1.10 netbsd-4-0-1-RELEASE:1.10 wrstuden-revivesa-base-3:1.10 wrstuden-revivesa-base-2:1.10 wrstuden-fixsa-newbase:1.10 wrstuden-revivesa-base-1:1.10 yamt-pf42-base4:1.10 yamt-pf42-base3:1.10 hpcarm-cleanup-nbase:1.10 yamt-pf42-baseX:1.10 yamt-pf42-base2:1.10 wrstuden-revivesa:1.10.0.28 wrstuden-revivesa-base:1.10 yamt-pf42:1.10.0.26 yamt-pf42-base:1.10 keiichi-mipv6-nbase:1.10 keiichi-mipv6:1.10.0.24 keiichi-mipv6-base:1.10 matt-armv6-nbase:1.10 matt-armv6-prevmlocking:1.10 wrstuden-fixsa-base-1:1.10 netbsd-4-0:1.10.0.22 netbsd-4-0-RELEASE:1.10 cube-autoconf:1.10.0.20 cube-autoconf-base:1.10 netbsd-4-0-RC5:1.10 netbsd-4-0-RC4:1.10 netbsd-4-0-RC3:1.10 netbsd-4-0-RC2:1.10 netbsd-4-0-RC1:1.10 matt-armv6:1.10.0.18 matt-armv6-base:1.10 matt-mips64-base:1.10 hpcarm-cleanup:1.10.0.16 hpcarm-cleanup-base:1.10 netbsd-3-1-1-RELEASE:1.10 netbsd-3-0-3-RELEASE:1.10 wrstuden-fixsa:1.10.0.14 wrstuden-fixsa-base:1.10 abandoned-netbsd-4-base:1.10 abandoned-netbsd-4:1.10.0.8 netbsd-3-1:1.10.0.10 netbsd-3-1-RELEASE:1.10 netbsd-3-0-2-RELEASE:1.10 netbsd-3-1-RC4:1.10 netbsd-3-1-RC3:1.10 netbsd-3-1-RC2:1.10 netbsd-3-1-RC1:1.10 netbsd-4:1.10.0.12 netbsd-4-base:1.10 chap-midi-nbase:1.10 netbsd-3-0-1-RELEASE:1.10 chap-midi:1.10.0.6 chap-midi-base:1.10 netbsd-3-0:1.10.0.4 netbsd-3-0-RELEASE:1.10 netbsd-3-0-RC6:1.10 netbsd-3-0-RC5:1.10 netbsd-3-0-RC4:1.10 netbsd-3-0-RC3:1.10 netbsd-3-0-RC2:1.10 netbsd-3-0-RC1:1.10 netbsd-2-0-3-RELEASE:1.9.4.2 netbsd-2-1:1.9.6.1.0.2 netbsd-2-1-RELEASE:1.9.6.1 netbsd-2-1-RC6:1.9.6.1 netbsd-2-1-RC5:1.9.6.1 netbsd-2-1-RC4:1.9.6.1 netbsd-2-1-RC3:1.9.6.1 netbsd-2-1-RC2:1.9.6.1 netbsd-2-1-RC1:1.9.6.1 netbsd-2-0-2-RELEASE:1.9.4.2 netbsd-3:1.10.0.2 netbsd-3-base:1.10 netbsd-2-0-1-RELEASE:1.9 netbsd-2:1.9.0.6 netbsd-2-base:1.9 netbsd-2-0-RELEASE:1.9 netbsd-2-0-RC5:1.9 netbsd-2-0-RC4:1.9 netbsd-2-0-RC3:1.9 netbsd-2-0-RC2:1.9 netbsd-2-0-RC1:1.9 netbsd-2-0:1.9.0.4 netbsd-2-0-base:1.9 netbsd-1-6-PATCH002-RELEASE:1.9 netbsd-1-6-PATCH002:1.9 netbsd-1-6-PATCH002-RC4:1.9 netbsd-1-6-PATCH002-RC3:1.9 netbsd-1-6-PATCH002-RC2:1.9 netbsd-1-6-PATCH002-RC1:1.9 netbsd-1-6-PATCH001:1.9 netbsd-1-6-PATCH001-RELEASE:1.9 netbsd-1-6-PATCH001-RC3:1.9 netbsd-1-6-PATCH001-RC2:1.9 netbsd-1-6-PATCH001-RC1:1.9 fvdl_fs64_base:1.9 netbsd-1-6-RELEASE:1.9 netbsd-1-6-RC3:1.9 netbsd-1-6-RC2:1.9 netbsd-1-6-RC1:1.9 netbsd-1-6:1.9.0.2 netbsd-1-6-base:1.9 netbsd-1-5-PATCH003:1.7 netbsd-1-5-PATCH002:1.7 netbsd-1-5-PATCH001:1.7 nvi_1_79:1.1.1.6 netbsd-1-5-RELEASE:1.7 netbsd-1-5-BETA2:1.7 netbsd-1-5-BETA:1.7 netbsd-1-4-PATCH003:1.7 netbsd-1-5-ALPHA2:1.7 netbsd-1-5:1.7.0.10 netbsd-1-5-base:1.7 minoura-xpg4dl-base:1.7 minoura-xpg4dl:1.7.0.8 netbsd-1-4-PATCH002:1.7 wrstuden-devbsize-19991221:1.7 wrstuden-devbsize:1.7.0.6 wrstuden-devbsize-base:1.7 comdex-fall-1999:1.7.0.4 comdex-fall-1999-base:1.7 netbsd-1-4-PATCH001:1.7 netbsd-1-4-RELEASE:1.7 netbsd-1-4:1.7.0.2 netbsd-1-4-base:1.7 netbsd-1-3-PATCH003:1.6 netbsd-1-3-PATCH003-CANDIDATE2:1.6 netbsd-1-3-PATCH003-CANDIDATE1:1.6 netbsd-1-3-PATCH003-CANDIDATE0:1.6 netbsd-1-3-PATCH002:1.6 netbsd-1-3-PATCH001:1.6 netbsd-1-3-RELEASE:1.6 netbsd-1-3-BETA:1.6 netbsd-1-3:1.6.0.2 netbsd-1-3-base:1.6 netbsd-1-2-PATCH001:1.6 netbsd-1-2-RELEASE:1.6 netbsd-1-2-BETA:1.6 netbsd-1-2:1.6.0.4 netbsd-1-2-base:1.6 nvi_1_66:1.1.1.5 BOSTIC:1.1.1 netbsd-1-1-PATCH001:1.5 netbsd-1-1-RELEASE:1.5 netbsd-1-1:1.5.0.4 netbsd-1-1-base:1.5 netbsd-1-0-PATCH06:1.5 netbsd-1-0-PATCH05:1.5 netbsd-1-0-PATCH04:1.5 netbsd-1-0-PATCH03:1.5 netbsd-1-0-PATCH02:1.5 netbsd-1-0-PATCH1:1.5 netbsd-1-0-PATCH0:1.5 netbsd-1-0-RELEASE:1.5 netbsd-1-0:1.5.0.2 nvi-1-34b:1.1.1.4 nvi-1-33b:1.1.1.3 netbsd-1-0-base:1.3 nvi-1-11b:1.1.1.2 nvi-1-03:1.1.1.1 bostic-nvi:1.1.1; locks; strict; comment @ * @; 1.11 date 2008.10.29.16.49.37; author christos; state dead; branches; next 1.10; 1.10 date 2005.02.12.12.53.23; author aymeric; state Exp; branches; next 1.9; 1.9 date 2002.04.09.01.47.34; author thorpej; state Exp; branches 1.9.4.1 1.9.6.1; next 1.8; 1.8 date 2001.03.31.11.37.50; author aymeric; state Exp; branches; next 1.7; 1.7 date 98.01.09.08.08.03; author perry; state Exp; branches; next 1.6; 1.6 date 96.05.20.03.47.57; author mrg; state Exp; branches; next 1.5; 1.5 date 94.08.17.20.12.57; author cgd; state Exp; branches 1.5.2.1; next 1.4; 1.4 date 94.08.17.16.36.13; author cgd; state Exp; branches; next 1.3; 1.3 date 94.03.28.04.29.43; author cgd; state Exp; branches; next 1.2; 1.2 date 94.01.24.06.40.38; author cgd; state Exp; branches; next 1.1; 1.1 date 94.01.24.05.53.04; author cgd; state Exp; branches 1.1.1.1; next ; 1.9.4.1 date 2005.02.12.12.24.13; author aymeric; state Exp; branches; next 1.9.4.2; 1.9.4.2 date 2005.02.12.12.46.26; author aymeric; state Exp; branches; next ; 1.9.6.1 date 2005.05.06.14.42.03; author riz; state Exp; branches; next ; 1.5.2.1 date 94.08.17.20.12.57; author cgd; state dead; branches; next 1.5.2.2; 1.5.2.2 date 94.08.17.20.12.58; author cgd; state Exp; branches; next ; 1.1.1.1 date 94.01.24.05.53.05; author cgd; state Exp; branches; next 1.1.1.2; 1.1.1.2 date 94.03.28.02.55.47; author cgd; state Exp; branches; next 1.1.1.3; 1.1.1.3 date 94.08.17.16.16.58; author cgd; state Exp; branches; next 1.1.1.4; 1.1.1.4 date 94.08.17.19.18.40; author cgd; state Exp; branches; next 1.1.1.5; 1.1.1.5 date 96.05.20.01.56.51; author mrg; state Exp; branches; next 1.1.1.6; 1.1.1.6 date 2001.03.31.11.29.46; author aymeric; state Exp; branches; next ; desc @@ 1.11 log @bye old vi! @ text @/* $NetBSD: ex_shift.c,v 1.10 2005/02/12 12:53:23 aymeric Exp $ */ /*- * Copyright (c) 1992, 1993, 1994 * The Regents of the University of California. All rights reserved. * Copyright (c) 1992, 1993, 1994, 1995, 1996 * Keith Bostic. All rights reserved. * * See the LICENSE file for redistribution information. */ #include "config.h" #include #ifndef lint #if 0 static const char sccsid[] = "@@(#)ex_shift.c 10.11 (Berkeley) 9/15/96"; #else __RCSID("$NetBSD: ex_shift.c,v 1.10 2005/02/12 12:53:23 aymeric Exp $"); #endif #endif /* not lint */ #include #include #include #include #include #include #include #include "../common/common.h" enum which {LEFT, RIGHT}; static int shift __P((SCR *, EXCMD *, enum which)); /* * ex_shiftl -- :<[<...] * * * PUBLIC: int ex_shiftl __P((SCR *, EXCMD *)); */ int ex_shiftl(sp, cmdp) SCR *sp; EXCMD *cmdp; { return (shift(sp, cmdp, LEFT)); } /* * ex_shiftr -- :>[>...] * * PUBLIC: int ex_shiftr __P((SCR *, EXCMD *)); */ int ex_shiftr(sp, cmdp) SCR *sp; EXCMD *cmdp; { return (shift(sp, cmdp, RIGHT)); } /* * shift -- * Ex shift support. */ static int shift(sp, cmdp, rl) SCR *sp; EXCMD *cmdp; enum which rl; { recno_t from, to; size_t blen, len, newcol, newidx, oldcol, oldidx, sw; int curset; char *p, *bp, *tbp; NEEDFILE(sp, cmdp); if (O_VAL(sp, O_SHIFTWIDTH) == 0) { msgq(sp, M_INFO, "152|shiftwidth option set to 0"); return (0); } /* Copy the lines being shifted into the unnamed buffer. */ if (cut(sp, NULL, &cmdp->addr1, &cmdp->addr2, CUT_LINEMODE)) return (1); /* * The historic version of vi permitted the user to string any number * of '>' or '<' characters together, resulting in an indent of the * appropriate levels. There's a special hack in ex_cmd() so that * cmdp->argv[0] points to the string of '>' or '<' characters. * * Q: What's the difference between the people adding features * to vi and the Girl Scouts? * A: The Girl Scouts have mint cookies and adult supervision. */ for (p = cmdp->argv[0]->bp, sw = 0; *p == '>' || *p == '<'; ++p) sw += O_VAL(sp, O_SHIFTWIDTH); GET_SPACE_RET(sp, bp, blen, 256); curset = 0; for (from = cmdp->addr1.lno, to = cmdp->addr2.lno; from <= to; ++from) { if (db_get(sp, from, DBG_FATAL, &p, &len)) goto err; if (!len) { if (sp->lno == from) curset = 1; continue; } /* * Calculate the old indent amount and the number of * characters it used. */ for (oldidx = 0, oldcol = 0; oldidx < len; ++oldidx) if (p[oldidx] == ' ') ++oldcol; else if (p[oldidx] == '\t') oldcol += O_VAL(sp, O_TABSTOP) - oldcol % O_VAL(sp, O_TABSTOP); else break; /* Calculate the new indent amount. */ if (rl == RIGHT) newcol = oldcol + sw; else { newcol = oldcol < sw ? 0 : oldcol - sw; if (newcol == oldcol) { if (sp->lno == from) curset = 1; continue; } } /* Get a buffer that will hold the new line. */ ADD_SPACE_RET(sp, bp, blen, newcol + len); /* * Build a new indent string and count the number of * characters it uses. */ for (tbp = bp, newidx = 0; newcol >= O_VAL(sp, O_TABSTOP); ++newidx) { *tbp++ = '\t'; newcol -= O_VAL(sp, O_TABSTOP); } for (; newcol > 0; --newcol, ++newidx) *tbp++ = ' '; /* Add the original line. */ memcpy(tbp, p + oldidx, len - oldidx); /* Set the replacement line. */ if (db_set(sp, from, bp, (tbp + (len - oldidx)) - bp)) { err: FREE_SPACE(sp, bp, blen); return (1); } /* * !!! * The shift command in historic vi had the usual bizarre * collection of cursor semantics. If called from vi, the * cursor was repositioned to the first non-blank character * of the lowest numbered line shifted. If called from ex, * the cursor was repositioned to the first non-blank of the * highest numbered line shifted. Here, if the cursor isn't * part of the set of lines that are moved, move it to the * first non-blank of the last line shifted. (This makes * ":3>>" in vi work reasonably.) If the cursor is part of * the shifted lines, it doesn't get moved at all. This * permits shifting of marked areas, i.e. ">'a." shifts the * marked area twice, something that couldn't be done with * historic vi. */ if (sp->lno == from) { curset = 1; if (newidx > oldidx) sp->cno += newidx - oldidx; else if (sp->cno >= oldidx - newidx) sp->cno -= oldidx - newidx; } } if (!curset) { sp->lno = to; sp->cno = 0; (void)nonblank(sp, to, &sp->cno); } FREE_SPACE(sp, bp, blen); sp->rptlines[L_SHIFT] += cmdp->addr2.lno - cmdp->addr1.lno + 1; return (0); } @ 1.10 log @Fix the RCSID's to be $NetBSD$ instead of $NetBSD @ text @d1 1 a1 1 /* $NetBSD: ex_shift.c,v 1.9 2002/04/09 01:47:34 thorpej Exp $ */ d19 1 a19 1 __RCSID("$NetBSD$"); @ 1.9 log @Use __RCSID() and __COPYRIGHT(). @ text @d1 1 a1 1 /* $NetBSD: ex_shift.c,v 1.8 2001/03/31 11:37:50 aymeric Exp $ */ d19 1 a19 1 __RCSID("$NetBSD"); @ 1.9.6.1 log @Pull up revision 1.10 (requested by aymeric in ticket #1195): Fix the RCSID's to be $NetBSD$ instead of $NetBSD @ text @d1 1 a1 1 /* $NetBSD: ex_shift.c,v 1.9 2002/04/09 01:47:34 thorpej Exp $ */ d19 1 a19 1 __RCSID("$NetBSD$"); @ 1.9.4.1 log @Fix the RCSID's to be $NetBSD$ instead of $NetBSD @ text @d1 1 a1 1 /* $NetBSD: ex_shift.c,v 1.9 2002/04/09 01:47:34 thorpej Exp $ */ d19 1 a19 1 __RCSID("$NetBSD$"); @ 1.9.4.2 log @Backout previous. Sorry. @ text @d19 1 a19 1 __RCSID("$NetBSD"); @ 1.8 log @merge changes after import of nvi 1.79 @ text @d1 1 a1 1 /* $NetBSD: ex_shift.c,v 1.7 1998/01/09 08:08:03 perry Exp $ */ d14 1 d16 1 d18 3 @ 1.7 log @RCS Id Police. @ text @d1 1 a1 1 /* $NetBSD$ */ d15 1 a15 1 static const char sccsid[] = "@@(#)ex_shift.c 10.10 (Berkeley) 3/6/96"; d151 1 a151 1 memmove(tbp, p + oldidx, len - oldidx); @ 1.6 log @merge in nvi 1.66 @ text @d1 2 @ 1.5 log @clean up import. @ text @d4 2 d7 1 a7 27 * 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. d10 2 d13 1 a13 1 static char sccsid[] = "@@(#)ex_shift.c 8.16 (Berkeley) 8/17/94"; a17 1 #include a20 1 #include a23 5 #include #include "compat.h" #include #include d25 1 a25 2 #include "vi.h" #include "excmd.h" d28 1 a28 1 static int shift __P((SCR *, EXF *, EXCMDARG *, enum which)); d30 6 d37 1 a37 1 ex_shiftl(sp, ep, cmdp) d39 1 a39 2 EXF *ep; EXCMDARG *cmdp; d41 1 a41 1 return (shift(sp, ep, cmdp, LEFT)); d44 5 d50 1 a50 1 ex_shiftr(sp, ep, cmdp) d52 1 a52 2 EXF *ep; EXCMDARG *cmdp; d54 1 a54 1 return (shift(sp, ep, cmdp, RIGHT)); d57 4 d62 1 a62 1 shift(sp, ep, cmdp, rl) d64 1 a64 2 EXF *ep; EXCMDARG *cmdp; d72 2 d75 1 a75 1 msgq(sp, M_INFO, "shiftwidth option set to 0"); d79 4 d100 1 a100 1 if ((p = file_gline(sp, ep, from, &len)) == NULL) d152 1 a152 1 if (file_sline(sp, ep, from, bp, (tbp + (len - oldidx)) - bp)) { d184 1 a184 1 (void)nonblank(sp, ep, to, &sp->cno); d189 1 a189 2 sp->rptlines[rl == RIGHT ? L_RSHIFT : L_LSHIFT] += cmdp->addr2.lno - cmdp->addr1.lno + 1; @ 1.5.2.1 log @file ex_shift.c was added on branch netbsd-1-0 on 1994-08-17 20:12:58 +0000 @ text @d1 204 @ 1.5.2.2 log @clean up import. @ text @a0 204 /*- * Copyright (c) 1992, 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. */ #ifndef lint static char sccsid[] = "@@(#)ex_shift.c 8.16 (Berkeley) 8/17/94"; #endif /* not lint */ #include #include #include #include #include #include #include #include #include #include #include "compat.h" #include #include #include "vi.h" #include "excmd.h" enum which {LEFT, RIGHT}; static int shift __P((SCR *, EXF *, EXCMDARG *, enum which)); int ex_shiftl(sp, ep, cmdp) SCR *sp; EXF *ep; EXCMDARG *cmdp; { return (shift(sp, ep, cmdp, LEFT)); } int ex_shiftr(sp, ep, cmdp) SCR *sp; EXF *ep; EXCMDARG *cmdp; { return (shift(sp, ep, cmdp, RIGHT)); } static int shift(sp, ep, cmdp, rl) SCR *sp; EXF *ep; EXCMDARG *cmdp; enum which rl; { recno_t from, to; size_t blen, len, newcol, newidx, oldcol, oldidx, sw; int curset; char *p, *bp, *tbp; if (O_VAL(sp, O_SHIFTWIDTH) == 0) { msgq(sp, M_INFO, "shiftwidth option set to 0"); return (0); } /* * The historic version of vi permitted the user to string any number * of '>' or '<' characters together, resulting in an indent of the * appropriate levels. There's a special hack in ex_cmd() so that * cmdp->argv[0] points to the string of '>' or '<' characters. * * Q: What's the difference between the people adding features * to vi and the Girl Scouts? * A: The Girl Scouts have mint cookies and adult supervision. */ for (p = cmdp->argv[0]->bp, sw = 0; *p == '>' || *p == '<'; ++p) sw += O_VAL(sp, O_SHIFTWIDTH); GET_SPACE_RET(sp, bp, blen, 256); curset = 0; for (from = cmdp->addr1.lno, to = cmdp->addr2.lno; from <= to; ++from) { if ((p = file_gline(sp, ep, from, &len)) == NULL) goto err; if (!len) { if (sp->lno == from) curset = 1; continue; } /* * Calculate the old indent amount and the number of * characters it used. */ for (oldidx = 0, oldcol = 0; oldidx < len; ++oldidx) if (p[oldidx] == ' ') ++oldcol; else if (p[oldidx] == '\t') oldcol += O_VAL(sp, O_TABSTOP) - oldcol % O_VAL(sp, O_TABSTOP); else break; /* Calculate the new indent amount. */ if (rl == RIGHT) newcol = oldcol + sw; else { newcol = oldcol < sw ? 0 : oldcol - sw; if (newcol == oldcol) { if (sp->lno == from) curset = 1; continue; } } /* Get a buffer that will hold the new line. */ ADD_SPACE_RET(sp, bp, blen, newcol + len); /* * Build a new indent string and count the number of * characters it uses. */ for (tbp = bp, newidx = 0; newcol >= O_VAL(sp, O_TABSTOP); ++newidx) { *tbp++ = '\t'; newcol -= O_VAL(sp, O_TABSTOP); } for (; newcol > 0; --newcol, ++newidx) *tbp++ = ' '; /* Add the original line. */ memmove(tbp, p + oldidx, len - oldidx); /* Set the replacement line. */ if (file_sline(sp, ep, from, bp, (tbp + (len - oldidx)) - bp)) { err: FREE_SPACE(sp, bp, blen); return (1); } /* * !!! * The shift command in historic vi had the usual bizarre * collection of cursor semantics. If called from vi, the * cursor was repositioned to the first non-blank character * of the lowest numbered line shifted. If called from ex, * the cursor was repositioned to the first non-blank of the * highest numbered line shifted. Here, if the cursor isn't * part of the set of lines that are moved, move it to the * first non-blank of the last line shifted. (This makes * ":3>>" in vi work reasonably.) If the cursor is part of * the shifted lines, it doesn't get moved at all. This * permits shifting of marked areas, i.e. ">'a." shifts the * marked area twice, something that couldn't be done with * historic vi. */ if (sp->lno == from) { curset = 1; if (newidx > oldidx) sp->cno += newidx - oldidx; else if (sp->cno >= oldidx - newidx) sp->cno -= oldidx - newidx; } } if (!curset) { sp->lno = to; sp->cno = 0; (void)nonblank(sp, ep, to, &sp->cno); } FREE_SPACE(sp, bp, blen); sp->rptlines[rl == RIGHT ? L_RSHIFT : L_LSHIFT] += cmdp->addr2.lno - cmdp->addr1.lno + 1; return (0); } @ 1.4 log @clean up import. still have to hack some things. @ text @d35 1 a35 1 static const char sccsid[] = "@@(#)ex_shift.c 8.15 (Berkeley) 8/17/94"; @ 1.3 log @nvi 1.11(beta) from bostic. reconcile conflicts/kill rcsids. @ text @d35 1 a35 1 static char sccsid[] = "@@(#)ex_shift.c 8.14 (Berkeley) 3/14/94"; @ 1.2 log @more Ids than you'll ever want. @ text @d2 1 a2 1 * Copyright (c) 1992, 1993 d35 1 a35 2 /* from: static char sccsid[] = "@@(#)ex_shift.c 8.12 (Berkeley) 12/29/93"; */ static char *rcsid = "$Id$"; d39 2 d42 4 d48 5 d68 1 a68 1 @ 1.1 log @Initial revision @ text @d35 2 a36 1 static char sccsid[] = "@@(#)ex_shift.c 8.12 (Berkeley) 12/29/93"; @ 1.1.1.1 log @nvi 1.03, from ftp.cs.berkeley.edu, per keith bostic's permission. @ text @@ 1.1.1.2 log @nvi/nex 1.11beta from bostic. @ text @d2 1 a2 1 * Copyright (c) 1992, 1993, 1994 d35 1 a35 1 static char sccsid[] = "@@(#)ex_shift.c 8.14 (Berkeley) 3/14/94"; a38 2 #include #include a39 4 #include #include #include #include a41 5 #include #include "compat.h" #include #include d57 1 a57 1 @ 1.1.1.3 log @new public version of nvi @ text @d35 1 a35 1 static const char sccsid[] = "@@(#)ex_shift.c 8.15 (Berkeley) 8/17/94"; @ 1.1.1.4 log @new public version of nvi @ text @d35 1 a35 1 static char sccsid[] = "@@(#)ex_shift.c 8.16 (Berkeley) 8/17/94"; @ 1.1.1.5 log @import of nvi 1.66 @ text @a3 2 * Copyright (c) 1992, 1993, 1994, 1995, 1996 * Keith Bostic. All rights reserved. d5 27 a31 1 * See the LICENSE file for redistribution information. a33 2 #include "config.h" d35 1 a35 1 static const char sccsid[] = "@@(#)ex_shift.c 10.10 (Berkeley) 3/6/96"; d40 1 d44 1 d48 5 d54 2 a55 1 #include "../common/common.h" d58 1 a58 1 static int shift __P((SCR *, EXCMD *, enum which)); a59 6 /* * ex_shiftl -- :<[<...] * * * PUBLIC: int ex_shiftl __P((SCR *, EXCMD *)); */ d61 1 a61 1 ex_shiftl(sp, cmdp) d63 2 a64 1 EXCMD *cmdp; d66 1 a66 1 return (shift(sp, cmdp, LEFT)); a68 5 /* * ex_shiftr -- :>[>...] * * PUBLIC: int ex_shiftr __P((SCR *, EXCMD *)); */ d70 1 a70 1 ex_shiftr(sp, cmdp) d72 2 a73 1 EXCMD *cmdp; d75 1 a75 1 return (shift(sp, cmdp, RIGHT)); a77 4 /* * shift -- * Ex shift support. */ d79 1 a79 1 shift(sp, cmdp, rl) d81 2 a82 1 EXCMD *cmdp; a89 2 NEEDFILE(sp, cmdp); d91 1 a91 1 msgq(sp, M_INFO, "152|shiftwidth option set to 0"); a94 4 /* Copy the lines being shifted into the unnamed buffer. */ if (cut(sp, NULL, &cmdp->addr1, &cmdp->addr2, CUT_LINEMODE)) return (1); d112 1 a112 1 if (db_get(sp, from, DBG_FATAL, &p, &len)) d164 1 a164 1 if (db_set(sp, from, bp, (tbp + (len - oldidx)) - bp)) { d196 1 a196 1 (void)nonblank(sp, to, &sp->cno); d201 2 a202 1 sp->rptlines[L_SHIFT] += cmdp->addr2.lno - cmdp->addr1.lno + 1; @ 1.1.1.6 log @import of nvi 1.79 @ text @d13 1 a13 1 static const char sccsid[] = "@@(#)ex_shift.c 10.11 (Berkeley) 9/15/96"; d149 1 a149 1 memcpy(tbp, p + oldidx, len - oldidx); @