plomlompom.com Git - plomrogue2/blob - 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 #self.size.y * self.size.x
 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         circle_in_map = True
 364         distance = 1
 365         yx = YX(yx.y, yx.x)
 366         while distance <= self.radius:
 367             yx = self.basic_circle_out_move(yx, 'RIGHT')
 368             for dir_i in range(len(self.circle_out_directions)):
 369                 for dir_progress in range(distance):
 370                     direction = self.circle_out_directions[dir_i]
 371                     yx = self.circle_out_move(yx, direction)
 372                     source_yxyx = self.source_yxyx(yx)
 373                     f(yx, source_yxyx, distance, dir_i, dir_progress)
 374             distance += 1
 375
 376
 377
 378 class FovMapHex(FovMap):
 379     circle_out_directions = ('DOWNLEFT', 'LEFT', 'UPLEFT',
 380                              'UPRIGHT', 'RIGHT', 'DOWNRIGHT')
 381
 382     def circle_out_move(self, yx, direction):
 383         return self.basic_circle_out_move(yx, direction)
 384
 385
 386
 387 class FovMapSquare(FovMap):
 388     circle_out_directions = (('DOWN', 'LEFT'), ('LEFT', 'UP'),
 389                              ('UP', 'RIGHT'), ('RIGHT', 'DOWN'))
 390
 391     def circle_out_move(self, yx, direction):
 392         yx = self.basic_circle_out_move(yx, direction[0])
 393         return self.basic_circle_out_move(yx, direction[1])