File Manager

003 File Manager

Current Path: /usr/src/contrib/nvi/ex

📁 ..
📄 ex.awk(115 B)
📄 ex.c(61.91 KB)
📄 ex.h(8.63 KB)
📄 ex_abbrev.c(2.63 KB)
📄 ex_append.c(7.05 KB)
📄 ex_args.c(7.03 KB)
📄 ex_argv.c(20.06 KB)
📄 ex_at.c(3.14 KB)
📄 ex_bang.c(5.25 KB)
📄 ex_cd.c(2.84 KB)
📄 ex_cmd.c(11.69 KB)
📄 ex_cscope.c(24.32 KB)
📄 ex_def.h(1.4 KB)
📄 ex_delete.c(1.3 KB)
📄 ex_display.c(2.71 KB)
📄 ex_edit.c(3.5 KB)
📄 ex_equal.c(1.17 KB)
📄 ex_file.c(1.56 KB)
📄 ex_filter.c(8.38 KB)
📄 ex_global.c(7.17 KB)
📄 ex_init.c(9.93 KB)
📄 ex_join.c(4.36 KB)
📄 ex_map.c(3.01 KB)
📄 ex_mark.c(787 B)
📄 ex_mkexrc.c(1.96 KB)
📄 ex_move.c(4.16 KB)
📄 ex_open.c(867 B)
📄 ex_preserve.c(1.92 KB)
📄 ex_print.c(6.43 KB)
📄 ex_put.c(880 B)
📄 ex_quit.c(801 B)
📄 ex_read.c(8 KB)
📄 ex_screen.c(2.22 KB)
📄 ex_script.c(12.76 KB)
📄 ex_set.c(737 B)
📄 ex_shell.c(4.95 KB)
📄 ex_shift.c(4.59 KB)
📄 ex_source.c(2.01 KB)
📄 ex_stop.c(928 B)
📄 ex_subst.c(34.22 KB)
📄 ex_tag.c(28.84 KB)
📄 ex_txt.c(10.91 KB)
📄 ex_undo.c(1.33 KB)
📄 ex_usage.c(4.15 KB)
📄 ex_util.c(4.18 KB)
📄 ex_version.c(721 B)
📄 ex_visual.c(3.68 KB)
📄 ex_write.c(8 KB)
📄 ex_yank.c(882 B)
📄 ex_z.c(3.56 KB)
📄 extern.h(4.37 KB)
📄 script.h(588 B)
📄 tag.h(3.09 KB)
📄 version.h(40 B)

Editing: ex_shift.c

/*-
 * 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 <sys/types.h>
#include <sys/queue.h>
#include <sys/time.h>

#include <bitstring.h>
#include <limits.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "../common/common.h"

enum which {RETAB, LEFT, RIGHT};
static int shift(SCR *, EXCMD *, enum which);

/*
 * ex_shiftl -- :<[<...]
 *
 *
 * PUBLIC: int ex_shiftl(SCR *, EXCMD *);
 */
int
ex_shiftl(SCR *sp, EXCMD *cmdp)
{
	return (shift(sp, cmdp, LEFT));
}

/*
 * ex_shiftr -- :>[>...]
 *
 * PUBLIC: int ex_shiftr(SCR *, EXCMD *);
 */
int
ex_shiftr(SCR *sp, EXCMD *cmdp)
{
	return (shift(sp, cmdp, RIGHT));
}

/*
 * ex_retab -- Expand tabs (if enabled)
 *
 *
 * PUBLIC: int ex_retab(SCR *, EXCMD *);
 */
int
ex_retab(SCR *sp, EXCMD *cmdp)
{
	return (shift(sp, cmdp, RETAB));
}

/*
 * shift --
 *	Ex shift support.
 */
static int
shift(SCR *sp, EXCMD *cmdp, enum which rl)
{
	recno_t from, to;
	size_t blen, len, newcol, newidx, oldcol, oldidx, sw;
	int curset;
	CHAR_T *p;
	CHAR_T *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_RETW(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 == RETAB)
			newcol = oldcol;
		else 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_RETW(sp, bp, blen, newcol + len);

/*
		 * Build a new indent string and count the number of
		 * characters it uses.
		 */
		tbp = bp;
		newidx = 0;
		if (!O_ISSET(sp, O_EXPANDTAB)) {
			for (; 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_SPACEW(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_SPACEW(sp, bp, blen);

sp->rptlines[L_SHIFT] += cmdp->addr2.lno - cmdp->addr1.lno + 1;
	return (0);
}

003 File Manager

Editing: ex_shift.c

Upload File

Create Folder