exp2l: Work around a NetBSD 10.0/i386 bug.
[gnulib.git] / lib / readline.c
blobc5960a7bc49382f7f28672e6b2dbdee4164e0585
1 /* readline.c --- Simple implementation of readline.
2 Copyright (C) 2005-2007, 2009-2024 Free Software Foundation, Inc.
3 Written by Simon Josefsson
5 This program is free software: you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation, either version 3 of the License, or
8 (at your option) any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program. If not, see <https://www.gnu.org/licenses/>. */
18 #include <config.h>
20 /* This module is intended to be used when the application only needs
21 the readline interface. If you need more functions from the
22 readline library, it is recommended to require the readline library
23 (or improve this module) rather than #if-protect part of your
24 application (doing so would add assumptions of this module into
25 your application). The application should use #include
26 "readline.h", that header file will include <readline/readline.h>
27 if the real library is present on the system. */
29 /* Get specification. */
30 #include "readline.h"
32 #include <stdio.h>
33 #include <stdlib.h>
34 #include <string.h>
36 char *
37 readline (const char *prompt)
39 char *out = NULL;
40 size_t size = 0;
42 if (prompt)
44 fputs (prompt, stdout);
45 fflush (stdout);
48 if (getline (&out, &size, stdin) < 0)
50 free (out);
51 return NULL;
54 while (*out && (out[strlen (out) - 1] == '\r'
55 || out[strlen (out) - 1] == '\n'))
56 out[strlen (out) - 1] = '\0';
58 return out;