home · contact · privacy
Fix broken map geometry commandeering.
[plomrogue2] / plomrogue / mapping.py
1 import collections
2 from plomrogue.errors import ArgError
3
4
5
6 class YX(collections.namedtuple('YX', ('y', 'x'))):
7
8     def __add__(self, other):
9         return YX(self.y + other.y, self.x + other.x)
10
11     def __sub__(self, other):
12         return YX(self.y - other.y, self.x - other.x)
13
14     def __str__(self):
15         return 'Y:%s,X:%s' % (self.y, self.x)
16
17
18
19 class MapGeometry():
20
21     def __init__(self, size):
22         self.size = size
23         self.neighbors_i = {}
24
25     def get_directions(self):
26         directions = []
27         prefix = 'move__'
28         for name in dir(self):
29             if name[:len(prefix)] == prefix:
30                 directions += [name[len(prefix):]]
31         return directions
32
33     def get_neighbors_yxyx(self, yxyx):
34         neighbors = {}
35         for direction in self.get_directions():
36             neighbors[direction] = self.move_yxyx(yxyx, direction)
37         return neighbors
38
39     def get_neighbors_yx(self, pos):
40         neighbors = {}
41         for direction in self.get_directions():
42             neighbors[direction] = self.move_yx(pos, direction)
43         return neighbors
44
45     def get_neighbors_i(self, i):
46         if i in self.neighbors_i:
47             return self.neighbors_i[i]
48         pos = YX(i // self.size.x, i % self.size.x)
49         neighbors_pos = self.get_neighbors_yx(pos)
50         neighbors_i = {}
51         for direction in neighbors_pos:
52             pos = neighbors_pos[direction]
53             if pos is None:
54                 neighbors_i[direction] = None
55             else:
56                 neighbors_i[direction] = pos.y * self.size.x + pos.x
57         self.neighbors_i[i] = neighbors_i
58         return self.neighbors_i[i]
59
60     def move_yx(self, start_yx, direction, check=True):
61         mover = getattr(self, 'move__' + direction)
62         target = mover(start_yx)
63         # TODO refactor with SourcedMap.inside?
64         if target.y < 0 or target.x < 0 or \
65            target.y >= self.size.y or target.x >= self.size.x:
66             return None
67         return target
68
69     def move_yxyx(self, start_yxyx, direction):
70         mover = getattr(self, 'move__' + direction)
71         start_yx = self.undouble_yxyx(*start_yxyx)
72         target_yx = mover(start_yx)
73         return self.double_yx(target_yx)
74
75     def double_yx(self, absolute_yx):
76         big_y = absolute_yx.y // self.size.y
77         little_y = absolute_yx.y % self.size.y
78         big_x = absolute_yx.x // self.size.x
79         little_x = absolute_yx.x % self.size.x
80         return YX(big_y, big_x), YX(little_y, little_x)
81
82     def undouble_yxyx(self, big_yx, little_yx):
83         y = big_yx.y * self.size.y + little_yx.y
84         x = big_yx.x * self.size.x + little_yx.x
85         return YX(y, x)
86
87
88
89 class MapGeometryWithLeftRightMoves(MapGeometry):
90
91     def move__LEFT(self, start_pos):
92         return YX(start_pos.y, start_pos.x - 1)
93
94     def move__RIGHT(self, start_pos):
95         return YX(start_pos.y, start_pos.x + 1)
96
97
98
99 class MapGeometrySquare(MapGeometryWithLeftRightMoves):
100
101     def __init__(self, *args, **kwargs):
102         super().__init__(*args, **kwargs)
103         self.fov_map_class = FovMapSquare
104
105     def define_segment(self, source_center, radius):
106         source_center = self.undouble_yxyx(*source_center)
107         size = YX(2 * radius + 1, 2 * radius + 1)
108         offset = YX(source_center.y - radius, source_center.x - radius)
109         center = YX(radius, radius)
110         return size, offset, center
111
112     def move__UP(self, start_pos):
113         return YX(start_pos.y - 1, start_pos.x)
114
115     def move__DOWN(self, start_pos):
116         return YX(start_pos.y + 1, start_pos.x)
117
118
119 class MapGeometryHex(MapGeometryWithLeftRightMoves):
120
121     def __init__(self, *args, **kwargs):
122         super().__init__(*args, **kwargs)
123         self.fov_map_class = FovMapHex
124
125     def define_segment(self, source_center, radius):
126         source_center = self.undouble_yxyx(*source_center)
127         indent = 1 if (source_center.y % 2) else 0
128         size = YX(2 * radius + 1 + indent, 2 * radius + 1)
129         offset = YX(source_center.y - radius - indent, source_center.x - radius)
130         center = YX(radius + indent, radius)
131         return size, offset, center
132
133     def move__UPLEFT(self, start_pos):
134         start_indented = start_pos.y % 2
135         if start_indented:
136             return YX(start_pos.y - 1, start_pos.x)
137         else:
138             return YX(start_pos.y - 1, start_pos.x - 1)
139
140     def move__UPRIGHT(self, start_pos):
141         start_indented = start_pos.y % 2
142         if start_indented:
143             return YX(start_pos.y - 1, start_pos.x + 1)
144         else:
145             return YX(start_pos.y - 1, start_pos.x)
146
147     def move__DOWNLEFT(self, start_pos):
148         start_indented = start_pos.y % 2
149         if start_indented:
150             return YX(start_pos.y + 1, start_pos.x)
151         else:
152             return YX(start_pos.y + 1, start_pos.x - 1)
153
154     def move__DOWNRIGHT(self, start_pos):
155         start_indented = start_pos.y % 2
156         if start_indented:
157             return YX(start_pos.y + 1, start_pos.x + 1)
158         else:
159             return YX(start_pos.y + 1, start_pos.x)
160
161
162
163 class Map():
164
165     def __init__(self, map_geometry):
166         self.geometry = map_geometry
167         self.terrain = '.' * self.size_i
168
169     def __getitem__(self, yx):
170         return self.terrain[self.get_position_index(yx)]
171
172     def __setitem__(self, yx, c):
173         pos_i = self.get_position_index(yx)
174         if type(c) == str:
175             self.terrain = self.terrain[:pos_i] + c + self.terrain[pos_i + 1:]
176         else:
177             self.terrain[pos_i] = c
178
179     def __iter__(self):
180         """Iterate over YX position coordinates."""
181         for y in range(self.geometry.size.y):
182             for x in range(self.geometry.size.x):
183                 yield YX(y, x)
184
185     @property
186     def size_i(self):
187         return self.geometry.size.y * self.geometry.size.x
188
189     def set_line(self, y, line):
190         height_map = self.geometry.size.y
191         width_map = self.geometry.size.x
192         if y >= height_map:
193             raise ArgError('too large row number %s' % y)
194         width_line = len(line)
195         if width_line != width_map:
196             raise ArgError('map line width %s unequal map width %s' % (width_line, width_map))
197         self.terrain = self.terrain[:y * width_map] + line +\
198             self.terrain[(y + 1) * width_map:]
199
200     def get_position_index(self, yx):
201         return yx.y * self.geometry.size.x + yx.x
202
203     def lines(self):
204         width = self.geometry.size.x
205         for y in range(self.geometry.size.y):
206             yield (y, self.terrain[y * width:(y + 1) * width])
207
208
209
210 class SourcedMap(Map):
211
212     def __init__(self, source_maps, source_center, radius, get_map):
213         self.source_maps = source_maps
214         self.radius = radius
215         example_map = get_map(YX(0, 0))
216         self.source_geometry = example_map.geometry
217         size, self.offset, self.center = \
218             self.source_geometry.define_segment(source_center, radius)
219         self.geometry = self.source_geometry.__class__(size)
220         for yx in self:
221             big_yx, _ = self.source_yxyx(yx)
222             get_map(big_yx)
223
224     def source_yxyx(self, yx):
225         absolute_yx = yx + self.offset
226         big_yx, little_yx = self.source_geometry.double_yx(absolute_yx)
227         return big_yx, little_yx
228
229     def target_yx(self, big_yx, little_yx, check=False):
230         target_yx = self.source_geometry.undouble_yxyx(big_yx, little_yx) - self.offset
231         if check and not self.inside(target_yx):
232             return False
233         return target_yx
234
235     def inside(self, yx):
236         if yx.y < 0 or yx.x < 0 or \
237            yx.y >= self.geometry.size.y or yx.x >= self.geometry.size.x:
238             return False
239         return True
240
241
242
243 class DijkstraMap(SourcedMap):
244
245     def __init__(self, *args, **kwargs):
246         super().__init__(*args, **kwargs)
247         self.terrain = [255] * self.size_i
248         self[self.center] = 0
249         shrunk = True
250         source_map_segment = ''
251         for yx in self:
252             big_yx, little_yx = self.source_yxyx(yx)
253             source_map_segment += self.source_maps[big_yx][little_yx]
254         while shrunk:
255             shrunk = False
256             for i in range(self.size_i):
257                 if source_map_segment[i] == 'X':
258                     continue
259                 neighbors = self.geometry.get_neighbors_i(i)
260                 for direction in [d for d in neighbors if neighbors[d]]:
261                     j = neighbors[direction]
262                     if self.terrain[j] < self.terrain[i] - 1:
263                         self.terrain[i] = self.terrain[j] + 1
264                         shrunk = True
265         # print('DEBUG Dijkstra')
266         # line_to_print = []
267         # x = 0
268         # for n in self.terrain:
269         #     line_to_print += ['%3s' % n]
270         #     x += 1
271         #     if x >= self.size.x:
272         #         x = 0
273         #         print(' '.join(line_to_print))
274         #         line_to_print = []
275
276
277
278 class FovMap(SourcedMap):
279     # TODO: player visibility asymmetrical (A can see B when B can't see A):
280     # does this make sense, or not?
281
282     def __init__(self, *args, **kwargs):
283         super().__init__(*args, **kwargs)
284         self.terrain = '?' * self.size_i
285         self[self.center] = '.'
286         self.shadow_cones = []
287         self.circle_out(self.center, self.shadow_process)
288
289     def throws_shadow(self, big_yx, little_yx):
290         return self.source_maps[big_yx][little_yx] == 'X'
291
292     def shadow_process(self, yx, source_yxyx, distance_to_center, dir_i, dir_progress):
293         # Possible optimization: If no shadow_cones yet and self[yx] == '.',
294         # skip all.
295         CIRCLE = 360  # Since we'll float anyways, number is actually arbitrary.
296
297         def correct_arm(arm):
298             if arm > CIRCLE:
299                 arm -= CIRCLE
300             return arm
301
302         def in_shadow_cone(new_cone):
303             for old_cone in self.shadow_cones:
304                 if old_cone[0] <= new_cone[0] and \
305                    new_cone[1] <= old_cone[1]:
306                     return True
307                 # We might want to also shade tiles whose middle arm is inside a
308                 # shadow cone for a darker FOV. Note that we then could not for
309                 # optimization purposes rely anymore on the assumption that a
310                 # shaded tile cannot add growth to existing shadow cones.
311             return False
312
313         def merge_cone(new_cone):
314             import math
315             for old_cone in self.shadow_cones:
316                 if new_cone[0] < old_cone[0] and \
317                     (new_cone[1] > old_cone[0] or
318                      math.isclose(new_cone[1], old_cone[0])):
319                     old_cone[0] = new_cone[0]
320                     return True
321                 if new_cone[1] > old_cone[1] and \
322                     (new_cone[0] < old_cone[1] or
323                      math.isclose(new_cone[0], old_cone[1])):
324                     old_cone[1] = new_cone[1]
325                     return True
326             return False
327
328         def eval_cone(cone):
329             if in_shadow_cone(cone):
330                 return
331             self[yx] = '.'
332             if self.throws_shadow(*source_yxyx):
333                 unmerged = True
334                 while merge_cone(cone):
335                     unmerged = False
336                 if unmerged:
337                     self.shadow_cones += [cone]
338
339         step_size = (CIRCLE / len(self.circle_out_directions)) / distance_to_center
340         number_steps = dir_i * distance_to_center + dir_progress
341         left_arm = correct_arm(step_size / 2 + step_size * number_steps)
342         right_arm = correct_arm(left_arm + step_size)
343
344         # Optimization potential: left cone could be derived from previous
345         # right cone. Better even: Precalculate all cones.
346         if right_arm < left_arm:
347             eval_cone([left_arm, CIRCLE])
348             eval_cone([0, right_arm])
349         else:
350             eval_cone([left_arm, right_arm])
351
352     def basic_circle_out_move(self, pos, direction):
353         mover = getattr(self.geometry, 'move__' + direction)
354         return mover(pos)
355
356     def circle_out(self, yx, f):
357         # Optimization potential: Precalculate movement positions. (How to check
358         # circle_in_map then?)
359         # Optimization potential: Precalculate what tiles are shaded by what tile
360         # and skip evaluation of already shaded tile. (This only works if tiles
361         # shading implies they completely lie in existing shades; otherwise we
362         # would lose shade growth through tiles at shade borders.)
363         distance = 1
364         yx = YX(yx.y, yx.x)
365         while distance <= self.radius:
366             yx = self.basic_circle_out_move(yx, 'RIGHT')
367             for dir_i in range(len(self.circle_out_directions)):
368                 for dir_progress in range(distance):
369                     direction = self.circle_out_directions[dir_i]
370                     yx = self.circle_out_move(yx, direction)
371                     source_yxyx = self.source_yxyx(yx)
372                     f(yx, source_yxyx, distance, dir_i, dir_progress)
373             distance += 1
374
375
376
377 class FovMapHex(FovMap):
378     circle_out_directions = ('DOWNLEFT', 'LEFT', 'UPLEFT',
379                              'UPRIGHT', 'RIGHT', 'DOWNRIGHT')
380
381     def circle_out_move(self, yx, direction):
382         return self.basic_circle_out_move(yx, direction)
383
384
385
386 class FovMapSquare(FovMap):
387     circle_out_directions = (('DOWN', 'LEFT'), ('LEFT', 'UP'),
388                              ('UP', 'RIGHT'), ('RIGHT', 'DOWN'))
389
390     def circle_out_move(self, yx, direction):
391         yx = self.basic_circle_out_move(yx, direction[0])
392         return self.basic_circle_out_move(yx, direction[1])