FreeCalypso > hg > fc-magnetite
view src/g23m-gprs/grlc/grlc_func.c @ 701:35e7f9d0379f
targets: add TARGET_HAS_BUZZER to c11x, c139 and dsample
This new target config preprocessor symbol was introduced in Tourmaline
in connection with the new approach to playing buzzer melodies via PWT,
properly omitting the responsible code on targets where BU output
controls the vibrator instead. That code is not present in Magnetite
and we have no plans to backport it here, but target header files
should be kept consistent between the two trees, especially given
that we plan to support FC Venus target in Magnetite.
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Sat, 26 Mar 2022 19:51:34 +0000 |
parents | 219afcfc6250 |
children |
line wrap: on
line source
/* +----------------------------------------------------------------------------- | Project : GPRS (8441) | Modul : GRLC +----------------------------------------------------------------------------- | Copyright 2002 Texas Instruments Berlin, AG | All rights reserved. | | This file is confidential and a trade secret of Texas | Instruments Berlin, AG | The receipt of or possession of this file does not convey | any rights to reproduce or disclose its contents or to | manufacture, use, or sell anything it may describe, in | whole, or in part, without the specific written consent of | Texas Instruments Berlin, AG. +----------------------------------------------------------------------------- | Purpose : This modul is part of the entity GRLC and implements all | functions according to 921bis.doc +----------------------------------------------------------------------------- */ #ifndef GRLC_FUNC_C #define GRLC_FUNC_C #endif #define ENTITY_GRLC /*==== INCLUDES =============================================================*/ #include <string.h> #include "typedefs.h" /* to get Condat data types */ #include "vsi.h" /* to get a lot of macros */ #include "macdef.h" #include "gprs.h" #include "gsm.h" /* to get a lot of macros */ #include "ccdapi.h" /* to get CCD API */ #include "prim.h" /* to get the definitions of used SAP and directions */ #include "message.h" /* to get air message definitions */ #include "grlc.h" /* to get the global entity definitions */ #include "grlc_func.h" /* to check the function */ #include "grlc_f.h" /* to get the global entity definitions */ #include "grlc_tpcs.h" /* patch to avoid overwriting of primitives in global variable QueueMsg[] */ #undef VSI_CALLER_SINGLE #define VSI_CALLER_SINGLE 0 /*==== CONST ================================================================*/ /*==== DIAGNOSTICS ==========================================================*/ /*==== LOCAL VARS ===========================================================*/ /*==== PRIVATE FUNCTIONS ====================================================*/ /* +------------------------------------------------------------------------------ | Function : maca_power_control +------------------------------------------------------------------------------ | Description : The function maca_power_control() is described in 921bis.doc | | Parameters : see 921bis.doc | +------------------------------------------------------------------------------ */ GLOBAL void maca_power_control ( UWORD8 assignment_id, BOOL crc_error, WORD8 bcch_level, UWORD16 radio_freq[MAC_BURST_PER_BLOCK], WORD8 burst_level[MAC_BURST_PER_BLOCK], UWORD8 *pch ) { UBYTE i; /* used for counting */ tpc_get_pch( pch ); grlc_data->func.mac_pwr_ctrl_ind.assignment_id = assignment_id; grlc_data->func.mac_pwr_ctrl_ind.crc_error = ( crc_error ? GRLC_CRC_FAIL : GRLC_CRC_PASS ); grlc_data->func.mac_pwr_ctrl_ind.bcch_level = bcch_level; for( i = 0; i < MAC_BURST_PER_BLOCK; i++ ) { grlc_data->func.mac_pwr_ctrl_ind.burst_level[i] = burst_level[i]; grlc_data->func.mac_pwr_ctrl_ind.radio_freq [i] = radio_freq[i]; } PSIGNAL( hCommGRLC, MAC_PWR_CTRL_IND, &grlc_data->func.mac_pwr_ctrl_ind ); return; } /* maca_power_control() */ #ifdef _TARGET_ UWORD32 lst_dl_frame_nr; /* +------------------------------------------------------------------------------ | Function : rlc_uplink +------------------------------------------------------------------------------ | Description : The function rlc_uplink() is described in 921bis.doc | | Parameters : see 921bis.doc | +------------------------------------------------------------------------------ */ GLOBAL void rlc_uplink ( UWORD8 assignment_id, UWORD8 tx_data_no, UWORD32 fn, UWORD8 timing_advance_value, T_ul_poll_resp * ul_poll_response, T_ul_data * ul_data, BOOL allocation_exhausted) { UWORD8 i; API *pollptr = (API*)ul_poll_response; API *outptr = (API*)ul_data; grlc_data->last_ul_fn = fn; grlc_data->ul_fn_store[(grlc_data->ul_cnt_syn%CALL_ERROR_NR_OF_ST_FN)] = fn; if(grlc_data->ul_cnt_syn NEQ grlc_data->ul_cnt_asyn) { grlc_data->ul_fn_errors[(grlc_data->ul_cnt_syn%CALL_ERROR_NR_OF_ST_FN)] = fn; grlc_data->ul_fn_errors[(grlc_data->ul_call_errors%CALL_ERROR_NR_OF_ST_FN)] = fn; /* Increment the Call_Error and wraparrond if it exceed CALL_ERROR_NR_OF_ST_FN */ grlc_data->ul_call_errors = ((grlc_data->ul_call_errors%CALL_ERROR_NR_OF_ST_FN)+1); } grlc_data->func.mac_ready_ind.nts = tx_data_no; grlc_data->func.mac_ready_ind.ta_value = timing_advance_value; /*****copy Poll blocks**************************************************/ if(fn EQ grlc_data->next_poll_fn) { i=0; while(grlc_data->ul_poll_resp[i].block_status) { pollptr[i*15] = grlc_data->ul_poll_resp[i].block_status; pollptr[i*15+1] = grlc_data->ul_poll_resp[i].tn; memcpy( (UBYTE*)&pollptr[i*15+2], (UBYTE*)grlc_data->ul_poll_resp[i].ul_block, 12 * sizeof(API) ); /*lint !e419*/ pollptr[15*(i+1)] = 0x0000; /* Poll None*/ i++; } grlc_data->ul_poll_resp[0].block_status = 0; grlc_data->next_poll_fn = 2; } else { pollptr[0] = 0x0000; /* Poll None*/ } /*****copy data blocks**************************************************/ outptr[0] = 0; if(grlc_data->ta_value NEQ 0xFF) { for(i=0;i<tx_data_no;i++) { outptr[i*29] = grlc_data->ru.ul_data[i].block_status; memcpy( (UBYTE*)&outptr[1+(i*29)], (UBYTE*)grlc_data->ru.ul_data[i].ul_block, 28 * sizeof(API) ); /*lint !e419*/ outptr[(i+1)*29] = 0; } } /*call control of syn part*/ grlc_data->ul_cnt_syn++; return; } /* rlc_uplink() */ /* +------------------------------------------------------------------------------ | Function : rlc_downlink +------------------------------------------------------------------------------ | Description : The function rlc_downlink() is described in 921bis.doc | | Parameters : see 921bis.doc | +------------------------------------------------------------------------------ */ GLOBAL void rlc_downlink ( UWORD8 assignment_id, UWORD32 fn, T_dl_struct *data_ptr, UWORD8 rlc_blocks_sent, UWORD8 last_poll_response) { API * in_ptr = (API*) (data_ptr); BOOL send_psginal; UBYTE i,pos = 0, call_err = 0, crc_cnt=0; grlc_data->last_dl_fn = lst_dl_frame_nr; lst_dl_frame_nr = fn; grlc_data->dl_fn_store[(grlc_data->dl_cnt_syn%CALL_ERROR_NR_OF_ST_FN)] = fn-4; if(grlc_data->dl_cnt_syn NEQ grlc_data->dl_cnt_asyn) { grlc_data->dl_fn_errors[(grlc_data->dl_cnt_syn%CALL_ERROR_NR_OF_ST_FN)] = fn-4; grlc_data->dl_call_errors++; } grlc_data->dl_fn = fn-4; grlc_data->func.dl_blocks.fn = fn-4; grlc_data->func.dl_blocks.data_ptr.rx_no = 0; send_psginal = FALSE; if(grlc_data->dl_cnt_syn EQ grlc_data->dl_cnt_asyn) { for (i = 0; i < data_ptr->rx_no; i++) { /* * In Test mode B,if there is CRC error on the payload data the MS will, * where required by the USF, transmit the decoded payload data. The block * transmitted will be a valid uplink block format. */ if(((in_ptr[31 * i + 1] & 0x0100) EQ 0x0000) OR (grlc_data->testmode.mode EQ CGRLC_LOOP) ) { send_psginal = TRUE; grlc_data->func.dl_blocks.data_ptr.rx_no++; #ifdef TI_PS_16BIT_CPY api_memcpy(&grlc_data->func.dl_blocks.data_ptr.dl_data[pos], &in_ptr[31 * i + 1], 31 * sizeof(API) ); /*lint !e420*/ #else memcpy(&grlc_data->func.dl_blocks.data_ptr.dl_data[pos], &in_ptr[31 * i + 1], 31 * sizeof(API) ); /*lint !e420*/ #endif pos++; } else { /* CRC error */ grlc_data->nr_of_crc_errors++; crc_cnt++; } } } else { /* call error */ grlc_data->dl_cnt_asyn = grlc_data->dl_cnt_syn; call_err = 0xFF; TRACE_ERROR("DL CALL ERROR"); } grlc_data->dl_cnt_syn++; if(send_psginal) { PSIGNAL(hCommGRLC,MAC_DATA_IND, (&grlc_data->func.mac_data_ind) ); } else { grlc_data->dl_cnt_asyn++; /*no signal to GFF, inc asynchronus counter*/ if(data_ptr->rx_no NEQ crc_cnt) { TRACE_EVENT_P3("NO DL DATA: rx_no= %d crc_err=%d call_err= %d",data_ptr->rx_no, crc_cnt,call_err); } } /* new interface */ grlc_data->func.mac_ready_ind.rlc_blocks_sent = rlc_blocks_sent; grlc_data->func.mac_ready_ind.last_poll_resp = last_poll_response; grlc_data->func.mac_ready_ind.fn = fn; grlc_data->ul_fn = fn; /* adapte uplink framenumber from downlink framenumber */ if((grlc_data->ul_fn % 13) EQ 12) grlc_data->ul_fn++; grlc_data->ul_fn %= FN_MAX; PSIGNAL(hCommGRLC, MAC_READY_IND, &(grlc_data->func.mac_ready_ind)); return; } /* rlc_downlink() */ #endif /* _TARGET_ */