/*
* db_insert --
* Insert a line into the file.
*
* PUBLIC: int db_insert(SCR *, recno_t, CHAR_T *, size_t);
*/
int
db_insert(
SCR *sp,
recno_t lno,
CHAR_T *p,
size_t len)
{
DBT data, key;
EXF *ep;
char *fp;
size_t flen;
int rval;
#if defined(DEBUG) && 0
TRACE(sp, "insert before %lu: len %lu {%.*s}\n",
(u_long)lno, (u_long)len, MIN(len, 20), p);
#endif
/* Check for no underlying file. */
if ((ep = sp->ep) == NULL) {
ex_emsg(sp, NULL, EXM_NOFILEYET);
return (1);
}
INT2FILE(sp, p, len, fp, flen);
/* Update file. */
key.data = &lno;
key.size = sizeof(lno);
data.data = fp;
data.size = flen;
if (ep->db->put(ep->db, &key, &data, R_IBEFORE) == -1) {
msgq(sp, M_SYSERR,
"005|unable to insert at line %lu", (u_long)lno);
return (1);
}
/* Flush the cache, update line count, before screen update. */
if (lno >= ep->c_lno)
ep->c_lno = OOBLNO;
if (ep->c_nlines != OOBLNO)
++ep->c_nlines;
/* File now dirty. */
if (F_ISSET(ep, F_FIRSTMODIFY))
(void)rcv_init(sp);
F_SET(ep, F_MODIFIED);
/* Log change. */
log_line(sp, lno, LOG_LINE_INSERT);
/* Update marks, @ and global commands. */
rval = 0;
if (mark_insdel(sp, LINE_INSERT, lno))
rval = 1;
if (ex_g_insdel(sp, LINE_INSERT, lno))
rval = 1;
/* Update screen. */
return (scr_update(sp, lno, LINE_INSERT, 1) || rval);
}
/*
* PUBLIC: int line_insdel __P((SCR *sp, lnop_t op, db_recno_t lno));
*/
int
line_insdel(SCR *sp, lnop_t op, db_recno_t lno)
{
int rval;
/* Update marks, @ and global commands. */
rval = 0;
if (mark_insdel(sp, op, lno))
rval = 1;
if (ex_g_insdel(sp, op, lno))
rval = 1;
return rval;
}
/*
* db_delete --
* Delete a line from the file.
*
* PUBLIC: int db_delete(SCR *, recno_t);
*/
int
db_delete(
SCR *sp,
recno_t lno)
{
DBT key;
EXF *ep;
#if defined(DEBUG) && 0
TRACE(sp, "delete line %lu\n", (u_long)lno);
#endif
/* Check for no underlying file. */
if ((ep = sp->ep) == NULL) {
ex_emsg(sp, NULL, EXM_NOFILEYET);
return (1);
}
/* Update marks, @ and global commands. */
if (mark_insdel(sp, LINE_DELETE, lno))
return (1);
if (ex_g_insdel(sp, LINE_DELETE, lno))
return (1);
/* Log change. */
log_line(sp, lno, LOG_LINE_DELETE);
/* Update file. */
key.data = &lno;
key.size = sizeof(lno);
if (ep->db->del(ep->db, &key, 0) == 1) {
msgq(sp, M_SYSERR,
"003|unable to delete line %lu", (u_long)lno);
return (1);
}
/* Flush the cache, update line count, before screen update. */
if (lno <= ep->c_lno)
ep->c_lno = OOBLNO;
if (ep->c_nlines != OOBLNO)
--ep->c_nlines;
/* File now modified. */
if (F_ISSET(ep, F_FIRSTMODIFY))
(void)rcv_init(sp);
F_SET(ep, F_MODIFIED);
/* Update screen. */
return (scr_update(sp, lno, LINE_DELETE, 1));
}
/*
* db_append --
* Append a line into the file.
*
* PUBLIC: int db_append(SCR *, int, recno_t, CHAR_T *, size_t);
*/
int
db_append(
SCR *sp,
int update,
recno_t lno,
CHAR_T *p,
size_t len)
{
DBT data, key;
EXF *ep;
char *fp;
size_t flen;
int rval;
#if defined(DEBUG) && 0
TRACE(sp, "append to %lu: len %u {%.*s}\n", lno, len, MIN(len, 20), p);
#endif
/* Check for no underlying file. */
if ((ep = sp->ep) == NULL) {
ex_emsg(sp, NULL, EXM_NOFILEYET);
return (1);
}
INT2FILE(sp, p, len, fp, flen);
/* Update file. */
key.data = &lno;
key.size = sizeof(lno);
data.data = fp;
data.size = flen;
if (ep->db->put(ep->db, &key, &data, R_IAFTER) == -1) {
msgq(sp, M_SYSERR,
"004|unable to append to line %lu", (u_long)lno);
return (1);
}
/* Flush the cache, update line count, before screen update. */
if (lno < ep->c_lno)
ep->c_lno = OOBLNO;
if (ep->c_nlines != OOBLNO)
++ep->c_nlines;
/* File now dirty. */
if (F_ISSET(ep, F_FIRSTMODIFY))
(void)rcv_init(sp);
F_SET(ep, F_MODIFIED);
/* Log change. */
log_line(sp, lno + 1, LOG_LINE_APPEND);
/* Update marks, @ and global commands. */
rval = 0;
if (mark_insdel(sp, LINE_INSERT, lno + 1))
rval = 1;
if (ex_g_insdel(sp, LINE_INSERT, lno + 1))
rval = 1;
/*
* Update screen.
*
* XXX
* Nasty hack. If multiple lines are input by the user, they aren't
* committed until an <ESC> is entered. The problem is the screen was
* updated/scrolled as each line was entered. So, when this routine
* is called to copy the new lines from the cut buffer into the file,
* it has to know not to update the screen again.
*/
return (scr_update(sp, lno, LINE_APPEND, update) || rval);
}