You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
PDCursesMod/pdcurses/insstr.c

268 lines
6.5 KiB
C

/* PDCursesMod */
#include <curspriv.h>
#include <assert.h>
/*man-start**************************************************************
insstr
------
### Synopsis
int insstr(const char *str);
int insnstr(const char *str, int n);
int winsstr(WINDOW *win, const char *str);
int winsnstr(WINDOW *win, const char *str, int n);
int mvinsstr(int y, int x, const char *str);
int mvinsnstr(int y, int x, const char *str, int n);
int mvwinsstr(WINDOW *win, int y, int x, const char *str);
int mvwinsnstr(WINDOW *win, int y, int x, const char *str, int n);
int ins_wstr(const wchar_t *wstr);
int ins_nwstr(const wchar_t *wstr, int n);
int wins_wstr(WINDOW *win, const wchar_t *wstr);
int wins_nwstr(WINDOW *win, const wchar_t *wstr, int n);
int mvins_wstr(int y, int x, const wchar_t *wstr);
int mvins_nwstr(int y, int x, const wchar_t *wstr, int n);
int mvwins_wstr(WINDOW *win, int y, int x, const wchar_t *wstr);
int mvwins_nwstr(WINDOW *win, int y, int x, const wchar_t *wstr, int n);
### Description
The insstr() functions insert a character string into a window at the
current cursor position, by repeatedly calling winsch(). When
PDCurses is built with wide-character support enabled, the narrow-
character functions treat the string as a multibyte string in the
current locale, and convert it first. All characters to the right of
the cursor are moved to the right, with the possibility of the
rightmost characters on the line being lost. The cursor position
does not change (after moving to y, x, if specified). The routines
with n as the last argument insert at most n characters; if n is
negative, then the entire string is inserted.
### Return Value
All functions return OK on success and ERR on error.
### Portability
X/Open ncurses NetBSD
insstr Y Y Y
winsstr Y Y Y
mvinsstr Y Y Y
mvwinsstr Y Y Y
insnstr Y Y Y
winsnstr Y Y Y
mvinsnstr Y Y Y
mvwinsnstr Y Y Y
ins_wstr Y Y Y
wins_wstr Y Y Y
mvins_wstr Y Y Y
mvwins_wstr Y Y Y
ins_nwstr Y Y Y
wins_nwstr Y Y Y
mvins_nwstr Y Y Y
mvwins_nwstr Y Y Y
**man-end****************************************************************/
#include <string.h>
#define MAX_WSTR 80
int winsnstr(WINDOW *win, const char *str, int n)
{
#ifdef PDC_WIDE
wchar_t wstr[MAX_WSTR], *p = wstr;
int i = 0;
#endif
int len;
PDC_LOG(("winsnstr() - called: string=\"%s\" n %d \n", str, n));
assert( win);
assert( str);
if (!win || !str)
return ERR;
len = (int)strlen(str);
if (n < 0 || n > len)
n = len;
#ifdef PDC_WIDE
while( p < wstr + MAX_WSTR && str[i])
{
int retval = PDC_mbtowc(p, str + i, n - i);
if (retval <= 0)
break;
p++;
i += retval;
}
if( p == wstr + MAX_WSTR) /* not enough room in wstr; break */
if( ERR == winsnstr( win, str + i, n - i)) /* str into parts */
return ERR;
while (p > wstr)
if (winsch(win, *--p) == ERR)
#else
while (n)
if (winsch(win, (unsigned char)(str[--n])) == ERR)
#endif
return ERR;
return OK;
}
int insstr(const char *str)
{
PDC_LOG(("insstr() - called: string=\"%s\"\n", str));
return winsnstr(stdscr, str, -1);
}
int winsstr(WINDOW *win, const char *str)
{
PDC_LOG(("winsstr() - called: string=\"%s\"\n", str));
return winsnstr(win, str, -1);
}
int mvinsstr(int y, int x, const char *str)
{
PDC_LOG(("mvinsstr() - called: y %d x %d string=\"%s\"\n", y, x, str));
if (move(y, x) == ERR)
return ERR;
return winsnstr(stdscr, str, -1);
}
int mvwinsstr(WINDOW *win, int y, int x, const char *str)
{
PDC_LOG(("mvwinsstr() - called: string=\"%s\"\n", str));
if (wmove(win, y, x) == ERR)
return ERR;
return winsnstr(win, str, -1);
}
int insnstr(const char *str, int n)
{
PDC_LOG(("insnstr() - called: string=\"%s\" n %d \n", str, n));
return winsnstr(stdscr, str, n);
}
int mvinsnstr(int y, int x, const char *str, int n)
{
PDC_LOG(("mvinsnstr() - called: y %d x %d string=\"%s\" n %d \n",
y, x, str, n));
if (move(y, x) == ERR)
return ERR;
return winsnstr(stdscr, str, n);
}
int mvwinsnstr(WINDOW *win, int y, int x, const char *str, int n)
{
PDC_LOG(("mvwinsnstr() - called: y %d x %d string=\"%s\" n %d \n",
y, x, str, n));
if (wmove(win, y, x) == ERR)
return ERR;
return winsnstr(win, str, n);
}
#ifdef PDC_WIDE
int wins_nwstr(WINDOW *win, const wchar_t *wstr, int n)
{
const wchar_t *p;
int len;
PDC_LOG(("wins_nwstr() - called\n"));
assert( win);
assert( wstr);
if (!win || !wstr)
return ERR;
for (len = 0, p = wstr; *p; p++)
len++;
if (n < 0 || n > len)
n = len;
while (n)
if (winsch(win, wstr[--n]) == ERR)
return ERR;
return OK;
}
int ins_wstr(const wchar_t *wstr)
{
PDC_LOG(("ins_wstr() - called\n"));
return wins_nwstr(stdscr, wstr, -1);
}
int wins_wstr(WINDOW *win, const wchar_t *wstr)
{
PDC_LOG(("wins_wstr() - called\n"));
return wins_nwstr(win, wstr, -1);
}
int mvins_wstr(int y, int x, const wchar_t *wstr)
{
PDC_LOG(("mvins_wstr() - called\n"));
if (move(y, x) == ERR)
return ERR;
return wins_nwstr(stdscr, wstr, -1);
}
int mvwins_wstr(WINDOW *win, int y, int x, const wchar_t *wstr)
{
PDC_LOG(("mvwinsstr() - called\n"));
if (wmove(win, y, x) == ERR)
return ERR;
return wins_nwstr(win, wstr, -1);
}
int ins_nwstr(const wchar_t *wstr, int n)
{
PDC_LOG(("ins_nwstr() - called\n"));
return wins_nwstr(stdscr, wstr, n);
}
int mvins_nwstr(int y, int x, const wchar_t *wstr, int n)
{
PDC_LOG(("mvinsnstr() - called\n"));
if (move(y, x) == ERR)
return ERR;
return wins_nwstr(stdscr, wstr, n);
}
int mvwins_nwstr(WINDOW *win, int y, int x, const wchar_t *wstr, int n)
{
PDC_LOG(("mvwinsnstr() - called\n"));
if (wmove(win, y, x) == ERR)
return ERR;
return wins_nwstr(win, wstr, n);
}
#endif