Hello Everyone,
Please find the attached patch file. It's the beginnings of the
Report.pm. Please note that this is my first attempt ever at writing a perl
module, so it's most likely not perfect ;)
I've tested this patch vs. today's CVS sync'd at 3:20 pm PDT.
I very highly recommend running this patch against a development version
instead of your live version of NorthStar.
To install this patch exectue:
cd /your/path/to/NorthStar
patch -p1 < /path/to/report.patch
perl Makefile.PL
make
make install
The files this modifies is:
NorthStar.pm
API.pm
And it creates:
Report.pm
view_report.html
It registers a Permissions Bit with Northstar (127) called "Reports." It
adds a menu header called "Reports" and a menu item called "Run Reports"
Now, at this time it does nothing with the Permissions Bit except create
it. It doesn't check for it, or anything else. But it does show up in the
"Users" configuration.
Here's the part where I am having problems. When I click my link, which
calls a function I've exported back, it tells me this:
You do not have permission to execute this function
I have debugging mode on, so here is the stack trace:
[NorthStar::init] CORE: initializing module
[NorthStar::Network::init] NETWORK: initializing module
[NorthStar::Owner::init] OWNER: initializing module
[NorthStar::Device::init] DEVICE: initializing module
[NorthStar::Location::init] LOCATION: initializing module
[NorthStar::Search::init] SEARCH: initializing module
[NorthStar::User::init] USER: initializing module
[NorthStar::Session::init] SESSION: initializing module
[NorthStar::Template::init] TEMPLATE: initializing module
[NorthStar::Regex::init] REGEX: initializing module
[NorthStar::View::init] VIEW: initializing module
[NorthStar::Report::init] REPORT: initializing module
[NorthStar::API::API_PermissionsCheckPerm] bit=
at /usr/lib/perl5/site_perl/5.6.1/NorthStar/API.pm line 712
NorthStar::API::API_ExitError('You do not have permission to execute
this function') called at /usr/lib/perl5/site_perl/5.6.1/NorthStar.pm line
171
NorthStar::VoodooMagic() called at
/usr/lib/perl5/site_perl/5.6.1/NorthStar.pm line 156
NorthStar::main() called at
/usr/lib/perl5/site_perl/5.6.1/NorthStar.pm line 92
NorthStar::run('NorthStar=HASH(0x80fbb0c)') called at
/var/www/html/NorthStar/NorthStar.cgi line 7
Anyone have any thoughts?
Thanks,
Adam "Tauvix" Debus
Network Administrator, ReachONE Internet
adam@reachone.com
Attachment:
report.patch
Description: Binary data