extensions/topmenus/TopMenu.cpp
author David Anderson <dvander@alliedmods.net>
Wed Sep 26 22:37:40 2007 +0000 (2007-09-26)
changeset 1497 1cab582efa5f
parent 1496 4145ca042242
child 1526 d7ba44e7a714
permissions -rw-r--r--
fixed some topmenus, completed initial test
     1 /**
     2  * vim: set ts=4 :
     3  * =============================================================================
     4  * SourceMod Sample Extension
     5  * Copyright (C) 2004-2007 AlliedModders LLC.  All rights reserved.
     6  * =============================================================================
     7  *
     8  * This program is free software; you can redistribute it and/or modify it under
     9  * the terms of the GNU General Public License, version 3.0, as published by the
    10  * Free Software Foundation.
    11  * 
    12  * This program is distributed in the hope that it will be useful, but WITHOUT
    13  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
    14  * FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
    15  * details.
    16  *
    17  * You should have received a copy of the GNU General Public License along with
    18  * this program.  If not, see <http://www.gnu.org/licenses/>.
    19  *
    20  * As a special exception, AlliedModders LLC gives you permission to link the
    21  * code of this program (as well as its derivative works) to "Half-Life 2," the
    22  * "Source Engine," the "SourcePawn JIT," and any Game MODs that run on software
    23  * by the Valve Corporation.  You must obey the GNU General Public License in
    24  * all respects for all other code used.  Additionally, AlliedModders LLC grants
    25  * this exception to all derivative works.  AlliedModders LLC defines further
    26  * exceptions, found in LICENSE.txt (as of this writing, version JULY-31-2007),
    27  * or <http://www.sourcemod.net/license.php>.
    28  *
    29  * Version: $Id$
    30  */
    31 
    32 #include <stdlib.h>
    33 #include <stdarg.h>
    34 #include "TopMenu.h"
    35 
    36 struct obj_by_name_t
    37 {
    38 	unsigned int obj_index;
    39 	char name[64];
    40 };
    41 
    42 int _SortObjectNamesDescending(const void *ptr1, const void *ptr2);
    43 unsigned int strncopy(char *dest, const char *src, size_t count);
    44 size_t UTIL_Format(char *buffer, size_t maxlength, const char *fmt, ...);
    45 
    46 TopMenu::TopMenu(ITopMenuObjectCallbacks *callbacks)
    47 {
    48 	m_clients = NULL;
    49 	m_SerialNo = 1;
    50 	m_pTitle = callbacks;
    51 	m_max_clients = 0;
    52 
    53 	if (playerhelpers->IsServerActivated())
    54 	{
    55 		CreatePlayers(playerhelpers->GetMaxClients());
    56 	}
    57 }
    58 
    59 TopMenu::~TopMenu()
    60 {
    61 	/* Delete all categories */
    62 	while (m_Categories.size())
    63 	{
    64 		RemoveFromMenu(m_Categories[0]->obj->object_id);
    65 	}
    66 
    67 	/* Remove all objects */
    68 	for (size_t i = 0; i < m_Objects.size(); i++)
    69 	{
    70 		assert(m_Objects[i]->is_free == true);
    71 		delete m_Objects[i];
    72 	}
    73 
    74 	m_pTitle->OnTopMenuObjectRemoved(this, 0);
    75 
    76 	/* Delete all cached config entries */
    77 	for (size_t i = 0; i < m_Config.cats.size(); i++)
    78 	{
    79 		delete m_Config.cats[i];
    80 	}
    81 
    82 	/* Sweep players */
    83 	for (size_t i = 0; i <= (size_t)m_max_clients; i++)
    84 	{
    85 		TearDownClient(&m_clients[i]);
    86 	}
    87 	delete [] m_clients;
    88 }
    89 
    90 void TopMenu::OnClientConnected(int client)
    91 {
    92 	if (m_clients == NULL)
    93 	{
    94 		return;
    95 	}
    96 
    97 	topmenu_player_t *player = &m_clients[client];
    98 	TearDownClient(player);
    99 }
   100 
   101 void TopMenu::OnClientDisconnected(int client)
   102 {
   103 	if (m_clients == NULL)
   104 	{
   105 		return;
   106 	}
   107 
   108 	topmenu_player_t *player = &m_clients[client];
   109 	TearDownClient(player);
   110 }
   111 
   112 void TopMenu::OnServerActivated(int max_clients)
   113 {
   114 	if (m_clients == NULL)
   115 	{
   116 		CreatePlayers(max_clients);
   117 	}
   118 }
   119 
   120 unsigned int TopMenu::AddToMenu(const char *name,
   121 								TopMenuObjectType type,
   122 								ITopMenuObjectCallbacks *callbacks,
   123 								IdentityToken_t *owner,
   124 								const char *cmdname,
   125 								FlagBits flags,
   126 								unsigned int parent)
   127 {
   128 	/* Sanity checks */
   129 	if (type == TopMenuObject_Category && parent != 0)
   130 	{
   131 		return 0;
   132 	}
   133 	else if (type == TopMenuObject_Item && parent == 0)
   134 	{
   135 		return 0;
   136 	}
   137 	else if (m_ObjLookup.retrieve(name) != NULL)
   138 	{
   139 		return 0;
   140 	}
   141 	else if (type != TopMenuObject_Item && type != TopMenuObject_Category)
   142 	{
   143 		return 0;
   144 	}
   145 
   146 	/* If we're adding an item, make sure the parent is valid, 
   147 	 * and that the parent is a category.
   148 	 */
   149 	topmenu_object_t *parent_obj = NULL;
   150 	topmenu_category_t *parent_cat = NULL;
   151 	if (type == TopMenuObject_Item)
   152 	{
   153 		/* Check parent index.  Note it will be >= 1 here. */
   154 		if (parent > m_Objects.size() || m_Objects[parent - 1]->is_free)
   155 		{
   156 			return 0;
   157 		}
   158 		parent_obj = m_Objects[parent - 1];
   159 
   160 		/* Find an equivalent pointer in the category array. */
   161 		for (size_t i = 0; i < m_Categories.size(); i++)
   162 		{
   163 			if (m_Categories[i]->obj == parent_obj)
   164 			{
   165 				parent_cat = m_Categories[i];
   166 				break;
   167 			}
   168 		}
   169 
   170 		/* If none was found, leave. */
   171 		if (parent_cat == NULL)
   172 		{
   173 			return 0;
   174 		}
   175 	}
   176 
   177 	/* Re-use an old object pointer if we can. */
   178 	topmenu_object_t *obj = NULL;
   179 	for (size_t i = 0; i < m_Objects.size(); i++)
   180 	{
   181 		if (m_Objects[i]->is_free == true)
   182 		{
   183 			obj = m_Objects[i];
   184 			break;
   185 		}
   186 	}
   187 
   188 	/* Otherwise, allocate a new one. */
   189 	if (obj == NULL)
   190 	{
   191 		obj = new topmenu_object_t;
   192 		obj->object_id = ((unsigned int)m_Objects.size()) + 1;
   193 		m_Objects.push_back(obj);
   194 	}
   195 
   196 	/* Initialize the object's properties. */
   197 	obj->callbacks = callbacks;
   198 	obj->flags = flags;
   199 	obj->owner = owner;
   200 	obj->type = type;
   201 	obj->is_free = false;
   202 	obj->parent = parent_obj;
   203 	strncopy(obj->name, name, sizeof(obj->name));
   204 	strncopy(obj->cmdname, cmdname ? cmdname : "", sizeof(obj->cmdname));
   205 
   206 	if (obj->type == TopMenuObject_Category)
   207 	{
   208 		/* Create a new category entry */
   209 		topmenu_category_t *cat = new topmenu_category_t;
   210 		cat->obj = obj;
   211 		cat->reorder = false;
   212 		cat->serial = 1;
   213 
   214 		/* Add it, then update our serial change number. */
   215 		m_Categories.push_back(cat);
   216 		m_SerialNo++;
   217 
   218 		/* Updating sorting info */
   219 		m_bCatsNeedResort = true;
   220 	}
   221 	else if (obj->type == TopMenuObject_Item)
   222 	{
   223 		/* Update the category, mark it as needing changes */
   224 		parent_cat->obj_list.push_back(obj);
   225 		parent_cat->reorder = true;
   226 		parent_cat->serial++;
   227 
   228 		/* If the category just went from 0 to 1 items, mark it as 
   229 		 * changed, so clients get the category drawn.
   230 		 */
   231 		if (parent_cat->obj_list.size() == 1)
   232 		{
   233 			m_SerialNo++;
   234 		}
   235 	}
   236 
   237 	m_ObjLookup.insert(name, obj);
   238 
   239 	return obj->object_id;
   240 }
   241 
   242 void TopMenu::RemoveFromMenu(unsigned int object_id)
   243 {
   244 	if (object_id == 0 
   245 		|| object_id > m_Objects.size() 
   246 		|| m_Objects[object_id - 1]->is_free)
   247 	{
   248 		return;
   249 	}
   250 
   251 	topmenu_object_t *obj = m_Objects[object_id - 1];
   252 
   253 	m_ObjLookup.remove(obj->name);
   254 
   255 	if (obj->type == TopMenuObject_Category)
   256 	{
   257 		/* Find it in the category list. */
   258 		for (size_t i = 0; i < m_Categories.size(); i++)
   259 		{
   260 			if (m_Categories[i]->obj == obj)
   261 			{
   262 				/* Mark all children as removed + free.  Note we could
   263 				 * call into RemoveMenuItem() for this, but it'd be very 
   264 				 * inefficient!
   265 				 */
   266 				topmenu_category_t *cat = m_Categories[i];
   267 				for (size_t j = 0; j < m_Categories[i]->obj_list.size(); j++)
   268 				{
   269 					cat->obj_list[j]->callbacks->OnTopMenuObjectRemoved(this, cat->obj_list[j]->object_id);
   270 					cat->obj_list[j]->is_free = true;
   271 				}
   272 				
   273 				/* Remove the category from the list, then delete it. */
   274 				m_Categories.erase(m_Categories.iterAt(i));
   275 				delete cat;
   276 				break;
   277 			}
   278 		}
   279 
   280 		/* Update the root as changed. */
   281 		m_SerialNo++;
   282 		m_bCatsNeedResort = true;
   283 	}
   284 	else if (obj->type == TopMenuObject_Item)
   285 	{
   286 		/* Find the category this item is in. */
   287 		topmenu_category_t *parent_cat = NULL;
   288 		for (size_t i = 0; i < m_Categories.size(); i++)
   289 		{
   290 			if (m_Categories[i]->obj == obj->parent)
   291 			{
   292 				parent_cat = m_Categories[i];
   293 				break;
   294 			}
   295 		}
   296 
   297 		/* Erase it from the category's lists. */
   298 		if (parent_cat)
   299 		{
   300 			for (size_t i = 0; i < parent_cat->obj_list.size(); i++)
   301 			{
   302 				if (parent_cat->obj_list[i] == obj)
   303 				{
   304 					parent_cat->obj_list.erase(parent_cat->obj_list.iterAt(i));
   305 
   306 					/* If this category now has no items, mark root as changed 
   307 					 * so clients won't get the category drawn anymore.
   308 					 */
   309 					if (parent_cat->obj_list.size() == 0)
   310 					{
   311 						m_SerialNo++;
   312 					}
   313 					break;
   314 				}
   315 			}
   316 
   317 			/* Update the category as changed. */
   318 			parent_cat->reorder = true;
   319 			parent_cat->serial++;
   320 		}
   321 	}
   322 
   323 	/* Finally, mark the object as free. */
   324 	obj->is_free = true;
   325 
   326 	/* The callbacks pointer is still valid, so fire away! */
   327 	obj->callbacks->OnTopMenuObjectRemoved(this, object_id);
   328 }
   329 
   330 bool TopMenu::DisplayMenu(int client, unsigned int hold_time, TopMenuPosition position)
   331 {
   332 	if (m_clients == NULL)
   333 	{
   334 		return false;
   335 	}
   336 
   337 	IGamePlayer *pPlayer = playerhelpers->GetGamePlayer(client);
   338 	if (!pPlayer->IsInGame())
   339 	{
   340 		return false;
   341 	}
   342 
   343 	UpdateClientRoot(client, pPlayer);
   344 
   345 	topmenu_player_t *pClient = &m_clients[client];
   346 	if (pClient->root == NULL)
   347 	{
   348 		return false;
   349 	}
   350 
   351 	bool return_value = false;
   352 
   353 	if (position == TopMenuPosition_LastCategory && 
   354 		pClient->last_category < m_Categories.size())
   355 	{
   356 		return_value = DisplayCategory(client, pClient->last_category, hold_time, true);
   357 	}
   358 	else if (position == TopMenuPosition_LastRoot)
   359 	{
   360 		pClient->root->DisplayAtItem(client, hold_time, pClient->last_root_pos);
   361 	}
   362 	else if (position == TopMenuPosition_Start)
   363 	{
   364 		pClient->last_position = 0;
   365 		pClient->last_category = 0;
   366 		return_value = pClient->root->Display(client, hold_time);
   367 	}
   368 
   369 	return return_value;
   370 }
   371 
   372 bool TopMenu::DisplayCategory(int client, unsigned int category, unsigned int hold_time, bool last_position)
   373 {
   374 	UpdateClientCategory(client, category);
   375 
   376 	topmenu_player_t *pClient = &m_clients[client];
   377 	if (category >= pClient->cat_count
   378 		|| pClient->cats[category].menu == NULL)
   379 	{
   380 		return false;
   381 	}
   382 
   383 	bool return_value = false;
   384 
   385 	topmenu_player_category_t *player_cat = &(pClient->cats[category]);
   386 
   387 	pClient->last_category = category;
   388 	if (last_position)
   389 	{
   390 		return_value = player_cat->menu->DisplayAtItem(client, hold_time, pClient->last_position);
   391 	}
   392 	else
   393 	{
   394 		return_value = player_cat->menu->Display(client, hold_time);
   395 	}
   396 
   397 	return return_value;
   398 }
   399 
   400 void TopMenu::OnMenuSelect2(IBaseMenu *menu, int client, unsigned int item, unsigned int item_on_page)
   401 {
   402 	const char *item_name = menu->GetItemInfo(item, NULL);
   403 	if (!item_name)
   404 	{
   405 		return;
   406 	}
   407 
   408 	topmenu_object_t *obj;
   409 	topmenu_player_t *pClient = &m_clients[client];
   410 	topmenu_object_t **pObject = m_ObjLookup.retrieve(item_name);
   411 	if (pObject == NULL)
   412 	{
   413 		return;
   414 	}
   415 
   416 	obj = *pObject;
   417 
   418 	/* We now have the object... what do we do with it? */
   419 	if (obj->type == TopMenuObject_Category)
   420 	{
   421 		/* If it's a category, the user wants to view it.. */
   422 		for (size_t i = 0; i < m_Categories.size(); i++)
   423 		{
   424 			if (m_Categories[i]->obj == obj)
   425 			{
   426 				pClient->last_root_pos = item_on_page;
   427 				DisplayCategory(client, (unsigned int)i, MENU_TIME_FOREVER, false);
   428 				break;
   429 			}
   430 		}
   431 	}
   432 	else
   433 	{
   434 		pClient->last_position = item_on_page;
   435 		
   436 		/* Re-check access in case this user had their credentials revoked */
   437 		if (obj->cmdname[0] != '\0' && !adminsys->CheckAccess(client, obj->cmdname, obj->flags, false))
   438 		{
   439 			DisplayMenu(client, 0, TopMenuPosition_LastCategory);
   440 			return;
   441 		}
   442 		
   443 		/* Pass the information on to the callback */
   444 		obj->callbacks->OnTopMenuSelectOption(this, client, obj->object_id);
   445 	}
   446 }
   447 
   448 void TopMenu::OnMenuDrawItem(IBaseMenu *menu, int client, unsigned int item, unsigned int &style)
   449 {
   450 	const char *item_name = menu->GetItemInfo(item, NULL);
   451 	if (!item_name)
   452 	{
   453 		return;
   454 	}
   455 
   456 	topmenu_object_t *obj;
   457 	topmenu_object_t **pObject = m_ObjLookup.retrieve(item_name);
   458 	if (pObject == NULL)
   459 	{
   460 		return;
   461 	}
   462 
   463 	obj = *pObject;
   464 
   465 	if (obj->cmdname[0] == '\0')
   466 	{
   467 		return;
   468 	}
   469 
   470 	if (!adminsys->CheckAccess(client, obj->cmdname, obj->flags, false))
   471 	{
   472 		style = ITEMDRAW_IGNORE;
   473 	}
   474 }
   475 
   476 unsigned int TopMenu::OnMenuDisplayItem(IBaseMenu *menu,
   477 								int client,
   478 								IMenuPanel *panel,
   479 								unsigned int item,
   480 								const ItemDrawInfo &dr)
   481 {
   482 	const char *item_name = menu->GetItemInfo(item, NULL);
   483 	if (!item_name)
   484 	{
   485 		return 0;
   486 	}
   487 
   488 	topmenu_object_t *obj;
   489 	topmenu_object_t **pObject = m_ObjLookup.retrieve(item_name);
   490 	if (pObject == NULL)
   491 	{
   492 		return 0;
   493 	}
   494 
   495 	obj = *pObject;
   496 
   497 	/* Ask the object to render the text for this client */
   498 	char renderbuf[64];
   499 	obj->callbacks->OnTopMenuDrawOption(this, client, obj->object_id, renderbuf, sizeof(renderbuf));
   500 
   501 	/* Build the new draw info */
   502 	ItemDrawInfo new_dr = dr;
   503 	new_dr.display = renderbuf;
   504 
   505 	/* Man I love the menu API.  Ask the panel to draw the item and give the position 
   506 	 * back to Core's renderer.  This way we don't have to worry about keeping the 
   507 	 * render buffer static!
   508 	 */
   509 	return panel->DrawItem(new_dr);
   510 }
   511 
   512 void TopMenu::OnMenuCancel(IBaseMenu *menu, int client, MenuCancelReason reason)
   513 {
   514 	if (reason == MenuCancel_ExitBack)
   515 	{
   516 		/* If the client chose exit back, they were on a category menu, and we can
   517 		 * now display the root menu from the last known position.
   518 		 */
   519 		DisplayMenu(client, 0, TopMenuPosition_LastRoot);
   520 	}
   521 }
   522 
   523 void TopMenu::UpdateClientRoot(int client, IGamePlayer *pGamePlayer)
   524 {
   525 	topmenu_player_t *pClient = &m_clients[client];
   526 	IGamePlayer *pPlayer = pGamePlayer ? pGamePlayer : playerhelpers->GetGamePlayer(client);
   527 
   528 	/* Determine if an update is necessary */
   529 	bool is_update_needed = false;
   530 	if (pClient->menu_serial != m_SerialNo)
   531 	{
   532 		is_update_needed = true;
   533 	}
   534 	else if (pPlayer->GetUserId() != pClient->user_id)
   535 	{
   536 		is_update_needed = true;
   537 	}
   538 
   539 	/* If no update is needed at the root level, just leave now */
   540 	if (!is_update_needed)
   541 	{
   542 		return;
   543 	}
   544 
   545 	/* First we need to flush the cache... */
   546 	TearDownClient(pClient);
   547 
   548 	/* Now, rebuild the category list, but don't create menus */
   549 	if (m_Categories.size() == 0)
   550 	{
   551 		pClient->cat_count = 0;
   552 		pClient->cats = NULL;
   553 	}
   554 	else
   555 	{
   556 		pClient->cat_count = (unsigned int)m_Categories.size();
   557 		pClient->cats = new topmenu_player_category_t[pClient->cat_count];
   558 		memset(pClient->cats, 0, sizeof(topmenu_player_category_t) * pClient->cat_count);
   559 	}
   560 
   561 	/* Re-sort the root categories if needed */
   562 	SortCategoriesIfNeeded();
   563 
   564 	/* Build the root menu */
   565 	IBaseMenu *root_menu = menus->GetDefaultStyle()->CreateMenu(this, myself->GetIdentity());
   566 
   567 	/* Add the sorted items */
   568 	for (size_t i = 0; i < m_SortedCats.size(); i++)
   569 	{
   570 		if (m_Categories[m_SortedCats[i]]->obj_list.size() == 0)
   571 		{
   572 			continue;
   573 		}
   574 		root_menu->AppendItem(m_Categories[m_SortedCats[i]]->obj->name, ItemDrawInfo(""));
   575 	}
   576 
   577 	/* Now we need to handle un-sorted items.  This is slightly trickier, as we need to 
   578 	 * pre-render each category name, and cache those names.  Phew!
   579 	 */
   580 	if (m_UnsortedCats.size())
   581 	{
   582 		obj_by_name_t *item_list = new obj_by_name_t[m_UnsortedCats.size()];
   583 		for (size_t i = 0; i < m_UnsortedCats.size(); i++)
   584 		{
   585 			obj_by_name_t *temp_obj = &item_list[i];
   586 			topmenu_object_t *obj = m_Categories[m_UnsortedCats[i]]->obj;
   587 			obj->callbacks->OnTopMenuDrawOption(this,
   588 				client, 
   589 				obj->object_id,
   590 				temp_obj->name,
   591 				sizeof(temp_obj->name));
   592 			temp_obj->obj_index = m_UnsortedCats[i];
   593 		}
   594 
   595 		/* Sort our temp list */
   596 		qsort(item_list, m_UnsortedCats.size(), sizeof(obj_by_name_t), _SortObjectNamesDescending);
   597 
   598 		/* Add the new sorted categories */
   599 		for (size_t i = 0; i < m_UnsortedCats.size(); i++)
   600 		{
   601 			if (m_Categories[item_list[i].obj_index]->obj_list.size() == 0)
   602 			{
   603 				continue;
   604 			}
   605 			root_menu->AppendItem(m_Categories[item_list[i].obj_index]->obj->name, ItemDrawInfo(""));
   606 		}
   607 
   608 		delete [] item_list;
   609 	}
   610 
   611 	/* Set the menu's title */
   612 	char renderbuf[128];
   613 	m_pTitle->OnTopMenuDrawTitle(this, client, 0, renderbuf, sizeof(renderbuf));
   614 	root_menu->SetDefaultTitle(renderbuf);
   615 
   616 	/* The client is now fully updated */
   617 	pClient->root = root_menu;
   618 	pClient->user_id = pPlayer->GetUserId();
   619 	pClient->menu_serial = m_SerialNo;
   620 	pClient->last_position = 0;
   621 	pClient->last_category = 0;
   622 	pClient->last_root_pos = 0;
   623 }
   624 
   625 void TopMenu::UpdateClientCategory(int client, unsigned int category)
   626 {
   627 	/* Update the client's root menu just in case it needs it.  This 
   628 	 * will validate that we have both a valid client and a valid
   629 	 * category structure for that client.
   630 	 */
   631 	UpdateClientRoot(client);
   632 
   633 	/* Now it's guaranteed that our category tables will be usable */
   634 	topmenu_player_t *pClient = &m_clients[client];
   635 	topmenu_category_t *cat = m_Categories[category];
   636 	topmenu_player_category_t *player_cat = &(pClient->cats[category]);
   637 
   638 	/* Does the category actually need updating? */
   639 	if (player_cat->serial == cat->serial)
   640 	{
   641 		return;
   642 	}
   643 
   644 	/* Destroy any existing menu */
   645 	if (player_cat->menu)
   646 	{
   647 		player_cat->menu->Destroy();
   648 		player_cat->menu = NULL;
   649 	}
   650 
   651 	if (pClient->last_category == category)
   652 	{
   653 		pClient->last_position = 0;
   654 	}
   655 
   656 	IBaseMenu *cat_menu = menus->GetDefaultStyle()->CreateMenu(this, myself->GetIdentity());
   657 	
   658 	/* Categories get an "exit back" button */
   659 	cat_menu->SetMenuOptionFlags(cat_menu->GetMenuOptionFlags() | MENUFLAG_BUTTON_EXITBACK);
   660 
   661 	/* Re-sort the category if needed */
   662 	SortCategoryIfNeeded(category);
   663 
   664 	/* Build the menu with the sorted items first */
   665 	for (size_t i = 0; i < cat->sorted.size(); i++)
   666 	{
   667 		cat_menu->AppendItem(cat->sorted[i]->name, ItemDrawInfo(""));
   668 	}
   669 
   670 	/* Now handle unsorted items */
   671 	if (cat->unsorted.size())
   672 	{
   673 		/* Build a list of the item names */
   674 		obj_by_name_t *item_list = new obj_by_name_t[cat->unsorted.size()];
   675 		for (size_t i = 0; i < cat->unsorted.size(); i++)
   676 		{
   677 			obj_by_name_t *item = &item_list[i];
   678 			topmenu_object_t *obj = cat->unsorted[i];
   679 			obj->callbacks->OnTopMenuDrawOption(this,
   680 				client,
   681 				obj->object_id,
   682 				item->name,
   683 				sizeof(item->name));
   684 			item->obj_index = (unsigned int)i;
   685 		}
   686 
   687 		/* Sort the names */
   688 		qsort(item_list, cat->unsorted.size(), sizeof(obj_by_name_t), _SortObjectNamesDescending);
   689 
   690 		/* Add to the menu */
   691 		for (size_t i = 0; i < cat->unsorted.size(); i++)
   692 		{
   693 			cat_menu->AppendItem(cat->unsorted[item_list[i].obj_index]->name, ItemDrawInfo(""));
   694 		}
   695 
   696 		delete [] item_list;
   697 	}
   698 
   699 	/* Set the menu's title */
   700 	char renderbuf[128];
   701 	cat->obj->callbacks->OnTopMenuDrawTitle(this, 
   702 		client, 
   703 		cat->obj->object_id, 
   704 		renderbuf, 
   705 		sizeof(renderbuf));
   706 	cat_menu->SetDefaultTitle(renderbuf);
   707 
   708 	/* We're done! */
   709 	player_cat->menu = cat_menu;
   710 	player_cat->serial = cat->serial;
   711 }
   712 
   713 void TopMenu::SortCategoryIfNeeded(unsigned int category)
   714 {
   715 	topmenu_category_t *cat = m_Categories[category];
   716 	if (!cat->reorder)
   717 	{
   718 		return;
   719 	}
   720 
   721 	cat->sorted.clear();
   722 	cat->unsorted.clear();
   723 
   724 	if (cat->obj_list.size() == 0)
   725 	{
   726 		cat->reorder = false;
   727 		return;
   728 	}
   729 
   730 	CVector<unsigned int> to_sort;
   731 	for (size_t i = 0; i < cat->obj_list.size(); i++)
   732 	{
   733 		to_sort.push_back(i);
   734 	}
   735 
   736 	/* Find a matching category in the configs */
   737 	config_category_t *config_cat = NULL; 
   738 	for (size_t i = 0; i < m_Config.cats.size(); i++)
   739 	{
   740 		if (strcmp(m_Config.strings.GetString(m_Config.cats[i]->name), cat->obj->name) == 0)
   741 		{
   742 			config_cat = m_Config.cats[i];
   743 			break;
   744 		}
   745 	}
   746 
   747 	/* If there is a matching category, build a pre-sorted item list */
   748 	if (config_cat != NULL)
   749 	{
   750 		/* Find matching objects in this category */
   751 		for (size_t i = 0; i < config_cat->commands.size(); i++)
   752 		{
   753 			const char *config_name = m_Config.strings.GetString(config_cat->commands[i]);
   754 			for (size_t j = 0; j < to_sort.size(); j++)
   755 			{
   756 				if (strcmp(config_name, cat->obj_list[to_sort[j]]->name) == 0)
   757 				{
   758 					/* Place in the final list, then remove from the temporary list */
   759 					cat->sorted.push_back(cat->obj_list[to_sort[j]]);
   760 					to_sort.erase(to_sort.iterAt(j));
   761 					break;
   762 				}
   763 			}
   764 		}
   765 	}
   766 
   767 	/* Push any remaining items onto the unsorted list */
   768 	for (size_t i = 0; i < to_sort.size(); i++)
   769 	{
   770 		cat->unsorted.push_back(cat->obj_list[to_sort[i]]);
   771 	}
   772 
   773 	cat->reorder = false;
   774 }
   775 
   776 void TopMenu::SortCategoriesIfNeeded()
   777 {
   778 	if (!m_bCatsNeedResort)
   779 	{
   780 		return;
   781 	}
   782 
   783 	/* Clear sort results */
   784 	m_SortedCats.clear();
   785 	m_UnsortedCats.clear();
   786 
   787 	if (m_Categories.size() == 0)
   788 	{
   789 		m_bCatsNeedResort = false;
   790 		return;
   791 	}
   792 
   793 	CVector<unsigned int> to_sort;
   794 	for (unsigned int i = 0; i < (unsigned int)m_Categories.size(); i++)
   795 	{
   796 		to_sort.push_back(i);
   797 	}
   798 
   799 	/* If we have any predefined categories, add them in as they appear. */
   800 	for (size_t i= 0; i < m_Config.cats.size(); i++)
   801 	{
   802 		/* Find this category and map it in if we can */
   803 		for (size_t j = 0; j < to_sort.size(); j++)
   804 		{
   805 			if (strcmp(m_Config.strings.GetString(m_Config.cats[i]->name), 
   806 					   m_Categories[to_sort[j]]->obj->name) == 0)
   807 			{
   808 				/* Add to the real list and remove from the temporary */
   809 				m_SortedCats.push_back(to_sort[j]);
   810 				to_sort.erase(to_sort.iterAt(j));
   811 				break;
   812 			}
   813 		}
   814 	}
   815 
   816 	/* Push any remaining items onto the unsorted list */
   817 	for (size_t i = 0; i < to_sort.size(); i++)
   818 	{
   819 		m_UnsortedCats.push_back(to_sort[i]);
   820 	}
   821 
   822 	m_bCatsNeedResort = false;
   823 }
   824 
   825 void TopMenu::CreatePlayers(int max_clients)
   826 {
   827 	m_max_clients = max_clients;
   828 	m_clients = (topmenu_player_t *)malloc(sizeof(topmenu_player_t) * (max_clients + 1));
   829 	memset(m_clients, 0, sizeof(topmenu_player_t) * (max_clients + 1));
   830 }
   831 
   832 void TopMenu::TearDownClient(topmenu_player_t *player)
   833 {
   834 	if (player->cats != NULL)
   835 	{
   836 		for (unsigned int i = 0; i < player->cat_count; i++)
   837 		{
   838 			topmenu_player_category_t *player_cat = &(player->cats[i]);
   839 			if (player_cat->menu != NULL)
   840 			{
   841 				player_cat->menu->Destroy();
   842 			}
   843 		}
   844 		delete [] player->cats;
   845 	}
   846 
   847 	if (player->root != NULL)
   848 	{
   849 		player->root->Destroy();
   850 	}
   851 
   852 	memset(player, 0, sizeof(topmenu_player_t));
   853 }
   854 
   855 bool TopMenu::LoadConfiguration(const char *file, char *error, size_t maxlength)
   856 {
   857 	SMCParseError err;
   858 	unsigned int line = 0, col = 0;
   859 
   860 	if ((err = textparsers->ParseFile_SMC(file, this, &line, &col))
   861 		!= SMCParse_Okay)
   862 	{
   863 		const char *err_string = textparsers->GetSMCErrorString(err);
   864 		if (!err_string)
   865 		{
   866 			err_string = "Unknown";
   867 		}
   868 
   869 		UTIL_Format(error, maxlength, "%s", err_string);
   870 
   871 		return false;
   872 	}
   873 
   874 	return true;
   875 }
   876 
   877 bool TopMenu::OnIdentityRemoval(IdentityToken_t *owner)
   878 {
   879 	/* First sweep the categories owned by us */
   880 	CVector<unsigned int> obj_list;
   881 	for (size_t i = 0; i < m_Categories.size(); i++)
   882 	{
   883 		if (m_Categories[i]->obj->owner == owner)
   884 		{
   885 			obj_list.push_back(m_Categories[i]->obj->object_id);
   886 		}
   887 	}
   888 
   889 	for (size_t i = 0; i < obj_list.size(); i++)
   890 	{
   891 		RemoveFromMenu(obj_list[i]);
   892 	}
   893 
   894 	/* Now we can look for actual items */
   895 	for (size_t i = 0; i < m_Objects.size(); i++)
   896 	{
   897 		if (m_Objects[i]->is_free)
   898 		{
   899 			continue;
   900 		}
   901 		if (m_Objects[i]->owner == owner)
   902 		{
   903 			assert(m_Objects[i]->type != TopMenuObject_Category);
   904 			RemoveFromMenu(m_Objects[i]->object_id);
   905 		}
   906 	}
   907 
   908 	return true;
   909 }
   910 
   911 #define PARSE_STATE_NONE		0
   912 #define PARSE_STATE_CATEGORY	1
   913 unsigned int ignore_parse_level = 0;
   914 unsigned int current_parse_state = 0;
   915 config_category_t *cur_cat = NULL;
   916 
   917 void TopMenu::ReadSMC_ParseStart()
   918 {
   919 	current_parse_state = PARSE_STATE_NONE;
   920 	ignore_parse_level = 0;
   921 	cur_cat = NULL;
   922 
   923 	/* Reset the old config */
   924 	m_Config.strings.Reset();
   925 	for (size_t i = 0; i < m_Config.cats.size(); i++)
   926 	{
   927 		delete m_Config.cats[i];
   928 	}
   929 	m_Config.cats.clear();
   930 }
   931 
   932 SMCParseResult TopMenu::ReadSMC_NewSection(const char *name, bool opt_quotes)
   933 {
   934 	if (ignore_parse_level)
   935 	{
   936 		ignore_parse_level++;
   937 	}
   938 	else
   939 	{
   940 		if (current_parse_state == PARSE_STATE_NONE)
   941 		{
   942 			cur_cat = new config_category_t;
   943 			cur_cat->name = m_Config.strings.AddString(name);
   944 			m_Config.cats.push_back(cur_cat);
   945 			current_parse_state = PARSE_STATE_CATEGORY;
   946 		}
   947 		else
   948 		{
   949 			ignore_parse_level = 1;
   950 		}
   951 	}
   952 
   953 	return SMCParse_Continue;
   954 }
   955 
   956 SMCParseResult TopMenu::ReadSMC_KeyValue(const char *key, const char *value, bool key_quotes, bool value_quotes)
   957 {
   958 	if (ignore_parse_level > 0
   959 		|| current_parse_state != PARSE_STATE_CATEGORY
   960 		|| cur_cat == NULL)
   961 	{
   962 		return SMCParse_Continue;
   963 	}
   964 
   965 	if (strcmp(key, "item") == 0)
   966 	{
   967 		cur_cat->commands.push_back(m_Config.strings.AddString(value));
   968 	}
   969 
   970 	return SMCParse_Continue;
   971 }
   972 
   973 SMCParseResult TopMenu::ReadSMC_LeavingSection()
   974 {
   975 	if (ignore_parse_level)
   976 	{
   977 		ignore_parse_level--;
   978 	}
   979 	else
   980 	{
   981 		if (current_parse_state == PARSE_STATE_CATEGORY)
   982 		{
   983 			cur_cat = NULL;
   984 			current_parse_state = PARSE_STATE_NONE;
   985 		}
   986 	}
   987 
   988 	return SMCParse_Continue;
   989 }
   990 
   991 unsigned int TopMenu::FindCategory(const char *name)
   992 {
   993 	topmenu_object_t **p_obj = m_ObjLookup.retrieve(name);
   994 	if (!p_obj)
   995 	{
   996 		return 0;
   997 	}
   998 
   999 	topmenu_object_t *obj = *p_obj;
  1000 	if (obj->type != TopMenuObject_Category)
  1001 	{
  1002 		return 0;
  1003 	}
  1004 
  1005 	return obj->object_id;
  1006 }
  1007 
  1008 int _SortObjectNamesDescending(const void *ptr1, const void *ptr2)
  1009 {
  1010 	obj_by_name_t *obj1 = (obj_by_name_t *)ptr1;
  1011 	obj_by_name_t *obj2 = (obj_by_name_t *)ptr2;
  1012 	return strcmp(obj1->name, obj2->name);
  1013 }
  1014 
  1015 unsigned int strncopy(char *dest, const char *src, size_t count)
  1016 {
  1017 	if (!count)
  1018 	{
  1019 		return 0;
  1020 	}
  1021 
  1022 	char *start = dest;
  1023 	while ((*src) && (--count))
  1024 	{
  1025 		*dest++ = *src++;
  1026 	}
  1027 	*dest = '\0';
  1028 
  1029 	return (dest - start);
  1030 }
  1031 
  1032 size_t UTIL_Format(char *buffer, size_t maxlength, const char *fmt, ...)
  1033 {
  1034 	va_list ap;
  1035 	va_start(ap, fmt);
  1036 	size_t len = vsnprintf(buffer, maxlength, fmt, ap);
  1037 	va_end(ap);
  1038 
  1039 	if (len >= maxlength)
  1040 	{
  1041 		buffer[maxlength - 1] = '\0';
  1042 		return (maxlength - 1);
  1043 	}
  1044 	else
  1045 	{
  1046 		return len;
  1047 	}
  1048 }