| 1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825 |
- /*
- *********************************************************************************************************
- * uC/LIB
- * CUSTOM LIBRARY MODULES
- *
- * (c) Copyright 2004-2011; Micrium, Inc.; Weston, FL
- *
- * All rights reserved. Protected by international copyright laws.
- *
- * uC/LIB is provided in source form to registered licensees ONLY. It is
- * illegal to distribute this source code to any third party unless you receive
- * written permission by an authorized Micrium representative. Knowledge of
- * the source code may NOT be used to develop a similar product.
- *
- * Please help us continue to provide the Embedded community with the finest
- * software available. Your honesty is greatly appreciated.
- *
- * You can contact us at www.micrium.com.
- *********************************************************************************************************
- */
- /*
- *********************************************************************************************************
- *
- * STANDARD MEMORY OPERATIONS
- *
- * Filename : lib_mem.c
- * Version : V1.35.00
- * Programmer(s) : ITJ
- * FGK
- *********************************************************************************************************
- * Note(s) : (1) NO compiler-supplied standard library functions are used in library or product software.
- *
- * (a) ALL standard library functions are implemented in the custom library modules :
- *
- * (1) \<Custom Library Directory>\lib_*.*
- *
- * (2) \<Custom Library Directory>\Ports\<cpu>\<compiler>\lib*_a.*
- *
- * where
- * <Custom Library Directory> directory path for custom library software
- * <cpu> directory name for specific processor (CPU)
- * <compiler> directory name for specific compiler
- *
- * (b) Product-specific library functions are implemented in individual products.
- *********************************************************************************************************
- */
- /*
- *********************************************************************************************************
- * INCLUDE FILES
- *********************************************************************************************************
- */
- #define LIB_MEM_MODULE
- #include <lib_mem.h>
- /*$PAGE*/
- /*
- *********************************************************************************************************
- * LOCAL DEFINES
- *********************************************************************************************************
- */
- /*
- *********************************************************************************************************
- * LOCAL CONSTANTS
- *********************************************************************************************************
- */
- /*
- *********************************************************************************************************
- * LOCAL DATA TYPES
- *********************************************************************************************************
- */
- /*
- *********************************************************************************************************
- * LOCAL TABLES
- *********************************************************************************************************
- */
- /*
- *********************************************************************************************************
- * LOCAL GLOBAL VARIABLES
- *********************************************************************************************************
- */
- #if (LIB_MEM_CFG_ALLOC_EN == DEF_ENABLED)
- MEM_POOL *Mem_PoolTbl; /* Mem pool/seg tbl. */
- MEM_POOL Mem_PoolHeap; /* Mem heap pool/seg. */
- #ifndef LIB_MEM_CFG_HEAP_BASE_ADDR
- CPU_INT08U Mem_Heap[LIB_MEM_CFG_HEAP_SIZE]; /* Mem heap. */
- #endif
- #endif
- /*
- *********************************************************************************************************
- * LOCAL FUNCTION PROTOTYPES
- *********************************************************************************************************
- */
- #if (LIB_MEM_CFG_ALLOC_EN == DEF_ENABLED) /* -------------- MEM POOL FNCTS -------------- */
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED)
- static CPU_BOOLEAN Mem_PoolBlkIsValidAddr(MEM_POOL *pmem_pool,
- void *pmem_blk);
- #endif
- static CPU_SIZE_T Mem_PoolSegCalcTotSize(void *pmem_addr,
- CPU_SIZE_T blk_nbr,
- CPU_SIZE_T blk_size,
- CPU_SIZE_T blk_align);
- static void *Mem_PoolSegAlloc (MEM_POOL *pmem_pool,
- CPU_SIZE_T size,
- CPU_SIZE_T align);
- #endif
- /*
- *********************************************************************************************************
- * LOCAL CONFIGURATION ERRORS
- *********************************************************************************************************
- */
- /*$PAGE*/
- /*
- *********************************************************************************************************
- * Mem_Init()
- *
- * Description : (1) Initialize Memory Management Module :
- *
- * (a) Initialize heap memory pool
- * (b) Initialize memory pool table
- *
- *
- * Argument(s) : none.
- *
- * Return(s) : none.
- *
- * Caller(s) : Application.
- *
- * Note(s) : none.
- *********************************************************************************************************
- */
- void Mem_Init (void)
- {
- #if (LIB_MEM_CFG_ALLOC_EN == DEF_ENABLED)
- MEM_POOL *pmem_pool;
- /* --------- INIT MEM HEAP SEG / POOL --------- */
- pmem_pool = (MEM_POOL *)&Mem_PoolHeap;
- pmem_pool->Type = (LIB_MEM_TYPE) LIB_MEM_TYPE_HEAP;
- pmem_pool->SegPrevPtr = (MEM_POOL *) 0;
- pmem_pool->SegNextPtr = (MEM_POOL *) 0;
- pmem_pool->PoolPrevPtr = (MEM_POOL *) 0;
- pmem_pool->PoolNextPtr = (MEM_POOL *) 0;
- pmem_pool->PoolAddrStart = (void *) 0;
- pmem_pool->PoolAddrEnd = (void *) 0;
- pmem_pool->PoolPtrs = (void **) 0;
- pmem_pool->BlkSize = (CPU_SIZE_T ) 0u;
- pmem_pool->BlkNbr = (CPU_SIZE_T ) 0u;
- pmem_pool->BlkIx = (MEM_POOL_IX ) 0u;
- #ifdef LIB_MEM_CFG_HEAP_BASE_ADDR
- pmem_pool->SegAddr = (void *) LIB_MEM_CFG_HEAP_BASE_ADDR;
- pmem_pool->SegAddrNextAvail = (void *) LIB_MEM_CFG_HEAP_BASE_ADDR;
- #else
- pmem_pool->SegAddr = (void *)&Mem_Heap[0];
- pmem_pool->SegAddrNextAvail = (void *)&Mem_Heap[0];
- #endif
- pmem_pool->SegSizeTot = (CPU_SIZE_T ) LIB_MEM_CFG_HEAP_SIZE;
- pmem_pool->SegSizeRem = (CPU_SIZE_T ) LIB_MEM_CFG_HEAP_SIZE;
- /* ------------ INIT MEM POOL TBL ------------- */
- Mem_PoolTbl = &Mem_PoolHeap;
- #endif
- }
- /*$PAGE*/
- /*
- *********************************************************************************************************
- * Mem_Clr()
- *
- * Description : Clear data buffer (see Note #2).
- *
- * Argument(s) : pmem Pointer to memory buffer to clear.
- *
- * size Number of data buffer octets to clear (see Note #1).
- *
- * Return(s) : none.
- *
- * Caller(s) : Application.
- *
- * Note(s) : (1) Null clears allowed (i.e. zero-length clears).
- *
- * See also 'Mem_Set() Note #1'.
- *
- * (2) Clear data by setting each data octet to 0.
- *********************************************************************************************************
- */
- void Mem_Clr (void *pmem,
- CPU_SIZE_T size)
- {
- Mem_Set(pmem,
- 0u, /* See Note #2. */
- size);
- }
- /*$PAGE*/
- /*
- *********************************************************************************************************
- * Mem_Set()
- *
- * Description : Fill data buffer with specified data octet.
- *
- * Argument(s) : pmem Pointer to memory buffer to fill with specified data octet.
- *
- * data_val Data fill octet value.
- *
- * size Number of data buffer octets to fill (see Note #1).
- *
- * Return(s) : none.
- *
- * Caller(s) : Application.
- *
- * Note(s) : (1) Null sets allowed (i.e. zero-length sets).
- *
- * (2) For best CPU performance, optimized to fill data buffer using 'CPU_ALIGN'-sized data
- * words.
- *
- * (a) Since many word-aligned processors REQUIRE that multi-octet words be accessed on
- * word-aligned addresses, 'CPU_ALIGN'-sized words MUST be accessed on 'CPU_ALIGN'd
- * addresses.
- *
- * (3) Modulo arithmetic is used to determine whether a memory buffer starts on a 'CPU_ALIGN'
- * address boundary.
- *
- * Modulo arithmetic in ANSI-C REQUIREs operations performed on integer values. Thus,
- * address values MUST be cast to an appropriately-sized integer value PRIOR to any
- * 'mem_align_mod' arithmetic operation.
- *********************************************************************************************************
- */
- void Mem_Set (void *pmem,
- CPU_INT08U data_val,
- CPU_SIZE_T size)
- {
- CPU_SIZE_T size_rem;
- CPU_ALIGN data_align;
- CPU_ALIGN *pmem_align;
- CPU_INT08U *pmem_08;
- CPU_DATA mem_align_mod;
- CPU_DATA i;
- if (size < 1) { /* See Note #1. */
- return;
- }
- if (pmem == (void *)0) {
- return;
- }
- data_align = 0u;
- for (i = 0u; i < sizeof(CPU_ALIGN); i++) { /* Fill each data_align octet with data val. */
- data_align <<= DEF_OCTET_NBR_BITS;
- data_align |= (CPU_ALIGN)data_val;
- }
- size_rem = size;
- mem_align_mod = (CPU_INT08U)((CPU_ADDR)pmem % sizeof(CPU_ALIGN)); /* See Note #3. */
- pmem_08 = (CPU_INT08U *)pmem;
- if (mem_align_mod != 0u) { /* If leading octets avail, ... */
- i = mem_align_mod;
- while ((size_rem > 0) && /* ... start mem buf fill with leading octets ... */
- (i < sizeof(CPU_ALIGN ))) { /* ... until next CPU_ALIGN word boundary. */
- *pmem_08++ = data_val;
- size_rem -= sizeof(CPU_INT08U);
- i++;
- }
- }
- pmem_align = (CPU_ALIGN *)pmem_08; /* See Note #2a. */
- while (size_rem >= sizeof(CPU_ALIGN)) { /* While mem buf aligned on CPU_ALIGN word boundaries, */
- *pmem_align++ = data_align; /* ... fill mem buf with CPU_ALIGN-sized data. */
- size_rem -= sizeof(CPU_ALIGN);
- }
- pmem_08 = (CPU_INT08U *)pmem_align;
- while (size_rem > 0) { /* Finish mem buf fill with trailing octets. */
- *pmem_08++ = data_val;
- size_rem -= sizeof(CPU_INT08U);
- }
- }
- /*$PAGE*/
- /*
- *********************************************************************************************************
- * Mem_Copy()
- *
- * Description : Copy data octets from one memory buffer to another memory buffer.
- *
- * Argument(s) : pdest Pointer to destination memory buffer.
- *
- * psrc Pointer to source memory buffer.
- *
- * size Number of data buffer octets to copy (see Note #1).
- *
- * Return(s) : none.
- *
- * Caller(s) : Application.
- *
- * Note(s) : (1) Null copies allowed (i.e. zero-length copies).
- *
- * (2) Memory buffers NOT checked for overlapping.
- *
- * (a) IEEE Std 1003.1, 2004 Edition, Section 'memcpy() : DESCRIPTION' states that "if
- * copying takes place between objects that overlap, the behavior is undefined".
- *
- * (b) However, data octets from a source memory buffer at a higher address value SHOULD
- * successfully copy to a destination memory buffer at a lower address value even
- * if any octets of the memory buffers overlap as long as no individual, atomic CPU
- * word copy overlaps.
- *
- * Since Mem_Copy() performs the data octet copy via 'CPU_ALIGN'-sized words &/or
- * octets; & since 'CPU_ALIGN'-sized words MUST be accessed on word-aligned addresses
- * (see Note #3b), neither 'CPU_ALIGN'-sized words nor octets at unique addresses can
- * ever overlap.
- *
- * Therefore, Mem_Copy() SHOULD be able to successfully copy overlapping memory
- * buffers as long as the source memory buffer is at a higher address value than the
- * destination memory buffer.
- *
- * (3) For best CPU performance, optimized to copy data buffer using 'CPU_ALIGN'-sized data
- * words.
- *
- * (a) Since many word-aligned processors REQUIRE that multi-octet words be accessed on
- * word-aligned addresses, 'CPU_ALIGN'-sized words MUST be accessed on 'CPU_ALIGN'd
- * addresses.
- *
- * (4) Modulo arithmetic is used to determine whether a memory buffer starts on a 'CPU_ALIGN'
- * address boundary.
- *
- * Modulo arithmetic in ANSI-C REQUIREs operations performed on integer values. Thus,
- * address values MUST be cast to an appropriately-sized integer value PRIOR to any
- * 'mem_align_mod' arithmetic operation.
- *********************************************************************************************************
- */
- /*$PAGE*/
- #if (LIB_MEM_CFG_OPTIMIZE_ASM_EN != DEF_ENABLED)
- void Mem_Copy ( void *pdest,
- const void *psrc,
- CPU_SIZE_T size)
- {
- CPU_SIZE_T size_rem;
- CPU_ALIGN *pmem_align_dest;
- const CPU_ALIGN *pmem_align_src;
- CPU_INT08U *pmem_08_dest;
- const CPU_INT08U *pmem_08_src;
- CPU_DATA i;
- CPU_DATA mem_align_mod_dest;
- CPU_DATA mem_align_mod_src;
- CPU_BOOLEAN mem_aligned;
- if (size < 1) { /* See Note #1. */
- return;
- }
- if (pdest == (void *)0) {
- return;
- }
- if (psrc == (void *)0) {
- return;
- }
- size_rem = size;
- pmem_08_dest = ( CPU_INT08U *)pdest;
- pmem_08_src = (const CPU_INT08U *)psrc;
- /* See Note #4. */
- mem_align_mod_dest = (CPU_INT08U)((CPU_ADDR)pmem_08_dest % sizeof(CPU_ALIGN));
- mem_align_mod_src = (CPU_INT08U)((CPU_ADDR)pmem_08_src % sizeof(CPU_ALIGN));
- mem_aligned = (mem_align_mod_dest == mem_align_mod_src) ? DEF_YES : DEF_NO;
- if (mem_aligned == DEF_YES) { /* If mem bufs' alignment offset equal, ... */
- /* ... optimize copy for mem buf alignment. */
- if (mem_align_mod_dest != 0u) { /* If leading octets avail, ... */
- i = mem_align_mod_dest;
- while ((size_rem > 0) && /* ... start mem buf copy with leading octets ... */
- (i < sizeof(CPU_ALIGN ))) { /* ... until next CPU_ALIGN word boundary. */
- *pmem_08_dest++ = *pmem_08_src++;
- size_rem -= sizeof(CPU_INT08U);
- i++;
- }
- }
- pmem_align_dest = ( CPU_ALIGN *)pmem_08_dest; /* See Note #3a. */
- pmem_align_src = (const CPU_ALIGN *)pmem_08_src;
- while (size_rem >= sizeof(CPU_ALIGN)) { /* While mem bufs aligned on CPU_ALIGN word boundaries, */
- *pmem_align_dest++ = *pmem_align_src++; /* ... copy psrc to pdest with CPU_ALIGN-sized words. */
- size_rem -= sizeof(CPU_ALIGN);
- }
- pmem_08_dest = ( CPU_INT08U *)pmem_align_dest;
- pmem_08_src = (const CPU_INT08U *)pmem_align_src;
- }
- while (size_rem > 0) { /* For unaligned mem bufs or trailing octets, ... */
- *pmem_08_dest++ = *pmem_08_src++; /* ... copy psrc to pdest by octets. */
- size_rem -= sizeof(CPU_INT08U);
- }
- }
- #endif
- /*$PAGE*/
- /*
- *********************************************************************************************************
- * Mem_Cmp()
- *
- * Description : Verify that ALL data octets in two memory buffers are identical in sequence.
- *
- * Argument(s) : p1_mem Pointer to first memory buffer.
- *
- * p2_mem Pointer to second memory buffer.
- *
- * size Number of data buffer octets to compare (see Note #1).
- *
- * Return(s) : DEF_YES, if 'size' number of data octets are identical in both memory buffers.
- *
- * DEF_NO, otherwise.
- *
- * Caller(s) : Application.
- *
- * Note(s) : (1) Null compares allowed (i.e. zero-length compares); 'DEF_YES' returned to indicate
- * identical null compare.
- *
- * (2) Many memory buffer comparisons vary ONLY in the least significant octets -- e.g.
- * network address buffers. Consequently, memory buffer comparison is more efficient
- * if the comparison starts from the end of the memory buffers which will abort sooner
- * on dissimilar memory buffers that vary only in the least significant octets.
- *
- * (3) For best CPU performance, optimized to compare data buffers using 'CPU_ALIGN'-sized
- * data words.
- *
- * (a) Since many word-aligned processors REQUIRE that multi-octet words be accessed on
- * word-aligned addresses, 'CPU_ALIGN'-sized words MUST be accessed on 'CPU_ALIGN'd
- * addresses.
- *
- * (4) Modulo arithmetic is used to determine whether a memory buffer starts on a 'CPU_ALIGN'
- * address boundary.
- *
- * Modulo arithmetic in ANSI-C REQUIREs operations performed on integer values. Thus,
- * address values MUST be cast to an appropriately-sized integer value PRIOR to any
- * 'mem_align_mod' arithmetic operation.
- ********************************************************************************************************
- */
- /*$PAGE*/
- CPU_BOOLEAN Mem_Cmp (const void *p1_mem,
- const void *p2_mem,
- CPU_SIZE_T size)
- {
- CPU_SIZE_T size_rem;
- CPU_ALIGN *p1_mem_align;
- CPU_ALIGN *p2_mem_align;
- const CPU_INT08U *p1_mem_08;
- const CPU_INT08U *p2_mem_08;
- CPU_DATA i;
- CPU_DATA mem_align_mod_1;
- CPU_DATA mem_align_mod_2;
- CPU_BOOLEAN mem_aligned;
- CPU_BOOLEAN mem_cmp;
- if (size < 1) { /* See Note #1. */
- return (DEF_YES);
- }
- if (p1_mem == (void *)0) {
- return (DEF_NO);
- }
- if (p2_mem == (void *)0) {
- return (DEF_NO);
- }
- mem_cmp = DEF_YES; /* Assume mem bufs are identical until cmp fails. */
- size_rem = size;
- /* Start @ end of mem bufs (see Note #2). */
- p1_mem_08 = (const CPU_INT08U *)p1_mem + size;
- p2_mem_08 = (const CPU_INT08U *)p2_mem + size;
- /* See Note #4. */
- mem_align_mod_1 = (CPU_INT08U)((CPU_ADDR)p1_mem_08 % sizeof(CPU_ALIGN));
- mem_align_mod_2 = (CPU_INT08U)((CPU_ADDR)p2_mem_08 % sizeof(CPU_ALIGN));
- mem_aligned = (mem_align_mod_1 == mem_align_mod_2) ? DEF_YES : DEF_NO;
- if (mem_aligned == DEF_YES) { /* If mem bufs' alignment offset equal, ... */
- /* ... optimize cmp for mem buf alignment. */
- if (mem_align_mod_1 != 0u) { /* If trailing octets avail, ... */
- i = mem_align_mod_1;
- while ((mem_cmp == DEF_YES) && /* ... cmp mem bufs while identical & ... */
- (size_rem > 0) && /* ... start mem buf cmp with trailing octets ... */
- (i > 0)) { /* ... until next CPU_ALIGN word boundary. */
- p1_mem_08--;
- p2_mem_08--;
- if (*p1_mem_08 != *p2_mem_08) { /* If ANY data octet(s) NOT identical, cmp fails. */
- mem_cmp = DEF_NO;
- }
- size_rem -= sizeof(CPU_INT08U);
- i--;
- }
- }
- if (mem_cmp == DEF_YES) { /* If cmp still identical, cmp aligned mem bufs. */
- p1_mem_align = (CPU_ALIGN *)p1_mem_08; /* See Note #3a. */
- p2_mem_align = (CPU_ALIGN *)p2_mem_08;
- while ((mem_cmp == DEF_YES) && /* Cmp mem bufs while identical & ... */
- (size_rem >= sizeof(CPU_ALIGN))) { /* ... mem bufs aligned on CPU_ALIGN word boundaries. */
- p1_mem_align--;
- p2_mem_align--;
- if (*p1_mem_align != *p2_mem_align) { /* If ANY data octet(s) NOT identical, cmp fails. */
- mem_cmp = DEF_NO;
- }
- size_rem -= sizeof(CPU_ALIGN);
- }
- p1_mem_08 = (CPU_INT08U *)p1_mem_align;
- p2_mem_08 = (CPU_INT08U *)p2_mem_align;
- }
- }
- while ((mem_cmp == DEF_YES) && /* Cmp mem bufs while identical ... */
- (size_rem > 0)) { /* ... for unaligned mem bufs or trailing octets. */
- p1_mem_08--;
- p2_mem_08--;
- if (*p1_mem_08 != *p2_mem_08) { /* If ANY data octet(s) NOT identical, cmp fails. */
- mem_cmp = DEF_NO;
- }
- size_rem -= sizeof(CPU_INT08U);
- }
- return (mem_cmp);
- }
- /*$PAGE*/
- /*
- *********************************************************************************************************
- * Mem_HeapAlloc()
- *
- * Description : Allocate a memory block from the heap memory pool.
- *
- * Argument(s) : size Size of memory block to allocate (in octets).
- *
- * align Alignment of memory block to specific word boundary (in octets).
- *
- * poctets_reqd Optional pointer to a variable to ... :
- *
- * (a) Return the number of octets required to successfully
- * allocate the memory block, if any error(s);
- * (b) Return 0, otherwise.
- *
- * perr Pointer to variable that will receive the return error code from this function :
- *
- * LIB_MEM_ERR_NONE Memory block successfully returned.
- * LIB_MEM_ERR_INVALID_MEM_SIZE Invalid memory size.
- * LIB_MEM_ERR_INVALID_MEM_ALIGN Invalid memory alignment.
- * LIB_MEM_ERR_HEAP_EMPTY Heap segment empty; NOT enough available
- * memory from heap.
- * LIB_MEM_ERR_HEAP_OVF Requested memory overflows heap memory.
- *
- * Return(s) : Pointer to memory block, if NO error(s).
- *
- * Pointer to NULL, otherwise.
- *
- * Caller(s) : Application.
- *
- * Note(s) : (1) Pointers to variables that return values MUST be initialized PRIOR to all other
- * validation or function handling in case of any error(s).
- *
- * (2) 'pmem_pool' variables MUST ALWAYS be accessed exclusively in critical sections.
- *********************************************************************************************************
- */
- /*$PAGE*/
- #if (LIB_MEM_CFG_ALLOC_EN == DEF_ENABLED)
- void *Mem_HeapAlloc (CPU_SIZE_T size,
- CPU_SIZE_T align,
- CPU_SIZE_T *poctets_reqd,
- LIB_ERR *perr)
- {
- MEM_POOL *pmem_pool_heap;
- void *pmem_addr;
- void *pmem_blk;
- CPU_SIZE_T octets_reqd_unused;
- CPU_SIZE_T size_rem;
- CPU_SIZE_T size_req;
- CPU_SR_ALLOC();
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED) /* ------------- VALIDATE RTN ERR PTR ------------- */
- if (perr == (LIB_ERR *)0) {
- CPU_SW_EXCEPTION((void *)0);
- }
- #endif
- /* ------------ VALIDATE RTN OCTETS PTR ----------- */
- if (poctets_reqd == (CPU_SIZE_T *) 0) { /* If NOT avail, ... */
- poctets_reqd = (CPU_SIZE_T *)&octets_reqd_unused; /* ... re-cfg NULL rtn ptr to unused local var. */
- (void)&octets_reqd_unused; /* Prevent possible 'variable unused' warning. */
- }
- *poctets_reqd = 0u; /* Init octets req'd for err (see Note #1). */
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED) /* ------------ VALIDATE HEAP MEM ALLOC ----------- */
- if (size < 1) {
- *perr = LIB_MEM_ERR_INVALID_MEM_SIZE;
- return ((void *)0);
- }
- if (align < 1) {
- *perr = LIB_MEM_ERR_INVALID_MEM_ALIGN;
- return ((void *)0);
- }
- #endif
- /* -------------- ALLOC HEAP MEM BLK -------------- */
- pmem_pool_heap = &Mem_PoolHeap;
- CPU_CRITICAL_ENTER();
- pmem_addr = pmem_pool_heap->SegAddrNextAvail;
- size_rem = pmem_pool_heap->SegSizeRem;
- size_req = Mem_PoolSegCalcTotSize(pmem_addr,
- 1u, /* Calc alloc for single mem blk from heap. */
- size,
- align);
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED)
- if (size_req < 1) { /* If req'd size ovf, ... */
- CPU_CRITICAL_EXIT();
- *poctets_reqd = size; /* ... rtn add'l heap size needed. */
- *perr = LIB_MEM_ERR_HEAP_OVF;
- return ((void *)0);
- }
- #endif
- if (size_req > size_rem) { /* If req'd size > rem heap size, ... */
- CPU_CRITICAL_EXIT();
- *poctets_reqd = size_req - size_rem; /* ... rtn add'l heap size needed. */
- *perr = LIB_MEM_ERR_HEAP_EMPTY;
- return ((void *)0);
- }
- pmem_blk = Mem_PoolSegAlloc(pmem_pool_heap, size, align);
- if (pmem_blk == (void *)0) { /* If mem blk NOT avail from heap, ... */
- CPU_CRITICAL_EXIT();
- *poctets_reqd = size_req; /* ... rtn add'l heap size needed. */
- *perr = LIB_MEM_ERR_HEAP_EMPTY;
- return ((void *)0);
- }
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_NONE;
- return (pmem_blk);
- }
- #endif
- /*$PAGE*/
- /*
- *********************************************************************************************************
- * Mem_PoolClr()
- *
- * Description : Clear a memory pool (see Note #1).
- *
- * Argument(s) : pmem_pool Pointer to a memory pool structure to clear (see Note #2).
- *
- * perr Pointer to variable that will receive the return error code from this function :
- *
- * LIB_MEM_ERR_NONE Memory pool successfully cleared.
- * LIB_MEM_ERR_NULL_PTR Argument 'pmem_pool' passed a NULL pointer.
- *
- * Return(s) : none.
- *
- * Caller(s) : Application,
- * Mem_PoolCreate().
- *
- * Note(s) : (1) (a) Mem_PoolClr() ONLY clears a memory pool structure's variables & should ONLY be
- * called to initialize a memory pool structure prior to calling Mem_PoolCreate().
- *
- * (b) Mem_PoolClr() does NOT deallocate memory from the memory pool or deallocate the
- * memory pool itself & MUST NOT be called after calling Mem_PoolCreate() since
- * this will likely corrupt the memory pool management.
- *
- * (2) Assumes 'pmem_pool' points to a valid memory pool (if non-NULL).
- *********************************************************************************************************
- */
- #if (LIB_MEM_CFG_ALLOC_EN == DEF_ENABLED)
- void Mem_PoolClr (MEM_POOL *pmem_pool,
- LIB_ERR *perr)
- {
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED) /* -------------- VALIDATE RTN ERR PTR --------------- */
- if (perr == (LIB_ERR *)0) {
- CPU_SW_EXCEPTION(;);
- }
- #endif
- /* -------------- VALIDATE MEM POOL PTR --------------- */
- if (pmem_pool == (MEM_POOL *)0) {
- *perr = LIB_MEM_ERR_NULL_PTR;
- return;
- }
- pmem_pool->Type = (LIB_MEM_TYPE)LIB_MEM_TYPE_NONE;
- pmem_pool->SegPrevPtr = (MEM_POOL *)0;
- pmem_pool->SegNextPtr = (MEM_POOL *)0;
- pmem_pool->PoolPrevPtr = (MEM_POOL *)0;
- pmem_pool->PoolNextPtr = (MEM_POOL *)0;
- pmem_pool->PoolAddrStart = (void *)0;
- pmem_pool->PoolAddrEnd = (void *)0;
- pmem_pool->PoolPtrs = (void **)0;
- pmem_pool->PoolSize = (CPU_SIZE_T )0u;
- pmem_pool->BlkAlign = (CPU_SIZE_T )0u;
- pmem_pool->BlkSize = (CPU_SIZE_T )0u;
- pmem_pool->BlkNbr = (CPU_SIZE_T )0u;
- pmem_pool->BlkIx = (MEM_POOL_IX )0u;
- pmem_pool->SegAddr = (void *)0;
- pmem_pool->SegAddrNextAvail = (void *)0;
- pmem_pool->SegSizeTot = (CPU_SIZE_T )0u;
- pmem_pool->SegSizeRem = (CPU_SIZE_T )0u;
- *perr = LIB_MEM_ERR_NONE;
- }
- #endif
- /*$PAGE*/
- /*
- *********************************************************************************************************
- * Mem_PoolCreate()
- *
- * Description : (1) Create a memory pool :
- *
- * (a) Create memory pool from heap or dedicated memory
- * (b) Allocate memory pool memory blocks
- * (c) Update memory pool table
- * (d) Configure memory pool
- *
- *
- * (2) Memory pools are indexed by the Memory Segments they use.
- *
- * (a) The memory pool table is composed by a two-dimensional list :
- *
- * (1) Memory segments manage the following memory segment/pool information :
- *
- * (A) Memory segment base address
- * (B) Memory segment next available address
- * (C) Memory segment total size
- * (D) Memory segment remaining size
- *
- * (2) Memory pools share memory from memory segments but do NOT manage any memory
- * segment information. To access the memory segment information, the head
- * memory segment must be accessed.
- *
- * (b) In the diagram below, memory pools in vertical columns represent they share the same
- * memory segment for the memory blocks they have. The heads of the memory pool are
- * linked horizontally to form a memory pool table.
- *
- * (1) 'Mem_PoolTbl' points to the head of the Memory Pool table.
- *
- * (2) Memory Pools' 'SegPrevPtr' & 'SegNextPtr' doubly-link each memory segment to
- * form the list of memory segments.
- *
- * (3) Memory Pools' 'PoolPrevPtr' & 'PoolNextPtr' doubly-link the memory pools of
- * each memory segment.
- *
- * (c) New memory pools, which do not share a memory segment, are inserted in the Memory
- * Segments Primary List. The point of insertion is such to keep ascended order by
- * memory segment base address.
- *
- * (d) Memory pool pointers to memory blocks 'PoolPtrs' must be allocated for each created
- * memory pool. These pointers are stored in the memory pool heap segment 'Mem_PoolHeap'.
- *
- * (1) A memory pool can also have its memory blocks allocated from the memory pool heap.
- * 'pmem_base_addr' must be set to NULL & 'mem_size' must be set to (0) to create the
- * memory pool.
- *
- *
- * | |
- * |<----------------------- Memory Segments ----------------------->|
- * | (see Note #2a1) |
- *
- * Lowest Memory Segment Highest Memory Segment
- * Base Address Base Address
- * (see Note #2c) (see Note #2c)
- *
- * | SegNextPtr Heap Memory Pool |
- * | (see Note #2b2) (see Note #2d) |
- * | | |
- * v | | v
- * | v
- * --- Head of Memory ------- ------- v ------- ------- -------
- * ^ Pool Table --->| |------->| |------->| |------->| |------->| |
- * | (see Note #2b1) | | | | | | | H | | |
- * | | |<-------| |<-------| |<-------| E |<-------| |
- * | | | | | ^ | | | A | | |
- * | | | | | | | | | P | | |
- * | | | | | | | | | | | |
- * | ------- ------- | ------- ------- -------
- * | | ^ | | ^
- * | | | SegPrevPtr | |
- * | v | (see Note #2b2) v |
- * | ------- -------
- * | | | |
- * Memory Pools | | | |
- * (see Note #2a2) | | | |
- * | | | |
- * | | | | |
- * | ------- -------
- * | | ^
- * | PoolNextPtr ---> | | <--- PoolPrevPtr
- * | (see Note #2b3) v | (see Note #2b3)
- * | -------
- * | | |
- * | | |
- * | | |
- * | | |
- * v | |
- * --- -------
- *
- *$PAGE*
- * Argument(s) : pmem_pool Pointer to a memory pool structure to create (see Note #3).
- *
- * pmem_base_addr Memory pool base address :
- *
- * (a) Null address Memory pool allocated from general-purpose heap.
- * (b) Non-null address Memory pool allocated from dedicated memory
- * specified by its base address.
- *
- * mem_size Size of memory pool segment (in octets).
- *
- * blk_nbr Number of memory pool blocks to create.
- *
- * blk_size Size of memory pool blocks to create (in octets).
- *
- * blk_align Alignment of memory pool blocks to specific word boundary (in octets).
- *
- * poctets_reqd Optional pointer to a variable to ... :
- *
- * (a) Return the number of octets required to successfully
- * allocate the memory pool, if any error(s);
- * (b) Return 0, otherwise.
- *
- * perr Pointer to variable that will receive the return error code from this function :
- *
- * LIB_MEM_ERR_NONE Memory pool successfully created.
- *
- * LIB_MEM_ERR_HEAP_NOT_FOUND Heap segment NOT found.
- * LIB_MEM_ERR_HEAP_EMPTY Heap segment empty; NOT enough available
- * memory from heap.
- * LIB_MEM_ERR_HEAP_OVF Requested memory overflows heap memory.
- * LIB_MEM_ERR_SEG_EMPTY Memory segment empty; NOT enough available
- * memory from segment for memory pools.
- * LIB_MEM_ERR_SEG_OVF Requested memory overflows segment memory.
- *
- * LIB_MEM_ERR_INVALID_SEG_SIZE Invalid memory segment size.
- * LIB_MEM_ERR_INVALID_SEG_OVERLAP Memory segment overlaps other memory
- * segment(s) in memory pool table.
- * LIB_MEM_ERR_INVALID_BLK_NBR Invalid memory pool number of blocks.
- * LIB_MEM_ERR_INVALID_BLK_SIZE Invalid memory pool block size.
- * LIB_MEM_ERR_INVALID_BLK_ALIGN Invalid memory pool block alignment.
- *
- * ------- RETURNED BY Mem_PoolClr() : -------
- * LIB_MEM_ERR_NULL_PTR Argument 'pmem_pool' passed a NULL pointer.
- *
- * Return(s) : none.
- *
- * Caller(s) : Application.
- *
- * Note(s) : (3) Assumes 'pmem_pool' points to a valid memory pool (if non-NULL).
- *
- * (4) Pointers to variables that return values MUST be initialized PRIOR to all other
- * validation or function handling in case of any error(s).
- *
- * (5) 'pmem_pool' variables MUST ALWAYS be accessed exclusively in critical sections.
- *********************************************************************************************************
- */
- /*$PAGE*/
- #if (LIB_MEM_CFG_ALLOC_EN == DEF_ENABLED)
- void Mem_PoolCreate (MEM_POOL *pmem_pool,
- void *pmem_base_addr,
- CPU_SIZE_T mem_size,
- CPU_SIZE_T blk_nbr,
- CPU_SIZE_T blk_size,
- CPU_SIZE_T blk_align,
- CPU_SIZE_T *poctets_reqd,
- LIB_ERR *perr)
- {
- MEM_POOL *pmem_pool_heap;
- MEM_POOL *pmem_pool_prev;
- MEM_POOL *pmem_pool_next;
- MEM_POOL *pmem_pool_blk;
- void **ppool_ptr;
- void *pmem_blk;
- CPU_INT08U *pmem_addr_ptrs;
- CPU_INT08U *pmem_addr_pool;
- CPU_INT08U *pmem_base_addr_start;
- CPU_INT08U *pmem_base_addr_end;
- CPU_INT08U *pmem_seg_addr_start;
- CPU_INT08U *pmem_seg_addr_end;
- CPU_SIZE_T octets_reqd_unused;
- CPU_SIZE_T size_tot;
- CPU_SIZE_T size_tot_ptrs;
- CPU_SIZE_T size_tot_pool;
- CPU_SIZE_T size_rem;
- CPU_SIZE_T size_pool_ptrs;
- CPU_SIZE_T blk_rem;
- CPU_SIZE_T i;
- CPU_SR_ALLOC();
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED) /* ------------- VALIDATE RTN ERR PTR ------------- */
- if (perr == (LIB_ERR *)0) {
- CPU_SW_EXCEPTION(;);
- }
- #endif
- /* ------------ VALIDATE RTN OCTETS PTR ----------- */
- if (poctets_reqd == (CPU_SIZE_T *) 0) { /* If NOT avail, ... */
- poctets_reqd = (CPU_SIZE_T *)&octets_reqd_unused; /* ... re-cfg NULL rtn ptr to unused local var. */
- (void)&octets_reqd_unused; /* Prevent possible 'variable unused' warning. */
- }
- *poctets_reqd = 0u; /* Init octets req'd for err (see Note #4). */
- Mem_PoolClr(pmem_pool, perr); /* Init mem pool for err (see Note #4). */
- if (*perr != LIB_MEM_ERR_NONE) {
- return;
- }
- /* ----------- VALIDATE MEM POOL CREATE ----------- */
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED)
- if (pmem_base_addr != (void *)0) {
- if (mem_size < 1) {
- *perr = LIB_MEM_ERR_INVALID_SEG_SIZE;
- return;
- }
- }
- if (blk_nbr < 1) {
- *perr = LIB_MEM_ERR_INVALID_BLK_NBR;
- return;
- }
- if (blk_size < 1) {
- *perr = LIB_MEM_ERR_INVALID_BLK_SIZE;
- return;
- }
- if (blk_align < 1) {
- *perr = LIB_MEM_ERR_INVALID_BLK_ALIGN;
- return;
- }
- #endif
- /* ------------ VALIDATE MEM POOL TBL ------------- */
- if (Mem_PoolTbl == (MEM_POOL *)0) {
- *perr = LIB_MEM_ERR_HEAP_NOT_FOUND;
- return;
- }
- /*$PAGE*/
- /* ---------------- CREATE MEM POOL --------------- */
- pmem_pool_heap = (MEM_POOL *)&Mem_PoolHeap;
- size_tot = (CPU_SIZE_T) 0u;
- CPU_CRITICAL_ENTER();
- if (pmem_base_addr == (void *)0) { /* If no base addr, cfg mem pool from heap. */
- pmem_pool_blk = pmem_pool_heap;
- pmem_pool_prev = pmem_pool_heap;
- pmem_pool_next = pmem_pool_heap;
- /* --------------- VALIDATE MEM SEG --------------- */
- /* Calc tot mem size for mem pool ptrs. */
- pmem_addr_ptrs = (CPU_INT08U *)pmem_pool_heap->SegAddrNextAvail;
- size_tot_ptrs = Mem_PoolSegCalcTotSize((void *)pmem_addr_ptrs,
- (CPU_SIZE_T)blk_nbr,
- (CPU_SIZE_T)sizeof(void *),
- (CPU_SIZE_T)sizeof(void *));
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED)
- if (size_tot_ptrs < 1) { /* If heap ovf, ... */
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_HEAP_OVF; /* ... rtn err but add'l heap size NOT avail. */
- return;
- }
- #endif
- /* Calc tot mem size for mem blks. */
- pmem_addr_pool = pmem_addr_ptrs + size_tot_ptrs; /* Adj next avail addr for mem pool blks. */
- size_tot_pool = Mem_PoolSegCalcTotSize((void *)pmem_addr_pool,
- (CPU_SIZE_T)blk_nbr,
- (CPU_SIZE_T)blk_size,
- (CPU_SIZE_T)blk_align);
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED)
- if (size_tot_pool < 1) { /* If heap ovf, ... */
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_HEAP_OVF; /* ... rtn err but add'l heap size NOT avail. */
- return;
- }
- #endif
- size_tot = size_tot_ptrs + size_tot_pool;
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED)
- if ((size_tot < size_tot_ptrs) || /* If heap ovf, ... */
- (size_tot < size_tot_pool)) {
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_HEAP_OVF; /* ... rtn err but add'l heap size NOT avail. */
- return;
- }
- #endif
- size_rem = pmem_pool_heap->SegSizeRem;
- if (size_tot > size_rem) { /* If tot size > rem size, ... */
- CPU_CRITICAL_EXIT();
- *poctets_reqd = size_tot - size_rem; /* ... rtn add'l heap size needed. */
- *perr = LIB_MEM_ERR_HEAP_EMPTY;
- return;
- }
- /*$PAGE*/
- } else { /* Else cfg mem pool from dedicated mem. */
- /* -------- SRCH ALL MEM SEGS FOR MEM POOL -------- */
- pmem_base_addr_start = (CPU_INT08U *)pmem_base_addr;
- pmem_base_addr_end = (CPU_INT08U *)pmem_base_addr + mem_size - 1;
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED)
- if (pmem_base_addr_end < pmem_base_addr_start) { /* Chk ovf of end addr. */
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_INVALID_BLK_ADDR;
- return;
- }
- #endif
- pmem_pool_blk = (MEM_POOL *)0;
- pmem_pool_prev = (MEM_POOL *)0;
- pmem_pool_next = Mem_PoolTbl;
- while (pmem_pool_next != (MEM_POOL *)0) { /* Srch tbl for mem seg with same base addr/size. */
- if ((pmem_base_addr == pmem_pool_next->SegAddr) && /* If same base addr/size found, ... */
- (mem_size == pmem_pool_next->SegSizeTot)) {
- pmem_pool_blk = pmem_pool_next;
- pmem_pool_prev = pmem_pool_next;
- break; /* ... prev mem seg found in tbl. */
- } else {
- pmem_seg_addr_start = (CPU_INT08U *)pmem_pool_next->SegAddr;
- pmem_seg_addr_end = (CPU_INT08U *)pmem_pool_next->SegAddr + pmem_pool_next->SegSizeTot - 1;
-
- if (pmem_base_addr_end < pmem_seg_addr_start) { /* If mem seg addr/size prior to next mem seg, ... */
- break; /* ... new mem seg NOT avail in tbl. */
- /* If mem seg overlaps prev mem seg(s) in tbl, ... */
- } else if (((pmem_base_addr_start <= pmem_seg_addr_start) &&
- (pmem_base_addr_end >= pmem_seg_addr_start)) ||
- ((pmem_base_addr_start >= pmem_seg_addr_start) &&
- (pmem_base_addr_end <= pmem_seg_addr_end )) ||
- ((pmem_base_addr_start <= pmem_seg_addr_end ) &&
- (pmem_base_addr_end >= pmem_seg_addr_end ))) {
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_INVALID_SEG_OVERLAP; /* ... rtn err. */
- return;
- }
- }
- /* If mem seg NOT found, adv to next mem seg. */
- pmem_pool_prev = pmem_pool_next;
- pmem_pool_next = pmem_pool_next->SegNextPtr;
- }
- if (pmem_pool_blk == (MEM_POOL *)0) { /* If mem seg NOT found, add new mem seg. */
- pmem_pool_blk = pmem_pool;
- pmem_pool->SegAddr = pmem_base_addr;
- pmem_pool->SegAddrNextAvail = pmem_base_addr;
- pmem_pool->SegSizeTot = mem_size;
- pmem_pool->SegSizeRem = mem_size;
- }
- /*$PAGE*/
- /* --------------- VALIDATE MEM SEG --------------- */
- /* Calc tot mem size for mem pool ptrs. */
- pmem_addr_ptrs = (CPU_INT08U *)pmem_pool_heap->SegAddrNextAvail;
- size_tot_ptrs = Mem_PoolSegCalcTotSize((void *)pmem_addr_ptrs,
- (CPU_SIZE_T)blk_nbr,
- (CPU_SIZE_T)sizeof(void *),
- (CPU_SIZE_T)sizeof(void *));
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED)
- if (size_tot_ptrs < 1) { /* If heap ovf, ... */
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_HEAP_OVF; /* ... rtn err but add'l heap size NOT avail. */
- return;
- }
- #endif
- size_rem = pmem_pool_heap->SegSizeRem;
- if (size_tot_ptrs > size_rem) { /* If ptr size > rem size, ... */
- CPU_CRITICAL_EXIT();
- *poctets_reqd = size_tot_ptrs - size_rem; /* ... rtn add'l heap size needed. */
- *perr = LIB_MEM_ERR_HEAP_EMPTY;
- return;
- }
- /* Calc tot mem size for mem blks. */
- pmem_addr_pool = (CPU_INT08U *)pmem_pool_blk->SegAddrNextAvail;
- size_tot_pool = Mem_PoolSegCalcTotSize((void *)pmem_addr_pool,
- (CPU_SIZE_T)blk_nbr,
- (CPU_SIZE_T)blk_size,
- (CPU_SIZE_T)blk_align);
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED)
- if (size_tot_pool < 1) { /* If seg ovf, ... */
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_SEG_OVF; /* ... rtn err but add'l seg size NOT avail. */
- return;
- }
- #endif
- size_rem = pmem_pool_blk->SegSizeRem;
- if (size_tot_pool > size_rem) { /* If tot size > rem size, ... */
- CPU_CRITICAL_EXIT();
- *poctets_reqd = size_tot_pool - size_rem; /* ... rtn add'l seg size needed. */
- *perr = LIB_MEM_ERR_SEG_EMPTY;
- return;
- }
- }
- /*$PAGE*/
- /* ---------------- ALLOC MEM BLKs ---------------- */
- size_pool_ptrs = blk_nbr * sizeof(void *);
- /* Alloc stk of ptrs for mem blks from heap. */
- ppool_ptr = (void **)Mem_PoolSegAlloc((MEM_POOL *)pmem_pool_heap,
- (CPU_SIZE_T)size_pool_ptrs,
- (CPU_SIZE_T)sizeof(void *));
- if (ppool_ptr == (void **)0) { /* If mem pool ptrs alloc failed, ... */
- size_rem = pmem_pool_heap->SegSizeRem;
- CPU_CRITICAL_EXIT();
- /* ... rtn add'l heap size needed. */
- if (pmem_base_addr == (void *)0) {
- if (size_tot > size_rem) {
- *poctets_reqd = size_tot - size_rem;
- } else {
- *poctets_reqd = size_tot;
- }
- } else {
- if (size_pool_ptrs > size_rem) {
- *poctets_reqd = size_pool_ptrs - size_rem;
- } else {
- *poctets_reqd = size_pool_ptrs;
- }
- }
- *perr = LIB_MEM_ERR_HEAP_EMPTY;
- return;
- }
- for (i = 0u; i < blk_nbr; i++) { /* Alloc mem blks from blk seg ptr. */
- pmem_blk = (void *)Mem_PoolSegAlloc(pmem_pool_blk, blk_size, blk_align);
- if (pmem_blk == (void *)0) { /* If mem blks alloc failed, ... */
- pmem_addr_pool = (CPU_INT08U *)pmem_pool_blk->SegAddrNextAvail;
- size_rem = (CPU_SIZE_T )pmem_pool_blk->SegSizeRem;
- CPU_CRITICAL_EXIT();
- blk_rem = blk_nbr - i;
- size_tot = Mem_PoolSegCalcTotSize((void *)pmem_addr_pool,
- (CPU_SIZE_T)blk_rem,
- (CPU_SIZE_T)blk_size,
- (CPU_SIZE_T)blk_align);
- /* ... rtn add'l seg size needed. */
- if (size_tot > size_rem) {
- *poctets_reqd = size_tot - size_rem;
- } else {
- *poctets_reqd = size_tot;
- }
- *perr = LIB_MEM_ERR_SEG_EMPTY;
- return;
- }
- ppool_ptr[i] = pmem_blk;
- }
- /*$PAGE*/
- /* ------------- UPDATE MEM POOL TBL -------------- */
- if (pmem_pool_prev == pmem_pool_next) { /* Add new mem seg to list. */
- pmem_pool_next = pmem_pool_blk->PoolNextPtr;
- pmem_pool->PoolPrevPtr = pmem_pool_blk;
- pmem_pool->PoolNextPtr = pmem_pool_next;
- pmem_pool_blk->PoolNextPtr = pmem_pool;
- if (pmem_pool_next != (MEM_POOL *)0) {
- pmem_pool_next->PoolPrevPtr = pmem_pool;
- }
- } else { /* Add new mem pool to mem seg. */
- pmem_pool->SegPrevPtr = pmem_pool_prev;
- pmem_pool->SegNextPtr = pmem_pool_next;
- if (pmem_pool_prev != (MEM_POOL *)0) { /* Update prev mem pool link. */
- pmem_pool_prev->SegNextPtr = pmem_pool;
- } else {
- Mem_PoolTbl = pmem_pool; /* Update mem pool head. */
- }
- if (pmem_pool_next != (MEM_POOL *)0) { /* Update next mem pool link. */
- pmem_pool_next->SegPrevPtr = pmem_pool;
- }
- }
- /* ----------------- CFG MEM POOL ----------------- */
- pmem_pool->Type = (LIB_MEM_TYPE) LIB_MEM_TYPE_POOL;
- pmem_pool->PoolAddrStart = (void *) pmem_addr_pool;
- pmem_pool->PoolAddrEnd = (void *)(pmem_addr_pool + size_tot_pool - 1);
- pmem_pool->PoolPtrs = (void **) ppool_ptr;
- pmem_pool->PoolSize = (CPU_SIZE_T ) size_tot_pool;
- pmem_pool->BlkAlign = (CPU_SIZE_T ) blk_align;
- pmem_pool->BlkSize = (CPU_SIZE_T ) blk_size;
- pmem_pool->BlkNbr = (CPU_SIZE_T ) blk_nbr;
- pmem_pool->BlkIx = (MEM_POOL_IX ) blk_nbr;
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_NONE;
- }
- #endif
- /*$PAGE*/
- /*
- *********************************************************************************************************
- * Mem_PoolBlkGet()
- *
- * Description : Get a memory block from memory pool.
- *
- * Argument(s) : pmem_pool Pointer to memory pool to get memory block from.
- *
- * size Size of requested memory (in octets).
- *
- * perr Pointer to variable that will receive the return error code from this function :
- *
- * LIB_MEM_ERR_NONE Memory block successfully returned.
- * LIB_MEM_ERR_POOL_EMPTY NO memory blocks available in memory pool.
- *
- * LIB_MEM_ERR_NULL_PTR Argument 'pmem_pool' passed a NULL pointer.
- * LIB_MEM_ERR_INVALID_POOL Invalid memory pool type.
- * LIB_MEM_ERR_INVALID_BLK_SIZE Invalid memory pool block size requested.
- * LIB_MEM_ERR_INVALID_BLK_IX Invalid memory pool block index.
- *
- * Return(s) : Pointer to memory block, if NO error(s).
- *
- * Pointer to NULL, otherwise.
- *
- * Caller(s) : Application.
- *
- * Note(s) : (1) 'pmem_pool' variables MUST ALWAYS be accessed exclusively in critical sections.
- *********************************************************************************************************
- */
- /*$PAGE*/
- #if (LIB_MEM_CFG_ALLOC_EN == DEF_ENABLED)
- void *Mem_PoolBlkGet (MEM_POOL *pmem_pool,
- CPU_SIZE_T size,
- LIB_ERR *perr)
- {
- void *pmem_blk;
- CPU_SR_ALLOC();
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED) /* ------------- VALIDATE RTN ERR PTR ------------- */
- if (perr == (LIB_ERR *)0) {
- CPU_SW_EXCEPTION((void *)0);
- }
- #endif
- /* ------------ VALIDATE MEM POOL GET ------------- */
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED)
- if (pmem_pool == (MEM_POOL *)0) { /* Validate mem ptr. */
- *perr = LIB_MEM_ERR_NULL_PTR;
- return ((void *)0);
- }
- if (size < 1) { /* Validate req'd size as non-NULL. */
- *perr = LIB_MEM_ERR_INVALID_BLK_SIZE;
- return ((void *)0);
- }
- #endif
- CPU_CRITICAL_ENTER();
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED)
- if (pmem_pool->Type != LIB_MEM_TYPE_POOL) { /* Validate mem pool type. */
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_INVALID_POOL;
- return ((void *)0);
- }
- if (size > pmem_pool->BlkSize) { /* Validate req'd size <= mem pool blk size. */
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_INVALID_BLK_SIZE;
- return ((void *)0);
- }
- #endif
- (void)&size; /* Prevent possible 'variable unused' warning. */
- if (pmem_pool->BlkIx < 1) { /* Validate mem pool as NOT empty. */
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_POOL_EMPTY;
- return ((void *)0);
- }
- if (pmem_pool->BlkIx > pmem_pool->BlkNbr) { /* Validate mem pool ix NOT corrupt. */
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_INVALID_BLK_IX;
- return ((void *)0);
- }
- /* ------------ GET MEM BLK FROM POOL ------------- */
- pmem_pool->BlkIx--;
- pmem_blk = pmem_pool->PoolPtrs[pmem_pool->BlkIx];
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_NONE;
- return (pmem_blk);
- }
- #endif
- /*$PAGE*/
- /*
- *********************************************************************************************************
- * Mem_PoolBlkFree()
- *
- * Description : Free a memory block to memory pool.
- *
- * Argument(s) : pmem_pool Pointer to memory pool to free memory block.
- *
- * pmem_blk Pointer to memory block address to free.
- *
- * perr Pointer to variable that will receive the return error code from this function :
- *
- * LIB_MEM_ERR_NONE Memory block successfully freed.
- * LIB_MEM_ERR_POOL_FULL ALL memory blocks already available in
- * memory pool.
- *
- * LIB_MEM_ERR_NULL_PTR Argument 'pmem_pool'/'pmem_blk' passed
- * a NULL pointer.
- * LIB_MEM_ERR_INVALID_POOL Invalid memory pool type.
- * LIB_MEM_ERR_INVALID_BLK_ADDR Invalid memory block address.
- * LIB_MEM_ERR_INVALID_BLK_ADDR_IN_POOL Memory block address already
- * in memory pool.
- *
- * Return(s) : none.
- *
- * Caller(s) : Application.
- *
- * Note(s) : (1) 'pmem_pool' variables MUST ALWAYS be accessed exclusively in critical sections.
- *********************************************************************************************************
- */
- /*$PAGE*/
- #if (LIB_MEM_CFG_ALLOC_EN == DEF_ENABLED)
- void Mem_PoolBlkFree (MEM_POOL *pmem_pool,
- void *pmem_blk,
- LIB_ERR *perr)
- {
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED)
- CPU_BOOLEAN addr_valid;
- MEM_POOL_IX i;
- #endif
- CPU_SR_ALLOC();
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED) /* ------------- VALIDATE RTN ERR PTR ------------- */
- if (perr == (LIB_ERR *)0) {
- CPU_SW_EXCEPTION(;);
- }
- #endif
- /* ------------ VALIDATE MEM POOL FREE ------------ */
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED) /* Validate mem ptrs. */
- if (pmem_pool == (MEM_POOL *)0) {
- *perr = LIB_MEM_ERR_NULL_PTR;
- return;
- }
- if (pmem_blk == (void *)0) {
- *perr = LIB_MEM_ERR_NULL_PTR;
- return;
- }
- #endif
- CPU_CRITICAL_ENTER();
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED)
- if (pmem_pool->Type != LIB_MEM_TYPE_POOL) { /* Validate mem pool type. */
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_INVALID_POOL;
- return;
- }
- addr_valid = Mem_PoolBlkIsValidAddr(pmem_pool, pmem_blk); /* Validate mem blk as valid pool blk addr. */
- if (addr_valid != DEF_OK) {
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_INVALID_BLK_ADDR;
- return;
- }
- for (i = 0u; i < pmem_pool->BlkIx; i++) { /* Validate mem blk NOT already in pool. */
- if (pmem_blk == pmem_pool->PoolPtrs[i]) {
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_INVALID_BLK_ADDR_IN_POOL;
- return;
- }
- }
- #endif
- if (pmem_pool->BlkIx >= pmem_pool->BlkNbr) { /* Validate mem pool NOT already full. */
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_POOL_FULL;
- return;
- }
- /* ------------- FREE MEM BLK TO POOL ------------- */
- pmem_pool->PoolPtrs[pmem_pool->BlkIx] = pmem_blk;
- pmem_pool->BlkIx++;
- CPU_CRITICAL_EXIT();
- *perr = LIB_MEM_ERR_NONE;
- }
- #endif
- /*$PAGE*/
- /*
- *********************************************************************************************************
- *********************************************************************************************************
- * LOCAL FUNCTIONS
- *********************************************************************************************************
- *********************************************************************************************************
- */
- /*
- *********************************************************************************************************
- * Mem_PoolBlkIsValidAddr()
- *
- * Description : Calculates if a given memory block address is valid for the memory pool.
- *
- * Argument(s) : pmem_pool Pointer to memory pool structure to validate memory block address.
- * --------- Argument validated in Mem_PoolBlkFree().
- *
- * pmem_blk Pointer to memory block address to validate.
- * -------- Argument validated in Mem_PoolBlkFree().
- *
- * Return(s) : DEF_YES, if valid memory pool block address.
- *
- * DEF_NO, otherwise.
- *
- * Caller(s) : Mem_PoolBlkFree().
- *
- * Note(s) : none.
- *********************************************************************************************************
- */
- #if ((LIB_MEM_CFG_ALLOC_EN == DEF_ENABLED) && \
- (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED))
- static CPU_BOOLEAN Mem_PoolBlkIsValidAddr (MEM_POOL *pmem_pool,
- void *pmem_blk)
- {
- CPU_INT08U *ppool_addr_first;
- void *ppool_addr_start;
- void *ppool_addr_end;
- CPU_SIZE_T align_offset;
- CPU_SIZE_T blk_align;
- CPU_SIZE_T blk_align_offset;
- CPU_SIZE_T blk_size;
- CPU_SIZE_T mem_align;
- CPU_SIZE_T mem_align_offset;
- CPU_SIZE_T mem_diff;
- CPU_BOOLEAN addr_valid;
- ppool_addr_start = pmem_pool->PoolAddrStart;
- ppool_addr_end = pmem_pool->PoolAddrEnd;
- if ((pmem_blk < ppool_addr_start) ||
- (pmem_blk > ppool_addr_end)) {
- return (DEF_NO);
- }
- blk_align = (CPU_SIZE_T)pmem_pool->BlkAlign;
- align_offset = (CPU_SIZE_T)((CPU_ADDR)ppool_addr_start % blk_align);
- if (align_offset != 0u) {
- mem_align_offset = blk_align - align_offset;
- } else {
- mem_align_offset = 0u;
- }
- blk_size = pmem_pool->BlkSize;
- align_offset = blk_size % blk_align;
- if (align_offset != 0u) {
- blk_align_offset = blk_align - align_offset;
- } else {
- blk_align_offset = 0u;
- }
- ppool_addr_first = (CPU_INT08U *)((CPU_INT08U *)ppool_addr_start + mem_align_offset);
- mem_diff = (CPU_SIZE_T )((CPU_INT08U *)pmem_blk - ppool_addr_first);
- mem_align = (CPU_SIZE_T )( blk_size + blk_align_offset);
- addr_valid = ((mem_diff % mem_align) == 0u) ? DEF_YES : DEF_NO;
- return (addr_valid);
- }
- #endif
- /*$PAGE*/
- /*
- *********************************************************************************************************
- * Mem_PoolSegCalcTotSize()
- *
- * Description : (1) Calculates total memory segment size for number of blocks with specific size & alignment :
- *
- *
- * ----- ====================== ---
- * ^ Mem Addr ---> | / / / / / / | ^
- * | (see Note #1a) | / / / / / / /| | Mem Align Offset
- * | |/ / / / / / / | | (see Notes #1e & #2a)
- * | | / / / / / / | v
- * | ====================== ---
- * | | | ^
- * | | | |
- * | | Mem Blk #1 | | Blk Size
- * | | | | (see Note #1c)
- * | | | v
- * | ---------------------- ---
- * | | / / / / / / | ^
- * | | / / / / / / /| | Blk Align Offset
- * | |/ / / / / / / | | (see Notes #1f & #2b)
- * | | / / / / / / | v
- * | ====================== ---
- * | . |
- * Total Size | . |
- * (see Note #2c) | . |
- * ====================== ---
- * | | | ^
- * | | | |
- * | | Mem Blk #N - 1 | | Blk Size
- * | | | | (see Note #1c)
- * | | | v
- * | ---------------------- ---
- * | | / / / / / / | ^
- * | | / / / / / / /| | Blk Align Offset
- * | |/ / / / / / / | | (see Notes #1f & #2b)
- * | | / / / / / / | v
- * | ====================== ---
- * | | | ^
- * | | | |
- * | | Mem Blk #N | | Blk Size
- * | | | | (see Note #1c)
- * v | | v
- * ----- ====================== ---
- *
- * where
- *
- * (a) Mem Addr Memory address of the beginning of the memory block ('pmem_addr')
- *
- * (b) N Number of memory blocks to allocate ('blk_nbr')
- *
- * (c) Blk Size Size of memory block to allocate ('blk_size')
- *
- * (d) Align Required block memory alignment ('blk_align')
- *
- * (e) Mem Align Offset Offset required to align first memory block
- *
- * (f) Blk Align Offset Offset required to align every memory block
- *
- *
- * (2) The total size is calculated based on the following equations :
- *
- * { (1) Align - (Mem Addr % Align) , if memory address is not aligned
- * (a) Mem Align Offset = {
- * { (2) 0 , if memory address is aligned
- *
- *
- * { (1) Align - (Size % Align) , if memory block is not aligned
- * (b) Blk Align Offset = {
- * { (2) 0 , if memory block is aligned
- *
- *
- * (c) Total Size = Mem Align Offset
- * + ((Blk Size + Blk Align Offset) * (N - 1))
- * + Blk Size
- *
- *
- * Argument(s) : pmem_addr Memory address of the beginning of the memory block.
- *
- * blk_nbr Number of memory blocks to allocate.
- * ------- Argument checked in Mem_HeapAlloc(),
- * Mem_PoolCreate().
- *
- * blk_size Size of memory block to allocate.
- * -------- Argument checked in Mem_HeapAlloc(),
- * Mem_PoolCreate().
- *
- * blk_align Required block word-boundary memory alignment (in octets).
- * --------- Argument checked in Mem_HeapAlloc(),
- * Mem_PoolCreate().
- *
- * Return(s) : Total size of memory segment used to allocate the number of blocks, if NO error(s).
- *
- * 0, otherwise.
- *$PAGE*
- * Caller(s) : Mem_HeapAlloc(),
- * Mem_PoolCreate().
- *
- * Note(s) : none.
- *********************************************************************************************************
- */
- #if (LIB_MEM_CFG_ALLOC_EN == DEF_ENABLED)
- static CPU_SIZE_T Mem_PoolSegCalcTotSize (void *pmem_addr,
- CPU_SIZE_T blk_nbr,
- CPU_SIZE_T blk_size,
- CPU_SIZE_T blk_align)
- {
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED)
- CPU_SIZE_T blk_size_mem_aligned;
- CPU_SIZE_T blk_size_aligned;
- CPU_SIZE_T blk_size_aligned_nbr;
- CPU_SIZE_T blk_size_tot;
- #endif
- CPU_SIZE_T align_offset;
- CPU_SIZE_T mem_align_offset;
- CPU_SIZE_T blk_align_offset;
- CPU_SIZE_T size_tot;
- /* Calc mem align (see Note #2a). */
- align_offset = (CPU_ADDR)pmem_addr % blk_align;
- if (align_offset != 0u) {
- mem_align_offset = blk_align - align_offset;
- } else {
- mem_align_offset = 0u;
- }
- /* Calc blk align (see Note #2b). */
- align_offset = blk_size % blk_align;
- if (align_offset != 0u) {
- blk_align_offset = blk_align - align_offset;
- } else {
- blk_align_offset = 0u;
- }
- /* Calc tot size (see Note #2c). */
- size_tot = mem_align_offset + ((blk_size + blk_align_offset) * (blk_nbr - 1)) + blk_size;
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED) /* Chk ovf of tot size = A + [(B + C) * D] + E */
- blk_size_mem_aligned = mem_align_offset + blk_size; /* Chk ovf of A + E : */
- if ((blk_size_mem_aligned < mem_align_offset) ||
- (blk_size_mem_aligned < blk_size)) {
- return (0u);
- }
- if (blk_nbr > 1) {
- blk_size_aligned = blk_size + blk_align_offset;
- if ((blk_size_aligned < blk_align_offset) || /* Chk ovf of (B + C) : */
- (blk_size_aligned < blk_size)) {
- return (0u);
- }
- blk_size_aligned_nbr = blk_size_aligned * (blk_nbr - 1);
- if ((blk_size_aligned_nbr < blk_size_aligned) || /* Chk ovf of [(B + C) * D] : */
- (blk_size_aligned_nbr < blk_align_offset) ||
- (blk_size_aligned_nbr < blk_size)) {
- return (0u);
- }
- blk_size_tot = blk_size_aligned_nbr + blk_size;
- if ((blk_size_tot < blk_size_aligned_nbr) || /* Chk ovf of [(B + C) * D] + E : */
- (blk_size_tot < blk_size)) {
- return (0u);
- }
- if ((size_tot < blk_size_mem_aligned) || /* Chk ovf of A + [(B + C) * D] + E : */
- (size_tot < blk_size_aligned_nbr) ||
- (size_tot < blk_size_tot)) {
- return (0u);
- }
- }
- #endif
- return (size_tot);
- }
- #endif
- /*$PAGE*/
- /*
- *********************************************************************************************************
- * Mem_PoolSegAlloc()
- *
- * Description : Allocates memory from specific segment.
- *
- * Argument(s) : pmem_pool Pointer to memory pool structure containing segment information.
- * --------- Argument validated in Mem_HeapAlloc(),
- * Mem_PoolCreate().
- *
- * size Size of memory to allocate.
- * ---- Argument validated in Mem_HeapAlloc(),
- * Mem_PoolCreate().
- *
- * align Required starting word-boundary memory alignment (in octets).
- * ----- Argument validated in Mem_HeapAlloc(),
- * Mem_PoolCreate().
- *
- * Return(s) : Pointer to allocated memory, if NO error(s).
- *
- * Pointer to NULL, otherwise.
- *
- * Caller(s) : Mem_HeapAlloc(),
- * Mem_PoolCreate().
- *
- * Note(s) : (1) Allocated memory from the specific segment is NEVER freed after allocation.
- *
- * (2) 'pmem_pool' variables MUST ALWAYS be accessed exclusively in critical sections.
- *
- * (a) However, this function is already called within critical sections.
- *********************************************************************************************************
- */
- #if (LIB_MEM_CFG_ALLOC_EN == DEF_ENABLED)
- static void *Mem_PoolSegAlloc (MEM_POOL *pmem_pool,
- CPU_SIZE_T size,
- CPU_SIZE_T align)
- {
- CPU_INT08U *pmem_addr;
- CPU_INT08U *pmem_addr_next;
- CPU_SIZE_T mem_align;
- CPU_SIZE_T align_offset;
- CPU_SIZE_T size_tot;
- pmem_addr = (CPU_INT08U *)pmem_pool->SegAddrNextAvail;
- mem_align = (CPU_SIZE_T)((CPU_ADDR)pmem_addr % align); /* Calc mem align. */
- if (mem_align != 0u) {
- align_offset = align - mem_align;
- } else {
- align_offset = 0u;
- }
- size_tot = align_offset + size;
- if (size_tot > pmem_pool->SegSizeRem) { /* If insufficiemt mem seg size rem, ... */
- return ((void *)0); /* ... rtn NULL. */
- }
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED)
- if ((size_tot < align_offset) || /* If size ovf, ... */
- (size_tot < size)) {
- return ((void *)0); /* ... rtn NULL. */
- }
- #endif
- pmem_addr_next = pmem_addr + size_tot;
- #if (LIB_MEM_CFG_ARG_CHK_EXT_EN == DEF_ENABLED)
- if (pmem_addr_next < pmem_addr) { /* If addr ovf, ... */
- return ((void *)0); /* ... rtn NULL. */
- }
- #endif
- pmem_addr += align_offset; /* Align mem addr. */
- pmem_pool->SegAddrNextAvail = (void *)pmem_addr_next; /* Adv next avail addr. */
- pmem_pool->SegSizeRem -= (CPU_SIZE_T)size_tot; /* Adj rem mem seg size. */
- return ((void *)pmem_addr);
- }
- #endif
|