FreeCalypso > hg > fc-magnetite

comparison src/gpf2/osl/os_mem_ir.c @ 487:91e8dac34ada

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/gpf2/osl: initial import from old freecalypso-sw tree
author Mychaela Falconia <falcon@freecalypso.org>
date Fri, 22 Jun 2018 05:56:16 +0000
parents
children e9bdc8184d50
comparison
equal deleted inserted replaced
486:c433cca731a3 487:91e8dac34ada
1 /*
2 * This C module is a reconstruction based on the disassembly of
3 * os_mem.obj in frame_na7_db_ir.lib from the Leonardo package.
4 */
5
6 /* set of included headers from COFF symtab: */
7 #include <stdio.h>
8 #include <string.h>
9 #include "gpfconf.h" /* FreeCalypso addition */
10 #include "../../nucleus/nucleus.h"
11 #include "typedefs.h"
12 #include "os.h"
13 #include "gdi.h"
14 #include "os_types.h"
15 #include "os_glob.h"
16
17 extern T_OS_PART_GRP_TABLE_ENTRY PartGrpTable[];
18 extern T_OS_POOL_BORDER PoolBorder[];
19
20 GLOBAL LONG
21 os_is_valid_partition(T_VOID_STRUCT *Buffer)
22 {
23 int i;
24
25 for (i = 0; i <= MaxPoolGroups; i++) {
26 if (PoolBorder[i].End == 0)
27 return(OS_ERROR);
28 if ((char *)Buffer < PoolBorder[i].Start)
29 continue;
30 if ((char *)Buffer >= PoolBorder[i].End)
31 continue;
32 return(OS_OK);
33 }
34 return(OS_ERROR);
35 }
36
37 GLOBAL LONG
38 os_PartitionCheck(ULONG *ptr)
39 {
40 PM_HEADER *phdr;
41 PM_PCB *pool;
42
43 phdr = (PM_HEADER *)(ptr - 2);
44 if (phdr->pm_next_available)
45 return(OS_PARTITION_FREE);
46 pool = phdr->pm_partition_pool;
47 if (ptr[(pool->pm_partition_size - 4) >> 2] == GUARD_PATTERN)
48 return(OS_OK);
49 else
50 return(OS_PARTITION_GUARD_PATTERN_DESTROYED);
51 }
52
53 GLOBAL LONG
54 os_DeallocatePartition(OS_HANDLE TaskHandle, T_VOID_STRUCT *Buffer)
55 {
56 if (os_is_valid_partition(Buffer) != OS_OK)
57 return(OS_ERROR);
58 if (NU_Deallocate_Partition(Buffer) != NU_SUCCESS)
59 return(OS_ERROR);
60 return(OS_OK);
61 }
62
63 GLOBAL LONG
64 os_AllocatePartition(OS_HANDLE TaskHandle, T_VOID_STRUCT **Buffer, ULONG Size,
65 ULONG Suspend, OS_HANDLE GroupHandle)
66 {
67 T_OS_PART_POOL *pool, *requested_pool;
68 ULONG nu_suspend;
69 STATUS sts;
70 int ret;
71
72 for (pool = PartGrpTable[GroupHandle].grp_head; pool;
73 pool = pool->next)
74 if (Size <= pool->size)
75 break;
76 if (!pool)
77 return(OS_ERROR);
78 requested_pool = pool;
79 ret = OS_OK;
80 nu_suspend = NU_NO_SUSPEND;
81 try_alloc:
82 sts = NU_Allocate_Partition(&pool->pcb, (VOID **) Buffer, nu_suspend);
83 switch (sts) {
84 case NU_SUCCESS:
85 return(ret);
86 case NU_TIMEOUT:
87 case NU_INVALID_SUSPEND:
88 *Buffer = 0;
89 return(OS_TIMEOUT);
90 case NU_NO_PARTITION:
91 pool = pool->next;
92 if (pool) {
93 ret = OS_ALLOCATED_BIGGER;
94 goto try_alloc;
95 }
96 pool = requested_pool;
97 if (Suspend) {
98 nu_suspend = Suspend;
99 ret = OS_WAITED;
100 goto try_alloc;
101 }
102 return(OS_TIMEOUT);
103 default:
104 *Buffer = 0;
105 return(OS_ERROR);
106 }
107 }