| /**************************************************************************** |
| * apps/graphics/pdcurses/pdc_insstr.c |
| * |
| * SPDX-License-Identifier: Apache-2.0 |
| * |
| * Licensed to the Apache Software Foundation (ASF) under one or more |
| * contributor license agreements. See the NOTICE file distributed with |
| * this work for additional information regarding copyright ownership. The |
| * ASF licenses this file to you under the Apache License, Version 2.0 (the |
| * "License"); you may not use this file except in compliance with the |
| * License. You may obtain a copy of the License at |
| * |
| * http://www.apache.org/licenses/LICENSE-2.0 |
| * |
| * Unless required by applicable law or agreed to in writing, software |
| * distributed under the License is distributed on an "AS IS" BASIS, WITHOUT |
| * WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the |
| * License for the specific language governing permissions and limitations |
| * under the License. |
| * |
| ****************************************************************************/ |
| |
| /**************************************************************************** |
| * Adapted from the original public domain pdcurses by Gregory Nutt |
| ****************************************************************************/ |
| |
| /* 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 <string.h> |
| |
| #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 |
