← Back to branch summary

~ubuntu-branches/ubuntu/trusty/openjade1.3/trusty

« back to all changes in this revision

Viewing changes to lib/Allocator.cxx

  • Committer: Bazaar Package Importer
  • Author(s): Yann Dirson
  • Date: 2002-04-09 00:01:50 UTC
  • Revision ID: james.westby@ubuntu.com-20020409000150-r9rkyalxlhvf9ba3
Tags: upstream-1.3.1
Import upstream version 1.3.1

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/Allocator.cxx
 
1
// Copyright (c) 1994 James Clark
 
2
// See the file COPYING for copying permission.
 
3
 
 
4
#include "splib.h"
 
5
#include "Allocator.h"
 
6
#include "macros.h"
 
7
 
 
8
#ifdef SP_NAMESPACE
 
9
namespace SP_NAMESPACE {
 
10
#endif
 
11
 
 
12
Allocator::Allocator(size_t maxSize, unsigned blocksPerSegment)
 
13
: objectSize_(maxSize),
 
14
  blocksPerSegment_(blocksPerSegment),
 
15
  freeList_(0),
 
16
  segments_(0)
 
17
{
 
18
}
 
19
 
 
20
Allocator::~Allocator()
 
21
{
 
22
  SegmentHeader *p = segments_;
 
23
  while (p) {
 
24
    SegmentHeader *tem = p->next;
 
25
    if (p->liveCount == 0)
 
26
      ::operator delete(p);
 
27
    else
 
28
      p->freeList = 0;
 
29
    p = tem;
 
30
  }
 
31
}
 
32
 
 
33
void *Allocator::alloc(size_t sz)
 
34
{
 
35
  if (sz > objectSize_)
 
36
    tooBig(sz);
 
37
  Block *tem = freeList_;
 
38
  if (tem) {
 
39
    tem->header.seg->liveCount += 1;
 
40
    freeList_ = tem->next;
 
41
    return &(tem->next);
 
42
  }
 
43
  else
 
44
    return alloc1();
 
45
}
 
46
 
 
47
void *Allocator::allocSimple(size_t sz)
 
48
{
 
49
  BlockHeader *p = (BlockHeader *)::operator new(sz + sizeof(BlockHeader));
 
50
  p->seg = 0;
 
51
  return p + 1;
 
52
}
 
53
 
 
54
void Allocator::free(void *p)
 
55
{
 
56
  BlockHeader *b = ((BlockHeader *)p) - 1;
 
57
  SegmentHeader *seg = b->seg;
 
58
  if (seg == 0)
 
59
    ::operator delete(b);
 
60
  else {
 
61
    Block **freeList = seg->freeList;
 
62
    if (freeList == 0) {
 
63
      seg->liveCount -= 1;
 
64
      if (seg->liveCount == 0)
 
65
        ::operator delete(seg);
 
66
    }
 
67
    else {
 
68
      ((Block *)b)->next = *freeList;
 
69
      *freeList = (Block *)b;
 
70
      seg->liveCount -= 1;
 
71
    }
 
72
  }
 
73
}
 
74
 
 
75
void *Allocator::alloc1()
 
76
{
 
77
  SegmentHeader *seg
 
78
    = (SegmentHeader *)::operator new(sizeof(SegmentHeader)
 
79
                                      + ((objectSize_ + sizeof(BlockHeader))
 
80
                                         * blocksPerSegment_));
 
81
  seg->next = segments_;
 
82
  segments_ = seg;
 
83
  seg->liveCount = 1;
 
84
  seg->freeList = &freeList_;
 
85
  char *p = (char *)(seg + 1);
 
86
  Block *head = 0;
 
87
  for (size_t n = blocksPerSegment_; n > 0; n--) {
 
88
    ((Block *)p)->next = head;
 
89
    ((Block *)p)->header.seg = seg;
 
90
    head = (Block *)p;
 
91
    p += sizeof(BlockHeader) + objectSize_;
 
92
  }
 
93
  freeList_ = head->next;
 
94
  return &(head->next);
 
95
}
 
96
 
 
97
void Allocator::tooBig(size_t sz)
 
98
{
 
99
  ASSERT(sz <= objectSize_);
 
100
}
 
101
 
 
102
#ifdef SP_NAMESPACE
 
103
}
 
104
#endif