qcsrc/menu/xonotic/dialog_multiplayer_join_serverinfo.c

   1 #ifdef INTERFACE
   2 CLASS(XonoticServerInfoDialog) EXTENDS(XonoticDialog)
   3         METHOD(XonoticServerInfoDialog, fill, void(entity))
   4         METHOD(XonoticServerInfoDialog, loadServerInfo, void(entity, float))
   5         ATTRIB(XonoticServerInfoDialog, title, string, "Server Information")
   6         ATTRIB(XonoticServerInfoDialog, color, vector, SKINCOLOR_DIALOG_SERVERINFO)
   7         ATTRIB(XonoticServerInfoDialog, intendedWidth, float, 0.68)
   8         ATTRIB(XonoticServerInfoDialog, rows, float, 15)
   9         ATTRIB(XonoticServerInfoDialog, columns, float, 12)
  10
  11         ATTRIB(XonoticServerInfoDialog, currentServerName, string, string_null)
  12         ATTRIB(XonoticServerInfoDialog, currentServerCName, string, string_null)
  13         ATTRIB(XonoticServerInfoDialog, currentServerType, string, string_null)
  14         ATTRIB(XonoticServerInfoDialog, currentServerMap, string, string_null)
  15         ATTRIB(XonoticServerInfoDialog, currentServerPlayers, string, string_null)
  16         ATTRIB(XonoticServerInfoDialog, currentServerNumPlayers, string, string_null)
  17         ATTRIB(XonoticServerInfoDialog, currentServerNumBots, string, string_null)
  18         ATTRIB(XonoticServerInfoDialog, currentServerMod, string, string_null)
  19         ATTRIB(XonoticServerInfoDialog, currentServerVersion, string, string_null)
  20         ATTRIB(XonoticServerInfoDialog, currentServerPing, string, string_null)
  21         ATTRIB(XonoticServerInfoDialog, currentServerKey, string, string_null)
  22         ATTRIB(XonoticServerInfoDialog, currentServerID, string, string_null)
  23         ATTRIB(XonoticServerInfoDialog, currentServerEncrypt, string, string_null)
  24         ATTRIB(XonoticServerInfoDialog, currentServerPure, string, string_null)
  25
  26         ATTRIB(XonoticServerInfoDialog, nameLabel, entity, NULL)
  27         ATTRIB(XonoticServerInfoDialog, cnameLabel, entity, NULL)
  28         ATTRIB(XonoticServerInfoDialog, typeLabel, entity, NULL)
  29         ATTRIB(XonoticServerInfoDialog, mapLabel, entity, NULL)
  30         ATTRIB(XonoticServerInfoDialog, rawPlayerList, entity, NULL)
  31         ATTRIB(XonoticServerInfoDialog, numPlayersLabel, entity, NULL)
  32         ATTRIB(XonoticServerInfoDialog, numBotsLabel, entity, NULL)
  33         ATTRIB(XonoticServerInfoDialog, modLabel, entity, NULL)
  34         ATTRIB(XonoticServerInfoDialog, versionLabel, entity, NULL)
  35         ATTRIB(XonoticServerInfoDialog, pingLabel, entity, NULL)
  36         ATTRIB(XonoticServerInfoDialog, keyLabel, entity, NULL)
  37         ATTRIB(XonoticServerInfoDialog, idLabel, entity, NULL)
  38         ATTRIB(XonoticServerInfoDialog, encryptLabel, entity, NULL)
  39         ATTRIB(XonoticServerInfoDialog, canConnectLabel, entity, NULL)
  40         ATTRIB(XonoticServerInfoDialog, pureLabel, entity, NULL)
  41 ENDCLASS(XonoticServerInfoDialog)
  42
  43 float SLIST_FIELD_NAME;
  44 float SLIST_FIELD_CNAME;
  45 float SLIST_FIELD_QCSTATUS;
  46 float SLIST_FIELD_MAP;
  47 float SLIST_FIELD_PLAYERS;
  48 float SLIST_FIELD_NUMHUMANS;
  49 float SLIST_FIELD_MAXPLAYERS;
  50 float SLIST_FIELD_NUMBOTS;
  51 float SLIST_FIELD_MOD;
  52 float SLIST_FIELD_PING;
  53 void Join_Click(entity btn, entity me);
  54 #endif
  55
  56 #ifdef IMPLEMENTATION
  57 void XonoticServerInfoDialog_loadServerInfo(entity me, float i)
  58 {
  59         float m, pure, j;
  60         string s, typestr, versionstr, numh, maxp, k, v;
  61
  62         if(me.currentServerName)
  63                 strunzone(me.currentServerName);
  64         me.currentServerName = string_null;
  65         if(me.currentServerCName)
  66                 strunzone(me.currentServerCName);
  67         me.currentServerCName = string_null;
  68         if(me.currentServerType)
  69                 strunzone(me.currentServerType);
  70         me.currentServerType = string_null;
  71         if(me.currentServerMap)
  72                 strunzone(me.currentServerMap);
  73         me.currentServerMap = string_null;
  74         if(me.currentServerPlayers)
  75                 strunzone(me.currentServerPlayers);
  76         me.currentServerPlayers = string_null;
  77         if(me.currentServerNumPlayers)
  78                 strunzone(me.currentServerNumPlayers);
  79         me.currentServerNumPlayers = string_null;
  80         if(me.currentServerNumBots)
  81                 strunzone(me.currentServerNumBots);
  82         me.currentServerNumBots = string_null;
  83         if(me.currentServerMod)
  84                 strunzone(me.currentServerMod);
  85         me.currentServerMod = string_null;
  86         if(me.currentServerVersion)
  87                 strunzone(me.currentServerVersion);
  88         me.currentServerVersion = string_null;
  89         if(me.currentServerPing)
  90                 strunzone(me.currentServerPing);
  91         me.currentServerPing = string_null;
  92         if(me.currentServerKey)
  93                 strunzone(me.currentServerKey);
  94         me.currentServerKey = string_null;
  95         if(me.currentServerID)
  96                 strunzone(me.currentServerID);
  97         me.currentServerID = string_null;
  98         // not zoned!
  99         //if(me.currentServerEncrypt)
 100         //      strunzone(me.currentServerEncrypt);
 101         //me.currentServerEncrypt = string_null;
 102         if(me.currentServerPure)
 103                 strunzone(me.currentServerPure);
 104         me.currentServerPure = string_null;
 105
 106         SLIST_FIELD_NAME = gethostcacheindexforkey("name");
 107         me.currentServerName = strzone(gethostcachestring(SLIST_FIELD_NAME, i));
 108         me.nameLabel.setText(me.nameLabel, me.currentServerName);
 109
 110         SLIST_FIELD_CNAME = gethostcacheindexforkey("cname");
 111         me.currentServerCName = strzone(gethostcachestring(SLIST_FIELD_CNAME, i));
 112         me.cnameLabel.setText(me.cnameLabel, me.currentServerCName);
 113
 114         pure = -1;
 115         typestr = "N/A";
 116         versionstr = "N/A";
 117
 118         SLIST_FIELD_QCSTATUS = gethostcacheindexforkey("qcstatus");
 119         s = gethostcachestring(SLIST_FIELD_QCSTATUS, i);
 120         m = tokenizebyseparator(s, ":");
 121         if(m >= 2)
 122         {
 123                 typestr = argv(0);
 124                 versionstr = argv(1);
 125         }
 126         for(j = 2; j < m; ++j)
 127         {
 128                 if(argv(j) == "")
 129                         break;
 130                 k = substring(argv(j), 0, 1);
 131                 v = substring(argv(j), 1, -1);
 132                 if(k == "P")
 133                         pure = stof(v);
 134         }
 135
 136         me.currentServerType = strzone(typestr);
 137         me.typeLabel.setText(me.typeLabel, me.currentServerType);
 138
 139         SLIST_FIELD_MAP = gethostcacheindexforkey("map");
 140         me.currentServerMap = strzone(gethostcachestring(SLIST_FIELD_MAP, i));
 141         me.mapLabel.setText(me.mapLabel, me.currentServerMap);
 142
 143         SLIST_FIELD_PLAYERS = gethostcacheindexforkey("players");
 144         me.currentServerPlayers = strzone(gethostcachestring(SLIST_FIELD_PLAYERS, i));
 145         me.rawPlayerList.setPlayerList(me.rawPlayerList, me.currentServerPlayers);
 146
 147         SLIST_FIELD_NUMHUMANS = gethostcacheindexforkey("numhumans");
 148         numh = ftos(gethostcachenumber(SLIST_FIELD_NUMHUMANS, i));
 149         SLIST_FIELD_MAXPLAYERS = gethostcacheindexforkey("maxplayers");
 150         maxp = ftos(gethostcachenumber(SLIST_FIELD_MAXPLAYERS, i));
 151         me.currentServerNumPlayers = strzone(strcat(numh,"/",maxp));
 152         me.numPlayersLabel.setText(me.numPlayersLabel, me.currentServerNumPlayers);
 153
 154         SLIST_FIELD_NUMBOTS = gethostcacheindexforkey("numbots");
 155         s = ftos(gethostcachenumber(SLIST_FIELD_NUMBOTS, i));
 156         me.currentServerNumBots = strzone(s);
 157         me.numBotsLabel.setText(me.numBotsLabel, me.currentServerNumBots);
 158
 159         SLIST_FIELD_MOD = gethostcacheindexforkey("mod");
 160         me.currentServerMod = strzone(gethostcachestring(SLIST_FIELD_MOD, i));
 161         me.modLabel.setText(me.modLabel, me.currentServerMod);
 162
 163         me.currentServerVersion = strzone(versionstr);
 164         me.versionLabel.setText(me.versionLabel, me.currentServerVersion);
 165
 166         me.currentServerPure = ((pure < 0) ? "N/A" : (pure == 0) ? "Official settings" : sprintf("%d modified settings", pure));
 167         me.currentServerPure = strzone(me.currentServerPure);
 168         me.pureLabel.setText(me.pureLabel, me.currentServerPure);
 169
 170         SLIST_FIELD_PING = gethostcacheindexforkey("ping");
 171         s = ftos(gethostcachenumber(SLIST_FIELD_PING, i));
 172         me.currentServerPing = strzone(s);
 173         me.pingLabel.setText(me.pingLabel, me.currentServerPing);
 174
 175         print(me.currentServerCName, "\n");
 176
 177         s = crypto_getidfp(me.currentServerCName);
 178         if not(s)
 179                 s = "N/A";
 180         me.currentServerID = strzone(s);
 181         me.idLabel.setText(me.idLabel, me.currentServerID);
 182
 183         s = crypto_getkeyfp(me.currentServerCName);
 184         if not(s)
 185                 s = "N/A";
 186         me.currentServerKey = strzone(s);
 187         me.keyLabel.setText(me.keyLabel, me.currentServerKey);
 188
 189         s = crypto_getencryptlevel(me.currentServerCName);
 190         if(s == "")
 191         {
 192                 if(cvar("crypto_aeslevel") >= 3)
 193                         me.currentServerEncrypt = "N/A (can't connect)";
 194                 else
 195                         me.currentServerEncrypt = "N/A";
 196         }
 197         else switch(stof(substring(s, 0, 1)))
 198         {
 199                 case 0:
 200                         if(cvar("crypto_aeslevel") >= 3)
 201                                 me.currentServerEncrypt = "not supported (can't connect)";
 202                         else
 203                                 me.currentServerEncrypt = "not supported";
 204                         break;
 205                 case 1:
 206                         me.currentServerEncrypt = "supported";
 207                         break;
 208                 case 2:
 209                         me.currentServerEncrypt = "requested";
 210                         break;
 211                 case 3:
 212                         if(cvar("crypto_aeslevel") <= 0)
 213                                 me.currentServerEncrypt = "required (can't connect)";
 214                         else
 215                                 me.currentServerEncrypt = "required";
 216                         break;
 217         }
 218         me.encryptLabel.setText(me.encryptLabel, me.currentServerEncrypt);
 219 }
 220
 221 void XonoticServerInfoDialog_fill(entity me)
 222 {
 223         entity e;
 224         me.TR(me);
 225                 me.TD(me, 1, me.columns, e = makeXonoticTextLabel(0.5, ""));
 226                         e.colorL = SKINCOLOR_SERVERINFO_NAME;
 227                         e.allowCut = 1;
 228                         me.nameLabel = e;
 229         me.TR(me);
 230                 me.TD(me, 1, me.columns, e = makeXonoticTextLabel(0.5, ""));
 231                         e.colorL = SKINCOLOR_SERVERINFO_IP;
 232                         e.allowCut = 1;
 233                         me.cnameLabel = e;
 234
 235         me.TR(me);
 236                 me.TD(me, 1, 5.5, e = makeXonoticTextLabel(0, "Players:"));
 237         me.TR(me);
 238                 me.TD(me, me.rows - 4, 6, e = makeXonoticPlayerList());
 239                         me.rawPlayerList = e;
 240
 241         me.gotoRC(me, 1, 6.25); me.setFirstColumn(me, me.currentColumn);
 242
 243         me.TR(me);
 244                 me.TD(me, 1, 1.75, e = makeXonoticTextLabel(0, "Type:"));
 245                 me.TD(me, 1, 4.0, e = makeXonoticTextLabel(0, ""));
 246                         e.allowCut = 1;
 247                         me.typeLabel = e;
 248         me.TR(me);
 249                 me.TD(me, 1, 1.75, e = makeXonoticTextLabel(0, "Map:"));
 250                 me.TD(me, 1, 4.0, e = makeXonoticTextLabel(0, ""));
 251                         e.allowCut = 1;
 252                         me.mapLabel = e;
 253         me.TR(me);
 254                 me.TD(me, 1, 1.75, e = makeXonoticTextLabel(0, "Gameplay:"));
 255                 me.TD(me, 1, 4.0, e = makeXonoticTextLabel(0, ""));
 256                         e.allowCut = 1;
 257                         me.pureLabel = e;
 258         me.TR(me);
 259                 me.TD(me, 1, 1.75, e = makeXonoticTextLabel(0, "Players:"));
 260                 me.TD(me, 1, 4.0, e = makeXonoticTextLabel(0, ""));
 261                         e.allowCut = 1;
 262                         me.numPlayersLabel = e;
 263         me.TR(me);
 264                 me.TD(me, 1, 1.75, e = makeXonoticTextLabel(0, "Bots:"));
 265                 me.TD(me, 1, 4.0, e = makeXonoticTextLabel(0, ""));
 266                         e.allowCut = 1;
 267                         me.numBotsLabel = e;
 268         me.TR(me);
 269                 me.TD(me, 1, 1.75, e = makeXonoticTextLabel(0, "Mod:"));
 270                 me.TD(me, 1, 4.0, e = makeXonoticTextLabel(0, ""));
 271                         e.allowCut = 1;
 272                         me.modLabel = e;
 273         me.TR(me);
 274                 me.TD(me, 1, 1.75, e = makeXonoticTextLabel(0, "Version:"));
 275                 me.TD(me, 1, 4.0, e = makeXonoticTextLabel(0, ""));
 276                         e.allowCut = 1;
 277                         me.versionLabel = e;
 278         me.TR(me);
 279                 me.TD(me, 1, 1.75, e = makeXonoticTextLabel(0, "Ping:"));
 280                 me.TD(me, 1, 4.0, e = makeXonoticTextLabel(0, ""));
 281                         e.allowCut = 1;
 282                         me.pingLabel = e;
 283
 284         me.TR(me);
 285                 me.TD(me, 1, 1.75, e = makeXonoticTextLabel(0, "CA:"));
 286                 me.TD(me, 1, 4.0, e = makeXonoticTextLabel(0, ""));
 287                         e.allowCut = 1;
 288                         me.keyLabel = e;
 289
 290         me.TR(me);
 291                 me.TD(me, 1, 1.75, e = makeXonoticTextLabel(0, "Key:"));
 292                 me.TD(me, 1, 4.0, e = makeXonoticTextLabel(0, ""));
 293                         e.allowCut = 1;
 294                         me.idLabel = e;
 295
 296         me.TR(me);
 297                 me.TD(me, 1, 1.75, e = makeXonoticTextLabel(0, "Encryption:"));
 298                 me.TD(me, 1, 4.0, e = makeXonoticTextLabel(0, ""));
 299                         e.allowCut = 1;
 300                         me.encryptLabel = e;
 301
 302         me.gotoRC(me, me.rows - 1, 0);
 303
 304                 me.TD(me, 1, me.columns - 6, e = makeXonoticButton("Close", '0 0 0'));
 305                         e.onClick = Dialog_Close;
 306                         e.onClickEntity = me;
 307                 me.TD(me, 1, me.columns - 6, e = makeXonoticButton("Join!", '0 0 0'));
 308                         e.onClick = Join_Click;
 309                         e.onClickEntity = me;
 310 }
 311
 312 void Join_Click(entity btn, entity me)
 313 {
 314         localcmd("connect ", me.currentServerCName, "\n");
 315 }
 316
 317 #endif