diff options
| -rw-r--r-- | boot/boot.c | 128 |
1 files changed, 127 insertions, 1 deletions
diff --git a/boot/boot.c b/boot/boot.c index 23a1b156..5e35e629 100644 --- a/boot/boot.c +++ b/boot/boot.c @@ -122,6 +122,24 @@ ioctl (int fd, int code, void *buf) #define _IOW(x,y,t) (IOC_IN|((sizeof(t)&IOCPARM_MASK)<<16)|(x<<8)|y) #define FIONREAD _IOR('f', 127, int) #define FIOASYNC _IOW('f', 125, int) +#define TIOCGETP _IOR('t', 8, struct sgttyb) +#define TIOCLGET _IOR('t', 124, int) +#define TIOCLSET _IOW('t', 125, int) +#define TIOCSETN _IOW('t', 10, struct sgttyb) +#define LDECCTQ 0x4000 +#define LLITOUT 0x0020 +#define LPASS8 0x0800 +#define LNOFLSH 0x8000 +#define RAW 0x0020 +#define ANYP 0x00c0 + + +struct sgttyb +{ + char unused[4]; + short flags; +}; + #define SIGIO 23 #define SIGEMSG 30 @@ -176,11 +194,13 @@ request_server (mach_msg_header_t *inp, extern int io_server (mach_msg_header_t *, mach_msg_header_t *); extern int device_server (mach_msg_header_t *, mach_msg_header_t *); extern int notify_server (mach_msg_header_t *, mach_msg_header_t *); + extern int tioctl_server (mach_msg_header_t *, mach_msg_header_t *); return (exec_server (inp, outp) || io_server (inp, outp) || device_server (inp, outp) - || notify_server (inp, outp)); + || notify_server (inp, outp) + || tioctl_server (inp, outp)); } vm_address_t @@ -287,6 +307,7 @@ main (int argc, char **argv, char **envp) MACH_MSG_TYPE_MAKE_SEND); foo = 1; + init_termstate (); ioctl (0, FIOASYNC, &foo); sigvec (SIGIO, &vec, 0); sigvec (SIGMSG, &vec, 0); @@ -519,6 +540,111 @@ S_exec_startup (mach_port_t port, +/* Imlementiation of tioctl interface */ +/* This is bletcherously kludged to work with emacs in a fragile + way. */ +int term_modes[4]; +char term_ccs[20]; +int term_speeds[2]; +struct sgttyb term_sgb; +int localbits; + +#define ICANON (1 << 8) + +void +init_termstate () +{ + term_modes[3] |= ICANON; + ioctl (0, TIOCGETP, &term_sgb); + ioctl (0, TIOCLGET, &localbits); +} + +kern_return_t +S_tioctl_tiocgeta (mach_port_t port, + int modes[], + char ccs[], + int speeds[]) +{ + /* Emacs reads the terminal state in one of two cases: + 1) Checking whether or not a preceding tiocseta succeeded; + 2) Finding out what the state of the terminal was on startup. + In case (1) in only cares that we return exactly what it set; + in case (2) it only uses it for a later seta on exit. So we + can just tell it what's lying around. */ + modes[0] = term_modes[0]; + modes[1] = term_modes[1]; + modes[2] = term_modes[2]; + modes[3] = term_modes[3]; + + bcopy (term_ccs, ccs, 20); + + speeds[0] = term_speeds[0]; + speeds[1] = term_speeds[1]; + return 0; +} + +kern_return_t +S_tioctl_tiocseta (mach_port_t port, + int modes[], + char ccs[], + int speeds[]) +{ + /* Emacs sets the termanal stet in one of two cases: + 1) Putting the terminal into raw mode for running; + 2) Restoring the terminal to its original state. + Because ICANON is set in the original state, and because + emacs always clears ICANON when running, this tells us which + is going on. */ + if ((modes[3] & ICANON) == 0) + { + struct sgttyb sgb; + int bits; + /* Enter raw made. Rather than try and interpret these bits, + we just do what emacs does in .../emacs/src/sysdep.c for + an old style terminal driver. */ + bits = localbits | LDECCTQ | LLITOUT | LPASS8 | LNOFLSH; + ioctl (0, TIOCLSET, &bits); + sgb = term_sgb; + sgb.flags |= RAW | ANYP; + ioctl (0, TIOCSETN, &sgb); + } + else + { + /* Leave raw mode */ + ioctl (0, TIOCLSET, &localbits); + ioctl (0, TIOCSETN, &term_sgb); + } + + term_modes[0] = modes[0]; + term_modes[1] = modes[1]; + term_modes[2] = modes[2]; + term_modes[3] = modes[3]; + bcopy (ccs, term_ccs, 20); + term_speeds[0] = speeds[0]; + term_speeds[1] = speeds[1]; + return 0; +} + +kern_return_t +S_tioctl_tiocsetaw (mach_port_t port, + int modes[4], + char ccs[20], + int speeds[2]) +{ + return S_tioctl_tiocseta (port, modes, ccs, speeds); +} + +kern_return_t +S_tioctl_tiocsetaf (mach_port_t port, + int modes[4], + char ccs[20], + int speeds[2]) +{ + return S_tioctl_tiocseta (port, modes, ccs, speeds); +} + + + /* Implementation of device interface */ kern_return_t |