From 9276e9f7071fc66f0839ab8468b03e0c873159d4 Mon Sep 17 00:00:00 2001
From: Mark Aherne <mark.aherne@fantom.ie>
Date: Thu, 3 Jul 2014 22:55:54 +0100
Subject: [PATCH] This change to nanomanager optimizes the sending of nanoui
 assets to clients. The flist (file list) proc was being used multiple times
 for each client user logon, this now only occurs once when the server starts.
 Hopefully this fixes the nanoui assets issue which occurs during peak usage.

---
 code/modules/nano/nanomanager.dm | 32 +++++++++++++++++++-------------
 1 file changed, 19 insertions(+), 13 deletions(-)

diff --git a/code/modules/nano/nanomanager.dm b/code/modules/nano/nanomanager.dm
index ae938a9a8a..a10965a448 100644
--- a/code/modules/nano/nanomanager.dm
+++ b/code/modules/nano/nanomanager.dm
@@ -5,13 +5,30 @@
 	var/open_uis[0]
 	// a list of current open /nanoui UIs, not grouped, for use in processing
 	var/list/processing_uis = list()
+	// a list of asset filenames which are to be sent to the client on user logon
+	var/list/asset_files = list()
 
  /**
   * Create a new nanomanager instance.
+  * This proc generates a list of assets which are to be sent to each client on connect
   *
   * @return /nanomanager new nanomanager object
   */
 /datum/nanomanager/New()
+	var/list/nano_asset_dirs = list(\
+		"nano/css/",\
+		"nano/images/",\
+		"nano/js/",\
+		"nano/templates/"\
+	)
+	
+	var/list/filenames = null
+	for (var/path in nano_asset_dirs)
+		filenames = flist(path)
+		for(var/filename in filenames)
+			if(copytext(filename, length(filename)) != "/") // filenames which end in "/" are actually directories, which we want to ignore
+				asset_files.Add(file(path + filename)) // add this file to asset_files for sending to clients when they connect
+	
 	return
 
  /**
@@ -208,17 +225,6 @@
   */
 
 /datum/nanomanager/proc/send_resources(client)
-	var/list/nano_asset_dirs = list(\
-		"nano/css/",\
-		"nano/images/",\
-		"nano/js/",\
-		"nano/templates/"\
-	)
-	
-	var/list/files = null
-	for (var/path in nano_asset_dirs)
-		files = flist(path)
-		for(var/file in files)
-			if(copytext(file, length(file)) != "/") // files which end in "/" are actually directories, which we want to ignore
-				client << browse_rsc(file(path + file))	// send the file to the client
+	for(var/file in asset_files)			
+		client << browse_rsc(file)	// send the file to the client