+namespace PlaQui {
+
+namespace Server {
+
+Server::~Server(void) {
+#ifdef DEBUG
+ cerr << __FILE__ << "(" << __LINE__ << ")"
+ << ": destructor." << endl;
+#endif // DEBUG
+ // Mando a terminar todas las plantas.
+ plants_mutex.lock();
+ for (PlantList::iterator i = plants.begin(); i != plants.end(); i++) {
+ i->second->finish();
+ }
+ PlantList::size_type count = plants.size();
+ plants_mutex.unlock();
+ // Espero que terminen realmente.
+ while (count) {
+ Glib::usleep(10000); // 10 milisegundos
+ plants_mutex.lock();
+ count = plants.size();
+ plants_mutex.unlock();
+ }
+}
+
+Server::Server(const string& plant_filename, const Connection::Port& port)
+ throw(sockerr): TCPServer(port) {
+#ifdef DEBUG
+ cerr << __FILE__ << "(" << __LINE__ << ")"
+ << ": port = " << port << endl;
+#endif // DEBUG
+ // FIXME - hacer que se puedan cargar mas plantas bien.
+ Glib::Mutex::Lock lock(plants_mutex);
+ plants["default"] = new Plant(plant_filename);
+ plants["default"]->signal_finished().connect(
+ SigC::bind<const char*>(
+ SigC::slot_class(*this, &Server::on_plant_finished),
+ "default"));
+ plants["default"]->run();
+}
+
+Connection* Server::new_connection(const sockbuf::sockdesc& sd) {
+#ifdef DEBUG
+ cerr << __FILE__ << "(" << __LINE__ << ")"
+ << ": new_connection(sd = " << sd.sock << ")"
+ << endl;
+#endif // DEBUG
+ ControlServer* connection = new ControlServer(sd);
+ // TODO verificar si el new se hace bien? no creo.
+ connection->signal_command_received().connect(
+ SigC::bind<ControlServer*>(
+ SigC::slot_class(*this, &Server::on_control_command_received),
+ connection));
+ // TODO:
+ return connection;
+}
+
+void Server::on_plant_finished(const char* plant) {
+#ifdef DEBUG
+ cerr << __FILE__ << "(" << __LINE__ << ")"
+ << ": on_plant_finished(plant_name = " << plant << endl;
+#endif // DEBUG
+ Glib::Mutex::Lock lock(plants_mutex);
+ plants.erase(plant);
+}
+
+/// \todo Terminar de implementar.
+void Server::on_control_command_received(const Command& command,
+ ControlServer* controlserver) {
+#ifdef DEBUG
+ cerr << __FILE__ << "(" << __LINE__ << ")"
+ << ": on_control_command_received(target = "
+ << command.get_target() << ", command = " << command.get_command()
+ << ", args = [" << String::join(command.get_args(), ", ") << "])"
+ << endl;
+#endif // DEBUG
+ HTTPResponse* response;
+ //bool stop_controlserver = false;
+ if (command.get_target() == "server") {
+ if (command.get_command() == "status") {
+ response = cmd_server_status();
+ } else if (command.get_command() == "stop") {
+ finish();
+ response = new HTTPResponse(HTTPMessage::OK,
+ "<response desc=\"El server se apagará en instantes...\" />");
+ response->headers["Content-Type"] = "text/xml; charset=iso-8859-1";
+ controlserver->send(*response);
+ delete response;
+ // Creo una conexión suicida para que el accept() del server retorne
+ // el control y el server pueda terminar realmente.
+ try {
+ sockinetbuf suicida(sockbuf::sock_stream);
+ suicida.connect(socket.localhost(), socket.localport());
+ } catch (...) {
+ // FIXME
+ signal_error().emit(12345, "ahhhh! no puedo crear conexion suicida");
+ }
+ return;
+ } else {
+ response = new HTTPResponse(HTTPMessage::NOT_FOUND,
+ "<response desc=\"Invalid command for 'server' taget!\" />");
+ }
+ } else if (command.get_target() == "connection") {
+ if (command.get_command() == "list") {
+ response = cmd_connection_list();
+ } else if (command.get_command() == "stop") {
+ response = cmd_connection_stop(command);
+ } else {
+ response = new HTTPResponse(HTTPMessage::NOT_FOUND,
+ "<response desc=\"Invalid command for 'connection' taget!\" />");
+ }
+ } else if (command.get_target() == "transmission") {
+ if (command.get_command() == "list") {
+ response = cmd_transmission_list();
+ } else if (command.get_command() == "start") {
+ response = cmd_transmission_start(command);
+ } else if (command.get_command() == "stop") {
+ response = cmd_transmission_stop(command);
+ } else {
+ response = new HTTPResponse(HTTPMessage::NOT_FOUND,
+ "<response desc=\"Invalid command for 'transmission' taget!\" />");
+ }
+ } else if (command.get_target() == "plant") {
+ if (command.get_command() == "list") {
+ response = cmd_plant_list();
+ } else if (command.get_command() == "get") {
+ response = cmd_plant_get(command);
+ } else if (command.get_command() == "set") {
+ response = cmd_plant_set(command);
+ } else if (command.get_command() == "stop") {
+ response = cmd_plant_stop(command);
+ } else {
+ response = new HTTPResponse(HTTPMessage::NOT_FOUND,
+ "<response desc=\"Invalid command for 'plant' taget!\" />");
+ }
+ } else {
+ response = new HTTPResponse(HTTPMessage::NOT_FOUND,
+ "<response desc=\"Invalid taget!\" />");
+ }
+ // FIXME
+ response->headers["Content-Type"] = "text/xml; charset=iso-8859-1";
+ //response->headers["Connection"] = "close";
+ controlserver->send(*response);
+ delete response;
+ // FIXME con timeout no debería ser necesario. Verificar cabecera Connection
+ // para saber si hay que finish()earlo o no.
+ //if (stop_controlserver) {
+ // controlserver->finish();
+ //}
+}
+
+HTTPResponse* Server::cmd_server_status(void) const {
+ // FIXME
+ stringstream xml;
+ xml << "<serverstatus>" << endl;
+ xml << "\t<version>" VERSION "</version>" << endl;
+ xml << "\t<authors>" << endl;
+ xml << "\t\t<author>Nicolás Dimov</author>" << endl;
+ xml << "\t\t<author>Leandro Lucarella</author>" << endl;
+ xml << "\t\t<author>Ricardo Markiewicz</author>" << endl;
+ xml << "\t</authors>" << endl;
+ xml << "</serverstatus>" << endl;
+ return new HTTPResponse(HTTPMessage::OK, xml.str());
+}
+
+HTTPResponse* Server::cmd_connection_list(void) {
+ // FIXME
+ TCPServer::ConnectionInfoList cil = get_connected();
+ stringstream xml;
+ xml << "<list type=\"connection\">" << endl;
+ for (TCPServer::ConnectionInfoList::const_iterator i = cil.begin();
+ i != cil.end(); i++) {
+ xml << "\t<row>" << endl;
+ xml << "\t\t<cell>" << i->host << "</cell>" << endl;
+ xml << "\t\t<cell>" << i->port << "</cell>" << endl;
+ xml << "\t</row>" << endl;
+ }
+ xml << "</list>" << endl;
+ return new HTTPResponse(HTTPMessage::OK, xml.str());