[Orca-users] Re: subgroups?

[Mark Ching]

I was able to edit the web page out put to make a
group for orcallator and a group for procallator.  

In the orca perl script:

  $index_html->print("<h2>Available
Targets</h2>\n\n<table>\n\n");
  foreach my $group_name (sort keys
%$subgroup_fids_ref) {
###ADDED BY MAC
    if (my $current_group ne $group_name) {
        $current_group=$group_name;
        $index_html->print("<tr valign=top>" .
join('', @table_columns) . "</tr>
\n");
        $index_html->print("</table>\n\n<a
name=\"$group_name.host\"><h3>$group_
name</h3><table>\n\n");
        @table_columns=();
    }
###END OF ADDED LINES BY MAC FOR NOW
    foreach my $subgroup_name (sort
sort_subgroup_names keys
                              
%{$subgroup_fids_ref->{$group_name}}) {



That covers the host table.


This is for the list of stats.  This edit is site
specific.  becareful.

        foreach my $plot_type (@IMAGE_PLOT_TYPES,
'all') {
          $element .= "<td><a
href=\"$no_subgroup_name-$plot_type.html\">";
          $element .= Capatialize($plot_type) .
"</a></td>\n";
        }
        push(@table_columns, $element);
###ADDED BY MAC
        if ( $legend_no_subgroup =~ /^Average #
Processes in Run Queue/) {
          if ( $legend_no_subgroup =~ /CPUs$/ ){
            $index_html->print("</table><A
name=\"procallator.stat\"><h3>Procall
ator Linux Stats</h3><table>\n");
          }
          elsif ( $legend_no_subgroup =~ /Average\)$/
) {
            $index_html->print("<table><A
name=\"orcallator.stat\"><h3>Orcallato
r Sun Stats</h3>\n");
          }
        }
###END OF ADD

        if (@table_columns == $table_number_columns) {
          $index_html->print("<tr>" . join('',
@table_columns) . "</tr>\n");
          @table_columns = ();


Mark







--- Sean O'Neill <sean at seanoneill.info> wrote:
> At 11:53 AM 10/14/2002 +0000, piffle99us wrote:
> 
> >I was wondering if it's possible to get orca to
> work with subgroups of
> >some sort.
> >
> >What i'm really looking for is an html page with
> multiple groups on it
> >that then link into individual clusters of
> machines. I have a huge
> >slew of machines that i am going to be using orca
> with and grouping in
> >this manner would allow me to a) keep everything
> nice and tidy, and b)
> >restrict sub directories to specific groups who
> need to look at these
> >pages.
> >
> >Any way that it's possible with the current
> incarnation or shall I
> >have to go perl grubbing? :)
> >
> >thanks in advance.
> 
> This same question was asked recently.  Look through
> the archives and look 
> for a thread on "Cutomizing Orca Web Page" by
> Mukarram Syed.
> 
> In short, its up to you.  Orca doesn't have this
> capabilities at this time.
> 
> 
> --
>
........................................................
> ......... ..- -. .. -..- .-. ..- .-.. . ...
> ............
> .-- .. -. -... .-.. --- .-- ... -.. .-. --- --- .-..
> ...
> 
> Sean O'Neill
> 
> 


__________________________________________________
Do you Yahoo!?
Faith Hill - Exclusive Performances, Videos & More
http://faith.yahoo.com