From 09644e075a8dc2329f74321c9335b07267f76a10 Mon Sep 17 00:00:00 2001
From: jacob <jacob@cda61777-01e9-0310-a592-d414129be87e>
Date: Tue, 16 Jan 2007 20:54:58 +0000
Subject: [PATCH] At least, I have the technology to fix `beepind-win2k'.
 Tested on Win98, Win2K, and WinXP.

git-svn-id: svn://svn.tartarus.org/sgt/putty@7119 cda61777-01e9-0310-a592-d414129be87e
---
 Recipe           |  2 ++
 windows/window.c | 58 ++++++++++++++++++++++++++++++++++++++++++++++++++++----
 2 files changed, 56 insertions(+), 4 deletions(-)

diff --git a/Recipe b/Recipe
index 416acc9c..5c58d496 100644
--- a/Recipe
+++ b/Recipe
@@ -222,7 +222,9 @@ CFLAGS += -DMACOSX
 !begin cygwin vars
 # _WIN32_IE is required to expose identifiers that only make sense on
 # systems with IE5+ installed, such as some arguments to SHGetFolderPath().
+# WINVER etc perform a similar function for FlashWindowEx().
 CFLAGS += -D_WIN32_IE=0x0500
+CFLAGS += -DWINVER=0x0500 -D_WIN32_WINDOWS=0x0410 -D_WIN32_WINNT=0x0500
 !end
 
 # ------------------------------------------------------------
diff --git a/windows/window.c b/windows/window.c
index c86b14b5..f49e3da6 100644
--- a/windows/window.c
+++ b/windows/window.c
@@ -86,6 +86,7 @@ static void another_font(int);
 static void deinit_fonts(void);
 static void set_input_locale(HKL);
 static void update_savedsess_menu(void);
+static void init_flashwindow(void);
 
 static int is_full_screen(void);
 static void make_full_screen(void);
@@ -350,6 +351,8 @@ int WINAPI WinMain(HINSTANCE inst, HINSTANCE prev, LPSTR cmdline, int show)
 
     init_help();
 
+    init_flashwindow();
+
     /*
      * Process the command line.
      */
@@ -4997,10 +5000,41 @@ void modalfatalbox(char *fmt, ...)
     cleanup_exit(1);
 }
 
+typedef BOOL (WINAPI *p_FlashWindowEx_t)(PFLASHWINFO);
+static p_FlashWindowEx_t p_FlashWindowEx = NULL;
+
+static void init_flashwindow(void)
+{
+    HMODULE user32_module = LoadLibrary("USER32.DLL");
+    if (user32_module) {
+	p_FlashWindowEx = (p_FlashWindowEx_t)
+	    GetProcAddress(user32_module, "FlashWindowEx");
+    }
+}
+
+static BOOL flash_window_ex(DWORD dwFlags, UINT uCount, DWORD dwTimeout)
+{
+    if (p_FlashWindowEx) {
+	FLASHWINFO fi;
+	fi.cbSize = sizeof(fi);
+	fi.hwnd = hwnd;
+	fi.dwFlags = dwFlags;
+	fi.uCount = uCount;
+	fi.dwTimeout = dwTimeout;
+	return (*p_FlashWindowEx)(&fi);
+    }
+    else
+	return FALSE; /* shrug */
+}
+
 static void flash_window(int mode);
 static long next_flash;
 static int flashing = 0;
 
+/*
+ * Timer for platforms where we must maintain window flashing manually
+ * (e.g., Win95).
+ */
 static void flash_window_timer(void *ctx, long now)
 {
     if (flashing && now - next_flash >= 0) {
@@ -5017,21 +5051,37 @@ static void flash_window(int mode)
     if ((mode == 0) || (cfg.beep_ind == B_IND_DISABLED)) {
 	/* stop */
 	if (flashing) {
-	    FlashWindow(hwnd, FALSE);
 	    flashing = 0;
+	    if (p_FlashWindowEx)
+		flash_window_ex(FLASHW_STOP, 0, 0);
+	    else
+		FlashWindow(hwnd, FALSE);
 	}
 
     } else if (mode == 2) {
 	/* start */
 	if (!flashing) {
 	    flashing = 1;
-	    FlashWindow(hwnd, TRUE);
-	    next_flash = schedule_timer(450, flash_window_timer, hwnd);
+	    if (p_FlashWindowEx) {
+		/* For so-called "steady" mode, we use uCount=2, which
+		 * seems to be the traditional number of flashes used
+		 * by user notifications (e.g., by Explorer).
+		 * uCount=0 appears to enable continuous flashing, per
+		 * "flashing" mode, although I haven't seen this
+		 * documented. */
+		flash_window_ex(FLASHW_ALL | FLASHW_TIMER,
+				(cfg.beep_ind == B_IND_FLASH ? 0 : 2),
+				0 /* system cursor blink rate */);
+		/* No need to schedule timer */
+	    } else {
+		FlashWindow(hwnd, TRUE);
+		next_flash = schedule_timer(450, flash_window_timer, hwnd);
+	    }
 	}
 
     } else if ((mode == 1) && (cfg.beep_ind == B_IND_FLASH)) {
 	/* maintain */
-	if (flashing) {
+	if (flashing && !p_FlashWindowEx) {
 	    FlashWindow(hwnd, TRUE);	/* toggle */
 	    next_flash = schedule_timer(450, flash_window_timer, hwnd);
 	}
-- 
2.11.0