--- rpms/e-smith-manager/sme9/e-smith-manager-2.6.0-Koozali_manager.patch 2016/07/19 13:12:36 1.1 +++ rpms/e-smith-manager/sme9/e-smith-manager-2.6.0-Koozali_manager.patch 2016/07/19 13:47:57 1.3 @@ -1,4141 +1,14 @@ -diff -Nur e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/COPYING e-smith-manager-2.6.0/e-smith-manager-2.6.0/COPYING ---- e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/COPYING 2002-03-01 13:33:07.000000000 -0500 -+++ e-smith-manager-2.6.0/e-smith-manager-2.6.0/COPYING 1969-12-31 19:00:00.000000000 -0500 -@@ -1,340 +0,0 @@ -- GNU GENERAL PUBLIC LICENSE -- Version 2, June 1991 -- -- Copyright (C) 1989, 1991 Free Software Foundation, Inc. -- 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA -- Everyone is permitted to copy and distribute verbatim copies -- of this license document, but changing it is not allowed. -- -- Preamble -- -- The licenses for most software are designed to take away your --freedom to share and change it. By contrast, the GNU General Public --License is intended to guarantee your freedom to share and change free --software--to make sure the software is free for all its users. This --General Public License applies to most of the Free Software --Foundation's software and to any other program whose authors commit to --using it. (Some other Free Software Foundation software is covered by --the GNU Library General Public License instead.) You can apply it to --your programs, too. -- -- When we speak of free software, we are referring to freedom, not --price. Our General Public Licenses are designed to make sure that you --have the freedom to distribute copies of free software (and charge for --this service if you wish), that you receive source code or can get it --if you want it, that you can change the software or use pieces of it --in new free programs; and that you know you can do these things. -- -- To protect your rights, we need to make restrictions that forbid --anyone to deny you these rights or to ask you to surrender the rights. --These restrictions translate to certain responsibilities for you if you --distribute copies of the software, or if you modify it. -- -- For example, if you distribute copies of such a program, whether --gratis or for a fee, you must give the recipients all the rights that --you have. You must make sure that they, too, receive or can get the --source code. And you must show them these terms so they know their --rights. -- -- We protect your rights with two steps: (1) copyright the software, and --(2) offer you this license which gives you legal permission to copy, --distribute and/or modify the software. -- -- Also, for each author's protection and ours, we want to make certain --that everyone understands that there is no warranty for this free --software. If the software is modified by someone else and passed on, we --want its recipients to know that what they have is not the original, so --that any problems introduced by others will not reflect on the original --authors' reputations. -- -- Finally, any free program is threatened constantly by software --patents. We wish to avoid the danger that redistributors of a free --program will individually obtain patent licenses, in effect making the --program proprietary. To prevent this, we have made it clear that any --patent must be licensed for everyone's free use or not licensed at all. -- -- The precise terms and conditions for copying, distribution and --modification follow. -- -- GNU GENERAL PUBLIC LICENSE -- TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION -- -- 0. This License applies to any program or other work which contains --a notice placed by the copyright holder saying it may be distributed --under the terms of this General Public License. The "Program", below, --refers to any such program or work, and a "work based on the Program" --means either the Program or any derivative work under copyright law: --that is to say, a work containing the Program or a portion of it, --either verbatim or with modifications and/or translated into another --language. (Hereinafter, translation is included without limitation in --the term "modification".) Each licensee is addressed as "you". -- --Activities other than copying, distribution and modification are not --covered by this License; they are outside its scope. The act of --running the Program is not restricted, and the output from the Program --is covered only if its contents constitute a work based on the --Program (independent of having been made by running the Program). --Whether that is true depends on what the Program does. -- -- 1. You may copy and distribute verbatim copies of the Program's --source code as you receive it, in any medium, provided that you --conspicuously and appropriately publish on each copy an appropriate --copyright notice and disclaimer of warranty; keep intact all the --notices that refer to this License and to the absence of any warranty; --and give any other recipients of the Program a copy of this License --along with the Program. -- --You may charge a fee for the physical act of transferring a copy, and --you may at your option offer warranty protection in exchange for a fee. -- -- 2. You may modify your copy or copies of the Program or any portion --of it, thus forming a work based on the Program, and copy and --distribute such modifications or work under the terms of Section 1 --above, provided that you also meet all of these conditions: -- -- a) You must cause the modified files to carry prominent notices -- stating that you changed the files and the date of any change. -- -- b) You must cause any work that you distribute or publish, that in -- whole or in part contains or is derived from the Program or any -- part thereof, to be licensed as a whole at no charge to all third -- parties under the terms of this License. -- -- c) If the modified program normally reads commands interactively -- when run, you must cause it, when started running for such -- interactive use in the most ordinary way, to print or display an -- announcement including an appropriate copyright notice and a -- notice that there is no warranty (or else, saying that you provide -- a warranty) and that users may redistribute the program under -- these conditions, and telling the user how to view a copy of this -- License. (Exception: if the Program itself is interactive but -- does not normally print such an announcement, your work based on -- the Program is not required to print an announcement.) -- --These requirements apply to the modified work as a whole. If --identifiable sections of that work are not derived from the Program, --and can be reasonably considered independent and separate works in --themselves, then this License, and its terms, do not apply to those --sections when you distribute them as separate works. But when you --distribute the same sections as part of a whole which is a work based --on the Program, the distribution of the whole must be on the terms of --this License, whose permissions for other licensees extend to the --entire whole, and thus to each and every part regardless of who wrote it. -- --Thus, it is not the intent of this section to claim rights or contest --your rights to work written entirely by you; rather, the intent is to --exercise the right to control the distribution of derivative or --collective works based on the Program. -- --In addition, mere aggregation of another work not based on the Program --with the Program (or with a work based on the Program) on a volume of --a storage or distribution medium does not bring the other work under --the scope of this License. -- -- 3. You may copy and distribute the Program (or a work based on it, --under Section 2) in object code or executable form under the terms of --Sections 1 and 2 above provided that you also do one of the following: -- -- a) Accompany it with the complete corresponding machine-readable -- source code, which must be distributed under the terms of Sections -- 1 and 2 above on a medium customarily used for software interchange; or, -- -- b) Accompany it with a written offer, valid for at least three -- years, to give any third party, for a charge no more than your -- cost of physically performing source distribution, a complete -- machine-readable copy of the corresponding source code, to be -- distributed under the terms of Sections 1 and 2 above on a medium -- customarily used for software interchange; or, -- -- c) Accompany it with the information you received as to the offer -- to distribute corresponding source code. (This alternative is -- allowed only for noncommercial distribution and only if you -- received the program in object code or executable form with such -- an offer, in accord with Subsection b above.) -- --The source code for a work means the preferred form of the work for --making modifications to it. For an executable work, complete source --code means all the source code for all modules it contains, plus any --associated interface definition files, plus the scripts used to --control compilation and installation of the executable. However, as a --special exception, the source code distributed need not include --anything that is normally distributed (in either source or binary --form) with the major components (compiler, kernel, and so on) of the --operating system on which the executable runs, unless that component --itself accompanies the executable. -- --If distribution of executable or object code is made by offering --access to copy from a designated place, then offering equivalent --access to copy the source code from the same place counts as --distribution of the source code, even though third parties are not --compelled to copy the source along with the object code. -- -- 4. You may not copy, modify, sublicense, or distribute the Program --except as expressly provided under this License. Any attempt --otherwise to copy, modify, sublicense or distribute the Program is --void, and will automatically terminate your rights under this License. --However, parties who have received copies, or rights, from you under --this License will not have their licenses terminated so long as such --parties remain in full compliance. -- -- 5. You are not required to accept this License, since you have not --signed it. However, nothing else grants you permission to modify or --distribute the Program or its derivative works. These actions are --prohibited by law if you do not accept this License. Therefore, by --modifying or distributing the Program (or any work based on the --Program), you indicate your acceptance of this License to do so, and --all its terms and conditions for copying, distributing or modifying --the Program or works based on it. -- -- 6. Each time you redistribute the Program (or any work based on the --Program), the recipient automatically receives a license from the --original licensor to copy, distribute or modify the Program subject to --these terms and conditions. You may not impose any further --restrictions on the recipients' exercise of the rights granted herein. --You are not responsible for enforcing compliance by third parties to --this License. -- -- 7. If, as a consequence of a court judgment or allegation of patent --infringement or for any other reason (not limited to patent issues), --conditions are imposed on you (whether by court order, agreement or --otherwise) that contradict the conditions of this License, they do not --excuse you from the conditions of this License. If you cannot --distribute so as to satisfy simultaneously your obligations under this --License and any other pertinent obligations, then as a consequence you --may not distribute the Program at all. For example, if a patent --license would not permit royalty-free redistribution of the Program by --all those who receive copies directly or indirectly through you, then --the only way you could satisfy both it and this License would be to --refrain entirely from distribution of the Program. -- --If any portion of this section is held invalid or unenforceable under --any particular circumstance, the balance of the section is intended to --apply and the section as a whole is intended to apply in other --circumstances. -- --It is not the purpose of this section to induce you to infringe any --patents or other property right claims or to contest validity of any --such claims; this section has the sole purpose of protecting the --integrity of the free software distribution system, which is --implemented by public license practices. Many people have made --generous contributions to the wide range of software distributed --through that system in reliance on consistent application of that --system; it is up to the author/donor to decide if he or she is willing --to distribute software through any other system and a licensee cannot --impose that choice. -- --This section is intended to make thoroughly clear what is believed to --be a consequence of the rest of this License. -- -- 8. If the distribution and/or use of the Program is restricted in --certain countries either by patents or by copyrighted interfaces, the --original copyright holder who places the Program under this License --may add an explicit geographical distribution limitation excluding --those countries, so that distribution is permitted only in or among --countries not thus excluded. In such case, this License incorporates --the limitation as if written in the body of this License. -- -- 9. The Free Software Foundation may publish revised and/or new versions --of the General Public License from time to time. Such new versions will --be similar in spirit to the present version, but may differ in detail to --address new problems or concerns. -- --Each version is given a distinguishing version number. If the Program --specifies a version number of this License which applies to it and "any --later version", you have the option of following the terms and conditions --either of that version or of any later version published by the Free --Software Foundation. If the Program does not specify a version number of --this License, you may choose any version ever published by the Free Software --Foundation. -- -- 10. If you wish to incorporate parts of the Program into other free --programs whose distribution conditions are different, write to the author --to ask for permission. For software which is copyrighted by the Free --Software Foundation, write to the Free Software Foundation; we sometimes --make exceptions for this. Our decision will be guided by the two goals --of preserving the free status of all derivatives of our free software and --of promoting the sharing and reuse of software generally. -- -- NO WARRANTY -- -- 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY --FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN --OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES --PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED --OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF --MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS --TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE --PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, --REPAIR OR CORRECTION. -- -- 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING --WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR --REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, --INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING --OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED --TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY --YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER --PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE --POSSIBILITY OF SUCH DAMAGES. -- -- END OF TERMS AND CONDITIONS -- -- How to Apply These Terms to Your New Programs -- -- If you develop a new program, and you want it to be of the greatest --possible use to the public, the best way to achieve this is to make it --free software which everyone can redistribute and change under these terms. -- -- To do so, attach the following notices to the program. It is safest --to attach them to the start of each source file to most effectively --convey the exclusion of warranty; and each file should have at least --the "copyright" line and a pointer to where the full notice is found. -- -- -- Copyright (C) 19yy -- -- This program is free software; you can redistribute it and/or modify -- it under the terms of the GNU General Public License as published by -- the Free Software Foundation; either version 2 of the License, or -- (at your option) any later version. -- -- This program is distributed in the hope that it will be useful, -- but WITHOUT ANY WARRANTY; without even the implied warranty of -- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -- GNU General Public License for more details. -- -- You should have received a copy of the GNU General Public License -- along with this program; if not, write to the Free Software -- Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA -- -- --Also add information on how to contact you by electronic and paper mail. -- --If the program is interactive, make it output a short notice like this --when it starts in an interactive mode: -- -- Gnomovision version 69, Copyright (C) 19yy name of author -- Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'. -- This is free software, and you are welcome to redistribute it -- under certain conditions; type `show c' for details. -- --The hypothetical commands `show w' and `show c' should show the appropriate --parts of the General Public License. Of course, the commands you use may --be called something other than `show w' and `show c'; they could even be --mouse-clicks or menu items--whatever suits your program. -- --You should also get your employer (if you work as a programmer) or your --school, if any, to sign a "copyright disclaimer" for the program, if --necessary. Here is a sample; alter the names: -- -- Yoyodyne, Inc., hereby disclaims all copyright interest in the program -- `Gnomovision' (which makes passes at compilers) written by James Hacker. -- -- , 1 April 1989 -- Ty Coon, President of Vice -- --This General Public License does not permit incorporating your program into --proprietary programs. If your program is a subroutine library, you may --consider it more useful to permit linking proprietary applications with the --library. If this is what you want to do, use the GNU Library General --Public License instead of this License. -diff -Nur e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/createlinks e-smith-manager-2.6.0/e-smith-manager-2.6.0/createlinks ---- e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/createlinks 2007-01-26 20:51:30.000000000 -0500 -+++ e-smith-manager-2.6.0/e-smith-manager-2.6.0/createlinks 1969-12-31 19:00:00.000000000 -0500 -@@ -1,91 +0,0 @@ --#!/usr/bin/perl -w -- --use esmith::Build::CreateLinks qw(:all); -- --panel_link("navigation", "manager"); --panel_link("noframes", "manager"); -- --event_link("navigation-conf", 'bootstrap-console-save', 50); -- --for ( qw( sme_core.css -- sme_header.css -- sme_main.css -- sme_menu.css -- sme_panel_menu.css -- ) ) --{ -- templates2events("/etc/e-smith/web/common/css/$_", qw( -- bootstrap-console-save -- )); --} -- --templates2events("/etc/e-smith/web/panels/manager/html/header.htm", qw( -- console-save -- bootstrap-console-save -- network-create -- network-delete -- logrotate -- )); --templates2events("/etc/e-smith/web/common/head.tmpl", qw( -- console-save -- bootstrap-console-save -- network-create -- network-delete -- logrotate -- )); --templates2events("/etc/e-smith/web/common/foot.tmpl", qw( -- console-save -- bootstrap-console-save -- network-create -- network-delete -- logrotate -- )); -- --# conf-httpd-admin -- --templates2events("/etc/httpd/admin-conf/httpd.conf", qw( -- console-save -- bootstrap-console-save -- network-create -- network-delete -- remoteaccess-update -- logrotate -- )); -- --templates2events("/etc/e-smith/web/common/cgi-bin/AuthTKT.cfg", 'bootstrap-console-save'); -- --# Set up generic logfile timestamp renaming/symlinking -- --foreach (qw( -- /var/log/httpd/admin_access_log -- /var/log/httpd/admin_error_log -- )) --{ -- safe_touch "root/etc/e-smith/events/logrotate/logfiles2timestamp/$_"; -- safe_touch "root/etc/e-smith/events/post-install/logfiles2timestamp/$_"; -- safe_touch "root/etc/e-smith/events/post-upgrade/logfiles2timestamp/$_"; --} -- --foreach (qw(console-save remoteaccess-update logrotate)) --{ -- safe_symlink("sigusr1", "root/etc/e-smith/events/$_/services2adjust/httpd-admin"); --} -- --my %service2order = --( -- 'httpd-admin' => "86", --); -- --foreach my $service (keys %service2order) --{ -- service_link_enhanced($service, $service2order{$service}, 7); --} -- --# Symlink httpd-admin to httpd. --safe_symlink("httpd", "root/usr/sbin/httpd-admin"); -- --# Set up links to daemontools. --safe_symlink("daemontools", "root/etc/rc.d/init.d/httpd-admin"); --service_link_enhanced("httpd-admin", "K15", "6"); --service_link_enhanced("httpd-admin", "K15", "0"); -- -diff -Nur e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/access e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/access ---- e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/access 2006-11-02 11:38:41.000000000 -0500 -+++ e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/access 1969-12-31 19:00:00.000000000 -0500 -@@ -1 +0,0 @@ --localhost -diff -Nur e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/PermitPlainTextAccess e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/PermitPlainTextAccess ---- e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/PermitPlainTextAccess 2006-11-02 11:38:41.000000000 -0500 -+++ e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/PermitPlainTextAccess 1969-12-31 19:00:00.000000000 -0500 -@@ -1 +0,0 @@ --no -diff -Nur e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/status e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/status ---- e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/status 2006-11-02 11:38:41.000000000 -0500 -+++ e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/status 1969-12-31 19:00:00.000000000 -0500 -@@ -1 +0,0 @@ --enabled -diff -Nur e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/TCPPort e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/TCPPort ---- e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/TCPPort 2006-11-02 11:38:41.000000000 -0500 -+++ e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/TCPPort 1969-12-31 19:00:00.000000000 -0500 -@@ -1 +0,0 @@ --980 -diff -Nur e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/type e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/type ---- e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/type 2006-11-02 11:38:41.000000000 -0500 -+++ e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/defaults/httpd-admin/type 1969-12-31 19:00:00.000000000 -0500 -@@ -1 +0,0 @@ --service -diff -Nur e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/migrate/20TKTAuthSecret e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/migrate/20TKTAuthSecret ---- e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/migrate/20TKTAuthSecret 2007-01-26 20:51:30.000000000 -0500 -+++ e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/etc/e-smith/db/configuration/migrate/20TKTAuthSecret 1969-12-31 19:00:00.000000000 -0500 -@@ -1,7 +0,0 @@ --{ -- my $admin = $DB->get('httpd-admin'); -- return unless $admin; -- return if $admin->prop('TKTAuthSecret'); -- use Data::UUID; -- $admin->set_prop('TKTAuthSecret', Data::UUID->new->create_str()); --} -diff -Nur e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/etc/e-smith/events/actions/navigation-conf e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/etc/e-smith/events/actions/navigation-conf ---- e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/etc/e-smith/events/actions/navigation-conf 2008-10-07 13:36:17.000000000 -0400 -+++ e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/etc/e-smith/events/actions/navigation-conf 1969-12-31 19:00:00.000000000 -0500 -@@ -1,153 +0,0 @@ --#!/usr/bin/perl -w -- --#---------------------------------------------------------------------- --# copyright (C) 1999-2006 Mitel Networks Corporation --# --# This program is free software; you can redistribute it and/or modify --# it under the terms of the GNU General Public License as published by --# the Free Software Foundation; either version 2 of the License, or --# (at your option) any later version. --# --# This program is distributed in the hope that it will be useful, --# but WITHOUT ANY WARRANTY; without even the implied warranty of --# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the --# GNU General Public License for more details. --# --# You should have received a copy of the GNU General Public License --# along with this program; if not, write to the Free Software --# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA --# --#---------------------------------------------------------------------- --package esmith; -- --use strict; -- --use esmith::NavigationDB; --use esmith::I18N; -- --use constant WEBFUNCTIONS => '/etc/e-smith/web/functions'; --use constant NAVIGATIONDIR => '/home/e-smith/db/navigation'; --use constant NEW_NAVDIR => '/home/e-smith/db'; -- --my $navigation_ignore = -- "(\.\.?|navigation|noframes|online-manual|(internal|pleasewait)(-.*)?)"; -- --my $i18n = new esmith::I18N; -- --my %navdbs; -- --opendir FUNCTIONS, WEBFUNCTIONS or -- die "Couldn't open ", WEBFUNCTIONS, "\n"; -- --my @files = grep (!/^${navigation_ignore}$/, readdir (FUNCTIONS)); --my @langs = $i18n->availableLanguages(); -- --use XML::Parser; --my $parser = new XML::Parser (Style => 'Tree', -- ProtocolEncoding => 'UTF-8'); -- --foreach my $file (@files) --{ -- next if (-d WEBFUNCTIONS . "/$file"); -- next unless (-x WEBFUNCTIONS . "/$file"); -- -- #-------------------------------------------------- -- # extract heading, description and weight information -- # from CGI script -- #-------------------------------------------------- -- open(SCRIPT, WEBFUNCTIONS . "/$file"); -- my $heading = undef; -- my $description = undef; -- my $heading_weight = undef; -- my $description_weight = undef; -- while ( -- "; -- -- foreach my $h (sort { -- ($nav{$a}{'WEIGHT'}/$nav{$a}{'COUNT'}) <=> -- ($nav{$b}{'WEIGHT'}/$nav{$b}{'COUNT'}) } keys %nav) -- { -- if ( $NO_FRAMES ) -- { -- print $q->h2 ($h); -- } -- else -- { -- print "\n", $q->Tr ($q->td({class => "section"},$q->span({class => "section"}, $h))); -- } -- -- #-------------------------------------------------- -- # generate list of descriptions sorted by weight -- #-------------------------------------------------- -- print "
    \n" if ( $NO_FRAMES ); -- -- foreach (sort { $a->{'WEIGHT'} <=> $b->{'WEIGHT'} } @{$nav {$h}{'DESCRIPTIONS'}}) -- { -- my $href = "/server-manager" . $_->{'FILENAME'}; -- if ( $NO_FRAMES ) -- { -- print $q->li ($q->a ({href => "$href?noframes=1"}, $_->{'DESCRIPTION'})); -- } -- else -- { -- print "\n",$q->Tr( -- $q->td ({-class => "menu-cell"}, -- $q->a ({-id => "sme$c", -- -class => "item", -- -onClick => "swapClasses('sme$c')", -- href => $href, -- target => 'main'}, -- $_->{'DESCRIPTION'}) -- )); -- } -- $c++; -- -- } -- print "
\n" if ($NO_FRAMES); -- } -- -- unless ( $NO_FRAMES ) -- { -- print "\n\n"; -- esmith::cgi::genNavigationFooter ($q); -- } --} -diff -Nur e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/etc/e-smith/web/functions/noframes e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/etc/e-smith/web/functions/noframes ---- e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/etc/e-smith/web/functions/noframes 2008-10-07 13:36:17.000000000 -0400 -+++ e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/etc/e-smith/web/functions/noframes 1969-12-31 19:00:00.000000000 -0500 -@@ -1,340 +0,0 @@ --#!/usr/bin/perl -wT -- --#---------------------------------------------------------------------- --# e-smith manager functions: navigation --# --# copyright (C) 2002 Mitel Networks Corporation --# --# This program is free software; you can redistribute it and/or modify --# it under the terms of the GNU General Public License as published by --# the Free Software Foundation; either version 2 of the License, or --# (at your option) any later version. --# --# This program is distributed in the hope that it will be useful, --# but WITHOUT ANY WARRANTY; without even the implied warranty of --# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the --# GNU General Public License for more details. --# --# You should have received a copy of the GNU General Public License --# along with this program; if not, write to the Free Software --# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA --# --# Technical support for this program is available from Mitel Networks --# Please visit our web site www.e-smith.com for details. --#---------------------------------------------------------------------- --package esmith; -- --use strict; --use CGI ':no_xhtml', ':all'; --use CGI::Carp qw(fatalsToBrowser); -- --use esmith::cgi; --use esmith::config; --use esmith::NavigationDB; --use esmith::util; --use esmith::I18N; -- --sub determineGroup; --sub showNavigation ($); -- --BEGIN --{ -- # Clear PATH and related environment variables so that calls to -- # external programs do not cause results to be tainted. See -- # "perlsec" manual page for details. -- -- $ENV {'PATH'} = ''; -- $ENV {'SHELL'} = '/bin/bash'; -- delete $ENV {'ENV'}; --} -- --esmith::util::setRealToEffective (); -- --$CGI::POST_MAX=1024 * 100; # max 100K posts --$CGI::DISABLE_UPLOADS = 1; # no uploads -- --# Use the one script for navigation and noframes --my $NO_FRAMES = ($0 =~ /noframes/); -- --my %conf; --tie %conf, 'esmith::config'; -- --my $q = new CGI; -- --showNavigation ($q); --exit (0); -- -- --#------------------------------------------------------ --# subroutine to determine which group a user belongs to --#------------------------------------------------------ -- --sub determineGroup --{ -- my ($user) = shift; -- -- # Group file for authentication -- my $group_file = '/etc/group'; -- open ( GF, $group_file ) -- or die "Cannot open group file: $group_file: $!\n"; -- -- # list of groups this user belongs to -- my @groupList; -- while () -- { -- if (/[:,]$user\b/) -- { -- my ($groupName, undef) = split(/:/); -- push @groupList, $groupName; -- } -- } -- close GF; -- return @groupList; --} -- --#------------------------------------------------------------ --# subroutine to display navigation bar --#------------------------------------------------------------ -- --sub showNavigation ($) --{ -- my $q = shift; -- -- # enable utf8 binmode so new translations work -- binmode STDOUT, ":utf8"; -- -- # Use this variable throughout to keep track of files -- # list of just the files -- my $c = "1"; -- my @files = (); -- my %files_hash = (); -- my @panel_group = $ENV{'REMOTE_USER'} eq "admin" ? -- ("admin") : determineGroup($ENV{'REMOTE_USER'}); -- -- #----------------------------------------------------- -- # Determine the directory where the functions are kept -- #----------------------------------------------------- -- -- my $navigation_ignore = -- "(\.\.?|navigation|noframes|online-manual|(internal|pleasewait)(-.*)?)"; -- -- my $cgidir = 'nowhere'; -- if ($panel_group[0] eq 'admin') -- { -- $cgidir = '/etc/e-smith/web/panels/manager/cgi-bin/'; -- -- if (opendir (DIR, $cgidir)) -- { -- @files = grep (!/^${navigation_ignore}$/, -- readdir (DIR)); -- closedir (DIR); -- } -- else -- { -- warn "Can't open directory $cgidir\n"; -- } -- -- foreach my $file (@files) -- { -- next if (-d "$cgidir/$file"); -- $files_hash{$file} = $cgidir; -- } -- } -- else -- { -- foreach my $panel (@panel_group) -- { -- $cgidir = "/etc/e-smith/web/panels/manager/$panel/cgi-bin"; -- -- if (opendir (DIR, $cgidir)) -- { -- @files = grep (!/^${navigation_ignore}$/, -- readdir (DIR)); -- closedir (DIR); -- foreach my $file (@files) -- { -- next if (-d "$cgidir/$file"); -- $files_hash{$file} = $cgidir; -- } -- } -- else -- { -- warn "Can't open directory $cgidir\n"; -- } -- } -- } -- -- #-------------------------------------------------- -- # For each script, extract the description and category -- # information. Build up an associative array mapping headings -- # to heading structures. Each heading structure contains the -- # total weight for the heading, the number of times the heading -- # has been encountered, and another associative array mapping -- # descriptions to description structures. Each description -- # structure contains the filename of the particular cgi script -- # and a weight. -- #-------------------------------------------------- -- my %nav = (); -- -- use constant NAVIGATIONDIR => '/home/e-smith/db/navigation'; -- use constant WEBFUNCTIONS => '/etc/e-smith/web/functions'; -- -- my $i18n = new esmith::I18N; -- -- my $language = $i18n->preferredLanguage( $ENV{HTTP_ACCEPT_LANGUAGE} ); -- -- my $navinfo = NAVIGATIONDIR . "/navigation.$language"; -- -- my $navdb = esmith::NavigationDB->open_ro( $navinfo ) or -- die "Couldn't open $navinfo\n"; -- -- # Check the navdb for anything with a UrlPath, which means that it doesn't -- # have a cgi file to be picked up by the above code. Ideally, only pages -- # that exist should be in the db, but that's not the case. Anything -- # without a cgi file will have to remove themselves on uninstall from the -- # navigation dbs. -- foreach my $rec ($navdb->get_all) -- { -- if ($rec->prop('UrlPath')) -- { -- $files_hash{$rec->{key}} = $cgidir; -- } -- } -- -- foreach my $file (keys %files_hash) -- { -- my $heading = 'Unknown'; -- my $description = $file; -- my $headingWeight = 99999; -- my $descriptionWeight = 99999; -- my $urlpath = ''; -- -- my $rec = $navdb->get($file); -- -- if (defined $rec) -- { -- $heading = $rec->prop('Heading'); -- $description = $rec->prop('Description'); -- $headingWeight = $rec->prop('HeadingWeight'); -- $descriptionWeight = $rec->prop('DescriptionWeight'); -- $urlpath = $rec->prop('UrlPath') || ''; -- } -- -- #-------------------------------------------------- -- # add heading, description and weight information to data structure -- #-------------------------------------------------- -- -- unless (exists $nav {$heading}) -- { -- $nav {$heading} = { COUNT => 0, WEIGHT => 0, DESCRIPTIONS => [] }; -- } -- -- $nav {$heading} {'COUNT'} ++; -- $nav {$heading} {'WEIGHT'} += $headingWeight; -- -- # Check for manager panel, and assign the appropriate -- # cgi-bin prefix for the links. -- # Grab the last 2 directories by splitting for '/'s and -- # then concatenating the last 2 -- # probably a better way, but I don't know it. -- my @filename = split /\//, $files_hash{$file}; -- my $path = ($cgidir eq '/etc/e-smith/web/panels/manager/cgi-bin/') ? -- "/$filename[scalar @filename - 1]" : -- "/$filename[scalar @filename - 2]/$filename[scalar @filename - 1]"; -- -- push @{ $nav {$heading} {'DESCRIPTIONS'} }, -- { DESCRIPTION => $description, -- WEIGHT => $descriptionWeight, -- FILENAME => $urlpath ? $urlpath : "$path/$file", -- CGIPATH => $path -- }; -- } -- -- #-------------------------------------------------- -- # generate list of headings sorted by average weight -- #-------------------------------------------------- -- if ( $NO_FRAMES ) -- { -- esmith::cgi::genNoframesHeader ($q); -- } -- else -- { -- esmith::cgi::genNavigationHeader ($q, undef); -- print "\n\n"; -- } -- -- print ' -- "; -- -- foreach my $h (sort { -- ($nav{$a}{'WEIGHT'}/$nav{$a}{'COUNT'}) <=> -- ($nav{$b}{'WEIGHT'}/$nav{$b}{'COUNT'}) } keys %nav) -- { -- if ( $NO_FRAMES ) -- { -- print $q->h2 ($h); -- } -- else -- { -- print "\n", $q->Tr ($q->td({class => "section"},$q->span({class => "section"}, $h))); -- } -- -- #-------------------------------------------------- -- # generate list of descriptions sorted by weight -- #-------------------------------------------------- -- print "
    \n" if ( $NO_FRAMES ); -- -- foreach (sort { $a->{'WEIGHT'} <=> $b->{'WEIGHT'} } @{$nav {$h}{'DESCRIPTIONS'}}) -- { -- my $href = "/server-manager" . $_->{'FILENAME'}; -- if ( $NO_FRAMES ) -- { -- print $q->li ($q->a ({href => "$href?noframes=1"}, $_->{'DESCRIPTION'})); -- } -- else -- { -- print "\n",$q->Tr( -- $q->td ({-class => "menu-cell"}, -- $q->a ({-id => "sme$c", -- -class => "item", -- -onClick => "swapClasses('sme$c')", -- href => $href, -- target => 'main'}, -- $_->{'DESCRIPTION'}) -- )); -- } -- $c++; -- -- } -- print "
\n" if ($NO_FRAMES); -- } -- -- unless ( $NO_FRAMES ) -- { -- print "\n
\n"; -- esmith::cgi::genNavigationFooter ($q); -- } --} -diff -Nur e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/var/service/httpd-admin/log/run e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/var/service/httpd-admin/log/run ---- e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/var/service/httpd-admin/log/run 2006-11-02 11:38:41.000000000 -0500 -+++ e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/var/service/httpd-admin/log/run 1969-12-31 19:00:00.000000000 -0500 -@@ -1,26 +0,0 @@ --#!/bin/sh -- --#---------------------------------------------------------------------- --# copyright (C) 2005 Mitel Networks Corporation --# --# This program is free software; you can redistribute it and/or modify --# it under the terms of the GNU General Public License as published by --# the Free Software Foundation; either version 2 of the License, or --# (at your option) any later version. --# --# This program is distributed in the hope that it will be useful, --# but WITHOUT ANY WARRANTY; without even the implied warranty of --# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the --# GNU General Public License for more details. --# --# You should have received a copy of the GNU General Public License --# along with this program; if not, write to the Free Software --# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA --# --# Technical support for this program is available from Mitel Networks --# Please visit our web site www.mitel.com/sme/ for details. --#---------------------------------------------------------------------- --exec \ -- /usr/local/bin/setuidgid smelog \ -- /usr/local/bin/multilog t s5000000 \ -- /var/log/httpd-admin -diff -Nur e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/var/service/httpd-admin/run e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/var/service/httpd-admin/run ---- e-smith-manager-2.6.0.old/e-smith-manager-2.6.0/root/var/service/httpd-admin/run 2006-11-02 11:38:41.000000000 -0500 -+++ e-smith-manager-2.6.0/e-smith-manager-2.6.0/root/var/service/httpd-admin/run 1969-12-31 19:00:00.000000000 -0500 -@@ -1,11 +0,0 @@ --#!/bin/sh --#---------------------------------------------------------------------- --# copyright (C) 1999-2004 Mitel Networks Corporation --#---------------------------------------------------------------------- -- --config=/etc/httpd/admin-conf/httpd.conf -- --[ -e $config ] || exit 1 -- --exec 2>&1 --exec chpst -P /usr/sbin/httpd-admin -f $config -D FOREGROUND -diff -Nur e-smith-manager-2.6.0.old/e-smith-manager-2.6.0-6.el6.sme-filelist e-smith-manager-2.6.0/e-smith-manager-2.6.0-6.el6.sme-filelist ---- e-smith-manager-2.6.0.old/e-smith-manager-2.6.0-6.el6.sme-filelist 2016-06-13 04:18:01.339000000 -0400 -+++ e-smith-manager-2.6.0/e-smith-manager-2.6.0-6.el6.sme-filelist 1969-12-31 19:00:00.000000000 -0500 -@@ -1,254 +0,0 @@ --%dir %attr(0755,root,root) /etc/e-smith --%dir %attr(0755,root,root) /etc/e-smith/templates --%dir %attr(0755,root,root) /etc/e-smith/templates/etc --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/services --/etc/e-smith/templates/etc/services/20http-admin --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/httpd --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/httpd/conf --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/httpd/conf/httpd.conf --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/httpd/conf/httpd.conf/VirtualHosts --/etc/e-smith/templates/etc/httpd/conf/httpd.conf/VirtualHosts/27ManagerProxyPass --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/httpd/admin-conf --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/httpd/admin-conf/httpd.conf --/etc/e-smith/templates/etc/httpd/admin-conf/httpd.conf/20Manager --/etc/e-smith/templates/etc/httpd/admin-conf/httpd.conf/90e-smithAccess15common --/etc/e-smith/templates/etc/httpd/admin-conf/httpd.conf/90e-smithAccess15brand --/etc/e-smith/templates/etc/httpd/admin-conf/httpd.conf/85ServerResourcesAccess --/etc/e-smith/templates/etc/httpd/admin-conf/httpd.conf/90e-smithAccess20password --/etc/e-smith/templates/etc/httpd/admin-conf/httpd.conf/85DefaultAccess --/etc/e-smith/templates/etc/httpd/admin-conf/httpd.conf/90e-smithAccess20manager --/etc/e-smith/templates/etc/httpd/admin-conf/httpd.conf/01localAccessString --/etc/e-smith/templates/etc/httpd/admin-conf/httpd.conf/20ManagerAuthTKT --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/e-smith --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/e-smith/web --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/e-smith/web/panels --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/e-smith/web/panels/manager --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/e-smith/web/panels/manager/html --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/e-smith/web/panels/manager/html/header.htm --/etc/e-smith/templates/etc/e-smith/web/panels/manager/html/header.htm/template-begin --/etc/e-smith/templates/etc/e-smith/web/panels/manager/html/header.htm/99End --/etc/e-smith/templates/etc/e-smith/web/panels/manager/html/header.htm/10Head --/etc/e-smith/templates/etc/e-smith/web/panels/manager/html/header.htm/70LayoutTableEnd --/etc/e-smith/templates/etc/e-smith/web/panels/manager/html/header.htm/60InfoBar --/etc/e-smith/templates/etc/e-smith/web/panels/manager/html/header.htm/30LayoutTableStart --/etc/e-smith/templates/etc/e-smith/web/panels/manager/html/header.htm/20Body --/etc/e-smith/templates/etc/e-smith/web/panels/manager/html/header.htm/50HilightBar --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/e-smith/web/common --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/e-smith/web/common/cgi-bin --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/e-smith/web/common/cgi-bin/AuthTKT.cfg --/etc/e-smith/templates/etc/e-smith/web/common/cgi-bin/AuthTKT.cfg/manager_access --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/e-smith/web/common/css --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/e-smith/web/common/css/sme_header.css --/etc/e-smith/templates/etc/e-smith/web/common/css/sme_header.css/template-begin --/etc/e-smith/templates/etc/e-smith/web/common/css/sme_header.css/50body --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/e-smith/web/common/css/sme_panel_menu.css --/etc/e-smith/templates/etc/e-smith/web/common/css/sme_panel_menu.css/template-begin --/etc/e-smith/templates/etc/e-smith/web/common/css/sme_panel_menu.css/50body --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/e-smith/web/common/css/sme_main.css --/etc/e-smith/templates/etc/e-smith/web/common/css/sme_main.css/template-begin --/etc/e-smith/templates/etc/e-smith/web/common/css/sme_main.css/50body --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/e-smith/web/common/css/sme_menu.css --/etc/e-smith/templates/etc/e-smith/web/common/css/sme_menu.css/template-begin --/etc/e-smith/templates/etc/e-smith/web/common/css/sme_menu.css/50body --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/e-smith/web/common/css/sme_core.css --/etc/e-smith/templates/etc/e-smith/web/common/css/sme_core.css/template-begin --/etc/e-smith/templates/etc/e-smith/web/common/css/sme_core.css/50body --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/e-smith/web/common/head.tmpl --/etc/e-smith/templates/etc/e-smith/web/common/head.tmpl/30FrameSetup00 --/etc/e-smith/templates/etc/e-smith/web/common/head.tmpl/30FrameSetup01 --/etc/e-smith/templates/etc/e-smith/web/common/head.tmpl/10Setup --%dir %attr(0755,root,root) /etc/e-smith/templates/etc/e-smith/web/common/foot.tmpl --/etc/e-smith/templates/etc/e-smith/web/common/foot.tmpl/25Copyright --/etc/e-smith/templates/etc/e-smith/web/common/foot.tmpl/90Finish --/etc/e-smith/templates/etc/e-smith/web/common/foot.tmpl/10Setup --%dir %attr(0755,root,root) /etc/e-smith/events --%dir %attr(0755,root,root) /etc/e-smith/events/actions --%attr(0554,root,root) /etc/e-smith/events/actions/navigation-conf --%dir %attr(0755,root,root) /etc/e-smith/events/bootstrap-console-save --/etc/e-smith/events/bootstrap-console-save/S50navigation-conf --%dir %attr(0755,root,root) /etc/e-smith/events/bootstrap-console-save/templates2expand --%dir %attr(0755,root,root) /etc/e-smith/events/bootstrap-console-save/templates2expand/etc --%dir %attr(0755,root,root) /etc/e-smith/events/bootstrap-console-save/templates2expand/etc/e-smith --%dir %attr(0755,root,root) /etc/e-smith/events/bootstrap-console-save/templates2expand/etc/e-smith/web --%dir %attr(0755,root,root) /etc/e-smith/events/bootstrap-console-save/templates2expand/etc/e-smith/web/common --/etc/e-smith/events/bootstrap-console-save/templates2expand/etc/e-smith/web/common/head.tmpl --/etc/e-smith/events/bootstrap-console-save/templates2expand/etc/e-smith/web/common/foot.tmpl --%dir %attr(0755,root,root) /etc/e-smith/events/bootstrap-console-save/templates2expand/etc/e-smith/web/common/css --/etc/e-smith/events/bootstrap-console-save/templates2expand/etc/e-smith/web/common/css/sme_core.css --/etc/e-smith/events/bootstrap-console-save/templates2expand/etc/e-smith/web/common/css/sme_header.css --/etc/e-smith/events/bootstrap-console-save/templates2expand/etc/e-smith/web/common/css/sme_main.css --/etc/e-smith/events/bootstrap-console-save/templates2expand/etc/e-smith/web/common/css/sme_menu.css --/etc/e-smith/events/bootstrap-console-save/templates2expand/etc/e-smith/web/common/css/sme_panel_menu.css --%dir %attr(0755,root,root) /etc/e-smith/events/bootstrap-console-save/templates2expand/etc/e-smith/web/common/cgi-bin --/etc/e-smith/events/bootstrap-console-save/templates2expand/etc/e-smith/web/common/cgi-bin/AuthTKT.cfg --%dir %attr(0755,root,root) /etc/e-smith/events/bootstrap-console-save/templates2expand/etc/e-smith/web/panels --%dir %attr(0755,root,root) /etc/e-smith/events/bootstrap-console-save/templates2expand/etc/e-smith/web/panels/manager --%dir %attr(0755,root,root) /etc/e-smith/events/bootstrap-console-save/templates2expand/etc/e-smith/web/panels/manager/html --/etc/e-smith/events/bootstrap-console-save/templates2expand/etc/e-smith/web/panels/manager/html/header.htm --%dir %attr(0755,root,root) /etc/e-smith/events/bootstrap-console-save/templates2expand/etc/httpd --%dir %attr(0755,root,root) /etc/e-smith/events/bootstrap-console-save/templates2expand/etc/httpd/admin-conf --/etc/e-smith/events/bootstrap-console-save/templates2expand/etc/httpd/admin-conf/httpd.conf --%dir %attr(0755,root,root) /etc/e-smith/events/console-save --%dir %attr(0755,root,root) /etc/e-smith/events/console-save/templates2expand --%dir %attr(0755,root,root) /etc/e-smith/events/console-save/templates2expand/etc --%dir %attr(0755,root,root) /etc/e-smith/events/console-save/templates2expand/etc/e-smith --%dir %attr(0755,root,root) /etc/e-smith/events/console-save/templates2expand/etc/e-smith/web --%dir %attr(0755,root,root) /etc/e-smith/events/console-save/templates2expand/etc/e-smith/web/panels --%dir %attr(0755,root,root) /etc/e-smith/events/console-save/templates2expand/etc/e-smith/web/panels/manager --%dir %attr(0755,root,root) /etc/e-smith/events/console-save/templates2expand/etc/e-smith/web/panels/manager/html --/etc/e-smith/events/console-save/templates2expand/etc/e-smith/web/panels/manager/html/header.htm --%dir %attr(0755,root,root) /etc/e-smith/events/console-save/templates2expand/etc/e-smith/web/common --/etc/e-smith/events/console-save/templates2expand/etc/e-smith/web/common/head.tmpl --/etc/e-smith/events/console-save/templates2expand/etc/e-smith/web/common/foot.tmpl --%dir %attr(0755,root,root) /etc/e-smith/events/console-save/templates2expand/etc/httpd --%dir %attr(0755,root,root) /etc/e-smith/events/console-save/templates2expand/etc/httpd/admin-conf --/etc/e-smith/events/console-save/templates2expand/etc/httpd/admin-conf/httpd.conf --%dir %attr(0755,root,root) /etc/e-smith/events/console-save/services2adjust --/etc/e-smith/events/console-save/services2adjust/httpd-admin --%dir %attr(0755,root,root) /etc/e-smith/events/network-create --%dir %attr(0755,root,root) /etc/e-smith/events/network-create/templates2expand --%dir %attr(0755,root,root) /etc/e-smith/events/network-create/templates2expand/etc --%dir %attr(0755,root,root) /etc/e-smith/events/network-create/templates2expand/etc/e-smith --%dir %attr(0755,root,root) /etc/e-smith/events/network-create/templates2expand/etc/e-smith/web --%dir %attr(0755,root,root) /etc/e-smith/events/network-create/templates2expand/etc/e-smith/web/panels --%dir %attr(0755,root,root) /etc/e-smith/events/network-create/templates2expand/etc/e-smith/web/panels/manager --%dir %attr(0755,root,root) /etc/e-smith/events/network-create/templates2expand/etc/e-smith/web/panels/manager/html --/etc/e-smith/events/network-create/templates2expand/etc/e-smith/web/panels/manager/html/header.htm --%dir %attr(0755,root,root) /etc/e-smith/events/network-create/templates2expand/etc/e-smith/web/common --/etc/e-smith/events/network-create/templates2expand/etc/e-smith/web/common/head.tmpl --/etc/e-smith/events/network-create/templates2expand/etc/e-smith/web/common/foot.tmpl --%dir %attr(0755,root,root) /etc/e-smith/events/network-create/templates2expand/etc/httpd --%dir %attr(0755,root,root) /etc/e-smith/events/network-create/templates2expand/etc/httpd/admin-conf --/etc/e-smith/events/network-create/templates2expand/etc/httpd/admin-conf/httpd.conf --%dir %attr(0755,root,root) /etc/e-smith/events/network-delete --%dir %attr(0755,root,root) /etc/e-smith/events/network-delete/templates2expand --%dir %attr(0755,root,root) /etc/e-smith/events/network-delete/templates2expand/etc --%dir %attr(0755,root,root) /etc/e-smith/events/network-delete/templates2expand/etc/e-smith --%dir %attr(0755,root,root) /etc/e-smith/events/network-delete/templates2expand/etc/e-smith/web --%dir %attr(0755,root,root) /etc/e-smith/events/network-delete/templates2expand/etc/e-smith/web/panels --%dir %attr(0755,root,root) /etc/e-smith/events/network-delete/templates2expand/etc/e-smith/web/panels/manager --%dir %attr(0755,root,root) /etc/e-smith/events/network-delete/templates2expand/etc/e-smith/web/panels/manager/html --/etc/e-smith/events/network-delete/templates2expand/etc/e-smith/web/panels/manager/html/header.htm --%dir %attr(0755,root,root) /etc/e-smith/events/network-delete/templates2expand/etc/e-smith/web/common --/etc/e-smith/events/network-delete/templates2expand/etc/e-smith/web/common/head.tmpl --/etc/e-smith/events/network-delete/templates2expand/etc/e-smith/web/common/foot.tmpl --%dir %attr(0755,root,root) /etc/e-smith/events/network-delete/templates2expand/etc/httpd --%dir %attr(0755,root,root) /etc/e-smith/events/network-delete/templates2expand/etc/httpd/admin-conf --/etc/e-smith/events/network-delete/templates2expand/etc/httpd/admin-conf/httpd.conf --%dir %attr(0755,root,root) /etc/e-smith/events/logrotate --%dir %attr(0755,root,root) /etc/e-smith/events/logrotate/templates2expand --%dir %attr(0755,root,root) /etc/e-smith/events/logrotate/templates2expand/etc --%dir %attr(0755,root,root) /etc/e-smith/events/logrotate/templates2expand/etc/e-smith --%dir %attr(0755,root,root) /etc/e-smith/events/logrotate/templates2expand/etc/e-smith/web --%dir %attr(0755,root,root) /etc/e-smith/events/logrotate/templates2expand/etc/e-smith/web/panels --%dir %attr(0755,root,root) /etc/e-smith/events/logrotate/templates2expand/etc/e-smith/web/panels/manager --%dir %attr(0755,root,root) /etc/e-smith/events/logrotate/templates2expand/etc/e-smith/web/panels/manager/html --/etc/e-smith/events/logrotate/templates2expand/etc/e-smith/web/panels/manager/html/header.htm --%dir %attr(0755,root,root) /etc/e-smith/events/logrotate/templates2expand/etc/e-smith/web/common --/etc/e-smith/events/logrotate/templates2expand/etc/e-smith/web/common/head.tmpl --/etc/e-smith/events/logrotate/templates2expand/etc/e-smith/web/common/foot.tmpl --%dir %attr(0755,root,root) /etc/e-smith/events/logrotate/templates2expand/etc/httpd --%dir %attr(0755,root,root) /etc/e-smith/events/logrotate/templates2expand/etc/httpd/admin-conf --/etc/e-smith/events/logrotate/templates2expand/etc/httpd/admin-conf/httpd.conf --%dir %attr(0755,root,root) /etc/e-smith/events/logrotate/logfiles2timestamp --%dir %attr(0755,root,root) /etc/e-smith/events/logrotate/logfiles2timestamp/var --%dir %attr(0755,root,root) /etc/e-smith/events/logrotate/logfiles2timestamp/var/log --%dir %attr(0755,root,root) /etc/e-smith/events/logrotate/logfiles2timestamp/var/log/httpd --/etc/e-smith/events/logrotate/logfiles2timestamp/var/log/httpd/admin_access_log --/etc/e-smith/events/logrotate/logfiles2timestamp/var/log/httpd/admin_error_log --%dir %attr(0755,root,root) /etc/e-smith/events/logrotate/services2adjust --/etc/e-smith/events/logrotate/services2adjust/httpd-admin --%dir %attr(0755,root,root) /etc/e-smith/events/remoteaccess-update --%dir %attr(0755,root,root) /etc/e-smith/events/remoteaccess-update/templates2expand --%dir %attr(0755,root,root) /etc/e-smith/events/remoteaccess-update/templates2expand/etc --%dir %attr(0755,root,root) /etc/e-smith/events/remoteaccess-update/templates2expand/etc/httpd --%dir %attr(0755,root,root) /etc/e-smith/events/remoteaccess-update/templates2expand/etc/httpd/admin-conf --/etc/e-smith/events/remoteaccess-update/templates2expand/etc/httpd/admin-conf/httpd.conf --%dir %attr(0755,root,root) /etc/e-smith/events/remoteaccess-update/services2adjust --/etc/e-smith/events/remoteaccess-update/services2adjust/httpd-admin --%dir %attr(0755,root,root) /etc/e-smith/events/post-install --%dir %attr(0755,root,root) /etc/e-smith/events/post-install/logfiles2timestamp --%dir %attr(0755,root,root) /etc/e-smith/events/post-install/logfiles2timestamp/var --%dir %attr(0755,root,root) /etc/e-smith/events/post-install/logfiles2timestamp/var/log --%dir %attr(0755,root,root) /etc/e-smith/events/post-install/logfiles2timestamp/var/log/httpd --/etc/e-smith/events/post-install/logfiles2timestamp/var/log/httpd/admin_access_log --/etc/e-smith/events/post-install/logfiles2timestamp/var/log/httpd/admin_error_log --%dir %attr(0755,root,root) /etc/e-smith/events/post-upgrade --%dir %attr(0755,root,root) /etc/e-smith/events/post-upgrade/logfiles2timestamp --%dir %attr(0755,root,root) /etc/e-smith/events/post-upgrade/logfiles2timestamp/var --%dir %attr(0755,root,root) /etc/e-smith/events/post-upgrade/logfiles2timestamp/var/log --%dir %attr(0755,root,root) /etc/e-smith/events/post-upgrade/logfiles2timestamp/var/log/httpd --/etc/e-smith/events/post-upgrade/logfiles2timestamp/var/log/httpd/admin_access_log --/etc/e-smith/events/post-upgrade/logfiles2timestamp/var/log/httpd/admin_error_log --%dir %attr(0755,root,root) /etc/e-smith/db --%dir %attr(0755,root,root) /etc/e-smith/db/configuration --%dir %attr(0755,root,root) /etc/e-smith/db/configuration/defaults --%dir %attr(0755,root,root) /etc/e-smith/db/configuration/defaults/httpd-admin --/etc/e-smith/db/configuration/defaults/httpd-admin/type --/etc/e-smith/db/configuration/defaults/httpd-admin/TCPPort --/etc/e-smith/db/configuration/defaults/httpd-admin/status --/etc/e-smith/db/configuration/defaults/httpd-admin/access --/etc/e-smith/db/configuration/defaults/httpd-admin/PermitPlainTextAccess --%dir %attr(0755,root,root) /etc/e-smith/db/configuration/migrate --/etc/e-smith/db/configuration/migrate/20TKTAuthSecret --%dir %attr(0755,root,root) /etc/e-smith/web --%dir %attr(0550,root,admin) /etc/e-smith/web/functions --%attr(04750,root,admin) /etc/e-smith/web/functions/index.cgi --%attr(04750,root,admin) /etc/e-smith/web/functions/navigation --/etc/e-smith/web/functions/noframes --%attr(04750,root,admin) /etc/e-smith/web/functions/initial.cgi --%dir %attr(0550,www,admin) /etc/e-smith/web/common --/etc/e-smith/web/common/spacer.gif --/etc/e-smith/web/common/warn.gif --/etc/e-smith/web/common/sl_icon.gif --/etc/e-smith/web/common/userpassword_head.tmpl --/etc/e-smith/web/common/noframes_head.tmpl --/etc/e-smith/web/common/noframes_foot.tmpl --%dir %attr(0755,root,root) /etc/e-smith/web/common/cgi-bin --%attr(0755,root,root) /etc/e-smith/web/common/cgi-bin/login --%attr(0755,root,root) /etc/e-smith/web/common/cgi-bin/logout --%dir %attr(0755,root,root) /etc/e-smith/web/common/css --/etc/e-smith/web/common/css/tkt.css --%dir %attr(0550,root,admin) /etc/e-smith/web/panels --%dir %attr(0755,root,root) /etc/e-smith/web/panels/manager --%dir %attr(0755,root,root) /etc/e-smith/web/panels/manager/cgi-bin --/etc/e-smith/web/panels/manager/cgi-bin/navigation --/etc/e-smith/web/panels/manager/cgi-bin/noframes --%dir %attr(0755,root,root) /etc/e-smith/web/panels/manager/html --/etc/e-smith/web/panels/manager/html/index.cgi --/etc/e-smith/web/panels/manager/html/initial.cgi --%dir %attr(0755,root,root) /etc/e-smith/web/panels/password --%dir %attr(0755,root,root) /etc/e-smith/web/panels/password/cgi-bin --%dir %attr(0755,root,root) /etc/e-smith/web/panels/password/html --%dir %attr(0755,root,root) /etc/rc.d/rc7.d --/etc/rc.d/rc7.d/S86httpd-admin --/etc/rc.d/init.d/httpd-admin --%dir %attr(0755,root,root) /etc/rc.d/init.d/supervise --/etc/rc.d/init.d/supervise/httpd-admin --%dir %attr(0755,root,root) /etc/rc.d/rc6.d --/etc/rc.d/rc6.d/K15httpd-admin --%dir %attr(0755,root,root) /etc/rc.d/rc0.d --/etc/rc.d/rc0.d/K15httpd-admin --%dir %attr(0755,root,root) /etc/httpd --%dir %attr(0755,root,root) /etc/httpd/admin-conf --%dir %attr(0755,root,root) /var/service --%dir %attr(01755,root,root) /var/service/httpd-admin --%attr(0755,root,root) /var/service/httpd-admin/run --%attr(0644,root,root) /var/service/httpd-admin/down --%dir %attr(0755,root,root) /var/service/httpd-admin/log --%attr(0755,root,root) /var/service/httpd-admin/log/run --%dir %attr(0700,root,root) /var/service/httpd-admin/log/supervise --%dir %attr(0700,root,root) /var/service/httpd-admin/supervise --%dir %attr(0750,smelog,smelog) /var/log/httpd-admin --%dir %attr(0755,root,root) /usr/sbin --/usr/sbin/httpd-admin --%dir %attr(0755,root,root) /usr/share/locale --%dir %attr(0755,root,root) /usr/share/locale/en_US --%dir %attr(0755,root,root) /usr/share/locale/en_US/LC_MESSAGES --/usr/share/locale/en_US/LC_MESSAGES/foot.tmpl.po --%dir %attr(0755,admin,admin) /home/e-smith --%dir %attr(0755,root,root) /home/e-smith/db --%dir %attr(0755,root,root) /home/e-smith/db/navigation --%dir %attr(0755,root,root) /service --/service/httpd-admin --%doc COPYING -diff -Nur e-smith-manager-2.6.0.old/root/etc/e-smith/events/bootstrap-console-save/S50navigation-conf e-smith-manager-2.6.0/root/etc/e-smith/events/bootstrap-console-save/S50navigation-conf ---- e-smith-manager-2.6.0.old/root/etc/e-smith/events/bootstrap-console-save/S50navigation-conf 2008-10-07 13:36:17.000000000 -0400 -+++ e-smith-manager-2.6.0/root/etc/e-smith/events/bootstrap-console-save/S50navigation-conf 1969-12-31 19:00:00.000000000 -0500 -@@ -1,153 +0,0 @@ --#!/usr/bin/perl -w -- --#---------------------------------------------------------------------- --# copyright (C) 1999-2006 Mitel Networks Corporation --# --# This program is free software; you can redistribute it and/or modify --# it under the terms of the GNU General Public License as published by --# the Free Software Foundation; either version 2 of the License, or --# (at your option) any later version. --# --# This program is distributed in the hope that it will be useful, --# but WITHOUT ANY WARRANTY; without even the implied warranty of --# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the --# GNU General Public License for more details. --# --# You should have received a copy of the GNU General Public License --# along with this program; if not, write to the Free Software --# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA --# --#---------------------------------------------------------------------- --package esmith; -- --use strict; -- --use esmith::NavigationDB; --use esmith::I18N; -- --use constant WEBFUNCTIONS => '/etc/e-smith/web/functions'; --use constant NAVIGATIONDIR => '/home/e-smith/db/navigation'; --use constant NEW_NAVDIR => '/home/e-smith/db'; -- --my $navigation_ignore = -- "(\.\.?|navigation|noframes|online-manual|(internal|pleasewait)(-.*)?)"; -- --my $i18n = new esmith::I18N; -- --my %navdbs; -- --opendir FUNCTIONS, WEBFUNCTIONS or -- die "Couldn't open ", WEBFUNCTIONS, "\n"; -- --my @files = grep (!/^${navigation_ignore}$/, readdir (FUNCTIONS)); --my @langs = $i18n->availableLanguages(); -- --use XML::Parser; --my $parser = new XML::Parser (Style => 'Tree', -- ProtocolEncoding => 'UTF-8'); -- --foreach my $file (@files) --{ -- next if (-d WEBFUNCTIONS . "/$file"); -- next unless (-x WEBFUNCTIONS . "/$file"); -- -- #-------------------------------------------------- -- # extract heading, description and weight information -- # from CGI script -- #-------------------------------------------------- -- open(SCRIPT, WEBFUNCTIONS . "/$file"); -- my $heading = undef; -- my $description = undef; -- my $heading_weight = undef; -- my $description_weight = undef; -- while ( -- "; -- -- foreach my $h (sort { -- ($nav{$a}{'WEIGHT'}/$nav{$a}{'COUNT'}) <=> -- ($nav{$b}{'WEIGHT'}/$nav{$b}{'COUNT'}) } keys %nav) -- { -- if ( $NO_FRAMES ) -- { -- print $q->h2 ($h); -- } -- else -- { -- print "\n", $q->Tr ($q->td({class => "section"},$q->span({class => "section"}, $h))); -- } -- -- #-------------------------------------------------- -- # generate list of descriptions sorted by weight -- #-------------------------------------------------- -- print "
    \n" if ( $NO_FRAMES ); -- -- foreach (sort { $a->{'WEIGHT'} <=> $b->{'WEIGHT'} } @{$nav {$h}{'DESCRIPTIONS'}}) -- { -- my $href = "/server-manager" . $_->{'FILENAME'}; -- if ( $NO_FRAMES ) -- { -- print $q->li ($q->a ({href => "$href?noframes=1"}, $_->{'DESCRIPTION'})); -- } -- else -- { -- print "\n",$q->Tr( -- $q->td ({-class => "menu-cell"}, -- $q->a ({-id => "sme$c", -- -class => "item", -- -onClick => "swapClasses('sme$c')", -- href => $href, -- target => 'main'}, -- $_->{'DESCRIPTION'}) -- )); -- } -- $c++; -- -- } -- print "
\n" if ($NO_FRAMES); -- } -- -- unless ( $NO_FRAMES ) -- { -- print "\n\n"; -- esmith::cgi::genNavigationFooter ($q); -- } --} -diff -Nur e-smith-manager-2.6.0.old/root/etc/e-smith/web/panels/manager/cgi-bin/noframes e-smith-manager-2.6.0/root/etc/e-smith/web/panels/manager/cgi-bin/noframes ---- e-smith-manager-2.6.0.old/root/etc/e-smith/web/panels/manager/cgi-bin/noframes 2008-10-07 13:36:17.000000000 -0400 -+++ e-smith-manager-2.6.0/root/etc/e-smith/web/panels/manager/cgi-bin/noframes 1969-12-31 19:00:00.000000000 -0500 -@@ -1,340 +0,0 @@ --#!/usr/bin/perl -wT -- --#---------------------------------------------------------------------- --# e-smith manager functions: navigation --# --# copyright (C) 2002 Mitel Networks Corporation --# --# This program is free software; you can redistribute it and/or modify --# it under the terms of the GNU General Public License as published by --# the Free Software Foundation; either version 2 of the License, or --# (at your option) any later version. --# --# This program is distributed in the hope that it will be useful, --# but WITHOUT ANY WARRANTY; without even the implied warranty of --# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the --# GNU General Public License for more details. --# --# You should have received a copy of the GNU General Public License --# along with this program; if not, write to the Free Software --# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA --# --# Technical support for this program is available from Mitel Networks --# Please visit our web site www.e-smith.com for details. --#---------------------------------------------------------------------- --package esmith; -- --use strict; --use CGI ':no_xhtml', ':all'; --use CGI::Carp qw(fatalsToBrowser); -- --use esmith::cgi; --use esmith::config; --use esmith::NavigationDB; --use esmith::util; --use esmith::I18N; -- --sub determineGroup; --sub showNavigation ($); -- --BEGIN --{ -- # Clear PATH and related environment variables so that calls to -- # external programs do not cause results to be tainted. See -- # "perlsec" manual page for details. -- -- $ENV {'PATH'} = ''; -- $ENV {'SHELL'} = '/bin/bash'; -- delete $ENV {'ENV'}; --} -- --esmith::util::setRealToEffective (); -- --$CGI::POST_MAX=1024 * 100; # max 100K posts --$CGI::DISABLE_UPLOADS = 1; # no uploads -- --# Use the one script for navigation and noframes --my $NO_FRAMES = ($0 =~ /noframes/); -- --my %conf; --tie %conf, 'esmith::config'; -- --my $q = new CGI; -- --showNavigation ($q); --exit (0); -- -- --#------------------------------------------------------ --# subroutine to determine which group a user belongs to --#------------------------------------------------------ -- --sub determineGroup --{ -- my ($user) = shift; -- -- # Group file for authentication -- my $group_file = '/etc/group'; -- open ( GF, $group_file ) -- or die "Cannot open group file: $group_file: $!\n"; -- -- # list of groups this user belongs to -- my @groupList; -- while () -- { -- if (/[:,]$user\b/) -- { -- my ($groupName, undef) = split(/:/); -- push @groupList, $groupName; -- } -- } -- close GF; -- return @groupList; --} -- --#------------------------------------------------------------ --# subroutine to display navigation bar --#------------------------------------------------------------ -- --sub showNavigation ($) --{ -- my $q = shift; -- -- # enable utf8 binmode so new translations work -- binmode STDOUT, ":utf8"; -- -- # Use this variable throughout to keep track of files -- # list of just the files -- my $c = "1"; -- my @files = (); -- my %files_hash = (); -- my @panel_group = $ENV{'REMOTE_USER'} eq "admin" ? -- ("admin") : determineGroup($ENV{'REMOTE_USER'}); -- -- #----------------------------------------------------- -- # Determine the directory where the functions are kept -- #----------------------------------------------------- -- -- my $navigation_ignore = -- "(\.\.?|navigation|noframes|online-manual|(internal|pleasewait)(-.*)?)"; -- -- my $cgidir = 'nowhere'; -- if ($panel_group[0] eq 'admin') -- { -- $cgidir = '/etc/e-smith/web/panels/manager/cgi-bin/'; -- -- if (opendir (DIR, $cgidir)) -- { -- @files = grep (!/^${navigation_ignore}$/, -- readdir (DIR)); -- closedir (DIR); -- } -- else -- { -- warn "Can't open directory $cgidir\n"; -- } -- -- foreach my $file (@files) -- { -- next if (-d "$cgidir/$file"); -- $files_hash{$file} = $cgidir; -- } -- } -- else -- { -- foreach my $panel (@panel_group) -- { -- $cgidir = "/etc/e-smith/web/panels/manager/$panel/cgi-bin"; -- -- if (opendir (DIR, $cgidir)) -- { -- @files = grep (!/^${navigation_ignore}$/, -- readdir (DIR)); -- closedir (DIR); -- foreach my $file (@files) -- { -- next if (-d "$cgidir/$file"); -- $files_hash{$file} = $cgidir; -- } -- } -- else -- { -- warn "Can't open directory $cgidir\n"; -- } -- } -- } -- -- #-------------------------------------------------- -- # For each script, extract the description and category -- # information. Build up an associative array mapping headings -- # to heading structures. Each heading structure contains the -- # total weight for the heading, the number of times the heading -- # has been encountered, and another associative array mapping -- # descriptions to description structures. Each description -- # structure contains the filename of the particular cgi script -- # and a weight. -- #-------------------------------------------------- -- my %nav = (); -- -- use constant NAVIGATIONDIR => '/home/e-smith/db/navigation'; -- use constant WEBFUNCTIONS => '/etc/e-smith/web/functions'; -- -- my $i18n = new esmith::I18N; -- -- my $language = $i18n->preferredLanguage( $ENV{HTTP_ACCEPT_LANGUAGE} ); -- -- my $navinfo = NAVIGATIONDIR . "/navigation.$language"; -- -- my $navdb = esmith::NavigationDB->open_ro( $navinfo ) or -- die "Couldn't open $navinfo\n"; -- -- # Check the navdb for anything with a UrlPath, which means that it doesn't -- # have a cgi file to be picked up by the above code. Ideally, only pages -- # that exist should be in the db, but that's not the case. Anything -- # without a cgi file will have to remove themselves on uninstall from the -- # navigation dbs. -- foreach my $rec ($navdb->get_all) -- { -- if ($rec->prop('UrlPath')) -- { -- $files_hash{$rec->{key}} = $cgidir; -- } -- } -- -- foreach my $file (keys %files_hash) -- { -- my $heading = 'Unknown'; -- my $description = $file; -- my $headingWeight = 99999; -- my $descriptionWeight = 99999; -- my $urlpath = ''; -- -- my $rec = $navdb->get($file); -- -- if (defined $rec) -- { -- $heading = $rec->prop('Heading'); -- $description = $rec->prop('Description'); -- $headingWeight = $rec->prop('HeadingWeight'); -- $descriptionWeight = $rec->prop('DescriptionWeight'); -- $urlpath = $rec->prop('UrlPath') || ''; -- } -- -- #-------------------------------------------------- -- # add heading, description and weight information to data structure -- #-------------------------------------------------- -- -- unless (exists $nav {$heading}) -- { -- $nav {$heading} = { COUNT => 0, WEIGHT => 0, DESCRIPTIONS => [] }; -- } -- -- $nav {$heading} {'COUNT'} ++; -- $nav {$heading} {'WEIGHT'} += $headingWeight; -- -- # Check for manager panel, and assign the appropriate -- # cgi-bin prefix for the links. -- # Grab the last 2 directories by splitting for '/'s and -- # then concatenating the last 2 -- # probably a better way, but I don't know it. -- my @filename = split /\//, $files_hash{$file}; -- my $path = ($cgidir eq '/etc/e-smith/web/panels/manager/cgi-bin/') ? -- "/$filename[scalar @filename - 1]" : -- "/$filename[scalar @filename - 2]/$filename[scalar @filename - 1]"; -- -- push @{ $nav {$heading} {'DESCRIPTIONS'} }, -- { DESCRIPTION => $description, -- WEIGHT => $descriptionWeight, -- FILENAME => $urlpath ? $urlpath : "$path/$file", -- CGIPATH => $path -- }; -- } -- -- #-------------------------------------------------- -- # generate list of headings sorted by average weight -- #-------------------------------------------------- -- if ( $NO_FRAMES ) -- { -- esmith::cgi::genNoframesHeader ($q); -- } -- else -- { -- esmith::cgi::genNavigationHeader ($q, undef); -- print "\n\n"; -- } -- -- print ' -- "; -- -- foreach my $h (sort { -- ($nav{$a}{'WEIGHT'}/$nav{$a}{'COUNT'}) <=> -- ($nav{$b}{'WEIGHT'}/$nav{$b}{'COUNT'}) } keys %nav) -- { -- if ( $NO_FRAMES ) -- { -- print $q->h2 ($h); -- } -- else -- { -- print "\n", $q->Tr ($q->td({class => "section"},$q->span({class => "section"}, $h))); -- } -- -- #-------------------------------------------------- -- # generate list of descriptions sorted by weight -- #-------------------------------------------------- -- print "
    \n" if ( $NO_FRAMES ); -- -- foreach (sort { $a->{'WEIGHT'} <=> $b->{'WEIGHT'} } @{$nav {$h}{'DESCRIPTIONS'}}) -- { -- my $href = "/server-manager" . $_->{'FILENAME'}; -- if ( $NO_FRAMES ) -- { -- print $q->li ($q->a ({href => "$href?noframes=1"}, $_->{'DESCRIPTION'})); -- } -- else -- { -- print "\n",$q->Tr( -- $q->td ({-class => "menu-cell"}, -- $q->a ({-id => "sme$c", -- -class => "item", -- -onClick => "swapClasses('sme$c')", -- href => $href, -- target => 'main'}, -- $_->{'DESCRIPTION'}) -- )); -- } -- $c++; -- -- } -- print "
\n" if ($NO_FRAMES); -- } -- -- unless ( $NO_FRAMES ) -- { -- print "\n
\n"; -- esmith::cgi::genNavigationFooter ($q); -- } --} -diff -Nur e-smith-manager-2.6.0.old/root/etc/e-smith/web/panels/manager/html/index.cgi e-smith-manager-2.6.0/root/etc/e-smith/web/panels/manager/html/index.cgi ---- e-smith-manager-2.6.0.old/root/etc/e-smith/web/panels/manager/html/index.cgi 2006-11-02 11:38:41.000000000 -0500 -+++ e-smith-manager-2.6.0/root/etc/e-smith/web/panels/manager/html/index.cgi 1969-12-31 19:00:00.000000000 -0500 -@@ -1,36 +0,0 @@ --#!/usr/bin/perl -wT -- --#---------------------------------------------------------------------- --# copyright (C) 1999-2006 Mitel Networks Corporation --# --# This program is free software; you can redistribute it and/or modify --# it under the terms of the GNU General Public License as published by --# the Free Software Foundation; either version 2 of the License, or --# (at your option) any later version. --# --# This program is distributed in the hope that it will be useful, --# but WITHOUT ANY WARRANTY; without even the implied warranty of --# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the --# GNU General Public License for more details. --# --# You should have received a copy of the GNU General Public License --# along with this program; if not, write to the Free Software --# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA --# --#---------------------------------------------------------------------- -- --use strict; --use esmith::FormMagick; -- --my $fm = new esmith::FormMagick; --$fm->display(); -- --exit 0; -- --__DATA__ --
-- -- NOFRAMES_BODY -- -- --
-diff -Nur e-smith-manager-2.6.0.old/root/etc/e-smith/web/panels/manager/html/initial.cgi e-smith-manager-2.6.0/root/etc/e-smith/web/panels/manager/html/initial.cgi ---- e-smith-manager-2.6.0.old/root/etc/e-smith/web/panels/manager/html/initial.cgi 2006-11-02 11:38:41.000000000 -0500 -+++ e-smith-manager-2.6.0/root/etc/e-smith/web/panels/manager/html/initial.cgi 1969-12-31 19:00:00.000000000 -0500 -@@ -1,36 +0,0 @@ --#!/usr/bin/perl -wT -- --#---------------------------------------------------------------------- --# copyright (C) 1999-2006 Mitel Networks Corporation --# --# This program is free software; you can redistribute it and/or modify --# it under the terms of the GNU General Public License as published by --# the Free Software Foundation; either version 2 of the License, or --# (at your option) any later version. --# --# This program is distributed in the hope that it will be useful, --# but WITHOUT ANY WARRANTY; without even the implied warranty of --# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the --# GNU General Public License for more details. --# --# You should have received a copy of the GNU General Public License --# along with this program; if not, write to the Free Software --# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA --# --#---------------------------------------------------------------------- --use strict; --use esmith::FormMagick; -- --my $fm = new esmith::FormMagick; -- --$fm->display(); -- --exit 0; -- --__DATA__ --
-- -- FRAMES_BODY -- -- --
-diff -Nur e-smith-manager-2.6.0.old/root/usr/share/locale/en_US/LC_MESSAGES/foot.tmpl.po e-smith-manager-2.6.0/root/usr/share/locale/en_US/LC_MESSAGES/foot.tmpl.po ---- e-smith-manager-2.6.0.old/root/usr/share/locale/en_US/LC_MESSAGES/foot.tmpl.po 2016-06-13 04:18:01.270000000 -0400 -+++ e-smith-manager-2.6.0/root/usr/share/locale/en_US/LC_MESSAGES/foot.tmpl.po 1969-12-31 19:00:00.000000000 -0500 -@@ -1,22 +0,0 @@ --# SOME DESCRIPTIVE TITLE. --# Copyright (C) YEAR THE PACKAGE'S COPYRIGHT HOLDER --# This file is distributed under the same license as the PACKAGE package. --# FIRST AUTHOR , YEAR. --# --#, fuzzy --msgid "" --msgstr "" --"Project-Id-Version: PACKAGE VERSION\n" --"Report-Msgid-Bugs-To: \n" --"POT-Creation-Date: 2016-06-13 04:18-0400\n" --"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n" --"Last-Translator: FULL NAME \n" --"Language-Team: LANGUAGE \n" --"Language: \n" --"MIME-Version: 1.0\n" --"Content-Type: text/plain; charset=CHARSET\n" --"Content-Transfer-Encoding: 8bit\n" -- --#: root/etc/e-smith/templates/etc/e-smith/web/common/foot.tmpl/25Copyright:7 --msgid "All rights reserved." --msgstr ""