budget: Avoid unnecessary work

Ship, plane and land unit repairs depend on and change the state of
the sector.  To predict repairs, we need to predict the state of the
sector before repairs.  The obvious way to do that is to simulate the
sector update and all ship, plane and land unit updates there in the
correct order.

Until recently, we simulated only own sectors, ships, planes and land
units.  Wrong when foreign sectors, ships, planes or land units are
involved.  The fix (commit 70f6964) makes budget simulate all
countries.  Correct, but does much more work than necessary.  With a
little effort, we can track what needs to be simulated.

Use the bp map for tracking.  We need to mark the player's sectors and
all sectors where he has ships, planes or land units.  Do the former
in bp_alloc(), and the latter in prep_ships(), prep_planes(),
prep_lands().

Skip sectors not so marked.  This requires delaying prepare_sects()
until after prep_ships(), prep_planes(), prep_lands().  Their order
doesn't actually matter: prep_ships() & friends only spend money, and
nothing in preparation depends on whether the country is still
solvent.

Skip ships, planes and land units in sectors not so marked.

This speeds up budget by around a third in my testing, more for small
countries.  Roughly 15% slower than before the fix for repairs abroad.
The update has to do a bit more work than before, but the performance
difference is lost in the noise.

Signed-off-by: Markus Armbruster <armbru@pond.sub.org>

src/lib/update/plane.c

@@ -48,7 +48,7 @@ static void upd_plane(struct plnstr *, int, struct bp *, int);
 static void planerepair(struct plnstr *, struct natstr *, struct bp *,
 			int, struct budget *);
 
-void prep_planes(int etus)
+void prep_planes(int etus, struct bp *bp)
 {
     int mil, i;
     double mil_pay;
@@ -64,6 +64,7 @@ void prep_planes(int etus)
 	    continue;
 	}
 
+	bp_consider_unit(bp, (struct empobj *)pp);
 	mil = plchr[pp->pln_type].pl_mat[I_MILIT];
 	/* flight pay is 5x the pay received by other military */
 	mil_pay = mil * etus * money_mil * 5;
@@ -82,6 +83,8 @@ prod_plane(int etus, struct bp *bp, int buildem)
     for (i = 0; (pp = getplanep(i)); i++) {
 	if (pp->pln_own == 0)
 	    continue;
+	if (bp_skip_unit(bp, (struct empobj *)pp))
+	    continue;
 	upd_plane(pp, etus, bp, buildem);
     }
 }