Removed mono_debugger_create_notification_function() from here.

[mono.git] / mono / metadata / console-io.c

diff --git a/mono/metadata/console-io.c b/mono/metadata/console-io.c
index 98a86829c62241b60f01b8346af9ae1a3c3d9153..e3807feca84a350bb2ca7540e4f8752bf02e274d 100644 (file)
--- a/mono/metadata/console-io.c
+++ b/mono/metadata/console-io.c
@@ -13,13 +13,29 @@
 #include <string.h>
 #include <errno.h>
 #include <signal.h>
+#include <sys/time.h>
+#include <sys/types.h>
 #include <unistd.h>
+#include <mono/metadata/appdomain.h>
+#include <mono/metadata/object-internals.h>
+#include <mono/metadata/class-internals.h>
+#include <mono/metadata/domain-internals.h>
+#include <mono/metadata/metadata.h>
+#include <mono/metadata/threadpool.h>
+/* On solaris, curses.h must come before both termios.h and term.h */
+#ifdef HAVE_CURSES_H
+#include <curses.h>
+#endif
 #ifdef HAVE_TERMIOS_H
 #include <termios.h>
 #endif
 #ifdef HAVE_TERM_H
 #include <term.h>
 #endif
+/* Needed for FIONREAD under solaris */
+#ifdef HAVE_SYS_FILIO_H
+#include <sys/filio.h>
+#endif
 #ifndef PLATFORM_WIN32
 #ifndef TIOCGWINSZ
 #include <sys/ioctl.h>
@@ -32,26 +48,60 @@
 static gboolean setup_finished;
 static gboolean atexit_called;
 static gchar *teardown_str;
-static struct termios initial_attr;
 
+#ifdef PLATFORM_WIN32
 MonoBoolean
 ves_icall_System_ConsoleDriver_Isatty (HANDLE handle)
 {
        MONO_ARCH_SAVE_REGS;
 
-#ifdef PLATFORM_WIN32
        return (GetFileType (handle) == FILE_TYPE_CHAR);
+}
+
+MonoBoolean
+ves_icall_System_ConsoleDriver_SetEcho (MonoBoolean want_echo)
+{
+       return FALSE;
+}
+
+MonoBoolean
+ves_icall_System_ConsoleDriver_SetBreak (MonoBoolean want_break)
+{
+       return FALSE;
+}
+
+gint32
+ves_icall_System_ConsoleDriver_InternalKeyAvailable (gint32 timeout)
+{
+       return FALSE;
+}
+
+MonoBoolean
+ves_icall_System_ConsoleDriver_TtySetup (MonoString *teardown, char *verase, char *vsusp, char *intr)
+{
+       return FALSE;
+}
+
+MonoBoolean
+ves_icall_System_ConsoleDriver_GetTtySize (HANDLE handle, gint32 *width, gint32 *height)
+{
+       return FALSE;
+}
+
 #else
+static struct termios initial_attr;
+
+MonoBoolean
+ves_icall_System_ConsoleDriver_Isatty (HANDLE handle)
+{
+       MONO_ARCH_SAVE_REGS;
+
        return isatty (GPOINTER_TO_INT (handle));
-#endif
 }
 
 static MonoBoolean
 set_property (gint property, gboolean value)
 {
-#ifdef PLATFORM_WIN32
-       return FALSE;
-#else
        struct termios attr;
        gboolean callset = FALSE;
        gboolean check;
@@ -77,7 +127,6 @@ set_property (gint property, gboolean value)
                return FALSE;
 
        return TRUE;
-#endif
 }
 
 MonoBoolean
@@ -95,9 +144,6 @@ ves_icall_System_ConsoleDriver_SetBreak (MonoBoolean want_break)
 gint32
 ves_icall_System_ConsoleDriver_InternalKeyAvailable (gint32 timeout)
 {
-#ifdef PLATFORM_WIN32
-       return FALSE;
-#else
        fd_set rfds;
        struct timeval tv;
        struct timeval *tvptr;
@@ -128,14 +174,11 @@ ves_icall_System_ConsoleDriver_InternalKeyAvailable (gint32 timeout)
        }
 
        return (ret > 0) ? ret : 0;
-#endif
 }
 
 static void
 tty_teardown (void)
 {
-#ifdef PLATFORM_WIN32
-#else
        MONO_ARCH_SAVE_REGS;
 
        if (!setup_finished)
@@ -149,23 +192,74 @@ tty_teardown (void)
 
        tcflush (STDIN_FILENO, TCIFLUSH);
        tcsetattr (STDIN_FILENO, TCSANOW, &initial_attr);
+       set_property (ECHO, TRUE);
        setup_finished = FALSE;
-#endif
+}
+
+static void
+do_console_cancel_event (void)
+{
+       static MonoClassField *cancel_handler_field;
+       MonoDomain *domain = mono_domain_get ();
+       MonoClass *klass;
+       MonoDelegate *load_value;
+       MonoMethod *method;
+       MonoMethodMessage *msg;
+       MonoMethod *im;
+
+       if (!domain->domain)
+               return;
+
+       klass = mono_class_from_name (mono_defaults.corlib, "System", "Console");
+       if (klass == NULL)
+               return;
+
+       if (cancel_handler_field == NULL) {
+               cancel_handler_field = mono_class_get_field_from_name (klass, "cancel_handler");
+               g_assert (cancel_handler_field);
+       }
+
+       mono_field_static_get_value (mono_class_vtable (domain, klass), cancel_handler_field, &load_value);
+       if (load_value == NULL)
+               return;
+
+       klass = load_value->object.vtable->klass;
+       method = mono_class_get_method_from_name (klass, "BeginInvoke", -1);
+       g_assert (method != NULL);
+       im = mono_get_delegate_invoke (method->klass);
+       msg = mono_method_call_message_new (method, NULL, im, NULL, NULL);
+       mono_thread_pool_add ((MonoObject *) load_value, msg, NULL, NULL);
+}
+
+static gboolean in_sigint;
+static void
+sigint_handler (int signo)
+{
+       MONO_ARCH_SAVE_REGS;
+
+       if (in_sigint)
+               return;
+
+       in_sigint = TRUE;
+       do_console_cancel_event ();
+       in_sigint = FALSE;
 }
 
 MonoBoolean
-ves_icall_System_ConsoleDriver_TtySetup (MonoString *teardown)
+ves_icall_System_ConsoleDriver_TtySetup (MonoString *teardown, char *verase, char *vsusp, char*intr)
 {
-#ifdef PLATFORM_WIN32
-       return FALSE;
-#else
        struct termios attr;
        
        MONO_ARCH_SAVE_REGS;
 
+
+       *verase = '\0';
+       *vsusp = '\0';
+       *intr = '\0';
        if (tcgetattr (STDIN_FILENO, &initial_attr) == -1)
                return FALSE;
 
+       /* TODO: handle SIGTSTP - Ctrl-Z */
        attr = initial_attr;
        attr.c_lflag &= ~ICANON;
        attr.c_cc [VMIN] = 1;
@@ -173,6 +267,14 @@ ves_icall_System_ConsoleDriver_TtySetup (MonoString *teardown)
        if (tcsetattr (STDIN_FILENO, TCSANOW, &attr) == -1)
                return FALSE;
 
+       *verase = initial_attr.c_cc [VERASE];
+       *vsusp = initial_attr.c_cc [VSUSP];
+       *intr = initial_attr.c_cc [VINTR];
+       /* If initialized from another appdomain... */
+       if (setup_finished)
+               return TRUE;
+
+       signal (SIGINT, sigint_handler);
        setup_finished = TRUE;
        if (!atexit_called) {
                if (teardown != NULL)
@@ -182,6 +284,29 @@ ves_icall_System_ConsoleDriver_TtySetup (MonoString *teardown)
        }
 
        return TRUE;
+}
+
+MonoBoolean
+ves_icall_System_ConsoleDriver_GetTtySize (HANDLE handle, gint32 *width, gint32 *height)
+{
+#ifdef TIOCGWINSZ
+       struct winsize ws;
+       int res;
+
+       MONO_ARCH_SAVE_REGS;
+
+       res = ioctl (GPOINTER_TO_INT (handle), TIOCGWINSZ, &ws);
+
+       if (!res) {
+               *width = ws.ws_col;
+               *height = ws.ws_row;
+               return TRUE;
+       }
+       else
+               return FALSE;
+#else
+       return FALSE;
 #endif
 }
 
+#endif /* !PLATFORM_WIN32 */