File: globus_error_string.c

package info (click to toggle)
globus-common 14.7-2
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 3,308 kB
  • sloc: ansic: 33,976; sh: 9,902; makefile: 532; perl: 342; xml: 322
file content (129 lines) | stat: -rw-r--r-- 2,921 bytes parent folder | download | duplicates (10)
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
/*
 * Copyright 1999-2006 University of Chicago
 * 
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 * 
 * http://www.apache.org/licenses/LICENSE-2.0
 * 
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */

#include "globus_error_string.h"
#include "globus_libc.h"
#include "globus_error.h"

/**
 * Allocate and initialize an error of type GLOBUS_ERROR_TYPE_STRING
 *
 * @param base_source
 * @param base_cause
 * @param fmt
 * @param ...
 */ 
extern
globus_object_t *
globus_error_construct_string(
    globus_module_descriptor_t *	base_source,
    globus_object_t *			base_cause,
    const char *			fmt,
    ...)
{
    globus_object_t *			error;
    globus_object_t *			newerror;
    va_list				ap;

    va_start(ap, fmt);

    newerror = globus_object_construct(GLOBUS_ERROR_TYPE_STRING);
    error = globus_error_initialize_string(
	    newerror,
	    base_source,
	    base_cause,
	    fmt,
	    ap);

    va_end(ap);
    if (error == NULL)
    {
	globus_object_free(newerror);
    }

    return error;
}
/* globus_error_construct_string() */

/* initialize and return an error of type
 * GLOBUS_ERROR_TYPE_STRING
 */
extern globus_object_t *
globus_error_initialize_string(
    globus_object_t *			error,
    globus_module_descriptor_t *	base_source,
    globus_object_t *			base_cause,
    const char *			fmt,
    va_list				ap)
{
    char *                              instance_data;
    int                                 len;
    va_list				ap_copy;

    globus_libc_va_copy(ap_copy,ap);
    len = globus_libc_vprintf_length(fmt,ap_copy) + 1;
    va_end(ap_copy);
    
    globus_libc_lock();

    instance_data = malloc(len);

    vsprintf(instance_data, fmt, ap);

    globus_libc_unlock();

    globus_object_set_local_instance_data(error, instance_data);

    return globus_error_initialize_base(error,
					base_source,
					base_cause);
}

static
void
globus_l_error_string_copy(
    void *				src,
    void **				dst)
{
    if(src == NULL || dst == NULL) return;
    (*dst) = (void *) globus_libc_strdup((char *)src);
}

static
void
globus_l_error_string_free(
    void *				data)
{
    globus_libc_free(data);
}

static
char *
globus_l_error_string_printable(
    globus_object_t *			error)
{
    return globus_libc_strdup(globus_object_get_local_instance_data(error));
}

const globus_object_type_t GLOBUS_ERROR_TYPE_STRING_DEFINITION
= globus_error_type_static_initializer (
	GLOBUS_ERROR_TYPE_BASE,
	globus_l_error_string_copy,
	globus_l_error_string_free,
	globus_l_error_string_printable);