diff options
author | Andreas Brodmann <andreas.brodmann@gmail.com> | 2007-11-20 20:26:03 +0000 |
---|---|---|
committer | Andreas Brodmann <andreas.brodmann@gmail.com> | 2007-11-20 20:26:03 +0000 |
commit | a6854b1bc082f83a96c10a2d3adbf0b8fe01231a (patch) | |
tree | c77400047e916291b313227faeab577607225517 /squid-model.lua | |
parent | b2a4c830601186377d8999bac02ea465fd704e66 (diff) | |
download | acf-squid-a6854b1bc082f83a96c10a2d3adbf0b8fe01231a.tar.bz2 acf-squid-a6854b1bc082f83a96c10a2d3adbf0b8fe01231a.tar.xz |
/acf/squid: added advanced configuration page
git-svn-id: svn://svn.alpinelinux.org/acf/squid/trunk@351 ab2d0c66-481e-0410-8bed-d214d4d58bed
Diffstat (limited to 'squid-model.lua')
-rw-r--r-- | squid-model.lua | 33 |
1 files changed, 33 insertions, 0 deletions
diff --git a/squid-model.lua b/squid-model.lua index c61a4e7..f1fee43 100644 --- a/squid-model.lua +++ b/squid-model.lua @@ -38,3 +38,36 @@ service_control = function( control ) return retval end +get_config = function() + + local retval = "" + + local ptr = io.open( "/etc/squid/squid.conf", "r" ) + if ptr ~= nil then + local retcfg = ptr:read( "*a" ) + ptr:close() + if retcfg == nil then + retval = "\n\n Error: Failed to read /etc/squid/squid.conf!\n\n" + else + retval = retcfg + end + end + + return retval +end + +update_config = function( config ) + + local retval = "Successfully updated /etc/squid/squid.conf!" + + local ptr = io.open( "/etc/squid/squid.conf", "wb+" ) + if ptr ~= nil then + ptr:write( config ) + ptr:close() + else + retval = "update_config(): Error, failed to open /etc/squid/squid.conf!\n" + end + + return retval +end + |