FazBrowse GitHub Viewer
|
Trending
|
URL:
|
Home
Tools:
[Download Repo ZIP]
[View Raw Code]
[Original HTTPS Page]
gnuplot/src/alloc.c at branch-5-0-stable · gnuplot/gnuplot · GitHub
gnuplot
gnuplot
Repository navigation
Code
Pull requests
2
(2)
Actions
Security and quality
Insights
Expand file tree
Breadcrumbs
gnuplot
/
src
/
alloc.c
Copy path
More file actions
More file actions
Latest commit
History
History
History
128 lines (111 loc) · 3.63 KB
Breadcrumbs
gnuplot
/
src
/
alloc.c
Copy path
File metadata and controls
128 lines (111 loc) · 3.63 KB
Raw
Copy raw file
Download raw file
Open symbols panel
Edit and raw actions
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
#ifndef
lint
static
char
*
RCSid
() {
return
RCSid
(
"$Id: alloc.c,v 1.17 2011/09/04 11:08:33 markisch Exp $"
); }
#endif
/* GNUPLOT - alloc.c */
/*[
* Copyright 1986 - 1993, 1998, 2004 Thomas Williams, Colin Kelley
*
* Permission to use, copy, and distribute this software and its
* documentation for any purpose with or without fee is hereby granted,
* provided that the above copyright notice appear in all copies and
* that both that copyright notice and this permission notice appear
* in supporting documentation.
*
* Permission to modify the software is granted, but not the right to
* distribute the complete modified source code. Modifications are to
* be distributed as patches to the released version. Permission to
* distribute binaries produced by compiling modified sources is granted,
* provided you
* 1. distribute the corresponding source modifications from the
* released version in the form of a patch file along with the binaries,
* 2. add special version identification to distinguish your version
* in addition to the base release version number,
* 3. provide your name and address as the primary contact for the
* support of your modified version, and
* 4. retain our contact information in regard to use of the base
* software.
* Permission to distribute the released version of the source code along
* with corresponding source modifications in the form of a patch file is
* granted with same provisions 2 through 4 for binary distributions.
*
* This software is provided "as is" without express or implied warranty
* to the extent permitted by applicable law.
]*/
/*
* AUTHORS
*
* Alexander Lehmann (collected functions from misc.c and binary.c)
*
*/
#include
"alloc.h"
#include
"util.h"
/* for int_error() */
#ifndef
GP_FARMALLOC
# ifdef
FARALLOC
# define
GP_FARMALLOC
(
size
) farmalloc ((size))
# define
GP_FARREALLOC
(
p
,
size
) farrealloc ((p), (size))
# else
# ifdef
MALLOC_ZERO_RETURNS_ZERO
# define
GP_FARMALLOC
(
size
) malloc ((size_t)((size==0)?1:size))
# else
# define
GP_FARMALLOC
(
size
) malloc ((size_t)(size))
# endif
# define
GP_FARREALLOC
(
p
,
size
) realloc ((p), (size_t)(size))
# endif
#endif
/* gp_alloc:
* allocate memory
* This is a protected version of malloc. It causes an int_error
* if there is not enough memory. If message is NULL, we allow NULL return.
* Otherwise, we handle the error, using the message to create the int_error string.
* Note cp/sp_extend uses realloc, so it depends on this using malloc().
*/
generic
*
gp_alloc
(
size_t
size
,
const
char
*
message
)
{
char
*
p
;
/* the new allocation */
p
=
GP_FARMALLOC
(
size
);
/* try again */
if
(
p
==
NULL
) {
/* really out of memory */
if
(
message
!=
NULL
) {
int_error
(
NO_CARET
,
"out of memory for %s"
,
message
);
/* NOTREACHED */
}
/* else we return NULL */
}
return
(
p
);
}
/*
* note gp_realloc assumes that failed realloc calls leave the original mem
* block allocated. If this is not the case with any C compiler, a substitue
* realloc function has to be used.
*/
generic
*
gp_realloc
(
generic
*
p
,
size_t
size
,
const
char
*
message
)
{
char
*
res
;
/* the new allocation */
/* realloc(NULL,x) is meant to do malloc(x), but doesn't always */
if
(!
p
)
return
gp_alloc
(
size
,
message
);
res
=
GP_FARREALLOC
(
p
,
size
);
if
(
res
==
(
char
*
)
NULL
) {
if
(
message
!=
NULL
) {
int_error
(
NO_CARET
,
"out of memory for %s"
,
message
);
/* NOTREACHED */
}
/* else we return NULL */
}
return
(
res
);
}
#ifdef
FARALLOC
void
gpfree
(
generic
*
p
)
{
#ifdef
_Windows
HGLOBAL
hGlobal
=
GlobalHandle
(
p
);
GlobalUnlock
(
hGlobal
);
GlobalFree
(
hGlobal
);
#else
farfree
(
p
);
#endif
}
#endif
Back
|
FazBrowse Home
|
New Git URL