openat: don’t close (-1)
[gnulib.git] / tests / test-openpty.c
blob3be1c84f98076227785d546679841703fc704c26
1 /* Test of pty.h and openpty function.
2 Copyright (C) 2009-2024 Free Software Foundation, Inc.
4 This program is free software: you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation, either version 3 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program. If not, see <https://www.gnu.org/licenses/>. */
17 /* Written by Simon Josefsson <simon@josefsson.org>, 2009
18 and Bruno Haible <bruno@clisp.org>, 2010. */
20 #include <config.h>
22 #include <pty.h>
24 #include "signature.h"
25 SIGNATURE_CHECK (openpty, int, (int *, int *, char *, struct termios const *,
26 struct winsize const *));
28 #include <stdio.h>
29 #include <string.h>
30 #include <termios.h>
31 #include <unistd.h>
33 int
34 main ()
37 #ifndef _WIN32
38 int master;
39 int slave;
41 /* Open a pseudo-terminal, as a master-slave pair. */
43 int res = openpty (&master, &slave, NULL, NULL, NULL);
44 if (res != 0)
46 fprintf (stderr, "openpty returned %d\n", res);
47 return 1;
51 /* Set the terminal characteristics.
52 On Linux or Mac OS X, they can be set on either the master or the slave;
53 the effect is the same. But on Solaris, they have to be set on the
54 master; tcgetattr on the slave fails. */
56 int tcfd = slave; /* You can try tcfd = master; here. */
57 struct termios attributes;
59 if (tcgetattr (tcfd, &attributes) < 0)
61 fprintf (stderr, "tcgetattr failed\n");
62 return 1;
64 /* Enable canonical processing, including erase. */
65 attributes.c_lflag |= ECHO | ICANON | ECHOE;
66 attributes.c_cc[VERASE] = '\177';
67 if (tcsetattr (tcfd, TCSANOW, &attributes) < 0)
69 fprintf (stderr, "tcsetattr failed\n");
70 return 1;
74 /* Write into the master side. */
76 static const char input[] = "Hello worst\177\177ld!\n";
78 if (write (master, input, strlen (input)) < (int) strlen (input))
80 fprintf (stderr, "write failed\n");
81 return 1;
85 /* Read from the slave side. */
87 char buf[100];
88 int res = read (slave, buf, sizeof (buf));
89 static const char expected[] = "Hello world!\n";
91 if (res < 0)
93 fprintf (stderr, "read failed\n");
94 return 1;
96 if (!(res == strlen (expected)
97 && memcmp (buf, expected, strlen (expected)) == 0))
99 fprintf (stderr, "read result unexpected\n");
100 return 1;
104 /* Close the master side before the slave side gets closed.
105 This is necessary on Mac OS X 10.4.11. */
106 close (master);
107 #endif
110 return 0;