server.vala 6.98 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
/* 
 * 
 * Copyright (C) 2011 Colomban Wendling <ban@herbesfolles.org>
 *                    Jonathan Michalon <studios.chalmion@no-log.org>
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 * 
 */

21
using OVCC;
22 23
using OVCC.Network;

24 25
static const string TILES_FILE   = "tiles.xml";
static const string TILESET_FILE = "tileset.xml";
26 27

/* TODO: add a Source to be notified of incoming messages asynchronously */
28

29 30
public class Server: ThreadedSocketService
{
31
  private List<Client>  clients = null;
32
  private List<Game>    tables  = null;
33 34
  private TilesDef      tiles   = new TilesDef ();
  private TileSet       tileset = new TileSet ();
35
  
36 37 38
  public string name        { get; construct; }
  public uint   port        { get; construct; default = 0xdead; }
  public uint   max_tables  { get; set; default = 1; }
39 40 41
  
  public signal void stopped ();
  
42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79
  /* removes old tables */
  private void cleanup_tables ()
  {
    lock (tables) {
      foreach (var game in tables) {
        if (game.state != GameState.STOPPED && game.n_players < 1) {
          tables.remove (game);
          debug ("Cleaned up table %p", game);
        }
      }
    }
  }
  
  /* get the most populated open table available, maybe creating one */
  private Game? pick_open_table ()
  {
    Game? candidate     = null;
    uint  n_open_tables = 0;
    
    lock (tables) {
      foreach (var game in tables) {
        if (game.state == GameState.STOPPED &&
            (candidate == null || candidate.n_players < game.n_players)) {
          candidate = game;
        }
        n_open_tables++;
      }
      /* if there is no open tables but room for more, create a new one */
      if (candidate == null && n_open_tables < max_tables) {
        candidate = new Game (tileset, null);
        tables.prepend (candidate);
        debug ("Added table %p", candidate);
      }
    }
    
    return candidate;
  }
  
80 81 82
  private bool send_all (Message      message,
                         Client?      exclude = null,
                         Cancellable? cancel = null)
83 84
    throws Error
  {
85 86 87 88 89 90 91 92
    lock (this.clients) {
      foreach (var c in this.clients) {
        if (c != exclude) {
          c.send (message, cancel);
        }
      }
    }
    return true;
93
  }
94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132

  private bool handle_login (LoginMessage msg, Client client)
  {
    bool ok = true;
    if (msg.status != LoginMessage.State.QUERY) {
      critical ("got LoginMessage with status different from QUERY");
      return false;
    }
    
    /* missing authentication check */
    if (msg.password == "") {
      debug ("rejecting auth as password is empty");
      msg.status = LoginMessage.State.MISSING_AUTHENTICATION;
      client.send (msg);
      return false;
    }

    /* already existing name check WARNING: lock needed */
    lock (this.clients) {
      foreach (Client c in this.clients) {
        if (c.login == msg.login) {
          ok = false;
          debug ("rejecting auth as login already connected");
          msg.status = LoginMessage.State.ALREADY_EXISTS;
          break;
        }
      }
      /* registration */
      if (ok) {
        debug ("accepting auth for %s", msg.login);
        msg.status = LoginMessage.State.OK;
        client.login    = msg.login;
        client.password = msg.password;
      }
    }
    client.send (msg);

    return ok;
  }
133 134 135

  private bool handle_join (JoinMessage msg, Client client)
  {
136 137 138 139 140 141 142 143 144 145
    Game? table = pick_open_table ();
    
    if (table == null) {
      warning ("A player tried to join, but there is no open table. " +
               "We should tell her, but we just do nothing yet. " +
               "She's pretty much fucked.");
      return false;
    }
    
    client.join (table);
146 147 148 149 150 151 152
    debug ("Sending game data");
    var data = new GamedataMessage (client.game.get_stack_ids(),
                                    client.game.get_player_nicks(),
                                    TILES_FILE, TILESET_FILE);
    client.send (data);
    return true;
  }
153 154 155 156 157 158
  
  private bool handle_connection (ThreadedSocketService service,
                                  SocketConnection      connection,
                                  Object?               source)
  {
    debug ("New connection");
159
    var client = new Client ();
160
    try {
161 162 163 164
      client.connect (connection);
    } catch (Error e) {
      warning ("error connecting client: %s", e.message);
      return false;
165 166
    }
    
167 168 169 170 171 172 173 174 175 176 177
    lock (this.clients) {
      this.clients.prepend (client);
    }
    try {
      client.send (new WelcomeMessage ("Welcome to server %s".printf (this.name)));
    } catch {}
    
    var running = true;
    while (running) {
      Message? msg;
      
178
      try {
179
        msg = client.receive ();
180 181 182 183
      } catch (Error e) {
        warning ("error receiving data: %s", e.message);
        break;
      }
184 185 186 187 188 189 190 191 192 193 194
      
      if (msg == null) {
        debug ("Invalid message received");
        continue;
      }
      
      debug ("Message type %s received", msg.get_type ().name ());
      if (msg is StringMessage) {
        debug (" --- %s", (msg as StringMessage).message);
      }
      switch (msg.message_type) {
195
        case MessageType.LOGIN:
196
          bool logged;
197
          debug ("Login for '%s' with '%s'", (msg as LoginMessage).login,
198
                                             (msg as LoginMessage).password);
199 200 201 202
          handle_login ((msg as LoginMessage), client);
          break;
        case MessageType.JOIN:
          handle_join (msg as JoinMessage, client);
203 204
          break;
        case MessageType.SIGNAL:
205
          client.signal_handle.emit_received (msg as SignalMessage);
206
          break;
207 208 209 210 211
        case MessageType.DISCONNECT: running = false; break;
      }
    }
    lock (this.clients) {
      this.clients.remove (client);
212
    }
213
    try { client.disconnect (); } catch { /* we don't care if disconnection failed */ }
214
    cleanup_tables ();
215 216 217 218 219 220 221
    debug ("Closed connection");
    return true;
  }
  
  construct
  {
    try {
222
      this.add_inet_port ((uint16) port, null);
223 224 225 226 227 228 229 230
    } catch (Error e) {
      critical ("failed to add address: %s", e.message);
    }
    this.run.connect (handle_connection);
  }
  
  public Server (string name,
                 uint16 port = 0xdead)
231
    throws Error
232 233
  {
    Object (name: name, port: port);
234 235 236

    tiles.load (File.new_for_path (TILES_FILE));
    tileset.load (tiles, File.new_for_path (TILESET_FILE));
237 238 239 240 241 242 243 244 245 246
  }
  
  /* a bit ugly since a direct call to parent method will not trigger the
   * :stopped signal */
  public new void stop ()
  {
    base.stop ();
    this.stopped ();
  }
}