modules/admin-full: make software page tabbed, show available list broken down by letters; greatly speeds up loading time

modules/admin-full/luasrc/controller/admin/system.lua

@@ -52,6 +52,13 @@ function action_packages()
 	local stderr  = { "" }
 	local out, err
 
+	-- Display
+	local display = luci.http.formvalue("display") or "installed"
+
+	-- Letter
+	local letter = string.byte(luci.http.formvalue("letter") or "A", 1)
+	letter = (letter == 35 or (letter >= 65 and letter <= 90)) and letter or 65
+
 	-- Search query
 	local query = luci.http.formvalue("query")
 	query = (query ~= '') and query or nil
@@ -111,6 +118,8 @@ function action_packages()
 
 
 	luci.template.render("admin_system/packages", {
+		display = display,
+		letter  = letter,
 		query   = query,
 		install = install,
 		remove  = remove,

modules/admin-full/luasrc/view/admin_system/packages.htm

@@ -34,6 +34,19 @@ local free_byte = space_free * fstat.frsize
 
 local filter = { }
 
+
+local querypat
+if query and #query > 0 then
+	querypat = "*%s*" % query
+end
+
+local letterpat
+if letter == 35 then
+	letterpat = "[^a-zA-Z]*"
+else
+	letterpat = string.char(91, letter, letter + 32, 93, 42) -- '[' 'A' 'a' ']' '*'
+end
+
 -%>
 <%+header%>
 <h2><a id="content" name="content"><%:System%> - <%:Software%></a></h2>
@@ -55,9 +68,10 @@ local filter = { }
 					</div>
 				</div>
 
-				<div class="cbi-value">
+				<div class="cbi-value cbi-value-last">
 					<label class="cbi-value-title"><%:Filter%>:</label>
 					<div class="cbi-value-field">
+						<input type="hidden" name="display" value="<%=pcdata(display)%>" />
 						<input type="text" name="query" size="20" value="<%=pcdata(query)%>" />
 						<input type="submit" class="cbi-button cbi-input-find" name="search" value="<%:Find package%>" />
 					</div>
@@ -73,6 +87,12 @@ local filter = { }
 				<div style="background-color:#F08080; border-right:1px solid #000000; height:100%; width:<%=used_perc%>%">&#160;</div>
 			</div>
 
+			<% if querypat then %>
+				<br /><hr /><br />
+				<%:Displaying only packages containing%> <strong>"<%=pcdata(query)%>"</strong>
+				<input type="button" onclick="location.href='?display=<%=pcdata(display)%>'" href="#" class="cbi-button cbi-button-reset" style="margin-left:3em" value="Reset" />
+			<% end %>
+
 			<% if (install and next(install)) or (remove and next(remove)) or update or upgrade then %>
 				<br /><hr /><br />
 				<% if #stdout > 0 then %><pre><%=pcdata(stdout)%></pre><% end %>
@@ -81,8 +101,12 @@ local filter = { }
 		</fieldset>
 		<br />
 
-		<h3><%:Installed packages%><% if query then %> (<%=pcdata(query)%>)<% end %></h3>
+		<ul class="cbi-tabmenu">
+			<li class="cbi-tab<% if display ~= "installed" then %>-disabled<% end %>"><a href="?display=installed&amp;query=<%=pcdata(query)%>"><%:Installed packages%><% if query then %> (<%=pcdata(query)%>)<% end %></a></li>
+			<li class="cbi-tab<% if display ~= "available" then %>-disabled<% end %>"><a href="?display=available&amp;query=<%=pcdata(query)%>"><%:Available packages%><% if query then %> (<%=pcdata(query)%>)<% end %></a></li>
+		</ul>
 		
+		<% if display ~= "available" then %>
 			<fieldset class="cbi-section">
 				<table class="cbi-section-table" style="width:100%">
 					<tr class="cbi-section-table-titles">
@@ -90,7 +114,7 @@ local filter = { }
 						<th class="cbi-section-table-cell" style="text-align:left"><%:Package name%></th>
 						<th class="cbi-section-table-cell" style="text-align:left"><%:Version%></th>
 					</tr>
-				<% local empty = true; luci.model.ipkg.list_installed(query, function(n, v, d) empty = false; filter[n] = true %>
+					<% local empty = true; luci.model.ipkg.list_installed(querypat, function(n, v, d) empty = false; filter[n] = true %>
 					<tr class="cbi-section-table-row cbi-rowstyle-<%=rowstyle()%>">
 						<td style="text-align:left; width:10%"><a onclick="return window.confirm('<%:Remove%> &quot;<%=luci.util.pcdata(n)%>&quot; ?')" href="<%=REQUEST_URI%>?submit=1&amp;remove=<%=luci.util.pcdata(n)%>"><%:Remove%></a></td>
 						<td style="text-align:left"><%=luci.util.pcdata(n)%></td>
@@ -106,12 +130,17 @@ local filter = { }
 					<% end %>
 				</table>
 			</fieldset>
-		<br />
+		<% else %>
-
-
-		<h3><%:Available packages%><% if query then %> (<%=pcdata(query)%>)<% end %></h3>
-
 			<fieldset class="cbi-section">
+			<% if not querypat then %>
+				<ul class="cbi-tabmenu">
+					<% local i; for i = 65, 90 do %>
+					<li class="cbi-tab<% if letter ~= i then %>-disabled<% end %>"><a href="?display=available&amp;letter=<%=string.char(i)%>"><%=string.char(i)%></a></li>
+					<% end %>
+					<li class="cbi-tab<% if letter ~= 35 then %>-disabled<% end %>"><a href="?display=available&amp;letter=%23">#</a></li>
+				</ul>
+				<div class="cbi-section-node">
+			<% end %>
 				<table class="cbi-section-table" style="width:100%">
 					<tr class="cbi-section-table-titles">
 						<th class="cbi-section-table-cell" style="text-align:left">&#160;</th>
@@ -119,7 +148,7 @@ local filter = { }
 						<th class="cbi-section-table-cell" style="text-align:left"><%:Version%></th>
 						<th class="cbi-section-table-cell" style="text-align:left"><%:Description%></th>
 					</tr>
-				<% local empty = true; luci.model.ipkg.list_all(query, function(n, v, d) if filter[n] then return end; empty = false %>
+					<% local empty = true; luci.model.ipkg.list_all(querypat or letterpat, function(n, v, d) if filter[n] then return end; empty = false %>
 					<tr class="cbi-section-table-row cbi-rowstyle-<%=rowstyle()%>">
 						<td style="text-align:left; width:10%"><a onclick="return window.confirm('<%:Install%> &quot;<%=luci.util.pcdata(n)%>&quot; ?')" href="<%=REQUEST_URI%>?submit=1&amp;install=<%=luci.util.pcdata(n)%>"><%:Install%></a></td>
 						<td style="text-align:left"><%=luci.util.pcdata(n)%></td>
@@ -136,7 +165,11 @@ local filter = { }
 					</tr>
 					<% end %>
 				</table>
+			<% if not querypat then %>
+				</div>
+			<% end %>
 			</fieldset>
+		<% end %>
 	</div>
 </form>
 <%+footer%>