|
dvander@12
|
1 |
/* |
|
dvander@12
|
2 |
* Copyright (C) 2012 David Anderson |
|
dvander@12
|
3 |
* |
|
dvander@12
|
4 |
* This file is part of JITCraft. |
|
dvander@12
|
5 |
* |
|
dvander@12
|
6 |
* JITCraft is free software: you can redistribute it and/or modify it under |
|
dvander@12
|
7 |
* the terms of the GNU General Public License as published by the Free |
|
dvander@12
|
8 |
* Software Foundation, either version 3 of the License, or (at your option) |
|
dvander@12
|
9 |
* any later version. |
|
dvander@12
|
10 |
* |
|
dvander@12
|
11 |
* Foobar is distributed in the hope that it will be useful, but WITHOUT ANY |
|
dvander@12
|
12 |
* WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS |
|
dvander@12
|
13 |
* FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. |
|
dvander@12
|
14 |
* |
|
dvander@12
|
15 |
* You should have received a copy of the GNU General Public License along with |
|
dvander@12
|
16 |
* JITCraft. If not, see http://www.gnu.org/licenses/. |
|
dvander@12
|
17 |
*/ |
|
dvander@12
|
18 |
#include <limits.h> |
|
danderson@91
|
19 |
#include <string.h> |
|
dvander@12
|
20 |
#include "FixedArray.h" |
|
dvander@12
|
21 |
#include "Zone.h" |
|
dvander@28
|
22 |
#include "Heap-inl.h" |
|
dvander@12
|
23 |
|
|
dvander@59
|
24 |
using namespace ke; |
|
dvander@12
|
25 |
|
|
dvander@59
|
26 |
static const unsigned kMaxFixedArrayLength = ((INT_MAX - sizeof(FixedArray)) / sizeof(ke::Object *)); |
|
dvander@12
|
27 |
|
|
dvander@12
|
28 |
FixedArray * |
|
dvander@12
|
29 |
FixedArray::New(Zone *zone, unsigned length, Heap::Tenure tenure) |
|
dvander@12
|
30 |
{ |
|
dvander@12
|
31 |
if (length >= kMaxFixedArrayLength) { |
|
dvander@69
|
32 |
zone->reportError(Message_ArrayTooBig); |
|
dvander@12
|
33 |
return NULL; |
|
dvander@12
|
34 |
} |
|
dvander@12
|
35 |
|
|
dvander@35
|
36 |
Local<FixedArray> array(zone, FixedArray::cast(zone->allocate(MapKind_FixedArray, SizeFor(length), tenure))); |
|
dvander@35
|
37 |
if (!array) |
|
dvander@12
|
38 |
return NULL; |
|
dvander@12
|
39 |
|
|
dvander@13
|
40 |
array->length_ = length; |
|
dvander@53
|
41 |
memset(array->vec(), 0, length * sizeof(Object *)); |
|
dvander@12
|
42 |
return array; |
|
dvander@12
|
43 |
} |
|
dvander@12
|
44 |
|
|
dvander@12
|
45 |
ByteArray * |
|
dvander@12
|
46 |
ByteArray::New(Zone *zone, unsigned length, Heap::Tenure tenure) |
|
dvander@12
|
47 |
{ |
|
dvander@12
|
48 |
if (length >= kMaxFixedArrayLength) { |
|
dvander@69
|
49 |
zone->reportError(Message_ArrayTooBig); |
|
dvander@12
|
50 |
return NULL; |
|
dvander@12
|
51 |
} |
|
dvander@12
|
52 |
|
|
dvander@35
|
53 |
Local<ByteArray> array(zone, ByteArray::cast(zone->allocate(MapKind_ByteArray, SizeFor(length), tenure))); |
|
dvander@35
|
54 |
if (!array) |
|
dvander@12
|
55 |
return NULL; |
|
dvander@12
|
56 |
|
|
dvander@13
|
57 |
array->length_ = length; |
|
dvander@53
|
58 |
memset(array->raw(), 0, length); |
|
dvander@12
|
59 |
return array; |
|
dvander@12
|
60 |
} |
|
dvander@12
|
61 |
|
|
dvander@85
|
62 |
ByteArray * |
|
dvander@85
|
63 |
ByteArray::New(Zone *zone, Handle<Map> map, unsigned length, Heap::Tenure tenure) |
|
dvander@85
|
64 |
{ |
|
dvander@85
|
65 |
if (length >= kMaxFixedArrayLength) { |
|
dvander@85
|
66 |
zone->reportError(Message_ArrayTooBig); |
|
dvander@85
|
67 |
return NULL; |
|
dvander@85
|
68 |
} |
|
dvander@85
|
69 |
|
|
dvander@85
|
70 |
Local<ByteArray> array(zone, ByteArray::cast(zone->allocate(map, SizeFor(length), tenure))); |
|
dvander@85
|
71 |
if (!array) |
|
dvander@85
|
72 |
return NULL; |
|
dvander@85
|
73 |
|
|
dvander@85
|
74 |
array->length_ = length; |
|
dvander@85
|
75 |
memset(array->raw(), 0, length); |
|
dvander@85
|
76 |
return array; |
|
dvander@85
|
77 |
} |