Page Menu
Home
GnuPG
Search
Configure Global Search
Log In
Files
F26446527
writer.c
No One
Temporary
Actions
Download File
Edit File
Delete File
View Transforms
Subscribe
Mute Notifications
Award Token
Size
10 KB
Subscribers
None
writer.c
View Options
/* writer.c - provides the Writer object
* Copyright (C) 2001 g10 Code GmbH
*
* This file is part of KSBA.
*
* KSBA 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.
*
* KSBA 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
* USA.
*/
#include
<config.h>
#include
<stdio.h>
#include
<stdlib.h>
#include
<string.h>
#include
<assert.h>
#include
<errno.h>
#include
"util.h"
#include
"ksba.h"
#include
"writer.h"
#include
"asn1-func.h"
#include
"ber-help.h"
/**
* ksba_writer_new:
*
* Create a new but uninitialized ksba_writer_t Object. Using this
* write object in unitialized state does always return an error.
*
* Return value: ksba_writer_t object or an error code.
**/
gpg_error_t
ksba_writer_new
(
ksba_writer_t
*
r_w
)
{
*
r_w
=
xtrycalloc
(
1
,
sizeof
**
r_w
);
if
(
!*
r_w
)
return
gpg_error_from_errno
(
errno
);
return
0
;
}
/**
* ksba_writer_release:
* @w: Writer Object (or NULL)
*
* Release this object
**/
void
ksba_writer_release
(
ksba_writer_t
w
)
{
if
(
!
w
)
return
;
if
(
w
->
type
==
WRITER_TYPE_MEM
)
xfree
(
w
->
u
.
mem
.
buffer
);
xfree
(
w
);
}
int
ksba_writer_error
(
ksba_writer_t
w
)
{
return
w
?
gpg_error_from_errno
(
w
->
error
)
:
gpg_error
(
GPG_ERR_INV_VALUE
);
}
unsigned
long
ksba_writer_tell
(
ksba_writer_t
w
)
{
return
w
?
w
->
nwritten
:
0
;
}
/**
* ksba_writer_set_fd:
* @w: Writer object
* @fd: file descriptor
*
* Initialize the Writer object with a file descriptor, so that write
* operations on this object are excuted on this file descriptor.
*
* Return value:
**/
gpg_error_t
ksba_writer_set_fd
(
ksba_writer_t
w
,
int
fd
)
{
if
(
!
w
||
fd
==
-1
)
return
gpg_error
(
GPG_ERR_INV_VALUE
);
if
(
w
->
type
)
return
gpg_error
(
GPG_ERR_CONFLICT
);
w
->
error
=
0
;
w
->
type
=
WRITER_TYPE_FD
;
w
->
u
.
fd
=
fd
;
return
0
;
}
/**
* ksba_writer_set_file:
* @w: Writer object
* @fp: file pointer
*
* Initialize the Writer object with a stdio file pointer, so that write
* operations on this object are excuted on this stream
*
* Return value:
**/
gpg_error_t
ksba_writer_set_file
(
ksba_writer_t
w
,
FILE
*
fp
)
{
if
(
!
w
||
!
fp
)
return
gpg_error
(
GPG_ERR_INV_VALUE
);
if
(
w
->
type
)
return
gpg_error
(
GPG_ERR_CONFLICT
);
w
->
error
=
0
;
w
->
type
=
WRITER_TYPE_FILE
;
w
->
u
.
file
=
fp
;
return
0
;
}
/**
* ksba_writer_set_cb:
* @w: Writer object
* @cb: Callback function
* @cb_value: Value passed to the callback function
*
* Initialize the writer object with a callback function.
* This callback function is defined as:
* <literal>
* typedef int (*cb) (void *cb_value,
* const void *buffer, size_t count);
* </literal>
*
* The callback is expected to process all @count bytes from @buffer
* @count should not be 0 and @buffer should not be %NULL
* The callback should return 0 on success or an %KSBA_xxx error code.
*
* Return value: 0 on success or an error code
**/
gpg_error_t
ksba_writer_set_cb
(
ksba_writer_t
w
,
int
(
*
cb
)(
void
*
,
const
void
*
,
size_t
),
void
*
cb_value
)
{
if
(
!
w
||
!
cb
)
return
gpg_error
(
GPG_ERR_INV_VALUE
);
if
(
w
->
type
)
return
gpg_error
(
GPG_ERR_CONFLICT
);
w
->
error
=
0
;
w
->
type
=
WRITER_TYPE_CB
;
w
->
u
.
cb
.
fnc
=
cb
;
w
->
u
.
cb
.
value
=
cb_value
;
return
0
;
}
gpg_error_t
ksba_writer_set_mem
(
ksba_writer_t
w
,
size_t
initial_size
)
{
if
(
!
w
)
return
gpg_error
(
GPG_ERR_INV_VALUE
);
if
(
w
->
type
==
WRITER_TYPE_MEM
)
;
/* Reuse the buffer (we ignore the initial size)*/
else
{
if
(
w
->
type
)
return
gpg_error
(
GPG_ERR_CONFLICT
);
if
(
!
initial_size
)
initial_size
=
1024
;
w
->
u
.
mem
.
buffer
=
xtrymalloc
(
initial_size
);
if
(
!
w
->
u
.
mem
.
buffer
)
return
gpg_error
(
GPG_ERR_ENOMEM
);
w
->
u
.
mem
.
size
=
initial_size
;
w
->
type
=
WRITER_TYPE_MEM
;
}
w
->
error
=
0
;
w
->
nwritten
=
0
;
return
0
;
}
/* Return the pointer to the memory and the size of it. This pointer
is valid as long as the writer object is valid and no write
operations takes place (because they might reallocate the buffer).
if NBYTES is not NULL, it will receive the number of bytes in this
buffer which is the same value ksba_writer_tell() returns.
In case of an error NULL is returned.
*/
const
void
*
ksba_writer_get_mem
(
ksba_writer_t
w
,
size_t
*
nbytes
)
{
if
(
!
w
||
w
->
type
!=
WRITER_TYPE_MEM
||
w
->
error
)
return
NULL
;
if
(
nbytes
)
*
nbytes
=
w
->
nwritten
;
return
w
->
u
.
mem
.
buffer
;
}
/* Return the the memory and the size of it. The writer object is set
back into the uninitalized state; i.e. one of the
ksab_writer_set_xxx () must be used before all other operations.
if NBYTES is not NULL, it will receive the number of bytes in this
buffer which is the same value ksba_writer_tell() returns.
In case of an error NULL is returned. */
void
*
ksba_writer_snatch_mem
(
ksba_writer_t
w
,
size_t
*
nbytes
)
{
void
*
p
;
if
(
!
w
||
w
->
type
!=
WRITER_TYPE_MEM
||
w
->
error
)
return
NULL
;
if
(
nbytes
)
*
nbytes
=
w
->
nwritten
;
p
=
w
->
u
.
mem
.
buffer
;
w
->
u
.
mem
.
buffer
=
NULL
;
w
->
type
=
0
;
w
->
nwritten
=
0
;
return
p
;
}
gpg_error_t
ksba_writer_set_filter
(
ksba_writer_t
w
,
gpg_error_t
(
*
filter
)(
void
*
,
const
void
*
,
size_t
,
size_t
*
,
void
*
,
size_t
,
size_t
*
),
void
*
filter_arg
)
{
if
(
!
w
)
return
gpg_error
(
GPG_ERR_INV_VALUE
);
w
->
filter
=
filter
;
w
->
filter_arg
=
filter_arg
;
return
0
;
}
static
gpg_error_t
do_writer_write
(
ksba_writer_t
w
,
const
void
*
buffer
,
size_t
length
)
{
if
(
!
w
->
type
)
{
w
->
error
=
EINVAL
;
return
gpg_error_from_errno
(
w
->
error
);
}
else
if
(
w
->
type
==
WRITER_TYPE_MEM
)
{
if
(
w
->
error
==
ENOMEM
)
return
gpg_error
(
GPG_ERR_ENOMEM
);
/* it does not make sense to proceed then */
if
(
w
->
nwritten
+
length
>
w
->
u
.
mem
.
size
)
{
size_t
newsize
=
w
->
nwritten
+
length
;
char
*
p
;
newsize
=
((
newsize
+
4095
)
/
4096
)
*
4096
;
if
(
newsize
<
16384
)
newsize
+=
4096
;
else
newsize
+=
16384
;
p
=
xtryrealloc
(
w
->
u
.
mem
.
buffer
,
newsize
);
if
(
!
p
)
{
/* Keep an error flag so that the user does not need to
check the return code of a write but instead use
ksba_writer_error() to check for it or even figure
this state out when using ksba_writer_get_mem() */
w
->
error
=
ENOMEM
;
return
gpg_error
(
GPG_ERR_ENOMEM
);
}
w
->
u
.
mem
.
buffer
=
p
;
w
->
u
.
mem
.
size
=
newsize
;
/* Better check again in case of an overwrap. */
if
(
w
->
nwritten
+
length
>
w
->
u
.
mem
.
size
)
return
gpg_error
(
GPG_ERR_ENOMEM
);
}
memcpy
(
w
->
u
.
mem
.
buffer
+
w
->
nwritten
,
buffer
,
length
);
w
->
nwritten
+=
length
;
}
else
if
(
w
->
type
==
WRITER_TYPE_FILE
)
{
if
(
!
length
)
return
0
;
if
(
fwrite
(
buffer
,
length
,
1
,
w
->
u
.
file
)
==
1
)
{
w
->
nwritten
+=
length
;
}
else
{
w
->
error
=
errno
;
return
gpg_error_from_errno
(
errno
);
}
}
else
if
(
w
->
type
==
WRITER_TYPE_CB
)
{
int
err
=
w
->
u
.
cb
.
fnc
(
w
->
u
.
cb
.
value
,
buffer
,
length
);
if
(
err
)
return
err
;
w
->
nwritten
+=
length
;
}
else
return
gpg_error
(
GPG_ERR_BUG
);
return
0
;
}
/**
* ksba_writer_write:
* @w: Writer object
* @buffer: A buffer with the data to be written
* @length: The length of this buffer
*
* Write @length bytes from @buffer.
*
* Return value: 0 on success or an error code
**/
gpg_error_t
ksba_writer_write
(
ksba_writer_t
w
,
const
void
*
buffer
,
size_t
length
)
{
gpg_error_t
err
=
0
;
if
(
!
w
)
return
gpg_error
(
GPG_ERR_INV_VALUE
);
if
(
!
buffer
)
return
gpg_error
(
GPG_ERR_NOT_IMPLEMENTED
);
if
(
w
->
filter
)
{
char
outbuf
[
4096
];
size_t
nin
,
nout
;
const
char
*
p
=
buffer
;
while
(
length
)
{
err
=
w
->
filter
(
w
->
filter_arg
,
p
,
length
,
&
nin
,
outbuf
,
sizeof
(
outbuf
),
&
nout
);
if
(
err
)
break
;
if
(
nin
>
length
||
nout
>
sizeof
(
outbuf
))
return
gpg_error
(
GPG_ERR_BUG
);
/* tsss, someone else made an error */
err
=
do_writer_write
(
w
,
outbuf
,
nout
);
if
(
err
)
break
;
length
-=
nin
;
p
+=
nin
;
}
}
else
{
err
=
do_writer_write
(
w
,
buffer
,
length
);
}
return
err
;
}
/* Write LENGTH bytes of BUFFER to W while encoding it as an BER
encoded octet string. With FLUSH set to 1 the octet stream will be
terminated. If the entire octet string is available in BUFFER it
is a good idea to set FLUSH to 1 so that the function does not need
to encode the string partially. */
gpg_error_t
ksba_writer_write_octet_string
(
ksba_writer_t
w
,
const
void
*
buffer
,
size_t
length
,
int
flush
)
{
gpg_error_t
err
=
0
;
if
(
!
w
)
return
gpg_error
(
GPG_ERR_INV_VALUE
);
if
(
buffer
&&
length
)
{
if
(
!
w
->
ndef_is_open
&&
!
flush
)
{
err
=
_ksba_ber_write_tl
(
w
,
TYPE_OCTET_STRING
,
CLASS_UNIVERSAL
,
1
,
0
);
if
(
err
)
return
err
;
w
->
ndef_is_open
=
1
;
}
err
=
_ksba_ber_write_tl
(
w
,
TYPE_OCTET_STRING
,
CLASS_UNIVERSAL
,
0
,
length
);
if
(
!
err
)
err
=
ksba_writer_write
(
w
,
buffer
,
length
);
}
if
(
!
err
&&
flush
&&
w
->
ndef_is_open
)
/* write an end tag */
err
=
_ksba_ber_write_tl
(
w
,
0
,
0
,
0
,
0
);
if
(
flush
)
/* Reset it even in case of an error. */
w
->
ndef_is_open
=
1
;
return
err
;
}
File Metadata
Details
Attached
Mime Type
text/x-c
Expires
Thu, Jul 17, 1:19 AM (7 h, 48 m)
Storage Engine
local-disk
Storage Format
Raw Data
Storage Handle
5e/69/bac28f4f751193a97dd09556e8f9
Attached To
rK libksba
Event Timeline
Log In to Comment