summaryrefslogtreecommitdiffstats
blob: 55b7ccb2c1f393b82858ee92da2c1cd44891fa3b (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
/*
 * Copyright (c) 2016-2018, Texas Instruments Incorporated
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * *  Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 *
 * *  Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 *
 * *  Neither the name of Texas Instruments Incorporated nor the names of
 *    its contributors may be used to endorse or promote products derived
 *    from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
 * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
 * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */
/*
 *  ======== HwiP_tirtos.c ========
 */

#include <c6x.h>

#include <stdint.h>
#include <stdbool.h>
#include <stdlib.h>
#include <string.h>
#include <ti/csl/csl_tsc.h>
#include <ti/osal/src/nonos/Nonos_config.h>
#include <ti/csl/tistdtypes.h>

/* Local structure definition */
typedef struct HwiP_nonOs_s {
    bool        used;
    Hwi_Struct  hwi;
} HwiP_nonOs;

/* Local hwi structures */
static HwiP_nonOs hwiStructs[OSAL_NONOS_CONFIGNUM_HWI];


/*
 * Dummy function to check size during compile time
 *  ======== HwiP_compileTime_SizeChk ========
 */

void OsalArch_compileTime_SizeChk(void)
{
    #pragma diag_suppress 179
    OSAL_COMPILE_TIME_SIZE_CHECK ((uint32_t)sizeof(HwiP_nonOs),OSAL_NONOS_HWIP_SIZE_BYTES);
}

static bool gFirstTime = (bool)false;
static CSL_IntcContext               gContext;
static CSL_IntcEventHandlerRecord    gEventRecord[OSAL_NONOS_CONFIGNUM_HWI];
static bool gTimestampFirstTime = (bool)true;
static bool gHwiInitialized = (bool)false;
/* This function enables the interrupt for a given interrupt number */
void OsalArch_enableInterrupt(uint32_t intNum)
{
    (void)CSL_intcInterruptEnable((CSL_IntcVectId)intNum);
    return;
}

/* This function disables the interrupt for a given interrupt number */
void OsalArch_disableInterrupt(uint32_t intNum)
{
    (void)CSL_intcInterruptDisable((CSL_IntcVectId)intNum);
    return;
}

/* Below function clears interrupt in the chip level */
void OsalArch_clearInterrupt(uint32_t intNum)
{
    CSL_intcInterruptClear((CSL_IntcVectId)intNum);
    return;
}
/* Below function globally disable interrupt in the chip level */
uintptr_t OsalArch_globalDisableInterrupt(void)
{
  return (uintptr_t)(_disable_interrupts());
}

/* Below function globally restore interrupt in the chip level */
void OsalArch_globalRestoreInterrupt (uintptr_t restoreValue)
{
    (void)_restore_interrupts(restoreValue);
}

/* Below function registers the interrupt for a given ISR */
HwiP_Handle OsalArch_HwiPCreate(int32_t interruptNum, HwiP_Fxn hwiFxn,
                          const HwiP_Params *params)
{
    Hwi_Struct                   *hwi_handle = (Hwi_Struct *) NULL_PTR;
    CSL_IntcParam                 vectId;

    uint32_t i;
    uintptr_t key;

    uintptr_t         temp;
    HwiP_nonOs       *hwiPool;
    uint32_t          maxHwi;
    HwiP_Handle       retHandle;

    /* Check if user has specified any memory block to be used, which gets
     * the precedence over the internal static memory block
     */
    if (gOsal_HwAttrs.extHwiPBlock.base != 0U)
    {
        /* pick up the external memory block configured */
        hwiPool        = (HwiP_nonOs *) gOsal_HwAttrs.extHwiPBlock.base;
        temp           = ((uintptr_t) hwiPool) + gOsal_HwAttrs.extHwiPBlock.size;
        maxHwi         = (uint32_t)(temp/(sizeof(Hwi_Struct)));
    }
    else
    {
        /* Pick up the internal static memory block */
        hwiPool        = (HwiP_nonOs *) &hwiStructs[0];
        maxHwi         = OSAL_NONOS_CONFIGNUM_HWI;
        
        if(gHwiInitialized==(bool)false) 
        {
          /* Initializing the first time */
          (void)memset((void *)hwiStructs,0,sizeof(hwiStructs));
          gHwiInitialized = (bool)true; 
        }
    }

    if (params == NULL_PTR)
    {
        retHandle = NULL_PTR;
    }
    else
    {
    
      key = OsalArch_globalDisableInterrupt();
      for (i = 0u; i < maxHwi; i++) 
      {
        if (hwiPool[i].used == (bool)false) {
            hwiPool[i].used = (bool)true;
            break;
        }
      }
      OsalArch_globalRestoreInterrupt(key);

      if (i != maxHwi)
      {
        hwi_handle = &(hwiPool[i].hwi);
        retHandle  = (HwiP_Handle)&hwiPool[i];
      }
      else
      {
       retHandle  = NULL_PTR;
      }
   }
    if (hwi_handle != NULL_PTR)
    {
         if (gFirstTime == (bool)false) {
           /* record the index in the handle */
           gContext.numEvtEntries      = (Uint16)OSAL_NONOS_CONFIGNUM_HWI;
           gContext.eventhandlerRecord = gEventRecord;
           (void)CSL_intcInit(&gContext);
           gFirstTime = (bool)true;
         }
     
         (void)CSL_intcGlobalNmiEnable();
         (void)CSL_intcGlobalEnable((CSL_IntcGlobalEnableState *)NULL_PTR);
     
         vectId = (CSL_IntcParam)interruptNum;
         hwi_handle->handle = CSL_intcOpen (&hwi_handle->intcObj, (CSL_IntcEventId)params->evtId, &vectId, (CSL_Status *) NULL_PTR);
     
         if(hwi_handle->handle != NULL_PTR)
         {
             CSL_IntcEventHandlerRecord  evtHandler;
             evtHandler.handler = (CSL_IntcEventHandler)hwiFxn;
             evtHandler.arg     = (void *) params->arg;
     
             (void)CSL_intcPlugEventHandler(hwi_handle->handle, &evtHandler);
             (void)CSL_intcHwControl(hwi_handle->handle,CSL_INTC_CMD_EVTCLEAR,NULL_PTR);
             (void)CSL_intcHwControl(hwi_handle->handle,CSL_INTC_CMD_EVTENABLE,NULL_PTR);

             /* Enabling the interrupt if configured */
             if (params->enableIntr == 1U)
             {
                 /* Enabling the interrupt in INTC. */
                 OsalArch_enableInterrupt((uint32_t)interruptNum);
             }
             else
             {
                 /* Disabling the interrupt in INTC. */
                 OsalArch_disableInterrupt((uint32_t)interruptNum);
             }
         }
         else
         {
             /* Free the pool */
             hwiPool[i].used = (bool)false;
             retHandle = NULL_PTR;
         }
    }

    return ( (HwiP_Handle) (retHandle) );  /* _TMS320C6X */
}

HwiP_Status OsalArch_HwiPDelete(HwiP_Handle handle)
{
    CSL_Status  status = CSL_SOK;
    HwiP_nonOs *hwi_hnd = (HwiP_nonOs*) handle;
    uintptr_t   key;
    HwiP_Status ret_val;

    /* mark that handle as free */
    key = OsalArch_globalDisableInterrupt();
    hwi_hnd->used = (bool)false;
    OsalArch_globalRestoreInterrupt(key);    
    status = CSL_intcClose(hwi_hnd->hwi.handle);
    
    if (status == CSL_SOK)
    {
      ret_val = (HwiP_OK);
    }
    else 
    {
      ret_val = (HwiP_FAILURE);
    }
    return (ret_val);
}

/*
 *  ======== HwiP_getHandle ========
 *  Returns the HwiP handle associated with an interrupt number 
  */
HwiP_Handle OsalArch_getHandle(int32_t interruptNum)
{
   uint32_t i;
   Hwi_Struct *handle= (Hwi_Struct *) NULL_PTR, *handle_temp;
   uintptr_t         temp;
   HwiP_nonOs       *hwiPool;
   uint32_t          maxHwi = 0;

   if (gOsal_HwAttrs.extHwiPBlock.base != 0U)
   {
       /* pick up the external memory block configured */
       hwiPool        = (HwiP_nonOs *) gOsal_HwAttrs.extHwiPBlock.base;
       temp           = ((uintptr_t) hwiPool) + gOsal_HwAttrs.extHwiPBlock.size;
       maxHwi         = (uint32_t)(temp/(sizeof(Hwi_Struct)));
   }
   else
   {
       /* Pick up the internal static memory block */
       hwiPool        = (HwiP_nonOs *) &hwiStructs[0];
       maxHwi         = OSAL_NONOS_CONFIGNUM_HWI;
   }

   /* Fetch it if it is already allocated, else return NULL_PTR */
     /* Go through the list and find out if there is an HWI whose interrupt number matches */

     /* First go through the external memory pool */
     for (i = 0; i < maxHwi; i++)
     {
         if(hwiPool[i].used == (bool)true) {
             handle_temp=&hwiPool[i].hwi;
             if(handle_temp->intcObj.vectId==(CSL_IntcVectId)interruptNum) {
                handle=handle_temp;
                break;
             }
         }
     }

     /* Now check the internal static pool, if not found already */
     if (handle != NULL_PTR)
     {
         for(i=0;i<OSAL_NONOS_CONFIGNUM_HWI;i++) {
              if(hwiStructs[i].used == (bool)true) {
                  handle_temp=&hwiStructs[i].hwi;
                  if(handle_temp->intcObj.vectId==(CSL_IntcVectId)interruptNum) {
                     handle=handle_temp;
                     break;
                  }
              }
         }
     }
    return((HwiP_Handle)handle);
}
/*
 *  ======== HwiP_getEventId ========
 *  Returns the Event ID associated with an interrupt
  */
int32_t OsalArch_getEventId(int32_t interruptNum)
{
   Hwi_Struct *handle;
   int32_t retVal=-1;
   /* Find the handle registered to this interrupt number */
   handle=(Hwi_Struct *)OsalArch_getHandle(interruptNum);
   if(handle!=NULL_PTR) {
      retVal = handle->intcObj.eventId;
   } 
   
   return(retVal);
}

/* Return the cycle frequency used for timeStamp */
int32_t  osalArch_TimeStampGetFreqKHz(void)
{
    /* TSCH/TSCL runs at CPU speed*/
    return (gOsal_HwAttrs.cpuFreqKHz);
}

/* Initialize the time stamp module */
void    osalArch_TimestampInit(void)
{
    if (gTimestampFirstTime == (bool)true)
    {
        /* Initialize TSCL to 0, for count */
        CSL_tscEnable();
        gTimestampFirstTime = (bool)false;
    }

    return;
}

/* Osal time stamp provider implementations */
void osalArch_TimestampGet64(TimeStamp_Struct *tStamp)
{
    uintptr_t  key;
    uint64_t   cycle, cycleHi;
    uint32_t   lo, hi;

    osalArch_TimestampInit();

    key        = HwiP_disable();
    cycle   = CSL_tscRead();
    cycleHi = ((uint64_t)(cycle >> 32U));

    /* get the lo and hi parts */
    lo    = ((uint32_t)(cycle   & ((uint32_t)(0xFFFFFFFFU))));
    hi    = ((uint32_t)(cycleHi & ((uint32_t)(0xFFFFFFFFU))));

    tStamp->lo         = lo;
    tStamp->hi         = hi;

    /* restore */
    HwiP_restore(key);
}


/* Nothing past this point */