FreeCalypso > hg > fc-tourmaline

view src/cs/drivers/drv_app/r2d/r2d_inits.c @ 268:f2e52cab0a73

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
abb_inth.c: check all interrupt causes, not just one The original code used if - else if - else if etc constructs, thus the first detected interrupt was the only one handled. However, Iota ITSTATREG is a clear-on-read register, thus if we only handle the first detected interrupt and skip checking the others, then the other interrupts will be lost, if more than one interrupt happened to occur in one ABB interrupt handling cycle - a form of rare race condition. Change the code to check all interrupts that were read in this cycle.
author Mychaela Falconia <falcon@freecalypso.org>
date Sun, 13 Jun 2021 18:17:53 +0000
parents 502a0a3f6a49
children
line wrap: on
line source

/**
                                                                          
	@file:	r2d_inits.c	
	
	@author Christophe Favergeon                              
                                                                          
    @version	0.1

    Purpose:	Initializations routines for R2D
	
*/

/*
																			
 	Date       	Modification												
  ------------------------------------									
    03/05/2002	Create		
	    
																			
 (C) Copyright 2002 by Texas Instruments Incorporated, All Rights Reserved
*/


#include "rv/general.h"

#include "rvm/rvm_gen.h"
#include "rvm/rvm_ext_priorities.h"
#include "rvm/rvm_use_id_list.h"

#include "r2d/r2d_pool_size.h"	/* Stack & Memory Bank sizes definitions */

#include "r2d/r2d_config.h"
#include "r2d/r2d.h"
#include "r2d/r2d_i.h"
#include "r2d/r2d_env.h"
#include "r2d/r2d_independance_layer.h"
#include "r2d/r2d_messages.h"
#include "r2d/uwire.h"


#ifndef _WINDOWS
#ifndef _SIZE_T
#define _SIZE_T
typedef unsigned int size_t;
#endif
#endif

#ifndef _WINDOWS
void *memcpy(void *s1, const void *s2, register size_t n);
void *memmove(void *s1, const void *s2, size_t n);
#endif

extern T_R2D_ERROR r2d_font_init(void);
extern void r2d_font_clean(void);extern void r2d_core(UINT32 param);


/* global memory bank ID */
extern T_RVF_MB_ID r2d_mb_id;

/* Global standard graphical context */

extern T_R2D_GC_PTR r2d_g_lcd_gc;



#if (R2D_ASM == R2D_ON)
extern T_RVF_MUTEX * r2d_g_blit_mutex;
extern UINT32 r2d_g_old_foreground_pixelvalue;
extern UINT32 r2d_g_old_background_pixelvalue;
#endif

extern T_RVF_MUTEX * r2d_g_global_mutex;



#if (R2D_REFRESH == R2D_VERTICAL)
  extern UINT32 r2d_lcd_memory_words[(((R2D_WIDTH*R2D_MWHEIGHT)+1)<<R2D_LONGSIZE_FACTOR)];
#else
  extern UINT32 r2d_lcd_memory_words[(((R2D_MWWIDTH*R2D_HEIGHT)+1)<<R2D_LONGSIZE_FACTOR)];
#endif

extern INT16 r2d_update_ul_x,r2d_update_ul_y,r2d_update_br_x,r2d_update_br_y;

extern void r2d_reinit_update_region(void);

void (*IND_r2d_reinit_update_region)(void)=r2d_reinit_update_region;

extern T_R2D_FONT_DESCRIPTION *r2d_g_font_configuration;


/* FreeCalypso Tourmaline: totally new approach */

#ifdef CONFIG_TARGET_LUNA
  #include "r2d/lcds/luna/r2d_task_init_i.c"
#elif defined(CONFIG_TARGET_C139)
  #include "r2d/lcds/c139/r2d_task_init_i.c"
#else
  #error "R2D hw init selection: unsupported target"
#endif

UINT32 r2d_get_memory_bank_size()
{
	return(R2D_MB_PRIM_SIZE);
}

#if ((!defined DEPENDENCY) && (R2D_MB_PRIM_SIZE != R2D_MB1_SIZE))
  /* If the R2D Memory Bank sizes defined in rvf_pool_size.h differs from */
  /* the one returned by the previous function, compilation is STOPPED. */
  #error R2D Memory Bank size mismatch!
#endif



////////////////////////////////////////
//
// Software entity initialization

// Allocate the LCD framebuffer and dithering matrix
// Clear the framebuffer to 0
// (Which does not mean intensity 0 since the meaning
// of 0 is dependent on the LCD).

static void r2d_lcd_init(void)
{
   UINT16 length;
//   UINT32 *p;
    T_RVF_RET err;
   

   R2D_MALLOC(r2d_mb_id,T_R2D_FRAMEBUFFER,sizeof(T_R2D_FRAMEBUFFER),r2d_g_framebuffer);
   
   if (r2d_g_framebuffer !=NULL)
   {
   // length+1 is used instead of length because in the refresh loop
   // one may need to read one word past the end of the real datas
#if (R2D_REFRESH==R2D_VERTICAL)
   // Column is contiguous in memory
   length=R2D_WIDTH*R2D_MWHEIGHT;
   //R2D_MALLOC(r2d_mb_id,UINT32,((length+1)<<R2D_LONGSIZE_FACTOR),r2d_g_framebuffer->p_memory_words);
   r2d_g_framebuffer->p_memory_words=r2d_lcd_memory_words;
   
   // No deletion at the end since memory_word is NOT a dynamical object
   r2d_g_framebuffer->refcount=-1;

   // 0 is a special LCD kind : size of the framebuffer
   // is hardcoded to quick pixel generation
   r2d_g_framebuffer->kind=0;
   r2d_g_framebuffer->p_frame_buffer_end=r2d_g_framebuffer->p_memory_words+length;
   r2d_g_framebuffer->width=R2D_WIDTH;
   r2d_g_framebuffer->height=R2D_HEIGHT;
#else
    // Line is contiguous in memory
    length=R2D_HEIGHT*R2D_MWWIDTH;
    r2d_g_framebuffer->p_memory_words=r2d_lcd_memory_words;
	
	r2d_g_framebuffer->refcount=-1;
// 0 is a special LCD kind : size of the framebuffer
   // is hardcoded to quick pixel generation
    r2d_g_framebuffer->kind=0;    
    r2d_g_framebuffer->p_frame_buffer_end=r2d_g_framebuffer->p_memory_words+length;
    r2d_g_framebuffer->width=R2D_WIDTH;
    r2d_g_framebuffer->height=R2D_HEIGHT;
#endif

		R2D_MALLOC(r2d_mb_id,T_RVF_MUTEX,sizeof(T_RVF_MUTEX),r2d_g_framebuffer->mutex);
   if (r2d_g_framebuffer->mutex!=NULL)
	{
			  err=rvf_initialize_mutex(r2d_g_framebuffer->mutex);
			  if (err!=RVF_OK)
			  {
				 R2D_FREE(r2d_g_framebuffer->mutex);
				 R2D_FREE(r2d_g_framebuffer);
				 r2d_g_framebuffer=NULL;
				 
			  }
	}
	else
	{
				R2D_FREE(r2d_g_framebuffer);
				r2d_g_framebuffer=NULL;
				
	}

   }
    IND_r2d_reinit_update_region();


}

T_RVM_RETURN r2d_cleanup(void)
{
	/*
	** free all memory buffer previously allocated.
	** DO NOT SEND MESSAGES
	*/
	r2d_refresh_task_kill();
	#if (R2D_ASM == R2D_ON)
	  rvf_delete_mutex(r2d_g_blit_mutex);
	  R2D_FREE(r2d_g_blit_mutex);
    #endif
	rvf_delete_mutex(r2d_g_global_mutex);
	R2D_FREE(r2d_g_global_mutex);
	r2d_release_context(r2d_g_lcd_gc);
	r2d_release_framebuffer(r2d_g_framebuffer);
    R2D_FREE(r2d_g_dithering_matrix);
	R2D_FREE(r2d_g_font_configuration);
	
	return(RV_OK);
}



/******************************************************************************
* Function	  : xxx_init
*
* Description : This function is called by the RV manager to initialize the 
*				xxx SWE before creating the task and calling xxx_start. 
*
* Parameters  : None
*
* Return      : T_RVM_RETURN
* 
* History	  : 0.1 (20-August-2000)
*									
*
******************************************************************************/
T_RVM_RETURN r2d_initializations(void)
{
	/*
	** Put local SWE initialization here
	*/

	T_R2D_ERROR err;

    r2d_lcd_init();
	if (r2d_g_framebuffer==NULL)
	 goto r2d_init_error;

    r2d_dithering_init();
	if (r2d_g_dithering_matrix==NULL)
	{
		r2d_release_framebuffer(r2d_g_framebuffer);
		goto r2d_init_error;
	}

	R2D_MALLOC(r2d_mb_id,T_R2D_FONT_DESCRIPTION,
		sizeof(T_R2D_FONT_DESCRIPTION)*36,r2d_g_font_configuration);

	if (r2d_g_font_configuration ==NULL)
	{
		r2d_release_framebuffer(r2d_g_framebuffer);
        R2D_FREE(r2d_g_dithering_matrix);
		goto r2d_init_error;
    }

    err=r2d_font_init();
    if (err!=R2D_OK)
	{
		r2d_release_framebuffer(r2d_g_framebuffer);
        R2D_FREE(r2d_g_dithering_matrix);
		goto r2d_init_error;
	}


	r2d_g_default_font_framebuffer=r2d_g_font_configuration[R2D_MEDIUM_SYSTEM_NORMAL].framebuffer;
    r2d_g_default_font_metrics=r2d_g_font_configuration[R2D_MEDIUM_SYSTEM_NORMAL].metrics;
    r2d_g_default_font_table=r2d_g_font_configuration[R2D_MEDIUM_SYSTEM_NORMAL].table;

	r2d_refresh_task_init();

	r2d_g_lcd_gc=r2d_new_lcd_context(r2d_mb_id);
	if (r2d_g_lcd_gc==NULL)
	{
		r2d_font_clean();
		r2d_release_framebuffer(r2d_g_framebuffer);
        R2D_FREE(r2d_g_dithering_matrix);
		goto r2d_init_error;
	}

	r2d_g_event_was_sent=FALSE;
	r2d_g_refresh_disabled=0;

	#if (R2D_ASM == R2D_ON)

	R2D_MALLOC(r2d_mb_id,T_RVF_MUTEX,sizeof(T_RVF_MUTEX),r2d_g_blit_mutex);
    if (r2d_g_blit_mutex==NULL)
	{
		r2d_font_clean();
		r2d_release_framebuffer(r2d_g_framebuffer);
        R2D_FREE(r2d_g_dithering_matrix);
		goto r2d_init_error;
	}

	err=rvf_initialize_mutex(r2d_g_blit_mutex);
    if (err!=RVF_OK)
	{
		R2D_FREE(r2d_g_blit_mutex);
		r2d_font_clean();
		r2d_release_framebuffer(r2d_g_framebuffer);
        R2D_FREE(r2d_g_dithering_matrix);
		goto r2d_init_error;
	}

	// Mode of initial asm blit rect
	r2d_g_old_mode=R2D_COPY_MODE;
    r2d_g_old_use_foreground=FALSE;
    r2d_g_old_srcdst=R2D_LCDLCD;
	r2d_g_old_foreground_pixelvalue=((T_R2D_GC*)r2d_g_lcd_gc)->foreground_pixel_value;
	r2d_g_old_background_pixelvalue=((T_R2D_GC*)r2d_g_lcd_gc)->background_pixel_value;

#endif

	R2D_MALLOC(r2d_mb_id,T_RVF_MUTEX,sizeof(T_RVF_MUTEX),r2d_g_global_mutex);
    if (r2d_g_global_mutex==NULL)
	{
		r2d_font_clean();
		r2d_release_framebuffer(r2d_g_framebuffer);
        R2D_FREE(r2d_g_dithering_matrix);
#if (R2D_ASM == R2D_ON)
		rvf_delete_mutex(r2d_g_blit_mutex);
	    R2D_FREE(r2d_g_blit_mutex);
#endif
		goto r2d_init_error;
	}

	err=rvf_initialize_mutex(r2d_g_global_mutex);
    if (err!=RVF_OK)
	{
		R2D_FREE(r2d_g_global_mutex);
		r2d_font_clean();
		r2d_release_framebuffer(r2d_g_framebuffer);
        R2D_FREE(r2d_g_dithering_matrix);
#if (R2D_ASM == R2D_ON)
		rvf_delete_mutex(r2d_g_blit_mutex);
	    R2D_FREE(r2d_g_blit_mutex);
#endif
		goto r2d_init_error;
	}
	

	return RV_OK;
	
    
r2d_init_error:	return RV_MEMORY_ERR;
}