plomlompom.com Git - plomrogue2/blob - plomrogue/game.py

   1 from plomrogue.errors import GameError, PlayError
   2 from plomrogue.io import GameIO
   3 from plomrogue.misc import quote
   4 from plomrogue.mapping import YX, MapGeometrySquare, MapGeometryHex, Map
   5 import string
   6 import datetime
   7
   8
   9
  10 class GameBase:
  11
  12     def __init__(self):
  13         self.turn = 0
  14         self.things = []
  15         self.map_geometry = MapGeometrySquare(YX(24, 40))
  16         self.commands = {}
  17
  18     def get_thing(self, id_):
  19         for thing in self.things:
  20             if id_ == thing.id_:
  21                 return thing
  22         return None
  23
  24     def _register_object(self, obj, obj_type_desc, prefix):
  25         if not obj.__name__.startswith(prefix):
  26             raise GameError('illegal %s object name: %s' % (obj_type_desc, obj.__name__))
  27         obj_name = obj.__name__[len(prefix):]
  28         d = getattr(self, obj_type_desc + 's')
  29         d[obj_name] = obj
  30
  31     def register_command(self, command):
  32         self._register_object(command, 'command', 'cmd_')
  33
  34
  35
  36 class SaveableMap(Map):
  37     modified = False
  38
  39     def __setitem__(self, *args, **kwargs):
  40         super().__setitem__(*args, **kwargs)
  41         self.modified = True
  42
  43     def set_line(self, *args, **kwargs):
  44         super().set_line(*args, **kwargs)
  45         self.modified = True
  46
  47     def inside(self, yx):
  48         if yx.y < 0 or yx.x < 0 or \
  49            yx.y >= self.geometry.size.y or yx.x >= self.geometry.size.x:
  50             return False
  51         return True
  52
  53     def draw_presets(self, alternate_hex=0):
  54         old_modified = self.modified
  55         if type(self.geometry) == MapGeometrySquare:
  56             self.set_line(0, 'X' * self.geometry.size.x)
  57             self.set_line(1, 'X' * self.geometry.size.x)
  58             self.set_line(2, 'X' * self.geometry.size.x)
  59             self.set_line(3, 'X' * self.geometry.size.x)
  60             self.set_line(4, 'X' * self.geometry.size.x)
  61             for y in range(self.geometry.size.y):
  62                 self[YX(y, 0)] = 'X'
  63                 self[YX(y, 1)] = 'X'
  64                 self[YX(y, 2)] = 'X'
  65                 self[YX(y, 3)] = 'X'
  66                 self[YX(y, 4)] = 'X'
  67         elif type(self.geometry) == MapGeometryHex:
  68             # TODO: for this to work we need a map side length divisible by 6.
  69
  70             def draw_grid(offset=YX(0, 0)):
  71                 dirs = ('DOWNRIGHT', 'RIGHT', 'UPRIGHT', 'RIGHT')
  72
  73                 def draw_snake(start):
  74                     keep_running = True
  75                     yx = start
  76                     if self.inside(yx):
  77                         self[yx] = 'X'
  78                     while keep_running:
  79                         for direction in dirs:
  80                             if not keep_running:
  81                                 break
  82                             for dir_progress in range(distance):
  83                                 mover = getattr(self.geometry, 'move__' + direction)
  84                                 yx = mover(yx)
  85                                 if yx.x >= self.geometry.size.x:
  86                                     keep_running = False
  87                                     break
  88                                 if self.inside(yx):
  89                                     self[yx] = 'X'
  90
  91                 if alternate_hex:
  92                     draw_snake(offset + YX(0, 0))
  93                 draw_snake(offset + YX((0 + alternate_hex) * distance,
  94                            -int(1.5 * distance)))
  95                 draw_snake(offset + YX((1 + alternate_hex) * distance,
  96                            0))
  97                 draw_snake(offset + YX((2 + alternate_hex) * distance,
  98                            -int(1.5 * distance)))
  99
 100             distance = self.geometry.size.y // 3
 101             draw_grid()
 102             draw_grid(YX(2, 0))
 103             draw_grid(YX(0, 2))
 104             draw_grid(YX(1, 0))
 105             draw_grid(YX(0, 1))
 106             draw_grid(YX(-1, 0))
 107             draw_grid(YX(0, -1))
 108             draw_grid(YX(-2, 0))
 109             draw_grid(YX(0, -2))
 110         self.modified = old_modified
 111
 112
 113
 114 import os
 115 class Game(GameBase):
 116
 117     def __init__(self, save_file, *args, **kwargs):
 118         super().__init__(*args, **kwargs)
 119         self.changed = True
 120         self.changed_tiles = []
 121         self.io = GameIO(self, save_file)
 122         self.tasks = {}
 123         self.thing_types = {}
 124         self.sessions = {}
 125         self.faces = {}
 126         self.hats = {}
 127         self.maps = {}
 128         self.map_controls = {}
 129         self.map_control_passwords = {}
 130         self.annotations = {}
 131         self.spawn_point = YX(0, 0), YX(0, 0)
 132         self.portals = {}
 133         self.player_chars = string.digits + string.ascii_letters
 134         self.player_char_i = -1
 135         self.admin_passwords = []
 136         self.send_gamestate_interval = datetime.timedelta(seconds=0.04)
 137         self.last_send_gamestate = datetime.datetime.now() -\
 138             self.send_gamestate_interval
 139         self.terrains = {
 140             '.': 'floor',
 141             'X': 'wall',
 142             '=': 'window',
 143             '#': 'bed',
 144             'T': 'desk',
 145             '8': 'cupboard',
 146             '[': 'glass door',
 147             'o': 'sink',
 148             'O': 'toilet'
 149         }
 150         if os.path.exists(self.io.save_file):
 151             if not os.path.isfile(self.io.save_file):
 152                 raise GameError('save file path refers to non-file')
 153
 154     def register_thing_type(self, thing_type):
 155         self._register_object(thing_type, 'thing_type', 'Thing_')
 156
 157     def register_task(self, task):
 158         self._register_object(task, 'task', 'Task_')
 159
 160     def read_savefile(self):
 161         if os.path.exists(self.io.save_file):
 162             with open(self.io.save_file, 'r') as f:
 163                 lines = f.readlines()
 164             for i in range(len(lines)):
 165                 line = lines[i]
 166                 print("FILE INPUT LINE %5s: %s" % (i, line), end='')
 167                 self.io.handle_input(line, god_mode=True)
 168
 169     def can_do_thing_with_pw(self, thing, pw):
 170         if thing.protection in self.map_control_passwords.keys():
 171             if pw != self.map_control_passwords[thing.protection]:
 172                 return False
 173         return True
 174
 175     def can_do_tile_with_pw(self, big_yx, little_yx, pw):
 176         map_control = self.get_map(big_yx, 'control')
 177         tile_class = map_control[little_yx]
 178         if tile_class in self.map_control_passwords.keys():
 179             tile_pw = self.map_control_passwords[tile_class]
 180             if pw != tile_pw:
 181                 return False
 182         return True
 183
 184     def get_string_options(self, string_option_type):
 185         if string_option_type == 'direction':
 186             return self.map_geometry.directions
 187         elif string_option_type == 'direction+here':
 188             return ['HERE'] + self.map_geometry.directions
 189         elif string_option_type == 'char':
 190             return [c for c in
 191                     string.digits + string.ascii_letters + string.punctuation + ' ']
 192         elif string_option_type == 'map_geometry':
 193             return ['Hex', 'Square']
 194         elif string_option_type == 'thing_type':
 195             return self.thing_types.keys()
 196         return None
 197
 198     def get_map_geometry_shape(self):
 199         return self.map_geometry.__class__.__name__[len('MapGeometry'):]
 200
 201     def get_player(self, connection_id):
 202         if connection_id not in self.sessions:
 203             return None
 204         player = self.get_thing(self.sessions[connection_id]['thing_id'])
 205         return player
 206
 207     def get_face(self, t):
 208         if t.type_ == 'Player':
 209             if t.name in self.faces:
 210                 return self.faces[t.name]
 211             else:
 212                 return '/O  O\\' + '| oo |' + '\\>--</'
 213         return None
 214
 215     def remove_thing(self, t):
 216         self.things.remove(t)
 217         self.record_fov_change(t.position)
 218
 219     def add_thing(self, type_, position, id_=0):
 220         t_old = None
 221         if id_ > 0:
 222             t_old = self.get_thing(id_)
 223         t = self.thing_types[type_](self, id_=id_, position=position)
 224         if t_old:
 225             self.things[self.things.index(t_old)] = t
 226         else:
 227             self.things += [t]
 228         self.record_fov_change(t.position)
 229         return t
 230
 231     def send_gamestate(self, connection_id=None):
 232         """Send out game state data relevant to clients."""
 233
 234         # TODO: limit to connection_id if provided
 235         self.io.send('TURN ' + str(self.turn))
 236         from plomrogue.mapping import FovMap
 237         import multiprocessing
 238         c_ids = [c_id for c_id in self.sessions]
 239         # Only recalc FOVs for players with ._fov = None
 240         player_fovs = []
 241         player_fov_ids = []
 242         for c_id in c_ids:
 243             player = self.get_player(c_id)
 244             if player._fov:
 245                 continue
 246             player.prepare_multiprocessible_fov_stencil()
 247             player_fovs += [player._fov]
 248             player_fov_ids += [player.id_]
 249         new_fovs = []
 250         single_core_until = 8  # since multiprocess has its own overhead
 251         if len(player_fovs) > single_core_until:
 252             pool = multiprocessing.Pool()
 253             new_fovs = pool.map(FovMap.init_terrain, [fov for fov in player_fovs])
 254             pool.close()
 255             pool.join()
 256         elif len(player_fovs) <= single_core_until:
 257             for fov in player_fovs:
 258                 new_fovs += [fov.init_terrain()]
 259         for i in range(len(player_fov_ids)):
 260             id_ = player_fov_ids[i]
 261             player = self.get_thing(id_)
 262             player._fov = new_fovs[i]
 263         for c_id in c_ids:
 264             player = self.get_player(c_id)
 265             self.io.send('FOV %s' % quote(player.fov_stencil.terrain), c_id)
 266             self.io.send('MAP %s %s %s' % (self.get_map_geometry_shape(),
 267                                            player.fov_stencil.geometry.size,
 268                                            quote(player.visible_terrain)), c_id)
 269             self.io.send('MAP_CONTROL %s' % quote(player.visible_control), c_id)
 270             for t in [t for t in self.things if player.fov_test(*t.position)]:
 271                 target_yx = player.fov_stencil.target_yx(*t.position)
 272                 self.io.send('THING %s %s %s %s %s %s'
 273                              % (target_yx, t.type_, quote(t.protection), t.id_,
 274                                 int(t.portable), int(t.commandable)),
 275                              c_id)
 276                 if hasattr(t, 'name'):
 277                     self.io.send('THING_NAME %s %s' % (t.id_, quote(t.name)), c_id)
 278                     if t.type_ == 'Player' and t.name in self.hats:
 279                         hat = self.hats[t.name]
 280                         self.io.send('THING_HAT %s %s' % (t.id_, quote(hat)), c_id)
 281                 face = self.get_face(t)
 282                 if face:
 283                     self.io.send('THING_FACE %s %s' % (t.id_, quote(face)), c_id)
 284                 if hasattr(t, 'thing_char'):
 285                     self.io.send('THING_CHAR %s %s' % (t.id_,
 286                                                        quote(t.thing_char)), c_id)
 287                 if hasattr(t, 'carrying') and t.carrying:
 288                     self.io.send('THING_CARRYING %s %s' % (t.id_, t.carrying.id_),
 289                                  c_id)
 290                 if hasattr(t, 'installable') and not t.portable:
 291                     self.io.send('THING_INSTALLED %s' % (t.id_), c_id)
 292             for big_yx in self.portals:
 293                 for little_yx in [little_yx for little_yx in self.portals[big_yx]
 294                                   if player.fov_test(big_yx, little_yx)]:
 295                     target_yx = player.fov_stencil.target_yx(big_yx, little_yx)
 296                     portal = self.portals[big_yx][little_yx]
 297                     self.io.send('PORTAL %s %s' % (target_yx, quote(portal)), c_id)
 298             for big_yx in self.annotations:
 299                 for little_yx in [little_yx for little_yx in self.annotations[big_yx]
 300                                   if player.fov_test(big_yx, little_yx)]:
 301                     target_yx = player.fov_stencil.target_yx(big_yx, little_yx)
 302                     annotation = self.annotations[big_yx][little_yx]
 303                     self.io.send('ANNOTATION %s %s' % (target_yx,
 304                                                        quote(annotation)), c_id)
 305         self.io.send('GAME_STATE_COMPLETE')
 306
 307     def record_fov_change(self, position):
 308         big_yx, little_yx = position
 309         self.changed_tiles += [self.map_geometry.undouble_yxyx(big_yx,
 310                                                                little_yx)]
 311
 312     def run_tick(self):
 313         to_delete = []
 314         for connection_id in self.sessions:
 315             connection_id_found = False
 316             for server in self.io.servers:
 317                 if connection_id in server.clients:
 318                     connection_id_found = True
 319                     break
 320             if not connection_id_found:
 321                 t = self.get_player(connection_id)
 322                 if hasattr(t, 'name'):
 323                     self.io.send('CHAT ' + quote(t.name + ' left the map.'))
 324                 self.remove_thing(t)
 325                 to_delete += [connection_id]
 326         for connection_id in to_delete:
 327             del self.sessions[connection_id]
 328             self.changed = True
 329         for t in [t for t in self.things]:
 330             if t in self.things:
 331                 try:
 332                     t.proceed()
 333                 except GameError as e:
 334                     for connection_id in [c_id for c_id in self.sessions
 335                                           if self.sessions[c_id]['thing_id'] == t.id_]:
 336                         self.io.send('GAME_ERROR ' + quote(str(e)), connection_id)
 337                 except PlayError as e:
 338                     for connection_id in [c_id for c_id in self.sessions
 339                                           if self.sessions[c_id]['thing_id'] == t.id_]:
 340                         self.io.send('PLAY_ERROR ' + quote(str(e)), connection_id)
 341         if self.changed:
 342             self.turn += 1
 343             # send_gamestate() can be rather expensive, due to among other reasons
 344             # re-calculating players' FOVs, so don't send it out too often
 345             if self.last_send_gamestate < \
 346                datetime.datetime.now() -self.send_gamestate_interval:
 347                 if len(self.changed_tiles) > 0:
 348                     for t in [t for t in self.things if t.type_ == 'Player']:
 349                         fov_radius = 12  # TODO: un-hardcode
 350                         absolute_position =\
 351                             self.map_geometry.undouble_yxyx(t.position[0],
 352                                                             t.position[1])
 353                         y_range_start = absolute_position.y - fov_radius
 354                         y_range_end = absolute_position.y + fov_radius
 355                         x_range_start = absolute_position.x - fov_radius
 356                         x_range_end = absolute_position.x + fov_radius
 357                         for position in self.changed_tiles:
 358                             if position.y < y_range_start\
 359                                or position.y > y_range_end:
 360                                 continue
 361                             if position.x < x_range_start\
 362                                or position.x > x_range_end:
 363                                 continue
 364                             t.invalidate_map_view()
 365                             break
 366                 self.send_gamestate()
 367                 self.changed = False
 368                 self.changed_tiles = []
 369                 self.save()
 370                 self.last_send_gamestate = datetime.datetime.now()
 371
 372     def get_command(self, command_name):
 373
 374         def partial_with_attrs(f, *args, **kwargs):
 375             from functools import partial
 376             p = partial(f, *args, **kwargs)
 377             p.__dict__.update(f.__dict__)
 378             return p
 379
 380         def cmd_TASK_colon(task_name, game, *args, connection_id):
 381             t = self.get_player(connection_id)
 382             if not t:
 383                 raise GameError('Not registered as player.')
 384             t.set_next_task(task_name, args)
 385
 386         def task_prefixed(command_name, task_prefix, task_command):
 387             if command_name.startswith(task_prefix):
 388                 task_name = command_name[len(task_prefix):]
 389                 if task_name in self.tasks:
 390                     f = partial_with_attrs(task_command, task_name, self)
 391                     task = self.tasks[task_name]
 392                     f.argtypes = task.argtypes
 393                     return f
 394             return None
 395
 396         command = task_prefixed(command_name, 'TASK:', cmd_TASK_colon)
 397         if command:
 398             return command
 399         if command_name in self.commands:
 400             f = partial_with_attrs(self.commands[command_name], self)
 401             return f
 402         return None
 403
 404     def new_thing_id(self):
 405         if len(self.things) == 0:
 406             return 1
 407         return max([t.id_ for t in self.things]) + 1
 408
 409     def get_next_player_char(self):
 410         self.player_char_i += 1
 411         if self.player_char_i >= len(self.player_chars):
 412             self.player_char_i = 0
 413         return self.player_chars[self.player_char_i]
 414
 415     def save(self):
 416
 417         def write(f, msg):
 418             f.write(msg + '\n')
 419
 420         with open(self.io.save_file, 'w') as f:
 421             write(f, 'TURN %s' % self.turn)
 422             map_geometry_shape = self.get_map_geometry_shape()
 423             write(f, 'MAP %s %s' % (map_geometry_shape, self.map_geometry.size,))
 424             for big_yx in [yx for yx in self.maps if self.maps[yx].modified]:
 425                 for y, line in self.maps[big_yx].lines():
 426                     write(f, 'MAP_LINE %s %5s %s' % (big_yx, y, quote(line)))
 427             for big_yx in self.annotations:
 428                 for little_yx in self.annotations[big_yx]:
 429                     write(f, 'GOD_ANNOTATE %s %s %s' %
 430                           (big_yx, little_yx, quote(self.annotations[big_yx][little_yx])))
 431             for big_yx in self.portals:
 432                 for little_yx in self.portals[big_yx]:
 433                     write(f, 'GOD_PORTAL %s %s %s' % (big_yx, little_yx,
 434                                                       quote(self.portals[big_yx][little_yx])))
 435             for big_yx in [yx for yx in self.map_controls
 436                            if self.map_controls[yx].modified]:
 437                 for y, line in self.map_controls[big_yx].lines():
 438                     write(f, 'MAP_CONTROL_LINE %s %5s %s' % (big_yx, y, quote(line)))
 439             for tile_class in self.map_control_passwords:
 440                 write(f, 'MAP_CONTROL_PW %s %s' % (tile_class,
 441                                                    self.map_control_passwords[tile_class]))
 442             for pw in self.admin_passwords:
 443                 write(f, 'ADMIN_PASSWORD %s' % pw)
 444             for name in self.faces:
 445                 write(f, 'GOD_PLAYER_FACE %s %s' % (quote(name),
 446                                                     quote(self.faces[name])))
 447             for name in self.hats:
 448                 write(f, 'GOD_PLAYER_HAT %s %s' % (quote(name),
 449                                                    quote(self.hats[name])))
 450             for t in [t for t in self.things if not t.type_ == 'Player']:
 451                 write(f, 'THING %s %s %s %s' % (t.position[0],
 452                                                 t.position[1], t.type_, t.id_))
 453                 write(f, 'GOD_THING_PROTECTION %s %s' % (t.id_, quote(t.protection)))
 454                 if hasattr(t, 'name'):
 455                     write(f, 'GOD_THING_NAME %s %s' % (t.id_, quote(t.name)))
 456                 if hasattr(t, 'installable') and (not t.portable):
 457                     write(f, 'THING_INSTALLED %s' % t.id_)
 458                 if t.type_ == 'Door' and t.blocking:
 459                     write(f, 'THING_DOOR_CLOSED %s' % t.id_)
 460                 elif t.type_ == 'Hat':
 461                     write(f, 'THING_HAT_DESIGN %s %s' % (t.id_,
 462                                                          quote(t.design)))
 463                 elif t.type_ == 'MusicPlayer':
 464                     write(f, 'THING_MUSICPLAYER_SETTINGS %s %s %s %s' %
 465                           (t.id_, int(t.playing), t.playlist_index, int(t.repeat)))
 466                     for item in t.playlist:
 467                         write(f, 'THING_MUSICPLAYER_PLAYLIST_ITEM %s %s %s' %
 468                               (t.id_, quote(item[0]), item[1]))
 469                 elif t.type_ == 'Bottle' and not t.full:
 470                     write(f, 'THING_BOTTLE_EMPTY %s' % t.id_)
 471             write(f, 'SPAWN_POINT %s %s' % (self.spawn_point[0],
 472                                             self.spawn_point[1]))
 473
 474     def get_map(self, big_yx, type_='normal'):
 475         if type_ == 'normal':
 476             maps = self.maps
 477         elif type_ == 'control':
 478             maps = self.map_controls
 479         if big_yx not in maps:
 480             maps[big_yx] = SaveableMap(self.map_geometry)
 481             if type_ == 'control':
 482                 maps[big_yx].draw_presets(big_yx.y % 2)
 483         return maps[big_yx]
 484
 485     def new_world(self, map_geometry):
 486         self.maps = {}
 487         self.map_controls = {}
 488         self.annotations = {}
 489         self.portals = {}
 490         self.admin_passwords = []
 491         self.spawn_point = YX(0, 0), YX(0, 0)
 492         self.map_geometry = map_geometry
 493         self.map_control_passwords = {'X': 'secret'}
 494         self.get_map(YX(0, 0))
 495         self.get_map(YX(0, 0), 'control')
 496         self.annotations = {}