Interplanetary code is folded into a single thread

All player input code is now brokered through DoInput


git-svn-id: svn://svn.code.sf.net/p/sc2/code/trunk@1321 8092fc87-c524-0410-9efc-e669fe64eaf9

sc2/ChangeLog

@@ -1,4 +1,6 @@
 Changes towards version 0.4:
+- Input code refactoring, phase 2: All player input is brokered by 
+  DoInput -Michael
 - Updated .cvsignore commands, from Nic
 - Fixed a keyrepeatbug from when the player cancels out of the
   Starmap in IP -Michael

sc2/src/sc2code/gameopt.c

@@ -1323,8 +1323,16 @@ PickGame (PMENU_STATE pMS)
 
 		if (pSolarSysState)
 		{
+			/* We're in interplanetary, so we let the IP
+			 * functions know we're ready to draw stuff
+			 * again and then update the frame twice; once
+			 * for the screen transition, and once to draw
+			 * the ships afterwards. */
 			--pSolarSysState->MenuState.Initialized;
 			pSolarSysState->PauseRotate = 0;
+			IP_frame ();
+			IP_frame ();
+
 
 			if (CommData.ConversationPhrases == 0 && !PLRPlaying ((MUSIC_REF)~0))
 			{

sc2/src/sc2code/planets/planets.h

@@ -203,6 +203,8 @@ extern void ZoomSystem (void);
 extern void LoadSolarSys (void);
 extern void InitLander (BYTE LanderFlags);
 extern BOOLEAN ValidateOrbits (void);
+extern void IP_reset (void);
+extern void IP_frame (void);
 
 #endif /* _PLANETS_H */
 

sc2/src/sc2code/planets/pstarmap.c

@@ -1156,15 +1156,19 @@ DoStarMap (void)
 BOOLEAN
 DoFlagshipCommands (PMENU_STATE pMS)
 {
+	/* TODO: Make this carried cleanly by MENU_STATE structure */
+	// static DWORD NextTime;
 	if (!(pMS->Initialized & 1))
 	{
+		/* This has some dependency on the IPtask_func */
 		ChangeSolarSys ();
+		// NextTime = GetTimeCounter ();
 	}
 	else
 	{
 		BOOLEAN select = PulsedInputState.key[KEY_MENU_SELECT];
 		LockMutex (GraphicsLock);
-		while (*(volatile BYTE *)&pMS->CurState == 0
+		if (*(volatile BYTE *)&pMS->CurState == 0
 				&& (*(volatile SIZE *)&pMS->Initialized & 1)
 				&& !(GLOBAL (CurrentActivity)
 				& (START_ENCOUNTER | END_INTERPLANETARY
@@ -1172,8 +1176,8 @@ DoFlagshipCommands (PMENU_STATE pMS)
 				&& GLOBAL_SIS (CrewEnlisted) != (COUNT)~0)
 		{
 			UnlockMutex (GraphicsLock);
-			TaskSwitch ();
+			IP_frame ();
-			LockMutex (GraphicsLock);
+			return TRUE;
 		}
 		UnlockMutex (GraphicsLock);
 
@@ -1181,7 +1185,11 @@ DoFlagshipCommands (PMENU_STATE pMS)
 		{
 			BOOLEAN DoMenu;
 			BYTE NewState;
-			// For some reason, DoFlagshipCommands uses CurState a bit differently
+
+			/* If pMS->CurState == 0, then we're flying
+			 * around in interplanetary.  This needs to be
+			 * corrected for the MenuChooser, which thinks
+			 * that "0" is the first menu option */
 			pMS->CurState --;
 			DoMenu = DoMenuChooser (pMS, 
 				(BYTE)(pMS->Initialized <= 1 ? PM_STARMAP : PM_SCAN));

sc2/src/sc2code/planets/solarsys.c

@@ -337,7 +337,11 @@ FreeSolarSys (void)
 			FreePlanet ();
 		else
 		{			
-			ConcludeTask (pSolarSysState->MenuState.flash_task);
+			if (pSolarSysState->MenuState.flash_task != (Task)(~0))
+			{
+				fprintf (stderr, "DIAGNOSTIC: FreeSolarSys cancels a flash_task that wasn't the placeholder for IP flight\n");
+				ConcludeTask (pSolarSysState->MenuState.flash_task);
+			}
 			pSolarSysState->MenuState.flash_task = 0;
 			LockMutex (GraphicsLock);
 			if (!(GLOBAL (CurrentActivity) & (CHECK_ABORT | CHECK_LOAD)))
@@ -994,203 +998,202 @@ ScaleSystem (void)
 #endif
 }
 
-int IPtask_func(void* data)
+/* Constants and routines for handling interplanetary play.  TODO:
-{
+   this is NOT INSTANTIABLE; only one IP task may be active at any
+   given time.  --Michael */
+
 #define IP_FRAME_RATE  (ONE_SECOND / 30)
-	DWORD NextTime;
-	Task task = (Task) data;
-	BOOLEAN cancel, select;
 
-	TaskSwitch ();
+static UWORD IP_input_state;
+static DWORD IP_next_time;
 
+void
+IP_reset (void)
+{
 	if (LastActivity != CHECK_LOAD)
 	{
-		cancel = select = FALSE;
+		IP_input_state = 0;
 	}
 	else
 	{
-		cancel = TRUE;
+		IP_input_state = 2;  /* CANCEL */
-		select = FALSE;
 	}
 
-	NextTime = GetTimeCounter ();
+	IP_next_time = GetTimeCounter ();
-	while (!Task_ReadState (task, TASK_EXIT))
+}
+
+void
+IP_frame (void)
+{
+	CONTEXT OldContext;
+	BOOLEAN InnerSystem;
+	RECT r;
+	BOOLEAN select, cancel;
+
+	InnerSystem = FALSE;
+	LockMutex (GraphicsLock);
+	if ((pSolarSysState->MenuState.Initialized > 1
+			|| (GLOBAL (CurrentActivity)
+			& (START_ENCOUNTER | END_INTERPLANETARY
+			| CHECK_ABORT | CHECK_LOAD))
+			|| GLOBAL_SIS (CrewEnlisted) == (COUNT)~0))
+
 	{
-		CONTEXT OldContext;
+		UnlockMutex (GraphicsLock);
-		BOOLEAN InnerSystem;
+		TaskSwitch ();
-		RECT r;
+		IP_input_state = 0;
-
+		IP_next_time = GetTimeCounter ();
-		InnerSystem = FALSE;
+		return;
-		LockMutex (GraphicsLock);
+	}
-		while ((pSolarSysState->MenuState.Initialized > 1
-				|| (GLOBAL (CurrentActivity)
-				& (START_ENCOUNTER | END_INTERPLANETARY
-				| CHECK_ABORT | CHECK_LOAD))
-				|| GLOBAL_SIS (CrewEnlisted) == (COUNT)~0)
-				&& !Task_ReadState (task, TASK_EXIT))
-		{
-			select = cancel = FALSE;
-			UnlockMutex (GraphicsLock);
-			TaskSwitch ();
-			LockMutex (GraphicsLock);
-			NextTime = GetTimeCounter ();
-		}
-
-		if (Task_ReadState (task, TASK_EXIT))
-		{
-			UnlockMutex (GraphicsLock);
-			break;
-		}
-
-		OldContext = SetContext (StatusContext);
-		if (pSolarSysState->MenuState.CurState
-				|| pSolarSysState->MenuState.Initialized == 0)
-		{
-			select = cancel = FALSE;
-			if (draw_sys_flags & DRAW_REFRESH)
-				goto TheMess;
-		}
-		else
-		{
-TheMess:
-			// this is a mess:
-			// we have to treat things slightly differently depending on the
-			// situation (note that DRAW_REFRESH means we had gone to the
-			// menu)
-			InnerSystem = (BOOLEAN) (pSolarSysState->pBaseDesc !=
-					pSolarSysState->PlanetDesc);
-			if (InnerSystem)
-			{
-				SetTransitionSource (NULL);
-				BatchGraphics ();
-				if (draw_sys_flags & DRAW_REFRESH)
-				{
-					InnerSystem = FALSE;
-					DrawSystem (pSolarSysState->pBaseDesc->pPrevDesc->radius, TRUE);
-				}
-			}
-			else if (draw_sys_flags & DRAW_REFRESH)
-			{
-				SetTransitionSource (NULL);
-				BatchGraphics ();
-				DrawSystem (pSolarSysState->SunDesc[0].radius, FALSE);
-			}
-			
-			UndrawShip ();
-			if (pSolarSysState->MenuState.Initialized != 1)
-				select = cancel = FALSE;
-		}
-		
-		if (old_radius)
-			ScaleSystem ();
-
-		BatchGraphics ();
-		if (!(draw_sys_flags & DRAW_REFRESH)) // don't repair from Extra or draw ship if forcing repair
-		{
-			CONTEXT OldContext;
 	
-			OldContext = SetContext (SpaceContext);
+	cancel = ((IP_input_state) >> 1) & 1;
-			GetContextClipRect (&r);
+	select = (IP_input_state) & 1;
-			DrawFromExtraScreen (&r);
+	OldContext = SetContext (StatusContext);
-			SetContext (OldContext);
+	if (pSolarSysState->MenuState.CurState
-
+			|| pSolarSysState->MenuState.Initialized == 0)
-			// Don't redraw if entering/exiting inner system
+	{
-			// this screws up ScreenTransition by leaving an image of the
+		select = cancel = FALSE;
-			// ship in the ExtraScreen (which we use for repair)
+		if (draw_sys_flags & DRAW_REFRESH)
-			if (pSolarSysState->MenuState.CurState == 0
+			goto TheMess;
-					&& (InnerSystem ^ (BOOLEAN)(pSolarSysState->pBaseDesc != pSolarSysState->PlanetDesc)))
+	}
-				;
+	else
-			else
+	{
-				RedrawQueue (FALSE);
+	TheMess:
-		}
+		// this is a mess:
-		
+		// we have to treat things slightly differently depending on the
+		// situation (note that DRAW_REFRESH means we had gone to the
+		// menu)
+		InnerSystem = (BOOLEAN) (pSolarSysState->pBaseDesc !=
+					 pSolarSysState->PlanetDesc);
 		if (InnerSystem)
 		{
-			if (pSolarSysState->pBaseDesc == pSolarSysState->PlanetDesc)
+			SetTransitionSource (NULL);
+			BatchGraphics ();
+			if (draw_sys_flags & DRAW_REFRESH)
 			{
-				// transition screen if we left inner system (if going
+				InnerSystem = FALSE;
-				// from outer to inner, ScreenTransition happens elsewhere)
+				DrawSystem (pSolarSysState->pBaseDesc->pPrevDesc->radius, TRUE);
-				r.corner.x = SIS_ORG_X;
-				r.corner.y = SIS_ORG_Y;
-				r.extent.width = SIS_SCREEN_WIDTH;
-				r.extent.height = SIS_SCREEN_HEIGHT;
-				ScreenTransition (3, &r);
 			}
-			UnbatchGraphics ();
 		}
 		else if (draw_sys_flags & DRAW_REFRESH)
 		{
-			// must set rect for LoadInto... below
+			SetTransitionSource (NULL);
+			BatchGraphics ();
+			DrawSystem (pSolarSysState->SunDesc[0].radius, FALSE);
+		}
+		
+		UndrawShip ();
+		if (pSolarSysState->MenuState.Initialized != 1)
+			select = cancel = FALSE;
+	}
+	
+	if (old_radius)
+		ScaleSystem ();
+	
+	BatchGraphics ();
+	if (!(draw_sys_flags & DRAW_REFRESH)) // don't repair from Extra or draw ship if forcing repair
+	{
+		CONTEXT OldContext;
+		
+		OldContext = SetContext (SpaceContext);
+		GetContextClipRect (&r);
+		DrawFromExtraScreen (&r);
+		SetContext (OldContext);
+		
+		// Don't redraw if entering/exiting inner system
+		// this screws up ScreenTransition by leaving an image of the
+		// ship in the ExtraScreen (which we use for repair)
+		if (pSolarSysState->MenuState.CurState == 0
+		    && (InnerSystem ^ (BOOLEAN)(pSolarSysState->pBaseDesc != pSolarSysState->PlanetDesc)))
+			;
+		else
+			RedrawQueue (FALSE);
+	}
+	
+	if (InnerSystem)
+	{
+		if (pSolarSysState->pBaseDesc == pSolarSysState->PlanetDesc)
+		{
+			// transition screen if we left inner system (if going
+			// from outer to inner, ScreenTransition happens elsewhere)
 			r.corner.x = SIS_ORG_X;
 			r.corner.y = SIS_ORG_Y;
 			r.extent.width = SIS_SCREEN_WIDTH;
 			r.extent.height = SIS_SCREEN_HEIGHT;
 			ScreenTransition (3, &r);
-			UnbatchGraphics ();
 		}
-		
 		UnbatchGraphics ();
-		
+	}
-		if (draw_sys_flags & UNBATCH_SYS)
+	else if (draw_sys_flags & DRAW_REFRESH)
-		{
+	{
-			// means we're forcing a redraw/transition from Init- & ChangeSolarSys
+		// must set rect for LoadInto... below
-			draw_sys_flags &= ~UNBATCH_SYS;
+		r.corner.x = SIS_ORG_X;
-			UnbatchGraphics ();
+		r.corner.y = SIS_ORG_Y;
-		}
+		r.extent.width = SIS_SCREEN_WIDTH;
-		
+		r.extent.height = SIS_SCREEN_HEIGHT;
-		// LoadInto Extra if we left inner system, or we forced a redraw
+		ScreenTransition (3, &r);
-		if ((InnerSystem && pSolarSysState->pBaseDesc == pSolarSysState->PlanetDesc)
+		UnbatchGraphics ();
-				|| (draw_sys_flags & DRAW_REFRESH))
+	}
-		{
+	
-			LoadIntoExtraScreen (&r);
+	UnbatchGraphics ();
-			draw_sys_flags &= ~DRAW_REFRESH;
+	
-		}
+	if (draw_sys_flags & UNBATCH_SYS)
-
+	{
-		SetContext (OldContext);
+		// means we're forcing a redraw/transition from Init- & ChangeSolarSys
-		UnlockMutex (GraphicsLock);
+		draw_sys_flags &= ~UNBATCH_SYS;
-
+		UnbatchGraphics ();
-		if (Task_ReadState (task, TASK_EXIT))
+	}
-		{
+	
-			break;
+	// LoadInto Extra if we left inner system, or we forced a redraw
-		}
+	if ((InnerSystem && pSolarSysState->pBaseDesc == pSolarSysState->PlanetDesc)
-
+	    || (draw_sys_flags & DRAW_REFRESH))
-		if (!cancel)
+	{
-		{
+		LoadIntoExtraScreen (&r);
-			SleepThreadUntil (NextTime + IP_FRAME_RATE);
+		draw_sys_flags &= ~DRAW_REFRESH;
-			NextTime = GetTimeCounter ();
+	}
-			if (pSolarSysState->MenuState.CurState
+	
-					|| pSolarSysState->MenuState.Initialized != 1)
+	SetContext (OldContext);
-				cancel = select = 0;
+	UnlockMutex (GraphicsLock);
-			else
+	
-			{
+	if (!cancel)
-				UpdateInputState ();
+	{
-				cancel = PulsedInputState.key[KEY_MENU_CANCEL];
+		SleepThreadUntil (IP_next_time + IP_FRAME_RATE);
-				select = PulsedInputState.key[KEY_MENU_SELECT];
+		IP_next_time = GetTimeCounter ();
-			}
+		if (pSolarSysState->MenuState.CurState
-			// JournalInput (InputState);
+		    || pSolarSysState->MenuState.Initialized != 1)
-		}
+			cancel = select = 0;
 		else
 		{
-			SuspendGameClock ();
+			/* Updating the input state is handled by
-
+			 * DoFlagshipCommands, which is running in
-			LockMutex (GraphicsLock);
+			 * parallel with us */
-			DrawStatusMessage (NULL_PTR);
+			// UpdateInputState ();
-			if (LastActivity == CHECK_LOAD)
+			cancel = PulsedInputState.key[KEY_MENU_CANCEL];
-				pSolarSysState->MenuState.CurState = (ROSTER + 1) + 1;
+			select = PulsedInputState.key[KEY_MENU_SELECT];
-			else
+			IP_input_state = (cancel << 1) | select;
-			{
-				UnlockMutex (GraphicsLock);
-				DrawMenuStateStrings (PM_STARMAP, STARMAP);
-				LockMutex (GraphicsLock);
-				pSolarSysState->MenuState.CurState = STARMAP + 1;
-			}
-			SetFlashRect ((PRECT)~0L, (FRAME)0);
-			FlushInput ();
-			UnlockMutex (GraphicsLock);
 		}
+		// JournalInput (InputState);
+	}
+	else
+	{
+		SuspendGameClock ();
+		
+		LockMutex (GraphicsLock);
+		DrawStatusMessage (NULL_PTR);
+		if (LastActivity == CHECK_LOAD)
+			pSolarSysState->MenuState.CurState = (ROSTER + 1) + 1;
+		else
+		{
+			UnlockMutex (GraphicsLock);
+			DrawMenuStateStrings (PM_STARMAP, STARMAP);
+			LockMutex (GraphicsLock);
+			pSolarSysState->MenuState.CurState = STARMAP + 1;
+			IP_input_state = 0;
+		}
+		SetFlashRect ((PRECT)~0L, (FRAME)0);
+		FlushInput ();
+		UnlockMutex (GraphicsLock);
 	}
-	FinishTask (task);
-	return(0);
 }
 
 static void
@@ -1273,9 +1276,13 @@ StartGroups:
 				
 			CheckIntersect (TRUE);
 			
+			IP_reset ();
+			pSolarSysState->MenuState.flash_task = (Task)(~0);
+			/*
 			pSolarSysState->MenuState.flash_task =
 					AssignTask (IPtask_func, 6144,
-					"flash solar system menu");
+					"interplanetary task");
+			*/
 			UnlockMutex (GraphicsLock);
 
 			if (!PLRPlaying ((MUSIC_REF)~0) && LastActivity != CHECK_LOAD)
@@ -1295,7 +1302,7 @@ StartGroups:
 					while (pSolarSysState->SunDesc[0].radius == (MAX_ZOOM_RADIUS << 1))
 					{
 						UnlockMutex (GraphicsLock);
-						TaskSwitch ();
+						IP_frame ();
 						LockMutex (GraphicsLock);
 					}
 					UnlockMutex (GraphicsLock);