Move to python venv so that upto date chameleon avaiable

Targets/CreateStarterWebsite/CreateStarterWebsite-Custom.pm

@@ -0,0 +1,63 @@
+#
+# Routines to be edited by the developer to provide validation for parameters
+# and provison of the control data for table(s)
+#
+# Generated by SM2Gen version:0.8 Chameleon version:4.5.4 On Python:3.12.3 at 2024-09-13 19:20 
+#
+
+use esmith::util;
+use esmith::HostsDB;
+use esmith::AccountsDB;
+use esmith::NetworksDB;
+use esmith::HostsDB;
+use esmith::DomainsDB;
+
+
+#The most common ones
+our $cdb = esmith::ConfigDB->open()   || die("Couldn't open config db");
+our $adb = esmith::AccountsDB->open() || die("Couldn't open Accounts db");
+our $ndb = esmith::NetworksDB->open() || die("Couldn't open Network db");
+our $hdb = esmith::HostsDB->open() 	  || die("Couldn't open Hosts db");
+our $ddb = esmith::DomainsDB->open()  || die("Couldn't open Domains db");
+
+# Validation routines - parameters for each panel
+
+	sub validate_PARAMS {
+		my $c = shift;
+		my $prefix_data = shift; #Data hash as parameter
+		my $ret = 'ok';
+		return $ret;
+	}
+
+	
+# Get control data for tables(s)
+
+
+# Return hash with values from row in which link clicked on table
+
+	sub get_selected_PARAMS {
+		my $c = shift;
+		my $selected = shift; #Parameter is name of selected row.
+		my $is_new_record = shift; #Indicates new record required (defaults)
+		my %ret = {};
+		return $ret;
+	}
+
+
+#after sucessful modify or create or whatever and submit then perfom (if the params validate)
+
+	sub perform_PARAMS {
+		my $c = shift;
+		my $prefix_data = shift; #Data hash as parameter
+		my $ret = 'ok';
+		return $ret;
+	}
+
+
+sub create_link{
+	# WIP
+	my ($c,$route, $panel, $index) = shift;
+	my $link = "$route?trt=$panel&Selected=$index";
+	return $link;
+}
+1;

Targets/CreateStarterWebsite/CreateStarterWebsite.pm

@@ -0,0 +1,243 @@
+package SrvMngr::Controller::CreateStarterWebsite;
+#
+# Generated by version:SM2Gen version:0.8 Chameleon version:4.5.4 On Python:3.12.3 at 2024-09-13 19:20 
+#
+#----------------------------------------------------------------------
+# heading     : Miscellaneous
+# description : Create Starter Website
+# navigation  : 2000 400
+#
+# name : createstarterwebsite,    method : get,   url : /createstarterwebsite,   ctlact : CreateStarterWebsite#main
+# name : createstarterwebsiteu,   method : post,  url : /createstarterwebsiteu,  ctlact : CreateStarterWebsite#do_update
+# name : createstarterwebsited,   method : get,   url : /createstarterwebsited,  ctlact : CreateStarterWebsite#do_display
+#
+# routes : end
+#
+# Documentation: https://wiki.contribs.org/CreateStarterWebsite
+#----------------------------------------------------------------------
+
+#
+# Scheme of things:
+#
+# TBA!!
+
+use strict;
+use warnings;
+use Mojo::Base 'Mojolicious::Controller';
+
+use constant FALSE => 0;
+use constant TRUE  => 1;
+
+use Locale::gettext;
+use SrvMngr::I18N;
+use SrvMngr qw(theme_list init_session);
+
+use Data::Dumper;
+
+use esmith::util;
+use esmith::HostsDB;
+use esmith::AccountsDB;
+use esmith::NetworksDB;
+use esmith::HostsDB;
+use esmith::DomainsDB;
+
+
+#The most common ones
+our $cdb = esmith::ConfigDB->open()   || die("Couldn't open config db");
+our $adb = esmith::AccountsDB->open() || die("Couldn't open Accounts db");
+our $ndb = esmith::NetworksDB->open() || die("Couldn't open Network db");
+our $hdb = esmith::HostsDB->open() 	  || die("Couldn't open Hosts db");
+our $ddb = esmith::DomainsDB->open()  || die("Couldn't open Domains db");
+
+require '/usr/share/smanager/lib/SrvMngr/Controller/CreateStarterWebsite-Custom.pm';  #The code that is to be added by the developer
+
+sub main {
+#
+# Initial entry - route is "/<whatever>"
+#
+#set initial panel
+#for initial panel:
+	#Specifiy panel to enter
+	#load up _data hash with DB fields
+	#load up stash with pointer(s) to control fields hash(= get-))
+		#and a pointer to the prefix_data hash
+#render initial panel
+
+    my $c = shift;
+    $c->app->log->info( $c->log_req );
+
+    my %csw_data = ();
+    my $title = $c->l('csw_Create_Starter_Website');
+    my $modul = '';
+
+    $csw_data{'trt'} = 'PARAMS';
+    
+    #Load any DB entries into the <prefix>_data area so as they are preset in the form
+    # which DB - this only really works if the initial panel is a PARAMS type panel and not a TABLE
+    my $db = $cdb; #pickup local or global db or Default to config
+    
+
+	# and table control fields
+    
+	
+    $c->stash(
+        title         => $title,
+        modul         => $modul,
+        csw_data      => \%csw_data
+    );
+    $c->render( template => "createstarterwebsite" );
+}
+
+# Post request with params - submit from the form 
+sub do_update {
+#
+# Return after submit pushed on panel (this is a post) - route is "/<whatever>u"
+# parameters in the params hash.
+#
+#load up all params into prefix_data hash:
+#By panel (series of if statements - only one executed):
+		#call validate-PANEL() - return ret = ok or error message
+			
+#if validation not ok:
+	#render back to current panel with error message in stash
+#otherwise:
+	#By panel (series of if statements - only one executed):
+		#do whatever is required: call perform-PANEL() - return "ok" or Error Message
+			#call signal-event for any global actions specified (check it exists - error and continue?)
+			#if action smeserver-<whatever>-update exists
+				#signal_event smeserver-<whatever>-update
+			#call signal-event for any specific actions for thids panel (check it exists first - error and continue)
+		#set success in stash
+		#if no "nextpanel" entry:
+			#set firstpanel
+		#else 
+			#set nextpanel
+		#call render
+	
+    my $c = shift;
+    $c->app->log->info($c->log_req);
+    
+    my %csw_data = ();
+    my $title = $c->l('csw_Create_Starter_Website');
+
+	# Accessing all POST parameters
+    my %params = $c->req->params->to_hash;
+
+    # Get number of POST parameters
+    my $num_params = keys %params;
+    
+    #Params are available in the hash "params" - copy to the prefix_data hash
+    while (my ($key, $value) = each %{$c->req->params->to_hash}) {
+        $csw_data{$key} = $value;
+    }
+
+    # the value of trt will tell you which panel has returned    
+    my $trt = $c->param('trt') || 'PARAMS'; #hidden control on every form.
+    my $ret = 'ok';
+    #Validate the parameters in a custom sub one for each panel (although only one of these will be executed)
+
+    my $thispanel;
+    
+		if ($trt eq 'PARAMS'){
+			#Validate form parameters for panel PARAMS
+			$ret = $c->validate_PARAMS(\%csw_data);
+			$thispanel = 'PARAMS';
+		}
+	
+	
+	if ($ret ne "ok") {
+        # return to the panel with error message
+		$c->stash(error => $c->l($ret));
+		$c->render("createstarterwebsite");		
+	} else {
+		#Do whatever is needed, including writing values to the DB
+		
+			if ($trt eq 'PARAMS'){
+				#do whatever is required ...
+				$ret = $c->perform_PARAMS(\%csw_data);
+				if ($ret ne "ok") {
+					# return to the panel with error message
+					$c->stash(error => $c->l($ret));
+					$c->render("createstarterwebsite");		
+				} else {
+					$c->stash( success => $c->l('csw_PARAMS_panel_action_was_successful')); #A bit bland - edit it in the lex file
+				}
+			}
+		
+		# and call any signal-events needed
+		
+		
+		# Setup shared data and call panel
+		$c->stash( 
+			title 			=> $title, 
+			csw_data  => \%csw_data
+		);
+		if ('none' eq 'none') {
+			$csw_data{'trt'} = 'PARAMS';
+		} else {
+			$csw_data{'trt'} = 'none';
+		}	
+		$c->render("createstarterwebsite");
+	} 
+}
+
+sub do_display {
+#
+# Return after link clicked in table (this is a get) - route is "/<whatever>d"
+# Expects ?trt=PANEL&selected="TableRowName" plus any other required
+#
+# OR it maybe a post from the main panel to add a new record 
+#
+#load up all supplied params into prefix_data hash
+#call get-selected-PANEL() - returns hash of all relevent parameters
+#load up returned hash into prefix_data
+#render - to called panel
+
+    my $c = shift;
+    $c->app->log->info($c->log_req);
+    
+    my %csw_data = ();
+    my $title = $c->l('csw_Create_Starter_Website');
+
+	# Accessing all parameters
+    my %params = $c->req->params->to_hash;
+
+    # Get number of parameters
+    my $num_params = keys %params;
+    
+    #Tag as Post or Get (ie. create new entry or edit existing one
+    my $is_new_record = ($c->req->method() eq 'POST');
+    
+    #Params are available in the hash "params" - copy to the prefix_data hash
+    while (my ($key, $value) = each %{$c->req->params->to_hash}) {
+        $csw_data{$key} = $value;
+    }
+
+    # the value of trt will tell you which panel has returned    
+    my $trt = $c->param('trt') || 'PARAMS'; #Indicates where to go now
+ 
+    # Now add in the params from the selected row from the table
+		
+    my %selectedrow;
+    
+		if ($trt eq 'PARAMS'){
+			#Validate form parameters for panel PARAMS
+				%selectedrow = $c->get_selected_PARAMS($csw_data{'Selected'},$is_new_record);
+		}
+	
+ 
+	#Copy in the selected row params to the prefix_data hash to pass to the panel
+	while (my ($key, $value) = each %selectedrow){
+        $csw_data{$key} = $value;
+    }
+	# Where to go now
+	$csw_data{'trt'} = $trt;
+	
+	# Data for panel
+	$c->stash( 
+		title 			=> $title, 
+		csw_data  => \%csw_data
+	);
+	$c->render("createstarterwebsite");
+}    
+1;

Targets/CreateStarterWebsite/_csw_PARAMS.html.ep

@@ -1,5 +1,5 @@
 %#
-%# Generated by SM2Gen version:0.8 Chameleon version:3.8.1 On Python:3.12.3 ( at 2024-09-12 19:31 
+%# Generated by SM2Gen version:0.8 Chameleon version:4.5.4 On Python:3.12.3 at 2024-09-13 19:20 
 %#
 <div id="CreateStarterWebsite-PARAMS" class="partial CreateStarterWebsite-PARAMS">
   <script>
@@ -8,16 +8,16 @@
     };
   </script>
      <h2>
-     %= l('csw Hello PARAMS');
+     %= l('csw_Hello_PARAMS');
      </h2>
-    % my $btn = l('APPLY');
+    % my $btn = l('csw_APPLY');
     %= form_for "CreateStarterWebsited" => (method => 'POST') => begin
 
-   	    % param 'trt' => ${prefix}_data->{trt} unless param 'trt';
-		%= hidden_field 'trt' => ${prefix}_data->{trt}
+   	    % param 'trt' => $csw_data->{trt} unless param 'trt';
+		%= hidden_field 'trt' => $csw_data->{trt}
 		%# Inputs etc in here.
 
-		<h2><%=l('Manage CreateStarterWebsite settings:')%></h2>
+		<h2><%=l('csw_Manage_CreateStarterWebsite_settings:')%></h2>
 	
 		<p>
 			%= l('To create a simple web page for your company, fill 
@@ -25,7 +25,7 @@
 		</p>
 	
 		<p>
-			%= l('You can leave any field blank if you do not need it.')
+			%= l('csw_You_can_leave_any_field')
 		</p>
 	
 		<p>
@@ -38,7 +38,7 @@
 		</p>
 	
 		<p>
-			%= l('Do not use this optionif you have already customized your web site, since it will 
+			%= l('Do not use this option if you have already customized your web site, since it will 
 	  overwrite the 'index.htm' file in your web site directory.')
 		</p>
 	
@@ -67,7 +67,7 @@
 		<span class=label>
 			%=l('csw_')
 		</span><span class=data>
-			% param 'text1' => ${prefix}_data->{text1} unless param 'text1';
+			% param 'text1' => $csw_data->{text1} unless param 'text1';
 			%= text_area 'text1', cols=>40, rows=>10
 		</span><br>
 	
@@ -90,7 +90,7 @@
 		<span class=label>
 			%=l('csw_')
 		</span><span class=data>
-			% param 'text2' => ${prefix}_data->{text2} unless param 'text2';
+			% param 'text2' => $csw_data->{text2} unless param 'text2';
 			%= text_area 'text2', cols=>40, rows=>10
 		</span><br>
 	
@@ -101,7 +101,7 @@
 		</p>
 	
 		<p>
-			%= l('Do you wish to proceed?')
+			%= l('csw_Do_you_wish_to_proceed?')
 		</p>
 	
 		%# Probably finally by a submit.

Targets/CreateStarterWebsite/createstarterwebsite.html.ep

@@ -1,6 +1,6 @@
 % layout 'default', title => "Sme server 2 - Create Starter Website", share_dir => './';
 %#
-%# Generated by SM2Gen version:0.8 Chameleon version:3.8.1 On Python:3.12.3 ( at 2024-09-12 19:31 
+%# Generated by SM2Gen version:0.8 Chameleon version:4.5.4 On Python:3.12.3 at 2024-09-13 19:20 
 %#
 % content_for 'module' => begin
 <div id="module" class="module CreateStarterWebsite-panel">
@@ -17,22 +17,22 @@
 	%= $c->render_to_string(inline => stash('modul') );
     % }
 
-   	%if (${prefix}_data->{first}) {
+   	%if ($csw_data->{first}) {
 	    <br><p>
-		%=$c->render_to_string(inline =>$c->l(${prefix}_data->{first}))
+		%=$c->render_to_string(inline =>$c->l($csw_data->{first}))
 		</p>
 
-	%} elsif (${prefix}_data->{success}) {
+	%} elsif ($csw_data->{success}) {
 		<div class='sme-border'>
 	       <h2> Operation Status Report</h2><p>
-			%= $c->l(${prefix}_data->{success});
+			%= $c->l($csw_data->{success});
 			</p>
 		</div>
 
-	   %} elsif (${prefix}_data->{error}) { 
+	   %} elsif ($csw_data->{error}) { 
 	   <div class='sme-error'>
 	       <h2> Operation Status Report - error</h2><p>
-			%= $c->l(${prefix}_data->{error});
+			%= $c->l($csw_data->{error});
 			</p>
     	</div>
 	%}
@@ -40,7 +40,7 @@
 	%#Routing to partials according to trt parameter.
 	%#This ought to be cascading if/then/elsif, but is easier to just stack the if/then's rather like a case statement'
 	
-	% if (${prefix}_data->{trt} eq "PARAMS") {
+	% if ($csw_data->{trt} eq "PARAMS") {
 		%= include 'partials/_csw_PARAMS'
 	%}
 	

Targets/CreateStarterWebsite/createstarterwebsite_en.lex

@@ -0,0 +1,8 @@
+'csw_APPLY' => 'Apply',
+'csw_Do_you_wish_to_proceed?' => 'Do you wish to proceed?',
+'csw_PARAMS_panel_action_was_successful' => 'PARAMS panel action was successful',
+'csw_Manage_CreateStarterWebsite_settings:' => 'Manage CreateStarterWebsite settings:',
+'csw_Hello_PARAMS' => 'Hello PARAMS',
+'csw_' => '',
+'csw_You_can_leave_any_field' => 'You can leave any field blank if you do not need it.  ',
+'csw_Create_Starter_Website' => 'Create Starter Website',

Targets/DiskUsage/Diskusage-Custom.pm

@@ -0,0 +1,75 @@
+#
+# Routines to be edited by the developer to provide validation for parameters
+# and provison of the control data for table(s)
+#
+# Generated by SM2Gen version:0.8 Chameleon version:4.5.4 On Python:3.12.3 at 2024-09-13 19:18 
+#
+
+use esmith::util;
+use esmith::HostsDB;
+use esmith::AccountsDB;
+use esmith::NetworksDB;
+use esmith::HostsDB;
+use esmith::DomainsDB;
+
+
+#The most common ones
+our $cdb = esmith::ConfigDB->open()   || die("Couldn't open config db");
+our $adb = esmith::AccountsDB->open() || die("Couldn't open Accounts db");
+our $ndb = esmith::NetworksDB->open() || die("Couldn't open Network db");
+our $hdb = esmith::HostsDB->open() 	  || die("Couldn't open Hosts db");
+our $ddb = esmith::DomainsDB->open()  || die("Couldn't open Domains db");
+
+# Validation routines - parameters for each panel
+
+	sub validate_PARAMS {
+		my $c = shift;
+		my $prefix_data = shift; #Data hash as parameter
+		my $ret = 'ok';
+		return $ret;
+	}
+
+	
+# Get control data for tables(s)
+
+	sub get_Table1 {
+		my $c = shift;
+		my @ret = {};
+		return \@ret
+	}
+
+	sub get_Table2 {
+		my $c = shift;
+		my @ret = {};
+		return \@ret
+	}
+
+
+# Return hash with values from row in which link clicked on table
+
+	sub get_selected_PARAMS {
+		my $c = shift;
+		my $selected = shift; #Parameter is name of selected row.
+		my $is_new_record = shift; #Indicates new record required (defaults)
+		my %ret = {};
+		return $ret;
+	}
+
+
+#after sucessful modify or create or whatever and submit then perfom (if the params validate)
+
+	sub perform_PARAMS {
+		my $c = shift;
+		my $prefix_data = shift; #Data hash as parameter
+		my $ret = 'ok';
+		return $ret;
+	}
+
+
+sub create_link{
+	# WIP
+	my ($c,$route, $panel, $index) = shift;
+	my $link = "$route?trt=$panel&Selected=$index";
+	return $link;
+}
+1;

Targets/DiskUsage/Diskusage.pm

@@ -0,0 +1,245 @@
+package SrvMngr::Controller::Diskusage;
+#
+# Generated by version:SM2Gen version:0.8 Chameleon version:4.5.4 On Python:3.12.3 at 2024-09-13 19:18 
+#
+#----------------------------------------------------------------------
+# heading     : Miscellaneous
+# description : Disk Usage
+# navigation  : 2000 400
+#
+# name : diskusage,    method : get,   url : /diskusage,   ctlact : Diskusage#main
+# name : diskusageu,   method : post,  url : /diskusageu,  ctlact : Diskusage#do_update
+# name : diskusaged,   method : get,   url : /diskusaged,  ctlact : Diskusage#do_display
+#
+# routes : end
+#
+# Documentation: https://wiki.contribs.org/Diskusage
+#----------------------------------------------------------------------
+
+#
+# Scheme of things:
+#
+# TBA!!
+
+use strict;
+use warnings;
+use Mojo::Base 'Mojolicious::Controller';
+
+use constant FALSE => 0;
+use constant TRUE  => 1;
+
+use Locale::gettext;
+use SrvMngr::I18N;
+use SrvMngr qw(theme_list init_session);
+
+use Data::Dumper;
+
+use esmith::util;
+use esmith::HostsDB;
+use esmith::AccountsDB;
+use esmith::NetworksDB;
+use esmith::HostsDB;
+use esmith::DomainsDB;
+
+
+#The most common ones
+our $cdb = esmith::ConfigDB->open()   || die("Couldn't open config db");
+our $adb = esmith::AccountsDB->open() || die("Couldn't open Accounts db");
+our $ndb = esmith::NetworksDB->open() || die("Couldn't open Network db");
+our $hdb = esmith::HostsDB->open() 	  || die("Couldn't open Hosts db");
+our $ddb = esmith::DomainsDB->open()  || die("Couldn't open Domains db");
+
+require '/usr/share/smanager/lib/SrvMngr/Controller/Diskusage-Custom.pm';  #The code that is to be added by the developer
+
+sub main {
+#
+# Initial entry - route is "/<whatever>"
+#
+#set initial panel
+#for initial panel:
+	#Specifiy panel to enter
+	#load up _data hash with DB fields
+	#load up stash with pointer(s) to control fields hash(= get-))
+		#and a pointer to the prefix_data hash
+#render initial panel
+
+    my $c = shift;
+    $c->app->log->info( $c->log_req );
+
+    my %du_data = ();
+    my $title = $c->l('du_Disk_Usage');
+    my $modul = '';
+
+    $du_data{'trt'} = 'PARAMS';
+    
+    #Load any DB entries into the <prefix>_data area so as they are preset in the form
+    # which DB - this only really works if the initial panel is a PARAMS type panel and not a TABLE
+    my $db = $cdb; #pickup local or global db or Default to config
+    
+
+	# and table control fields
+    	$c->stash(Table1=>$c->get_Table1());
+		$c->stash(Table2=>$c->get_Table2());
+	
+	
+    $c->stash(
+        title         => $title,
+        modul         => $modul,
+        du_data      => \%du_data
+    );
+    $c->render( template => "diskusage" );
+}
+
+# Post request with params - submit from the form 
+sub do_update {
+#
+# Return after submit pushed on panel (this is a post) - route is "/<whatever>u"
+# parameters in the params hash.
+#
+#load up all params into prefix_data hash:
+#By panel (series of if statements - only one executed):
+		#call validate-PANEL() - return ret = ok or error message
+			
+#if validation not ok:
+	#render back to current panel with error message in stash
+#otherwise:
+	#By panel (series of if statements - only one executed):
+		#do whatever is required: call perform-PANEL() - return "ok" or Error Message
+			#call signal-event for any global actions specified (check it exists - error and continue?)
+			#if action smeserver-<whatever>-update exists
+				#signal_event smeserver-<whatever>-update
+			#call signal-event for any specific actions for thids panel (check it exists first - error and continue)
+		#set success in stash
+		#if no "nextpanel" entry:
+			#set firstpanel
+		#else 
+			#set nextpanel
+		#call render
+	
+    my $c = shift;
+    $c->app->log->info($c->log_req);
+    
+    my %du_data = ();
+    my $title = $c->l('du_Disk_Usage');
+
+	# Accessing all POST parameters
+    my %params = $c->req->params->to_hash;
+
+    # Get number of POST parameters
+    my $num_params = keys %params;
+    
+    #Params are available in the hash "params" - copy to the prefix_data hash
+    while (my ($key, $value) = each %{$c->req->params->to_hash}) {
+        $du_data{$key} = $value;
+    }
+
+    # the value of trt will tell you which panel has returned    
+    my $trt = $c->param('trt') || 'PARAMS'; #hidden control on every form.
+    my $ret = 'ok';
+    #Validate the parameters in a custom sub one for each panel (although only one of these will be executed)
+
+    my $thispanel;
+    
+		if ($trt eq 'PARAMS'){
+			#Validate form parameters for panel PARAMS
+			$ret = $c->validate_PARAMS(\%du_data);
+			$thispanel = 'PARAMS';
+		}
+	
+	
+	if ($ret ne "ok") {
+        # return to the panel with error message
+		$c->stash(error => $c->l($ret));
+		$c->render("diskusage");		
+	} else {
+		#Do whatever is needed, including writing values to the DB
+		
+			if ($trt eq 'PARAMS'){
+				#do whatever is required ...
+				$ret = $c->perform_PARAMS(\%du_data);
+				if ($ret ne "ok") {
+					# return to the panel with error message
+					$c->stash(error => $c->l($ret));
+					$c->render("diskusage");		
+				} else {
+					$c->stash( success => $c->l('du_PARAMS_panel_action_was_successful')); #A bit bland - edit it in the lex file
+				}
+			}
+		
+		# and call any signal-events needed
+		
+		
+		# Setup shared data and call panel
+		$c->stash( 
+			title 			=> $title, 
+			du_data  => \%du_data
+		);
+		if ('none' eq 'none') {
+			$du_data{'trt'} = 'PARAMS';
+		} else {
+			$du_data{'trt'} = 'none';
+		}	
+		$c->render("diskusage");
+	} 
+}
+
+sub do_display {
+#
+# Return after link clicked in table (this is a get) - route is "/<whatever>d"
+# Expects ?trt=PANEL&selected="TableRowName" plus any other required
+#
+# OR it maybe a post from the main panel to add a new record 
+#
+#load up all supplied params into prefix_data hash
+#call get-selected-PANEL() - returns hash of all relevent parameters
+#load up returned hash into prefix_data
+#render - to called panel
+
+    my $c = shift;
+    $c->app->log->info($c->log_req);
+    
+    my %du_data = ();
+    my $title = $c->l('du_Disk_Usage');
+
+	# Accessing all parameters
+    my %params = $c->req->params->to_hash;
+
+    # Get number of parameters
+    my $num_params = keys %params;
+    
+    #Tag as Post or Get (ie. create new entry or edit existing one
+    my $is_new_record = ($c->req->method() eq 'POST');
+    
+    #Params are available in the hash "params" - copy to the prefix_data hash
+    while (my ($key, $value) = each %{$c->req->params->to_hash}) {
+        $du_data{$key} = $value;
+    }
+
+    # the value of trt will tell you which panel has returned    
+    my $trt = $c->param('trt') || 'PARAMS'; #Indicates where to go now
+ 
+    # Now add in the params from the selected row from the table
+		
+    my %selectedrow;
+    
+		if ($trt eq 'PARAMS'){
+			#Validate form parameters for panel PARAMS
+				%selectedrow = $c->get_selected_PARAMS($du_data{'Selected'},$is_new_record);
+		}
+	
+ 
+	#Copy in the selected row params to the prefix_data hash to pass to the panel
+	while (my ($key, $value) = each %selectedrow){
+        $du_data{$key} = $value;
+    }
+	# Where to go now
+	$du_data{'trt'} = $trt;
+	
+	# Data for panel
+	$c->stash( 
+		title 			=> $title, 
+		du_data  => \%du_data
+	);
+	$c->render("diskusage");
+}    
+1;

Targets/DiskUsage/_du_PARAMS.html.ep

@@ -1,5 +1,5 @@
 %#
-%# Generated by SM2Gen version:0.8 Chameleon version:3.8.1 On Python:3.12.3 at 2024-09-13 15:33 
+%# Generated by SM2Gen version:0.8 Chameleon version:4.5.4 On Python:3.12.3 at 2024-09-13 19:18 
 %#
 <div id="Diskusage-PARAMS" class="partial Diskusage-PARAMS">
   <script>
@@ -8,23 +8,23 @@
     };
   </script>
      <h2>
-     %= l('du Hello PARAMS');
+     %= l('du_Hello_PARAMS');
      </h2>
-    % my $btn = l('APPLY');
+    % my $btn = l('du_APPLY');
     %= form_for "Diskusaged" => (method => 'POST') => begin
 
-   	    % param 'trt' => ${prefix}_data->{trt} unless param 'trt';
-		%= hidden_field 'trt' => ${prefix}_data->{trt}
+   	    % param 'trt' => $du_data->{trt} unless param 'trt';
+		%= hidden_field 'trt' => $du_data->{trt}
 		%# Inputs etc in here.
 
-		<h2><%=l('Manage DiskUsage settings:')%></h2>
+		<h2><%=l('du_Manage_DiskUsage_settings:')%></h2>
 	
 		<p>
-			%= l('&amp;nbsp')
+			%= l('du_&amp;nbsp')
 		</p>
 	
 		<p>
-			%= l('Wed Sep 11 19:01:00 BST 2024')
+			%= l('du_Wed_Sep_11_19:01:00_BST')
 		</p>
 	
 <pre>
@@ -41,18 +41,18 @@ tmpfs                  2.0G  648K  2.0G   1% /run
 		<br /><table class="sme-border TableSort sme-table">
 			<thead>
 				<tr table-head-row>
-					<th class='sme-border table-head-col table-head-col-I-bays '><%=l('I-bays')%></th>
-					<th class='sme-border table-head-col table-head-col-Usage '><%=l('Usage')%></th>
-					<th class='sme-border table-head-col table-head-col-Path '><%=l('Path')%></th>
+					<th class='sme-border table-head-col table-head-col-I-bays '><%=l('du_I-bays')%></th>
+					<th class='sme-border table-head-col table-head-col-Usage '><%=l('du_Usage')%></th>
+					<th class='sme-border table-head-col table-head-col-Path '><%=l('du_Path')%></th>
 				</tr>
 			</thead>
 			<tbody>
 				% my $control_data = $self->stash('Table1');
 				% foreach my $row (@$control_data) {
 				<tr class='table-row'>
-					<td class='sme-border table-col table-col-Table1-I-bays'><%=$c->render_to_string(inline=>$row->{Table1-I-bays})%></td>
-					<td class='sme-border table-col table-col-Table1-Usage'><%=$c->render_to_string(inline=>$row->{Table1-Usage})%></td>
-					<td class='sme-border table-col table-col-Table1-Path'><%=$c->render_to_string(inline=>$row->{Table1-Path})%></td>		
+					<td class='sme-border table-col table-col-Table1-I-bays'><%=$c->render_to_string(inline=>$row->{'Table1-I-bays'})%></td>
+					<td class='sme-border table-col table-col-Table1-Usage'><%=$c->render_to_string(inline=>$row->{'Table1-Usage'})%></td>
+					<td class='sme-border table-col table-col-Table1-Path'><%=$c->render_to_string(inline=>$row->{'Table1-Path'})%></td>		
 				</tr>
 				%}
 			</tbody>
@@ -60,15 +60,15 @@ tmpfs                  2.0G  648K  2.0G   1% /run
 		
 	
 		<p>
-			%= l('&amp;nbsp')
+			%= l('du_&amp;nbsp')
 		</p>
 	
 		<br /><table class="sme-border TableSort sme-table">
 			<thead>
 				<tr table-head-row>
-					<th class='sme-border table-head-col table-head-col-Users '><%=l('Users')%></th>
-					<th class='sme-border table-head-col table-head-col-Usage '><%=l('Usage')%></th>
-					<th class='sme-border table-head-col table-head-col-Path '><%=l('Path')%></th>
+					<th class='sme-border table-head-col table-head-col-Users '><%=l('du_Users')%></th>
+					<th class='sme-border table-head-col table-head-col-Usage '><%=l('du_Usage')%></th>
+					<th class='sme-border table-head-col table-head-col-Path '><%=l('du_Path')%></th>
 				</tr>
 			</thead>
 			<tbody>

Targets/DiskUsage/diskusage.html.ep

@@ -1,6 +1,6 @@
 % layout 'default', title => "Sme server 2 - Disk Usage", share_dir => './';
 %#
-%# Generated by SM2Gen version:0.8 Chameleon version:3.8.1 On Python:3.12.3 at 2024-09-13 15:33 
+%# Generated by SM2Gen version:0.8 Chameleon version:4.5.4 On Python:3.12.3 at 2024-09-13 19:18 
 %#
 % content_for 'module' => begin
 <div id="module" class="module Diskusage-panel">
@@ -17,22 +17,22 @@
 	%= $c->render_to_string(inline => stash('modul') );
     % }
 
-   	%if (${prefix}_data->{first}) {
+   	%if ($du_data->{first}) {
 	    <br><p>
-		%=$c->render_to_string(inline =>$c->l(${prefix}_data->{first}))
+		%=$c->render_to_string(inline =>$c->l($du_data->{first}))
 		</p>
 
-	%} elsif (${prefix}_data->{success}) {
+	%} elsif ($du_data->{success}) {
 		<div class='sme-border'>
 	       <h2> Operation Status Report</h2><p>
-			%= $c->l(${prefix}_data->{success});
+			%= $c->l($du_data->{success});
 			</p>
 		</div>
 
-	   %} elsif (${prefix}_data->{error}) { 
+	   %} elsif ($du_data->{error}) { 
 	   <div class='sme-error'>
 	       <h2> Operation Status Report - error</h2><p>
-			%= $c->l(${prefix}_data->{error});
+			%= $c->l($du_data->{error});
 			</p>
     	</div>
 	%}
@@ -40,7 +40,7 @@
 	%#Routing to partials according to trt parameter.
 	%#This ought to be cascading if/then/elsif, but is easier to just stack the if/then's rather like a case statement'
 	
-	% if (${prefix}_data->{trt} eq "PARAMS") {
+	% if ($du_data->{trt} eq "PARAMS") {
 		%= include 'partials/_du_PARAMS'
 	%}
 	

Targets/DiskUsage/diskusage_bg.lex

@@ -0,0 +1,11 @@
+'du_APPLY' => "Приложи",
+'du_Usage' => "Употреба",
+'du_Path' => "Път",
+'du_Wed_Sep_11_19:01:00_BST' => "Сряда, 11 септември 19:01:00 BST 2024",
+'du_PARAMS_panel_action_was_successful' => "Панелът PARAMS беше успешен",
+'du_&nbsp' => "~~~&nbsp~~~",
+'du_Manage_DiskUsage_settings:' => "Управление на настройките за използване на диска:",
+'du_Disk_Usage' => "Дисково използване",
+'du_Hello_PARAMS' => "~~~Здравейте PARAMS~~~",
+'du_I-bays' => "I-бейове",
+'du_Users' => "~~~Потребители~~~",

Targets/DiskUsage/diskusage_de.lex

@@ -0,0 +1,11 @@
+'du_APPLY' => "Anwenden",
+'du_Usage' => "~~~Verwendung~~~",
+'du_Path' => "Pfad",
+'du_Wed_Sep_11_19:01:00_BST' => "~~~Mi Sep 11 19:01:00 BST 2024~~~",
+'du_PARAMS_panel_action_was_successful' => "Die PARAMS-Panel-Aktion war erfolgreich",
+'du_&nbsp' => "~~~&nbsp~~~",
+'du_Manage_DiskUsage_settings:' => "Festplattennutzungs-Einstellungen verwalten:",
+'du_Disk_Usage' => "~~~Festplattennutzung~~~",
+'du_Hello_PARAMS' => "~~~Hallo PARAMS~~~",
+'du_I-bays' => "I-Bays",
+'du_Users' => "Benutzer",

Targets/DiskUsage/diskusage_dk.lex

@@ -0,0 +1,11 @@
+'du_APPLY' => "Anvend",
+'du_Usage' => "Brug",
+'du_Path' => "Sti",
+'du_Wed_Sep_11_19:01:00_BST' => "Ons d. 11. sep 2024 19:01:00 BST",
+'du_PARAMS_panel_action_was_successful' => "~~~PARAMS-panelets handling var vellykket~~~",
+'du_&nbsp' => "~~~&nbsp~~~",
+'du_Manage_DiskUsage_settings:' => "Administrer indstillinger for diskforbrug:",
+'du_Disk_Usage' => "Diskforbrug",
+'du_Hello_PARAMS' => "Hej PARAMS",
+'du_I-bays' => "I-bays",
+'du_Users' => "Brugere",

Targets/DiskUsage/diskusage_el.lex

@@ -0,0 +1,11 @@
+'du_APPLY' => "Εφαρμογή",
+'du_Usage' => "Χρήση",
+'du_Path' => "Διαδρομή",
+'du_Wed_Sep_11_19:01:00_BST' => "~~~Τετ 11 Σεπ 19:01:00 EET 2024~~~",
+'du_PARAMS_panel_action_was_successful' => "Η ενέργεια του πίνακα PARAMS ήταν επιτυχής",
+'du_&nbsp' => "~~~&nbsp~~~",
+'du_Manage_DiskUsage_settings:' => "Διαχείριση ρυθμίσεων Χρήσης Δίσκου:",
+'du_Disk_Usage' => "Χρήση Δίσκου",
+'du_Hello_PARAMS' => "Γειά σου PARAMS",
+'du_I-bays' => "Κόλποι I",
+'du_Users' => "Χρήστες",

Targets/DiskUsage/diskusage_en.lex

@@ -0,0 +1,11 @@
+'du_APPLY' => 'Apply',
+'du_Usage' => 'Usage',
+'du_Path' => 'Path',
+'du_Wed_Sep_11_19:01:00_BST' => 'Wed Sep 11 19:01:00 BST 2024',
+'du_PARAMS_panel_action_was_successful' => 'PARAMS panel action was successful',
+'du_&nbsp' => '&nbsp',
+'du_Manage_DiskUsage_settings:' => 'Manage DiskUsage settings:',
+'du_Disk_Usage' => 'Disk Usage',
+'du_Hello_PARAMS' => 'Hello PARAMS',
+'du_I-bays' => 'I-bays',
+'du_Users' => 'Users',

Targets/DiskUsage/diskusage_es.lex

@@ -0,0 +1,11 @@
+'du_APPLY' => "Aplicar",
+'du_Usage' => "Uso",
+'du_Path' => "Ruta",
+'du_Wed_Sep_11_19:01:00_BST' => "Mié Sep 11 19:01:00 BST 2024",
+'du_PARAMS_panel_action_was_successful' => "La acción del panel PARAMS fue exitosa",
+'du_&nbsp' => "~~~&nbsp~~~",
+'du_Manage_DiskUsage_settings:' => "Administrar configuraciones de uso de disco:",
+'du_Disk_Usage' => "Uso de Disco",
+'du_Hello_PARAMS' => "Hola PARAMS",
+'du_I-bays' => "I-bays",
+'du_Users' => "Usuarios",

Targets/DiskUsage/diskusage_et.lex

@@ -0,0 +1,11 @@
+'du_APPLY' => "Rakenda",
+'du_Usage' => "Kasutus",
+'du_Path' => "Tee",
+'du_Wed_Sep_11_19:01:00_BST' => "Kolm, 11. september 2024, 19:01:00 BST",
+'du_PARAMS_panel_action_was_successful' => "PARAMS paneeli toiming oli edukas",
+'du_&nbsp' => "~~~&nbsp~~~",
+'du_Manage_DiskUsage_settings:' => "Halda kettakasutuse seadeid:",
+'du_Disk_Usage' => "Kettakasutus",
+'du_Hello_PARAMS' => "Tere PARAMS",
+'du_I-bays' => "I-lahed",
+'du_Users' => "Kasutajad",

Targets/DiskUsage/diskusage_fr.lex

@@ -0,0 +1,11 @@
+'du_APPLY' => "Appliquer",
+'du_Usage' => "Utilisation",
+'du_Path' => "Chemin",
+'du_Wed_Sep_11_19:01:00_BST' => "Mer 11 Sep 19:01:00 BST 2024",
+'du_PARAMS_panel_action_was_successful' => "L\'action du panneau PARAMS a été réussie",
+'du_&nbsp' => "&nbsp",
+'du_Manage_DiskUsage_settings:' => "Gérer les paramètres d\'utilisation du disque :",
+'du_Disk_Usage' => "Utilisation du disque",
+'du_Hello_PARAMS' => "~~~Bonjour PARAMÈTRES~~~",
+'du_I-bays' => "Baies I",
+'du_Users' => "Utilisateurs",

Targets/DiskUsage/diskusage_hu.lex

@@ -0,0 +1,11 @@
+'du_APPLY' => "Alkalmazás",
+'du_Usage' => "Használat",
+'du_Path' => "Útvonal",
+'du_Wed_Sep_11_19:01:00_BST' => "2024. szeptember 11., szerda, 19:01:00 BST",
+'du_PARAMS_panel_action_was_successful' => "~~~PARAMS panel művelet sikeres volt~~~",
+'du_&nbsp' => "~~~&nbsp~~~",
+'du_Manage_DiskUsage_settings:' => "Lemezhasználati beállítások kezelése:",
+'du_Disk_Usage' => "Lemezhasználat",
+'du_Hello_PARAMS' => "~~~Helló PARAMS~~~",
+'du_I-bays' => "I-bayok",
+'du_Users' => "Felhasználók",

Targets/DiskUsage/diskusage_id.lex

@@ -0,0 +1,11 @@
+'du_APPLY' => "Terapkan",
+'du_Usage' => "Penggunaan",
+'du_Path' => "Jalur",
+'du_Wed_Sep_11_19:01:00_BST' => "~~~Rab 11 Sep 19:01:00 WIB 2024~~~",
+'du_PARAMS_panel_action_was_successful' => "Panel PARAMS berhasil dijalankan",
+'du_&nbsp' => "~~~&nbsp~~~",
+'du_Manage_DiskUsage_settings:' => "Kelola pengaturan Penggunaan Disk:",
+'du_Disk_Usage' => "Penggunaan Disk",
+'du_Hello_PARAMS' => "~~~Halo PARAMS~~~",
+'du_I-bays' => "I-bays",
+'du_Users' => "Pengguna",

Targets/DiskUsage/diskusage_il.lex

@@ -0,0 +1,11 @@
+'du_APPLY' => "החל",
+'du_Usage' => "שימוש",
+'du_Path' => "נתיב",
+'du_Wed_Sep_11_19:01:00_BST' => "~~~ד׳ ספטמבר 11 19:01:00 שעון קיץ בריטי 2024~~~",
+'du_PARAMS_panel_action_was_successful' => "פעולת לוח PARAMS הצליחה",
+'du_&nbsp' => "&nbsp",
+'du_Manage_DiskUsage_settings:' => "נהל הגדרות שימוש בדיסק:",
+'du_Disk_Usage' => "שימוש בדיסק",
+'du_Hello_PARAMS' => "שלום PARAMS",
+'du_I-bays' => "מפרצים",
+'du_Users' => "משתמשים",

Targets/DiskUsage/diskusage_it.lex

@@ -0,0 +1,11 @@
+'du_APPLY' => "Applica",
+'du_Usage' => "Utilizzo",
+'du_Path' => "Percorso",
+'du_Wed_Sep_11_19:01:00_BST' => "Mer 11 Set 19:01:00 BST 2024",
+'du_PARAMS_panel_action_was_successful' => "L\'azione del pannello PARAMS è stata completata con successo",
+'du_&nbsp' => "&nbsp",
+'du_Manage_DiskUsage_settings:' => "Gestisci impostazioni di utilizzo del disco:",
+'du_Disk_Usage' => "Utilizzo del Disco",
+'du_Hello_PARAMS' => "Ciao PARAMS",
+'du_I-bays' => "I-bay",
+'du_Users' => "Utenti",

Targets/DiskUsage/diskusage_jp.lex

@@ -0,0 +1,11 @@
+'du_APPLY' => "適用",
+'du_Usage' => "使用",
+'du_Path' => "パス",
+'du_Wed_Sep_11_19:01:00_BST' => "2024年9月11日(水) 19:01:00 BST",
+'du_PARAMS_panel_action_was_successful' => "~~~PARAMSパネルの操作が成功しました~~~",
+'du_&nbsp' => "&nbsp",
+'du_Manage_DiskUsage_settings:' => "ディスク使用量設定の管理:",
+'du_Disk_Usage' => "ディスク使用量",
+'du_Hello_PARAMS' => "こんにちは PARAMS",
+'du_I-bays' => "I-bays",
+'du_Users' => "ユーザー",

Targets/Nfsshare/_nfs_PARAMS.html.ep

@@ -1,5 +1,5 @@
 %#
-%# Generated by SM2Gen version:0.8 Chameleon version:3.8.1 On Python:3.12.3 ( at 2024-09-12 19:29 
+%# Generated by SM2Gen version:0.8 Chameleon version:3.8.1 On Python:3.12.3 at 2024-09-13 18:38 
 %#
 <div id="Nfsshare-PARAMS" class="partial Nfsshare-PARAMS">
   <script>

Targets/Nfsshare/_nfs_TABLE.html.ep

@@ -1,5 +1,5 @@
 %#
-%# Generated by SM2Gen version:0.8 Chameleon version:3.8.1 On Python:3.12.3 ( at 2024-09-12 19:29 
+%# Generated by SM2Gen version:0.8 Chameleon version:3.8.1 On Python:3.12.3 at 2024-09-13 18:38 
 %#
 <div id="Nfsshare-TABLE" class="partial Nfsshare-TABLE">
   <script>

Targets/Nfsshare/nfs_PARAMS.html.ep

@@ -0,0 +1,139 @@
+%#
+%# Generated by SM2Gen version:0.8 Chameleon version:3.8.1 On Python:3.12.3 at 2024-09-14 05:33 
+%#
+<div id="Nfsshare-PARAMS" class="partial Nfsshare-PARAMS">
+  <script>
+    window.onload = function() {
+      SelectInput();
+    };
+  </script>
+     <h2>
+     %= l('nfs_Hello_PARAMS');
+     </h2>
+    % my $btn = l('nfs_APPLY');
+    %= form_for "Nfsshared" => (method => 'POST') => begin
+
+   	    % param 'trt' => ${prefix}_data->{trt} unless param 'trt';
+		%= hidden_field 'trt' => ${prefix}_data->{trt}
+		%# Inputs etc in here.
+
+		<h2><%=l('nfs_Manage_NFS_Ibay_settings:')%></h2>
+	
+		<p>
+			%= l('nfs_These_parameters_will_be_effective')
+		</p>
+	
+		<p><span class=label>
+			%=l('nfs_Information_Bay_name')
+		</span><span class=data>
+			%= stash("IbayName")
+		</span></p>
+	
+		<p><span class=label>
+			%=l('nfs_Share_owner_Group')
+		</span><span class=data>
+			% my @ShareOwnerGrp_options = ['Write = admin, Read = group', 'Write = group, Read = everyone', 'Write = group, Read = group'];
+			% param 'ShareOwnerGrp' => ${prefix}_data->{ShareOwnerGrp} unless param 'ShareOwnerGrp';
+			%= select_field 'ShareOwnerGrp' => @ShareOwnerGrp_options, class => 'input'
+		<br></span>	</p>
+	
+		<p><span class=label>
+			%=l('nfs_Enable_the_NFS_Share')
+		</span><span class=data>
+			% my @EnableNFSshare_options = ['Disabled', 'Enabled'];
+			% param 'EnableNFSshare' => ${prefix}_data->{EnableNFSshare} unless param 'EnableNFSshare';
+			%= select_field 'EnableNFSshare' => @EnableNFSshare_options, class => 'input'
+		<br></span>	</p>
+	
+		<p><span class=label>
+			%=l('nfs_EnableShare_on_local_network')
+		</span><span class=data>
+			% my @ShareOnLocalNetwork_options = ['Disabled', 'Enabled'];
+			% param 'ShareOnLocalNetwork' => ${prefix}_data->{ShareOnLocalNetwork} unless param 'ShareOnLocalNetwork';
+			%= select_field 'ShareOnLocalNetwork' => @ShareOnLocalNetwork_options, class => 'input'
+		<br></span>	</p>
+	
+		<p>
+			%= l('nfs_For_writing_permissions,allowing_the_root')
+		</p>
+	
+		<span class=label>
+			%=l('nfs_NFS_Client(s)_allowed')
+		</span><span class=data>
+			% param 'NFSClientsAllowed' => ${prefix}_data->{NFSClientsAllowed} unless param 'NFSClientsAllowed';
+			%= text_area 'NFSClientsAllowed', cols=>40, rows=>5
+		</span><br>
+	
+		<p><span class=label>
+			%=l('nfs_File_system_permissions')
+		</span><span class=data>
+			% my @FileSystemPermissions_options = ['Read only', 'Read and Write'];
+			% param 'FileSystemPermissions' => ${prefix}_data->{FileSystemPermissions} unless param 'FileSystemPermissions';
+			%= select_field 'FileSystemPermissions' => @FileSystemPermissions_options, class => 'input'
+		<br></span>	</p>
+	
+		<p><span class=label>
+			%=l('nfs_Write_(a)synchronously')
+		</span><span class=data>
+			% my @WriteAsync_options = ['Synchronous', 'Asynchronous'];
+			% param 'WriteAsync' => ${prefix}_data->{WriteAsync} unless param 'WriteAsync';
+			%= select_field 'WriteAsync' => @WriteAsync_options, class => 'input'
+		<br></span>	</p>
+	
+		<p><span class=label>
+			%=l('nfs_Delays_the_disk_writing')
+		</span><span class=data>
+			% my @DelayWrite_options = ['Write delay', 'No write delay'];
+			% param 'DelayWrite' => ${prefix}_data->{DelayWrite} unless param 'DelayWrite';
+			%= select_field 'DelayWrite' => @DelayWrite_options, class => 'input'
+		<br></span>	</p>
+	
+		<p><span class=label>
+			%=l('nfs_Squash_the_power_of_users')
+		</span><span class=data>
+			% my @Squash_options = ['All users squash', 'No root squash', 'root squash'];
+			% param 'Squash' => ${prefix}_data->{Squash} unless param 'Squash';
+			%= select_field 'Squash' => @Squash_options, class => 'input'
+		<br></span>	</p>
+	
+		<p><span class=label>
+			%=l('nfs_Browse_the_parent_folders')
+		</span><span class=data>
+			% my @BrowseParents_options = ['Hide folder', 'Show folder'];
+			% param 'BrowseParents' => ${prefix}_data->{BrowseParents} unless param 'BrowseParents';
+			%= select_field 'BrowseParents' => @BrowseParents_options, class => 'input'
+		<br></span>	</p>
+	
+		<p><span class=label>
+			%=l('nfs_Requests_on_secure_ports')
+		</span><span class=data>
+			% my @SecurePorts_options = ['Secure', 'Insecure'];
+			% param 'SecurePorts' => ${prefix}_data->{SecurePorts} unless param 'SecurePorts';
+			%= select_field 'SecurePorts' => @SecurePorts_options, class => 'input'
+		<br></span>	</p>
+	
+		<p>
+			%= l('nfs_Set_the_uid_and_gid')
+		</p>
+	
+		<p><span class=label>
+			%=l('nfs_Set_the_UID.')
+		</span><span class=data>
+			% param 'SetUID' => ${prefix}_data->{SetUID} unless param 'SetUID';
+			%= text_field 'SetUID', size => '50', class => 'input' , pattern=>'.*' , placeholder=>'SetUID'
+		<br></span></p>
+	
+		<p><span class=label>
+			%=l('nfs_Set_the_GID.')
+		</span><span class=data>
+			% param 'SetGID' => ${prefix}_data->{SetGID} unless param 'SetGID';
+			%= text_field 'SetGID', size => '50', class => 'input' , pattern=>'.*' , placeholder=>'SetGID'
+		<br></span></p>
+	
+		<span class='data'>
+			%= submit_button l('nfs_Save'), class => 'action'
+		</span>
+	
+		%# Probably finally by a submit.
+	%end    
+</div>

Targets/Nfsshare/nfs_TABLE.html.ep

@@ -0,0 +1,47 @@
+%#
+%# Generated by SM2Gen version:0.8 Chameleon version:3.8.1 On Python:3.12.3 at 2024-09-14 05:33 
+%#
+<div id="Nfsshare-TABLE" class="partial Nfsshare-TABLE">
+  <script>
+    window.onload = function() {
+      SelectInput();
+    };
+  </script>
+     <h2>
+     %= l('nfs_Hello_TABLE');
+     </h2>
+    % my $btn = l('nfs_APPLY');
+    %= form_for "Nfsshared" => (method => 'POST') => begin
+
+   	    % param 'trt' => ${prefix}_data->{trt} unless param 'trt';
+		%= hidden_field 'trt' => ${prefix}_data->{trt}
+		%# Inputs etc in here.
+
+		<h2><%=l('nfs_Manage_NFS_Ibay_settings:')%></h2>
+	
+		<br /><table class="sme-border TableSort sme-table">
+			<thead>
+				<tr table-head-row>
+					<th class='sme-border table-head-col table-head-col-Name '><%=l('nfs_Name')%></th>
+					<th class='sme-border table-head-col table-head-col-Description '><%=l('nfs_Description')%></th>
+					<th class='sme-border table-head-col table-head-col-Nfs status '><%=l('Nfs_status')%></th>
+					<th class='sme-border table-head-col table-head-col-Action '><%=l('nfs_Action')%></th>
+				</tr>
+			</thead>
+			<tbody>
+				% my $control_data = $self->stash('ibays');
+				% foreach my $row (@$control_data) {
+				<tr class='table-row'>
+					<td class='sme-border table-col table-col-Name'><%=$c->render_to_string(inline=>$row->{Name})%></td>
+					<td class='sme-border table-col table-col-Description'><%=$c->render_to_string(inline=>$row->{Description})%></td>
+					<td class='sme-border table-col table-col-flag'><%=$c->render_to_string(inline=>$row->{flag})%></td>
+					<td class='sme-border table-col table-col-Modify'><%=$c->render_to_string(inline=>$row->{Modify})%></td>		
+				</tr>
+				%}
+			</tbody>
+		</table>
+		
+	
+		%# Probably finally by a submit.
+	%end    
+</div>

Targets/Nfsshare/nfsshare.html.ep

@@ -1,6 +1,6 @@
 % layout 'default', title => "Sme server 2 - NFS data share", share_dir => './';
 %#
-%# Generated by SM2Gen version:0.8 Chameleon version:3.8.1 On Python:3.12.3 ( at 2024-09-12 19:29 
+%# Generated by SM2Gen version:0.8 Chameleon version:3.8.1 On Python:3.12.3 at 2024-09-14 05:33 
 %#
 % content_for 'module' => begin
 <div id="module" class="module Nfsshare-panel">

Targets/Nfsshare/nfsshare_en.lex

@@ -1,28 +1,28 @@
-'nfs_Squash_the_power_of_users' => 'Squash the power of users',
-'nfs_Hello_TABLE' => 'Hello TABLE',
-'nfs_Write_(a)synchronously' => 'Write (a)synchronously',
-'nfs_TABLE_panel_action_was_successful' => 'TABLE panel action was successful',
-'nfs_Hello_PARAMS' => 'Hello PARAMS',
-'nfs_Save' => 'Save',
-'nfs_For_writing_permissions,allowing_the_root' => 'For writing permissions, Allowing the root user and using insecure ports, You must configure a list of one IP per line, Being part of the local network(s).  ',
-'nfs_Enable_the_NFS_Share' => 'Enable the NFS Share',
-'nfs_Action' => 'Action',
-'nfs_EnableShare_on_local_network' => 'Enableshare on local network',
-'nfs_Browse_the_parent_folders' => 'Browse the parent folders',
-'Nfs_status' => 'Status',
+'nfs_Manage_NFS_Ibay_settings:' => 'Manage NFS Ibay settings:',
+'nfs_Set_the_uid_and_gid' => 'Set the uid and gid if you want all requests appear to be from one user or one group, Otherwise leave blank',
 'nfs_Set_the_GID.' => 'Set the GID.  ',
 'nfs_File_system_permissions' => 'File system permissions',
-'nfs_Share_owner_Group' => 'Share owner Group',
-'nfs_These_parameters_will_be_effective' => 'These parameters will be effective only if the share is enabled.  The share is in /home/e-smith/files/ibays//files',
-'nfs_Name' => 'Name',
-'nfs_NFS_Client(s)_allowed' => 'NFS Client(s) allowed',
-'nfs_Requests_on_secure_ports' => 'Requests on secure ports',
-'nfs_APPLY' => 'Apply',
-'nfs_Delays_the_disk_writing' => 'Delays the disk writing',
-'nfs_Information_Bay_name' => 'Information Bay name',
-'nfs_Description' => 'Description',
-'nfs_NFS_data_share' => 'NFS data share',
-'nfs_Manage_NFS_Ibay_settings:' => 'Manage NFS Ibay settings:',
-'nfs_PARAMS_panel_action_was_successful' => 'PARAMS panel action was successful',
-'nfs_Set_the_uid_and_gid' => 'Set the uid and gid if you want all requests appear to be from one user or one group, Otherwise leave blank',
+'nfs_Action' => 'Action',
+'nfs_Hello_PARAMS' => 'Hello PARAMS',
+'nfs_Save' => 'Save',
+'nfs_Squash_the_power_of_users' => 'Squash the power of users',
 'nfs_Set_the_UID.' => 'Set the UID.  ',
+'nfs_PARAMS_panel_action_was_successful' => 'PARAMS panel action was successful',
+'nfs_TABLE_panel_action_was_successful' => 'TABLE panel action was successful',
+'nfs_APPLY' => 'Apply',
+'nfs_Enable_the_NFS_Share' => 'Enable the NFS Share',
+'nfs_Name' => 'Name',
+'nfs_EnableShare_on_local_network' => 'Enableshare on local network',
+'nfs_These_parameters_will_be_effective' => 'These parameters will be effective only if the share is enabled.  The share is in /home/e-smith/files/ibays//files',
+'nfs_Share_owner_Group' => 'Share owner Group',
+'nfs_Browse_the_parent_folders' => 'Browse the parent folders',
+'nfs_NFS_Client(s)_allowed' => 'NFS Client(s) allowed',
+'Nfs_status' => 'Status',
+'nfs_Information_Bay_name' => 'Information Bay name',
+'nfs_Requests_on_secure_ports' => 'Requests on secure ports',
+'nfs_NFS_data_share' => 'NFS data share',
+'nfs_Delays_the_disk_writing' => 'Delays the disk writing',
+'nfs_Hello_TABLE' => 'Hello TABLE',
+'nfs_For_writing_permissions,allowing_the_root' => 'For writing permissions, Allowing the root user and using insecure ports, You must configure a list of one IP per line, Being part of the local network(s).  ',
+'nfs_Description' => 'Description',
+'nfs_Write_(a)synchronously' => 'Write (a)synchronously',