ack/plat/pdpv7/libsys/isatty.c

extern int ioctl(int fd, unsigned int request, ...);

int isatty(int fd)
{
    unsigned u;

    if (ioctl(fd, /*TIOCGETD*/(('t'<<8)|0), &u) < 0)
        return 0;
    return 1;
}
Fix a whole bunch of warnings. 2022-08-01 20:08:23 +00:00			`extern int ioctl(int fd, unsigned int request, ...);`

Made the cgg and the cg code generator work; use this to beat the PDP/11 backend into shape. It now generates binaries --- no idea whether they work or not. 2018-02-23 21:31:46 +00:00			`int isatty(int fd)`
			`{`
Prevent crash in isatty() The existing code allocated 2 bytes (char*), but gtty() needs 6 bytes (struct sgttyb), so isatty() smashed the stack and corrupted its return address, probably causing SIGBUS or SIGSEGV. Fix by switching to TIOCGETD, which needs 2 bytes. TIOCGETD isn't in the manual for tty(4), but does appear in https://minnie.tuhs.org//cgi-bin/utree.pl?file=V7/usr/sys/dev/tty.c This fixes hilo_c.pdpv7 and hilo_mod.pdpv7 in simh-pdp11. 2018-06-15 04:48:29 +00:00			`unsigned u;`
Made the cgg and the cg code generator work; use this to beat the PDP/11 backend into shape. It now generates binaries --- no idea whether they work or not. 2018-02-23 21:31:46 +00:00
Prevent crash in isatty() The existing code allocated 2 bytes (char*), but gtty() needs 6 bytes (struct sgttyb), so isatty() smashed the stack and corrupted its return address, probably causing SIGBUS or SIGSEGV. Fix by switching to TIOCGETD, which needs 2 bytes. TIOCGETD isn't in the manual for tty(4), but does appear in https://minnie.tuhs.org//cgi-bin/utree.pl?file=V7/usr/sys/dev/tty.c This fixes hilo_c.pdpv7 and hilo_mod.pdpv7 in simh-pdp11. 2018-06-15 04:48:29 +00:00			`if (ioctl(fd, /TIOCGETD/(('t'<<8)\|0), &u) < 0)`
Made the cgg and the cg code generator work; use this to beat the PDP/11 backend into shape. It now generates binaries --- no idea whether they work or not. 2018-02-23 21:31:46 +00:00			`return 0;`
			`return 1;`
			`}`