/**************************************************************************** * apps/graphics/pdcurses/pdc_insstr.c * Public Domain Curses * RCSID("$Id: insstr.c,v 1.46 2008/07/13 16:08:18 wmcbrine Exp $") * * Copyright (C) 2017 Gregory Nutt. All rights reserved. * Adapted by: Gregory Nutt * * Adapted from the original public domain pdcurses by Gregory Nutt and * released as part of NuttX under the 3-clause BSD license: * * 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. Neither the name NuttX 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 COPYRIGHT HOLDERS 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 * COPYRIGHT OWNER 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. * ****************************************************************************/ /* Name: 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 BSD SYS V * insstr Y - 4.0 * winsstr Y - 4.0 * mvinsstr Y - 4.0 * mvwinsstr Y - 4.0 * insnstr Y - 4.0 * winsnstr Y - 4.0 * mvinsnstr Y - 4.0 * mvwinsnstr Y - 4.0 * ins_wstr Y * wins_wstr Y * mvins_wstr Y * mvwins_wstr Y * ins_nwstr Y * wins_nwstr Y * mvins_nwstr Y * mvwins_nwstr Y */ /**************************************************************************** * Included Files ****************************************************************************/ #include #include "curspriv.h" /**************************************************************************** * Public Functions ****************************************************************************/ int winsnstr(WINDOW *win, const char *str, int n) { #ifdef CONFIG_PDCURSES_WIDE wchar_t wstr[513], *p; int i; #endif int len; PDC_LOG(("winsnstr() - called: string=\"%s\" n %d \n", str, n)); if (!win || !str) { return ERR; } len = strlen(str); if (n < 0 || n < len) { n = len; } #ifdef CONFIG_PDCURSES_WIDE if (n > 512) { n = 512; } p = wstr; i = 0; while (str[i] && i < n) { int retval = PDC_mbtowc(p, str + i, n - i); if (retval <= 0) { break; } p++; i += retval; } while (p > wstr) { if (winsch(win, *--p) == ERR) { return ERR; } } #else while (n) { if (winsch(win, (unsigned char)(str[--n])) == ERR) { return ERR; } } #endif return OK; } int insstr(const char *str) { #ifdef CONFIG_PDCURSES_MULTITHREAD FAR struct pdc_context_s *ctx = PDC_ctx(); #endif 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) { #ifdef CONFIG_PDCURSES_MULTITHREAD FAR struct pdc_context_s *ctx = PDC_ctx(); #endif 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) { #ifdef CONFIG_PDCURSES_MULTITHREAD FAR struct pdc_context_s *ctx = PDC_ctx(); #endif 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) { #ifdef CONFIG_PDCURSES_MULTITHREAD FAR struct pdc_context_s *ctx = PDC_ctx(); #endif 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 CONFIG_PDCURSES_WIDE int wins_nwstr(WINDOW *win, const wchar_t *wstr, int n) { const wchar_t *p; int len; PDC_LOG(("wins_nwstr() - called\n")); 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) { #ifdef CONFIG_PDCURSES_MULTITHREAD FAR struct pdc_context_s *ctx = PDC_ctx(); #endif 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) { #ifdef CONFIG_PDCURSES_MULTITHREAD FAR struct pdc_context_s *ctx = PDC_ctx(); #endif 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) { #ifdef CONFIG_PDCURSES_MULTITHREAD FAR struct pdc_context_s *ctx = PDC_ctx(); #endif 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) { #ifdef CONFIG_PDCURSES_MULTITHREAD FAR struct pdc_context_s *ctx = PDC_ctx(); #endif 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