* Copyright (c) 1992 The Regents of the University of California.
* This code is derived from software contributed to Berkeley by
* Christos Zoulas of Cornell University.
* %sccs.include.redist.c%
static char sccsid
[] = "@(#)hist.c 5.1 (Berkeley) %G%";
* el.hist.c: History access functions
* Initialization function.
el
->el_history
.fun
= NULL
;
el
->el_history
.ref
= NULL
;
el
->el_history
.buf
= (char *) el_malloc(EL_BUFSIZ
);
el
->el_history
.last
= el
->el_history
.buf
;
el_free((ptr_t
) el
->el_history
.buf
);
el
->el_history
.buf
= NULL
;
* Set new history interface
el
->el_history
.ref
= ptr
;
el
->el_history
.fun
= fun
;
* Get a history line and update it in the buffer.
* eventno tells us the event to get.
if (el
->el_history
.eventno
== 0) { /* if really the current line */
(void) strncpy(el
->el_line
.buffer
, el
->el_history
.buf
, EL_BUFSIZ
);
el
->el_line
.lastchar
= el
->el_line
.buffer
+
(el
->el_history
.last
- el
->el_history
.buf
);
if (el
->el_map
.type
== MAP_VI
)
el
->el_line
.cursor
= el
->el_line
.buffer
;
el
->el_line
.cursor
= el
->el_line
.lastchar
;
if (el
->el_history
.ref
== NULL
)
for (h
= 1; h
< el
->el_history
.eventno
; h
++)
if ((hp
= HIST_NEXT(el
)) == NULL
) {
el
->el_history
.eventno
= h
;
(void) strncpy(el
->el_line
.buffer
, hp
, EL_BUFSIZ
);
el
->el_line
.lastchar
= el
->el_line
.buffer
+ strlen(el
->el_line
.buffer
);
if (el
->el_line
.lastchar
> el
->el_line
.buffer
) {
if (el
->el_line
.lastchar
[-1] == '\n')
if (el
->el_line
.lastchar
[-1] == ' ')
if (el
->el_line
.lastchar
< el
->el_line
.buffer
)
el
->el_line
.lastchar
= el
->el_line
.buffer
;
if (el
->el_map
.type
== MAP_VI
)
el
->el_line
.cursor
= el
->el_line
.buffer
;
el
->el_line
.cursor
= el
->el_line
.lastchar
;
hist_list(el
, argc
, argv
)
if (el
->el_history
.ref
== NULL
)
for (str
= HIST_LAST(el
); str
!= NULL
; str
= HIST_PREV(el
))
(void) fprintf(el
->el_outfile
, "%d %s", el
->el_history
.ev
->num
, str
);