src/modules/m_spanningtree/override_map.cpp

   1 /*       +------------------------------------+
   2  *       | Inspire Internet Relay Chat Daemon |
   3  *       +------------------------------------+
   4  *
   5  *  InspIRCd: (C) 2002-2008 InspIRCd Development Team
   6  * See: http://www.inspircd.org/wiki/index.php/Credits
   7  *
   8  * This program is free but copyrighted software; see
   9  *        the file COPYING for details.
  10  *
  11  * ---------------------------------------------------
  12  */
  13
  14 /* $ModDesc: Provides a spanning tree server link protocol */
  15
  16 #include "inspircd.h"
  17 #include "commands/cmd_whois.h"
  18 #include "commands/cmd_stats.h"
  19 #include "socket.h"
  20 #include "wildcard.h"
  21 #include "xline.h"
  22 #include "transport.h"
  23
  24 #include "m_spanningtree/timesynctimer.h"
  25 #include "m_spanningtree/resolvers.h"
  26 #include "m_spanningtree/main.h"
  27 #include "m_spanningtree/utils.h"
  28 #include "m_spanningtree/treeserver.h"
  29 #include "m_spanningtree/link.h"
  30 #include "m_spanningtree/treesocket.h"
  31 #include "m_spanningtree/rconnect.h"
  32 #include "m_spanningtree/rsquit.h"
  33
  34 /* $ModDep: m_spanningtree/timesynctimer.h m_spanningtree/resolvers.h m_spanningtree/main.h m_spanningtree/utils.h m_spanningtree/treeserver.h m_spanningtree/link.h m_spanningtree/treesocket.h m_spanningtree/rconnect.h m_spanningtree/rsquit.h */
  35
  36 const std::string ModuleSpanningTree::MapOperInfo(TreeServer* Current)
  37 {
  38         time_t secs_up = ServerInstance->Time() - Current->age;
  39         return (" [Up: " + TimeToStr(secs_up) + " Lag: "+ConvToStr(Current->rtt)+"ms]");
  40 }
  41
  42 // WARNING: NOT THREAD SAFE - DONT GET ANY SMART IDEAS.
  43 void ModuleSpanningTree::ShowMap(TreeServer* Current, User* user, int depth, char matrix[128][128], float &totusers, float &totservers)
  44 {
  45         if (line < 128)
  46         {
  47                 for (int t = 0; t < depth; t++)
  48                 {
  49                         matrix[line][t] = ' ';
  50                 }
  51
  52                 // For Aligning, we need to work out exactly how deep this thing is, and produce
  53                 // a 'Spacer' String to compensate.
  54                 char spacer[40];
  55                 memset(spacer,' ',40);
  56                 if ((40 - Current->GetName().length() - depth) > 1) {
  57                         spacer[40 - Current->GetName().length() - depth] = '\0';
  58                 }
  59                 else
  60                 {
  61                         spacer[5] = '\0';
  62                 }
  63
  64                 float percent;
  65                 char text[128];
  66                 /* Neat and tidy default values, as we're dealing with a matrix not a simple string */
  67                 memset(text, 0, 128);
  68
  69                 if (ServerInstance->Users->clientlist->size() == 0)
  70                 {
  71                         // If there are no users, WHO THE HELL DID THE /MAP?!?!?!
  72                         percent = 0;
  73                 }
  74                 else
  75                 {
  76                         percent = ((float)Current->GetUserCount() / (float)ServerInstance->Users->clientlist->size()) * 100;
  77                 }
  78
  79                 const std::string operdata = IS_OPER(user) ? MapOperInfo(Current) : "";
  80                 snprintf(text, 126, "%s %s%5d [%5.2f%%]%s", Current->GetName().c_str(), spacer, Current->GetUserCount(), percent, operdata.c_str());
  81                 totusers += Current->GetUserCount();
  82                 totservers++;
  83                 strlcpy(&matrix[line][depth],text,126);
  84                 line++;
  85
  86                 for (unsigned int q = 0; q < Current->ChildCount(); q++)
  87                 {
  88                         if ((Current->GetChild(q)->Hidden) || ((Utils->HideULines) && (ServerInstance->ULine(Current->GetChild(q)->GetName().c_str()))))
  89                         {
  90                                 if (*user->oper)
  91                                 {
  92                                         ShowMap(Current->GetChild(q),user,(Utils->FlatLinks && (!*user->oper)) ? depth : depth+2,matrix,totusers,totservers);
  93                                 }
  94                         }
  95                         else
  96                         {
  97                                 ShowMap(Current->GetChild(q),user,(Utils->FlatLinks && (!*user->oper)) ? depth : depth+2,matrix,totusers,totservers);
  98                         }
  99                 }
 100         }
 101 }
 102
 103
 104 // Ok, prepare to be confused.
 105 // After much mulling over how to approach this, it struck me that
 106 // the 'usual' way of doing a /MAP isnt the best way. Instead of
 107 // keeping track of a ton of ascii characters, and line by line
 108 // under recursion working out where to place them using multiplications
 109 // and divisons, we instead render the map onto a backplane of characters
 110 // (a character matrix), then draw the branches as a series of "L" shapes
 111 // from the nodes. This is not only friendlier on CPU it uses less stack.
 112 void ModuleSpanningTree::HandleMap(const char* const* parameters, int pcnt, User* user)
 113 {
 114         // This array represents a virtual screen which we will
 115         // "scratch" draw to, as the console device of an irc
 116         // client does not provide for a proper terminal.
 117         float totusers = 0;
 118         float totservers = 0;
 119         char matrix[128][128];
 120
 121         for (unsigned int t = 0; t < 128; t++)
 122         {
 123                 matrix[t][0] = '\0';
 124         }
 125
 126         line = 0;
 127
 128         // The only recursive bit is called here.
 129         ShowMap(Utils->TreeRoot,user,0,matrix,totusers,totservers);
 130
 131         // Process each line one by one. The algorithm has a limit of
 132         // 128 servers (which is far more than a spanning tree should have
 133         // anyway, so we're ok). This limit can be raised simply by making
 134         // the character matrix deeper, 128 rows taking 10k of memory.
 135         for (int l = 1; l < line; l++)
 136         {
 137                 // scan across the line looking for the start of the
 138                 // servername (the recursive part of the algorithm has placed
 139                 // the servers at indented positions depending on what they
 140                 // are related to)
 141                 int first_nonspace = 0;
 142
 143                 while (matrix[l][first_nonspace] == ' ')
 144                 {
 145                         first_nonspace++;
 146                 }
 147
 148                 first_nonspace--;
 149
 150                 // Draw the `- (corner) section: this may be overwritten by
 151                 // another L shape passing along the same vertical pane, becoming
 152                 // a |- (branch) section instead.
 153
 154                 matrix[l][first_nonspace] = '-';
 155                 matrix[l][first_nonspace-1] = '`';
 156                 int l2 = l - 1;
 157
 158                 // Draw upwards until we hit the parent server, causing possibly
 159                 // other corners (`-) to become branches (|-)
 160                 while ((matrix[l2][first_nonspace-1] == ' ') || (matrix[l2][first_nonspace-1] == '`'))
 161                 {
 162                         matrix[l2][first_nonspace-1] = '|';
 163                         l2--;
 164                 }
 165         }
 166
 167         // dump the whole lot to the user. This is the easy bit, honest.
 168         for (int t = 0; t < line; t++)
 169         {
 170                 user->WriteServ("006 %s :%s",user->nick,&matrix[t][0]);
 171         }
 172         float avg_users = totusers / totservers;
 173         user->WriteServ("270 %s :%.0f server%s and %.0f user%s, average %.2f users per server",user->nick,totservers,(totservers > 1 ? "s" : ""),totusers,(totusers > 1 ? "s" : ""),avg_users);
 174         user->WriteServ("007 %s :End of /MAP",user->nick);
 175         return;
 176 }
 177