#include <stdio.h>
#include <sys/time.h>
#include <sys/resource.h>
#include <xview/xview.h>
#include <xview/panel.h>
#include <xview/text.h>
#include "genC.h"
#include "constants.h"
#include "misc.h"
#include "linear.h"
#include "ri.h"
#include "ri-util.h"
#include "top-level.h"
#include "database.h"
#include "pipsmake.h"
#include "pipsdbm.h"
#include "wpips.h"
#include "wpips-labels.h"
#include "resources.h"
#include "phases.h"
#include "wpips_transform_menu_layout.h"

Include dependency graph for xv_transform.c:

Functions
void	apply_on_each_transform_item (void(*function_to_apply_on_each_menu_item)(Menu_item))

void	disable_transform_selection ()

void	enable_transform_selection ()

void	execute_safe_apply_outside_the_notifyer ()

void	safe_apply_outside_the_notifyer (string transformation_name_to_apply, string module_name)

static void	transform_notify (Menu menu, Menu_item menu_item)

void	create_transform_menu ()

Variables
wpips_transform_menu_layout_line	wpips_transform_menu_layout []
	Include the label names: More...

static string	execute_safe_apply_outside_the_notifyer_transformation_name_to_apply = NULL
	To pass arguments to execute_safe_apply_outside_the_notifyer(): More...

static string	execute_safe_apply_outside_the_notifyer_module_name = NULL

Menu	transform_menu
	The transform menu: More...

Function Documentation

◆ apply_on_each_transform_item()

void apply_on_each_transform_item ( void(*)(Menu_item) function_to_apply_on_each_menu_item )

Walk through items of

Skip the title item:

Definition at line 81 of file xv_transform.c.

 {
    int i;
    /* Walk through items of  */
    for (i = (int) xv_get(transform_menu, MENU_NITEMS); i > 0; i--) {
       Menu_item menu_item = (Menu_item) xv_get(transform_menu,
                                                MENU_NTH_ITEM, i);
       /* Skip the title item: */
       if (!(bool) xv_get(menu_item, MENU_TITLE)
           && xv_get(menu_item, MENU_NOTIFY_PROC) != NULL)
           function_to_apply_on_each_menu_item(menu_item);
    }
 }

References transform_menu.

Referenced by disable_transform_selection(), and enable_transform_selection().

Here is the caller graph for this function:

◆ create_transform_menu()

void create_transform_menu ( )

Now add all the transformation entries:

Just a separator:

Add the Edit entry as the last one:

Just a separator:

Definition at line 172 of file xv_transform.c.

 {
    wpips_transform_menu_layout_line * current_transformation;
  
    edit_menu_item = 
       xv_create(NULL, MENUITEM, 
                 MENU_STRING, EDIT_VIEW,
                 MENU_NOTIFY_PROC, edit_notify,
                 MENU_RELEASE,
                 NULL);
    
    transform_menu =
       xv_create(XV_NULL, MENU_COMMAND_MENU, 
                 MENU_GEN_PIN_WINDOW, main_frame, "Transform Menu",
                 MENU_TITLE_ITEM, "Apply a program transformation to a module ",
                 NULL);
    
    /* Now add all the transformation entries: */
    for (current_transformation = &wpips_transform_menu_layout[0];
         current_transformation->menu_entry_string != NULL;
         current_transformation++) {
       if (strcmp(current_transformation->menu_entry_string,
                  WPIPS_MENU_SEPARATOR_ID) == 0)
          xv_set(transform_menu,
                                 /* Just a separator: */
                 WPIPS_MENU_SEPARATOR,
                 NULL);
       else
          xv_set(transform_menu,
                 MENU_ACTION_ITEM, current_transformation->menu_entry_string,
                 transform_notify,
                 NULL);
    }
    
    /* Add the Edit entry as the last one: */
    xv_set(transform_menu,
                                 /* Just a separator: */
           WPIPS_MENU_SEPARATOR,
           MENU_APPEND_ITEM, edit_menu_item,
           NULL);
  
    (void) xv_create(main_panel, PANEL_BUTTON,
                     PANEL_LABEL_STRING, "Transform/Edit",
                     PANEL_ITEM_MENU, transform_menu,
                     0);
 }

References edit_menu_item, edit_notify(), EDIT_VIEW, main_frame, main_panel, wpips_transform_menu_layout_line::menu_entry_string, transform_menu, transform_notify(), WPIPS_MENU_SEPARATOR, WPIPS_MENU_SEPARATOR_ID, and wpips_transform_menu_layout.

Here is the call graph for this function:

◆ disable_transform_selection()

void disable_transform_selection ( )

Definition at line 97 of file xv_transform.c.

 {
    apply_on_each_transform_item(disable_menu_item);
 }

References apply_on_each_transform_item(), and disable_menu_item().

Here is the call graph for this function:

◆ enable_transform_selection()

void enable_transform_selection ( )

Definition at line 104 of file xv_transform.c.

 {
    apply_on_each_transform_item(enable_menu_item);
 }

References apply_on_each_transform_item(), and enable_menu_item().

Here is the call graph for this function:

◆ execute_safe_apply_outside_the_notifyer()

void execute_safe_apply_outside_the_notifyer ( )

The module list may have changed:

Definition at line 111 of file xv_transform.c.

 {
    (void) safe_apply(execute_safe_apply_outside_the_notifyer_transformation_name_to_apply, execute_safe_apply_outside_the_notifyer_module_name);
    free(execute_safe_apply_outside_the_notifyer_transformation_name_to_apply);
    free(execute_safe_apply_outside_the_notifyer_module_name);
  
    /* The module list may have changed: */
    send_the_names_of_the_available_modules_to_emacs();
    display_memory_usage();
 }

References display_memory_usage(), execute_safe_apply_outside_the_notifyer_module_name, execute_safe_apply_outside_the_notifyer_transformation_name_to_apply, free(), safe_apply(), and send_the_names_of_the_available_modules_to_emacs().

Referenced by wpips_main_loop().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ safe_apply_outside_the_notifyer()

void safe_apply_outside_the_notifyer	(	string	transformation_name_to_apply,
		string	module_name
	)

Ask to execute the execute_safe_apply_outside_the_notifyer():

I guess the function above does not return...

Definition at line 124 of file xv_transform.c.

 {
    execute_safe_apply_outside_the_notifyer_transformation_name_to_apply =
       strdup(transformation_name_to_apply);
    execute_safe_apply_outside_the_notifyer_module_name =
       strdup(module_name);
    /* Ask to execute the execute_safe_apply_outside_the_notifyer(): */
    execute_main_loop_command(WPIPS_SAFE_APPLY);
    /* I guess the function above does not return... */
 }

References execute_main_loop_command(), execute_safe_apply_outside_the_notifyer_module_name, execute_safe_apply_outside_the_notifyer_transformation_name_to_apply, module_name(), strdup(), and WPIPS_SAFE_APPLY.

Referenced by transform_notify().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ transform_notify()

static void transform_notify	(	Menu	menu,
		Menu_item	menu_item
	)

static

FI: borrowed from edit_notify()

Find the transformation to apply:

Apply the transformation:

I guess the function above does not return...

Definition at line 138 of file xv_transform.c.

 {
    char * label = (char *) xv_get(menu_item, MENU_STRING);
  
    char * modulename = db_get_current_module_name();
  
    /* FI: borrowed from edit_notify() */
    if (modulename == NULL) {
       prompt_user("No module selected");
    }
    else {
       wpips_transform_menu_layout_line * current_transformation;
  
       /* Find the transformation to apply: */
       for (current_transformation = &wpips_transform_menu_layout[0];
            current_transformation->menu_entry_string != NULL;
            current_transformation++)
          if (strcmp(label, current_transformation->menu_entry_string) == 0)
             break;
  
       if (current_transformation->menu_entry_string != NULL)
          /* Apply the transformation: */
          safe_apply_outside_the_notifyer(current_transformation->transformation_name_to_apply, modulename);
       /* I guess the function above does not return... */
       else
          pips_internal_error("What is this \"%s\" entry you ask for?", label);
    }
  
    display_memory_usage();
 }