Changeset 16046

Timestamp:

2008-06-18T14:45:32+12:00 (16 years ago)

Author:

mdewsnip

Message:

(Adding dynamic classifiers) Added partial support for "grouping nodes" (ie. hlists), accessible using the new "-group_using" dynamic classifier option.

Location:

gsdl/trunk/src/recpt

Files:

• dynamicclassifieraction.cpp (modified) (2 diffs)
• dynamicclassifieraction.h (modified) (1 diff)

gsdl/trunk/src/recpt/dynamicclassifieraction.cpp

@@ -158 +158 @@
   textout << outconvert << disp << classifier_header_format_statement << "\n";
 
-  // Output the dynamic classifier
-  if (args["dcn"].empty())
+  // Output the dynamic classifier, beginning with the (optional) grouping nodes
+  text_t selected_grouping_node_OID = "";
+  if (!classifier_options["-group_using"].empty())
+  {
+    selected_grouping_node_OID = output_grouping_nodes (classifier_options, args, collectproto, browsers, disp, outconvert, textout, logout);
+  }
+
+  if (args["dcn"] == selected_grouping_node_OID)
   {
     // Simple case for the top-level page
@@ -216 +222 @@
 
 
+text_t dynamicclassifieraction::output_grouping_nodes (text_tmap classifier_options, cgiargsclass &args,
+                               recptproto *collectproto, browsermapclass *browsers,
+                               displayclass &disp, outconvertclass &outconvert,
+                               ostream &textout, ostream &logout)
+{
+  // Get all the metadata values for the specified element, and group them according to the "-group_using" value
+  text_t metadata_element_name = classifier_options["metadata_element_name"];
+  text_t metadata_value_grouping_expression = classifier_options["-group_using"];
+  FilterResponse_t grouping_nodes_response;
+  bool request_success = get_metadata_values (metadata_element_name, "", metadata_value_grouping_expression, args["c"], collectproto, grouping_nodes_response, logout);
+
+  // If the request failed then it's probably because the collection isn't using an SQL infodbtype
+  if (request_success == false)
+  {
+    textout << outconvert << disp << "Error: Dynamic classifier functionality is not available. Please check you are using an SQL infodbtype and the collection has been rebuilt.\n";
+    return "";
+  }
+
+  // Check some grouping nodes were returned
+  if (grouping_nodes_response.docInfo.empty())
+  {
+    return "";
+  }
+
+  // If no classifier node has been specified automatically go to the first grouping node
+  if (args["dcn"] == "")
+  {
+    args["dcn"] = grouping_nodes_response.docInfo.front().OID;
+  }
+
+  text_t selected_grouping_node_OID = "";
+  ResultDocInfo_tarray::iterator grouping_node_iterator = grouping_nodes_response.docInfo.begin();
+  while (grouping_node_iterator != grouping_nodes_response.docInfo.end())
+  {
+    // Is this the grouping node that is currently selected?
+    if ((*grouping_node_iterator).OID == args["dcn"])
+    {
+      selected_grouping_node_OID = (*grouping_node_iterator).OID;
+    }
+
+    // Add the necessary metadata required to display the grouping nodes correctly
+    (*grouping_node_iterator).metadata["doctype"].values.push_back ("classify");
+    (*grouping_node_iterator).metadata["haschildren"].values.push_back ("1");
+    (*grouping_node_iterator).metadata["numleafdocs"].values.push_back ("?");  // We can't determine this without more database requests
+    (*grouping_node_iterator).metadata["Title"].values.push_back ((*grouping_node_iterator).OID);
+    grouping_node_iterator++;
+  }
+
+  // Get the format statement for this classifier if there is one, or use the browser's default otherwise
+  text_t formatstring;
+  text_t classifier_type = "HList";
+  browserclass *bptr = browsers->getbrowser (classifier_type);
+  ColInfoResponse_t *cinfo = recpt->get_collectinfo_ptr (collectproto, args["c"], logout);
+  if (!get_formatstring (args["dcl"], classifier_type, cinfo->format, formatstring))
+  {
+    formatstring = bptr->get_default_formatstring();
+  }
+  format_t *formatlistptr = new format_t();
+  text_tset metadata;
+  bool getParents = false;
+  parse_formatstring (formatstring, formatlistptr, metadata, getParents);
+  bool use_table = is_table_content (formatlistptr);
+
+  // Display the grouping nodes
+  bptr->output_section_group (grouping_nodes_response, args, args["c"], 0, formatlistptr, use_table, metadata, getParents, collectproto, disp, outconvert, textout, logout);
+
+  return selected_grouping_node_OID;
+}
+
+
 void dynamicclassifieraction::output_top_level_page (text_tmap classifier_options, cgiargsclass &args,
                              recptproto *collectproto, browsermapclass *browsers,

gsdl/trunk/src/recpt/dynamicclassifieraction.h

@@ -65 +65 @@
   text_tmap parse_classifier_options (text_t classifier_specification, cgiargsclass &args);
 
+  text_t output_grouping_nodes (text_tmap classifier_options, cgiargsclass &args,
+                recptproto *collectproto, browsermapclass *browsers,
+                displayclass &disp, outconvertclass &outconvert,
+                ostream &textout, ostream &logout);
+
   void output_top_level_page (text_tmap classifier_options, cgiargsclass &args,
                   recptproto *collectproto, browsermapclass *browsers,