remove unused functions mca_base_source_set_time_source, mca_base_component_event_register, mca_base_component_source_register

Signed-off-by: Kingshuk Haldar <kingshuk.haldar@hlrs.de>

Author: kingshuk00

opal/mca/base/mca_base_event.c

@@ -10,6 +10,8 @@
  * Copyright (c) 2017      IBM Corporation. All rights reserved.
  * Copyright (c) 2018-2019 Triad National Security, LLC. All rights
  *                         reserved.
+ * Copyright (c) 2025      High Performance Computing Center Stuttgart,
+ *                         University of Stuttgart.  All rights reserved.
  * $COPYRIGHT$
  *
  * Additional copyrights may follow
@@ -290,17 +292,6 @@ int mca_base_event_register (const char *project, const char *framework, const c
     return OPAL_SUCCESS;
 }
 
-int mca_base_component_event_register (const mca_base_component_t *component, const char *name,
-                                       const char *description, mca_base_var_info_lvl_t verbosity, opal_datatype_t **datatypes,
-                                       unsigned long *offsets, size_t num_datatypes, mca_base_var_enum_t *enumerator, int bind,
-                                       int source, uint32_t flags, mca_base_notify_fn_t notify, void *ctx, mca_base_event_t **event_out)
-{
-    /* invalidate this variable if the component's group is deregistered */
-    return mca_base_event_register (component->mca_project_name, component->mca_type_name, component->mca_component_name,
-                                    name, description, verbosity, datatypes, offsets, num_datatypes, enumerator, bind,
-                                    source, flags | MCA_BASE_EVENT_FLAG_IWG, notify, ctx, event_out);
-}
-
 int mca_base_component_event_register_list (const mca_base_component_t *component, mca_base_event_list_item_t *list, int count)
 {
     mca_base_var_enum_t *new_enum = NULL;

opal/mca/base/mca_base_event.h

@@ -4,6 +4,8 @@
  *                         reserved.
  * Copyright (c) 2018-2019 Triad National Security, LLC. All rights
  *                         reserved.
+ * Copyright (c) 2025      High Performance Computing Center Stuttgart,
+ *                         University of Stuttgart.  All rights reserved.
  *
  * Additional copyrights may follow
  *
@@ -175,11 +177,6 @@ OPAL_DECLSPEC int mca_base_event_register (const char *project, const char *fram
                                            unsigned long *offsets, size_t num_datatypes, mca_base_var_enum_t *enumerator, int bind,
                                            int source, uint32_t flags, mca_base_notify_fn_t notify, void *ctx, mca_base_event_t **event_out);
 
-OPAL_DECLSPEC int mca_base_component_event_register (const mca_base_component_t *component, const char *name,
-                                                     const char *description, mca_base_var_info_lvl_t verbosity, opal_datatype_t **datatypes,
-                                                     unsigned long *offsets, size_t num_datatypes, mca_base_var_enum_t *enumerator, int bind,
-                                                     int source, uint32_t flags, mca_base_notify_fn_t notify, void *ctx, mca_base_event_t **event_out);
-
 OPAL_DECLSPEC int mca_base_component_event_register_list (const mca_base_component_t *component, mca_base_event_list_item_t *list, int count);
 
 OPAL_DECLSPEC void MCA_BASE_EVENT_RAISE_internal (mca_base_event_t *event, mca_base_cb_safety_t cb_safety, void *obj, mca_base_source_t *source,

opal/mca/base/mca_base_source.c

@@ -8,6 +8,8 @@
  *                         of Tennessee Research Foundation.  All rights
  *                         reserved.
  * Copyright (c) 2017      IBM Corporation. All rights reserved.
+ * Copyright (c) 2025      High Performance Computing Center Stuttgart,
+ *                         University of Stuttgart.  All rights reserved.
  * $COPYRIGHT$
  *
  * Additional copyrights may follow
@@ -123,6 +125,10 @@ mca_base_source_t *mca_base_source_get (int source_index)
     return ret;
 }
 
+#if 0
+/* Due to perceived possiblity of timer-source change runtime,
+ * keeping the code, but disabling it.
+ */
 int mca_base_source_set_time_source (int source_index, mca_base_source_time_fn_t time_source, uint64_t time_ticks)
 {
     /* Uses source lock/unlock */
@@ -146,6 +152,7 @@ int mca_base_source_set_time_source (int source_index, mca_base_source_time_fn_t
 
     return OPAL_SUCCESS;
 }
+#endif
 
 /***************************************************************************************************/
 
@@ -251,13 +258,6 @@ int mca_base_source_register (const char *project, const char *framework, const
 
     return OPAL_SUCCESS;
 }
-int mca_base_component_source_register (const mca_base_component_t *component, const char *name, const char *description, bool ordered,
-                                        mca_base_source_time_fn_t source_time, uint64_t source_ticks)
-{
-    /* invalidate this variable if the component's group is deregistered */
-    return mca_base_source_register (component->mca_project_name, component->mca_type_name, component->mca_component_name,
-                                     name, description, ordered, source_time, source_ticks);
-}
 
 /* mca_base_source_t class */
 static void mca_base_source_constructor (mca_base_source_t *source)

opal/mca/base/mca_base_source.h

@@ -2,6 +2,8 @@
 /*
  * Copyright (c) 2018      Los Alamos National Security, LLC. All rights
  *                         reserved.
+ * Copyright (c) 2025      High Performance Computing Center Stuttgart,
+ *                         University of Stuttgart.  All rights reserved.
  *
  * Additional copyrights may follow
  *
@@ -58,11 +60,6 @@ OPAL_DECLSPEC int mca_base_source_dump(int index, char ***out, mca_base_var_dump
 OPAL_DECLSPEC int mca_base_source_register (const char *project, const char *framework, const char *component, const char *name,
                                             const char *description, bool ordered, mca_base_source_time_fn_t source_time, uint64_t source_ticks);
 
-OPAL_DECLSPEC int mca_base_component_source_register (const mca_base_component_t *component, const char *name, const char *description,
-                                                      bool ordered, mca_base_source_time_fn_t source_time, uint64_t source_ticks);
-
-OPAL_DECLSPEC int mca_base_source_set_time_source (int source_index, mca_base_source_time_fn_t time_source, uint64_t time_ticks);
-
 OPAL_DECLSPEC mca_base_source_t *mca_base_source_get (int source_index);
 
 #endif /* !defined(MCA_BASE_SOURCE_H) */