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
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
|
/*
* Copyright (C) 2001 Nikos Mavroyanopoulos
*
* This file is part of GNUTLS.
*
* GNUTLS is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* GNUTLS is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
*/
#include <gnutls_int.h>
#include <gnutls_errors.h>
#include <x509_asn1.h>
#include <gnutls_dh.h>
/* created by asn1c */
extern const static_asn pkcs1_asn1_tab[];
extern const static_asn pkix_asn1_tab[];
typedef void (*LOG_FUNC)( const char*);
LOG_FUNC _gnutls_log_func;
static node_asn *PKIX1_ASN;
static node_asn *PKCS1_ASN;
node_asn* _gnutls_get_pkix(void) {
return PKIX1_ASN;
}
node_asn* _gnutls_get_pkcs(void) {
return PKCS1_ASN;
}
/**
* gnutls_global_set_log_func - This function sets the logging function
* @log_func: it's a log function
*
* This is the function were you set the logging function gnutls
* is going to use. This function only accepts a character array.
* Normaly you may not use this function since
* it is only used for debugging reasons.
* LOG_FUNC is of the form,
* void (*LOG_FUNC)( const char*);
**/
void gnutls_global_set_log_func( LOG_FUNC log_func) {
_gnutls_log_func = log_func;
}
/* default logging function */
static void dlog( const char* str) {
#ifdef DEBUG
fprintf( stderr, str);
#endif
}
/**
* gnutls_global_init - This function initializes the global state to defaults.
*
* This function initializes the global state to defaults.
* Every gnutls application has a global state which holds common parameters
* shared by gnutls state structures.
* You must call gnutls_global_deinit() when gnutls usage is no longer needed
* Returns zero on success.
*
**/
int gnutls_global_init( void)
{
int result;
/* for gcrypt in order to be able to allocate memory */
gcry_set_allocation_handler(gnutls_malloc, gnutls_secure_malloc, _gnutls_is_secure_memory, gnutls_realloc, gnutls_free);
/* set default recv/send functions
*/
gnutls_global_set_log_func( dlog);
/* initialize parser
* This should not deal with files in the final
* version.
*/
result=asn1_create_tree( (void*)pkix_asn1_tab, &PKIX1_ASN);
if (result != ASN_OK) {
return GNUTLS_E_ASN1_PARSING_ERROR;
}
result=asn1_create_tree( (void*)pkcs1_asn1_tab, &PKCS1_ASN);
if (result != ASN_OK) {
asn1_delete_structure( PKIX1_ASN);
return GNUTLS_E_PARSING_ERROR;
}
result = _gnutls_dh_calc_mpis();
if (result < 0) {
gnutls_assert();
return result;
}
return 0;
}
/**
* gnutls_global_deinit - This function deinitializes the global state
*
* This function deinitializes the global state.
*
**/
void gnutls_global_deinit( void) {
asn1_delete_structure( PKCS1_ASN);
asn1_delete_structure( PKIX1_ASN);
_gnutls_dh_clear_mpis();
}
/* These functions should be elsewere. Kept here for
* historical reasons.
*/
/**
* gnutls_transport_set_pull_func - This function sets a read like function
* @pull_func: it's a function like read
* @state: gnutls state
*
* This is the function where you set a function for gnutls
* to receive data. Normaly, if you use berkeley style sockets,
* you may not use this function since the default (recv(2)) will
* probably be ok.
* This function should be called once and after gnutls_global_init().
* PULL_FUNC is of the form,
* ssize_t (*PULL_FUNC)(GNUTLS_SOCKET_PTR, const void*, size_t);
**/
void gnutls_transport_set_pull_func( GNUTLS_STATE state, PULL_FUNC pull_func) {
state->gnutls_internals._gnutls_pull_func = pull_func;
}
/**
* gnutls_transport_set_push_func - This function sets the function to send data
* @push_func: it's a function like write
* @state: gnutls state
*
* This is the function where you set a push function for gnutls
* to use in order to send data. If you are going to use berkeley style
* sockets, you may not use this function since
* the default (send(2)) will probably be ok. Otherwise you should
* specify this function for gnutls to be able to send data.
*
* This function should be called once and after gnutls_global_init().
* PUSH_FUNC is of the form,
* ssize_t (*PUSH_FUNC)(GNUTLS_SOCKET_PTR, const void*, size_t);
**/
void gnutls_transport_set_push_func( GNUTLS_STATE state, PUSH_FUNC push_func) {
state->gnutls_internals._gnutls_push_func = push_func;
}
|
