home · contact · privacy
Invert weariness metric into energy metric.
[plomrogue2] / 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(32, 32))
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         from plomrogue.misc import Terrain
119         super().__init__(*args, **kwargs)
120         self.changed = True
121         self.changed_tiles = {'fov': [], 'other': []}
122         self.io = GameIO(self, save_file)
123         self.login_requests = []
124         self.tasks = {}
125         self.thing_types = {}
126         self.sessions = {}
127         self.faces = {}
128         self.hats = {}
129         self.maps = {}
130         self.map_controls = {}
131         self.map_control_passwords = {}
132         self.annotations = {}
133         self.spawn_point = YX(0, 0), YX(0, 0)
134         self.portals = {}
135         self.player_chars = string.digits + string.ascii_letters
136         self.players_hat_chars = {}
137         self.player_char_i = -1
138         self.admin_passwords = []
139         self.send_gamestate_min_interval = datetime.timedelta(seconds=0.04)
140         self.last_send_gamestate = datetime.datetime.now() -\
141             self.send_gamestate_min_interval
142         self.terrains = {
143             '.': Terrain('.', 'floor'),
144             'X': Terrain('X', 'wall', blocks_light=True, blocks_sound=True,
145                          blocks_movement=True),
146             '=': Terrain('=', 'glass', blocks_sound=True, blocks_movement=True),
147             'T': Terrain('T', 'table', blocks_movement=True),
148         }
149         if os.path.exists(self.io.save_file):
150             if not os.path.isfile(self.io.save_file):
151                 raise GameError('save file path refers to non-file')
152
153     def register_thing_type(self, thing_type):
154         self._register_object(thing_type, 'thing_type', 'Thing_')
155
156     def register_task(self, task):
157         self._register_object(task, 'task', 'Task_')
158
159     def read_savefile(self):
160         if os.path.exists(self.io.save_file):
161             with open(self.io.save_file, 'r') as f:
162                 lines = f.readlines()
163             for i in range(len(lines)):
164                 line = lines[i]
165                 print("FILE INPUT LINE %5s: %s" % (i, line), end='')
166                 self.io.handle_input(line, god_mode=True)
167
168     def can_do_thing_with_pw(self, thing, pw):
169         if thing.protection in self.map_control_passwords.keys():
170             if pw != self.map_control_passwords[thing.protection]:
171                 return False
172         return True
173
174     def can_do_tile_with_pw(self, big_yx, little_yx, pw):
175         map_control = self.get_map(big_yx, 'control')
176         tile_class = map_control[little_yx]
177         if tile_class in self.map_control_passwords.keys():
178             tile_pw = self.map_control_passwords[tile_class]
179             if pw != tile_pw:
180                 return False
181         return True
182
183     def get_string_options(self, string_option_type):
184         if string_option_type == 'direction':
185             return self.map_geometry.directions
186         elif string_option_type == 'direction+here':
187             return ['HERE'] + self.map_geometry.directions
188         elif string_option_type == 'char':
189             return [c for c in
190                     string.digits + string.ascii_letters + string.punctuation + ' ']
191         elif string_option_type == 'map_geometry':
192             return ['Hex', 'Square']
193         elif string_option_type == 'thing_type':
194             return self.thing_types.keys()
195         return None
196
197     def get_map_geometry_shape(self):
198         return self.map_geometry.__class__.__name__[len('MapGeometry'):]
199
200     def get_player(self, connection_id):
201         if connection_id not in self.sessions:
202             return None
203         player = self.get_thing(self.sessions[connection_id]['thing_id'])
204         return player
205
206     def get_face(self, t):
207         if t.type_ == 'Player':
208             if t.name in self.faces:
209                 return self.faces[t.name]
210             else:
211                 return '/O  O\\' + '| oo |' + '\\>--</'
212         return None
213
214     def remove_thing(self, t):
215         if t.carrying:
216             t.uncarry()
217         self.things.remove(t)
218         self.record_change(t.position, 'other')
219         if t.blocks_light:
220             self.record_change(t.position, 'fov')
221
222     def add_thing(self, type_, position, id_=0):
223         t_old = None
224         if id_ > 0:
225             t_old = self.get_thing(id_)
226         t = self.thing_types[type_](self, id_=id_, position=position)
227         if t_old:
228             self.things[self.things.index(t_old)] = t
229         else:
230             self.things += [t]
231         self.record_change(t.position, 'other')
232         if t.blocks_light:
233             self.record_change(t.position, 'fov')
234         return t
235
236     def send_gamestate(self, connection_id=None):
237         """Send out game state data relevant to clients."""
238
239         # TODO: limit to connection_id if provided
240         from plomrogue.mapping import FovMap
241         import multiprocessing
242         if connection_id:
243             c_ids = [connection_id]
244         else:
245             c_ids = [c_id for c_id in self.sessions]
246         # Only recalc FOVs for players with ._fov = None
247         player_fovs = []
248         player_ids_send_fov = []
249         player_ids_send_other = []
250         for c_id in c_ids:
251             player = self.get_player(c_id)
252             if not player._fov:
253                 player.prepare_multiprocessible_fov_stencil()
254                 player_fovs += [player._fov]
255                 player_ids_send_fov += [player.id_]
256             if None in (player._seen_things,
257                         player._seen_annotation_positions,
258                         player._seen_portal_positions):
259                 player_ids_send_other += [player.id_]
260         new_fovs = []
261         single_core_until = 16  # since multiprocess has its own overhead
262         if len(player_fovs) > single_core_until:
263             pool = multiprocessing.Pool()
264             new_fovs = pool.map(FovMap.init_terrain, [fov for fov in player_fovs])
265             pool.close()
266             pool.join()
267         elif len(player_fovs) <= single_core_until:
268             for fov in player_fovs:
269                 new_fovs += [fov.init_terrain()]
270         for i in range(len(player_ids_send_fov)):
271             id_ = player_ids_send_fov[i]
272             player = self.get_thing(id_)
273             player._fov = new_fovs[i]
274         for c_id in c_ids:
275             self.io.send('TURN ' + str(self.turn), c_id)
276             player = self.get_player(c_id)
277             self.io.send('PLAYERS_HAT_CHARS ' + quote(player.get_cookie_chars()),
278                          c_id)
279             self.io.send('STATS %s %s' % (player.need_for_toilet,
280                                           player.energy), c_id)
281             if player.id_ in player_ids_send_fov:
282                 self.io.send('FOV %s' % quote(player.fov_stencil.terrain), c_id)
283                 self.io.send('MAP %s %s %s' % (self.get_map_geometry_shape(),
284                                                player.fov_stencil.geometry.size,
285                                                quote(player.visible_terrain)), c_id)
286                 self.io.send('MAP_CONTROL %s' % quote(player.visible_control), c_id)
287             if player.id_ in player_ids_send_other:
288                 self.io.send('OTHER_WIPE', c_id)
289                 for t in player.seen_things:
290                     target_yx = player.fov_stencil.target_yx(*t.position)
291                     self.io.send('THING %s %s %s %s %s %s'
292                                  % (target_yx, t.type_, quote(t.protection), t.id_,
293                                     int(t.portable), int(t.commandable)),
294                                  c_id)
295                     if hasattr(t, 'name'):
296                         self.io.send('THING_NAME %s %s' % (t.id_, quote(t.name)), c_id)
297                         if t.type_ == 'Player' and t.name in self.hats:
298                             hat = self.hats[t.name]
299                             self.io.send('THING_HAT %s %s' % (t.id_, quote(hat)), c_id)
300                     face = self.get_face(t)
301                     if face:
302                         self.io.send('THING_FACE %s %s' % (t.id_, quote(face)), c_id)
303                     if hasattr(t, 'thing_char'):
304                         self.io.send('THING_CHAR %s %s' % (t.id_,
305                                                            quote(t.thing_char)), c_id)
306                     if hasattr(t, 'installable') and not t.portable:
307                         self.io.send('THING_INSTALLED %s' % (t.id_), c_id)
308                     if hasattr(t, 'design'):
309                         self.io.send('THING_HAT %s %s' % (t.id_,
310                                                           quote(t.design)), c_id)
311                 for t in [t for t in player.seen_things if t.carrying]:
312                     # send this last so all carryable things are already created
313                     self.io.send('THING_CARRYING %s %s' % (t.id_, t.carrying.id_),
314                                  c_id)
315                 for position in player.seen_portal_positions:
316                     target_yx = player.fov_stencil.target_yx(position[0],
317                                                              position[1])
318                     portal = self.portals[position[0]][position[1]]
319                     self.io.send('PORTAL %s %s' % (target_yx, quote(portal)), c_id)
320                 for position in player.seen_annotation_positions:
321                     target_yx = player.fov_stencil.target_yx(position[0],
322                                                              position[1])
323                     annotation = self.annotations[position[0]][position[1]]
324                     self.io.send('ANNOTATION %s %s' % (target_yx,
325                                                        quote(annotation)), c_id)
326             self.io.send('GAME_STATE_COMPLETE', c_id)
327
328     def record_change(self, position, type_):
329         big_yx, little_yx = position
330         self.changed_tiles[type_] += [self.map_geometry.undouble_yxyx(big_yx,
331                                                                       little_yx)]
332         self.changed = True
333
334     def login(self, nick, connection_id):
335         for t in [t for t in self.things
336                   if t.type_ == 'Player' and t.name == nick]:
337             self.io.send('GAME_ERROR ' + quote('name already in use'),
338                          connection_id)
339             return
340         t = self.add_thing('Player', self.spawn_point)
341         t.name = nick
342         t.thing_char = self.get_next_player_char()
343         self.sessions[connection_id] = {
344             'thing_id': t.id_,
345             'status': 'player'
346         }
347         self.io.send('PLAYER_ID %s' % t.id_, connection_id)
348         self.io.send('LOGIN_OK', connection_id)
349         self.io.send('CHAT ' + quote(t.name + ' entered the map.'))
350         for s in [s for s in self.things
351                   if s.type_ == 'SpawnPoint' and s.name == t.name]:
352             t.position = s.position
353             break
354
355     def run_tick(self):
356
357         # update player sessions
358         to_delete = []
359         for connection_id in self.sessions:
360             connection_id_found = False
361             for server in self.io.servers:
362                 if connection_id in server.clients:
363                     connection_id_found = True
364                     break
365             if not connection_id_found:
366                 t = self.get_player(connection_id)
367                 if hasattr(t, 'name'):
368                     self.io.send('CHAT ' + quote(t.name + ' left the map.'))
369                 self.remove_thing(t)
370                 to_delete += [connection_id]
371         for connection_id in to_delete:
372             del self.sessions[connection_id]
373         while len(self.login_requests) > 0:
374             login_request = self.login_requests.pop()
375             self.login(login_request[0], login_request[1])
376
377         # update game state
378         for t in [t for t in self.things]:
379             if t in self.things:
380                 try:
381                     t.proceed()
382                 except GameError as e:
383                     for connection_id in [c_id for c_id in self.sessions
384                                           if self.sessions[c_id]['thing_id'] == t.id_]:
385                         self.io.send('GAME_ERROR ' + quote(str(e)), connection_id)
386                 except PlayError as e:
387                     for connection_id in [c_id for c_id in self.sessions
388                                           if self.sessions[c_id]['thing_id'] == t.id_]:
389                         self.io.send('PLAY_ERROR ' + quote(str(e)), connection_id)
390
391         # send gamestate if it makes sense at this point
392         if self.changed:
393             self.turn += 1
394             # send_gamestate() can be rather expensive, due to among other reasons
395             # re-calculating players' FOVs, so don't send it out too often
396             if self.last_send_gamestate < \
397                datetime.datetime.now() - self.send_gamestate_min_interval:
398                 n_changes = 0
399                 for type_ in self.changed_tiles:
400                     n_changes += len(self.changed_tiles[type_])
401                 if n_changes > 0:
402                     for t in [t for t in self.things if t.type_ == 'Player']:
403                         fov_radius = 12  # TODO: un-hardcode
404                         absolute_position =\
405                             self.map_geometry.undouble_yxyx(t.position[0],
406                                                             t.position[1])
407                         y_range_start = absolute_position.y - fov_radius
408                         y_range_end = absolute_position.y + fov_radius
409                         x_range_start = absolute_position.x - fov_radius
410                         x_range_end = absolute_position.x + fov_radius
411                         # TODO: refactor with SourcedMap.inside?
412                         for type_ in self.changed_tiles:
413                             for position in self.changed_tiles[type_]:
414                                 if position.y < y_range_start\
415                                    or position.y > y_range_end:
416                                     continue
417                                 if position.x < x_range_start\
418                                    or position.x > x_range_end:
419                                     continue
420                                 t.invalidate(type_)
421                                 break
422                 self.send_gamestate()
423                 self.changed = False
424                 self.changed_tiles = {'fov': [], 'other': []}
425                 self.save()
426                 self.last_send_gamestate = datetime.datetime.now()
427
428     def get_command(self, command_name):
429
430         def partial_with_attrs(f, *args, **kwargs):
431             from functools import partial
432             p = partial(f, *args, **kwargs)
433             p.__dict__.update(f.__dict__)
434             return p
435
436         def cmd_TASK_colon(task_name, game, *args, connection_id):
437             t = self.get_player(connection_id)
438             if not t:
439                 raise GameError('Not registered as player.')
440             t.set_next_task(task_name, args)
441
442         def task_prefixed(command_name, task_prefix, task_command):
443             if command_name.startswith(task_prefix):
444                 task_name = command_name[len(task_prefix):]
445                 if task_name in self.tasks:
446                     f = partial_with_attrs(task_command, task_name, self)
447                     task = self.tasks[task_name]
448                     f.argtypes = task.argtypes
449                     return f
450             return None
451
452         command = task_prefixed(command_name, 'TASK:', cmd_TASK_colon)
453         if command:
454             return command
455         if command_name in self.commands:
456             f = partial_with_attrs(self.commands[command_name], self)
457             return f
458         return None
459
460     def new_thing_id(self):
461         if len(self.things) == 0:
462             return 1
463         return max([t.id_ for t in self.things]) + 1
464
465     def get_next_player_char(self):
466         self.player_char_i += 1
467         if self.player_char_i >= len(self.player_chars):
468             self.player_char_i = 0
469         return self.player_chars[self.player_char_i]
470
471     def get_foo_blockers(self, foo):
472         foo_blockers = ''
473         for t in self.terrains.values():
474             block_attr = getattr(t, 'blocks_' + foo)
475             if block_attr:
476                 foo_blockers += t.character
477         return foo_blockers
478
479     def get_sound_blockers(self):
480         return self.get_foo_blockers('sound')
481
482     def get_light_blockers(self):
483         return self.get_foo_blockers('light')
484
485     def get_movement_blockers(self):
486         return self.get_foo_blockers('movement')
487
488     def get_flatland(self):
489         for t in self.terrains.values():
490             if not t.blocks_movement:
491                 return t.character
492
493     def save(self):
494
495         def write(f, msg):
496             f.write(msg + '\n')
497
498         with open(self.io.save_file, 'w') as f:
499             write(f, 'TURN %s' % self.turn)
500             map_geometry_shape = self.get_map_geometry_shape()
501             write(f, 'MAP %s %s' % (map_geometry_shape, self.map_geometry.size,))
502             for terrain in self.terrains.values():
503                 write(f, 'TERRAIN %s %s %s %s %s' % (quote(terrain.character),
504                                                      quote(terrain.description),
505                                                      int(terrain.blocks_light),
506                                                      int(terrain.blocks_sound),
507                                                      int(terrain.blocks_movement)))
508                 if len(terrain.tags) > 0:
509                     for tag in terrain.tags:
510                         write(f, 'TERRAIN_TAG %s %s' % (quote(terrain.character),
511                                                         quote(tag)))
512             for big_yx in [yx for yx in self.maps if self.maps[yx].modified]:
513                 for y, line in self.maps[big_yx].lines():
514                     write(f, 'MAP_LINE %s %5s %s' % (big_yx, y, quote(line)))
515             for big_yx in self.annotations:
516                 for little_yx in self.annotations[big_yx]:
517                     write(f, 'GOD_ANNOTATE %s %s %s' %
518                           (big_yx, little_yx, quote(self.annotations[big_yx][little_yx])))
519             for big_yx in self.portals:
520                 for little_yx in self.portals[big_yx]:
521                     write(f, 'GOD_PORTAL %s %s %s' % (big_yx, little_yx,
522                                                       quote(self.portals[big_yx][little_yx])))
523             for big_yx in [yx for yx in self.map_controls
524                            if self.map_controls[yx].modified]:
525                 for y, line in self.map_controls[big_yx].lines():
526                     write(f, 'MAP_CONTROL_LINE %s %5s %s' % (big_yx, y, quote(line)))
527             for tile_class in self.map_control_passwords:
528                 write(f, 'MAP_CONTROL_PW %s %s' % (tile_class,
529                                                    self.map_control_passwords[tile_class]))
530             for pw in self.admin_passwords:
531                 write(f, 'ADMIN_PASSWORD %s' % pw)
532             for name in self.faces:
533                 write(f, 'GOD_PLAYER_FACE %s %s' % (quote(name),
534                                                     quote(self.faces[name])))
535             for name in self.hats:
536                 write(f, 'GOD_PLAYER_HAT %s %s' % (quote(name),
537                                                    quote(self.hats[name])))
538             for name in self.players_hat_chars:
539                 write(f, 'GOD_PLAYERS_HAT_CHARS %s %s' %
540                       (quote(name), quote(self.players_hat_chars[name])))
541             for t in [t for t in self.things if not t.type_ == 'Player']:
542                 write(f, 'THING %s %s %s %s' % (t.position[0],
543                                                 t.position[1], t.type_, t.id_))
544                 write(f, 'GOD_THING_PROTECTION %s %s' % (t.id_, quote(t.protection)))
545                 if hasattr(t, 'name'):
546                     write(f, 'GOD_THING_NAME %s %s' % (t.id_, quote(t.name)))
547                 if hasattr(t, 'installable') and (not t.portable):
548                     write(f, 'THING_INSTALLED %s' % t.id_)
549                 if t.type_ == 'Door' and t.blocks_movement:
550                     write(f, 'THING_DOOR_CLOSED %s %s' % (t.id_, int(t.locked)))
551                 elif t.type_ == 'Hat':
552                     write(f, 'THING_HAT_DESIGN %s %s' % (t.id_,
553                                                          quote(t.design)))
554                 elif t.type_ == 'MusicPlayer':
555                     write(f, 'THING_MUSICPLAYER_SETTINGS %s %s %s %s' %
556                           (t.id_, int(t.playing), t.playlist_index, int(t.repeat)))
557                     for item in t.playlist:
558                         write(f, 'THING_MUSICPLAYER_PLAYLIST_ITEM %s %s %s' %
559                               (t.id_, quote(item[0]), item[1]))
560                 elif t.type_ == 'Bottle' and not t.full:
561                     write(f, 'THING_BOTTLE_EMPTY %s' % t.id_)
562                 elif t.type_ == 'DoorKey':
563                     write(f, 'THING_DOOR_KEY %s %s' % (t.id_, t.door.id_))
564                 elif t.type_ == 'Crate':
565                     for item in t.content:
566                         write(f, 'THING_CRATE_ITEM %s %s' % (t.id_, item.id_))
567             write(f, 'SPAWN_POINT %s %s' % (self.spawn_point[0],
568                                             self.spawn_point[1]))
569
570
571
572     def get_map(self, big_yx, type_='normal'):
573         if type_ == 'normal':
574             maps = self.maps
575         elif type_ == 'control':
576             maps = self.map_controls
577         if big_yx not in maps:
578             maps[big_yx] = SaveableMap(self.map_geometry)
579             if type_ == 'control':
580                 maps[big_yx].draw_presets(big_yx.y % 2)
581         return maps[big_yx]
582
583     def new_world(self, map_geometry):
584         self.maps = {}
585         self.map_controls = {}
586         self.annotations = {}
587         self.portals = {}
588         self.admin_passwords = []
589         self.spawn_point = YX(0, 0), YX(0, 0)
590         self.map_geometry = map_geometry
591         self.map_control_passwords = {'X': 'secret'}
592         self.get_map(YX(0, 0))
593         self.get_map(YX(0, 0), 'control')
594         self.annotations = {}