Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
A
asn1c
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
0
Issues
0
List
Boards
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Analytics
Analytics
CI / CD
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
Libraries
asn1c
Commits
9218bc1e
Commit
9218bc1e
authored
Jun 27, 2007
by
Lev Walkin
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
shared stuff split off to per_opentype.[ch]
parent
dbd091a2
Changes
6
Hide whitespace changes
Inline
Side-by-side
Showing
6 changed files
with
276 additions
and
234 deletions
+276
-234
skeletons/constr_SEQUENCE.c
skeletons/constr_SEQUENCE.c
+4
-232
skeletons/file-dependencies
skeletons/file-dependencies
+1
-0
skeletons/per_opentype.c
skeletons/per_opentype.c
+245
-0
skeletons/per_opentype.h
skeletons/per_opentype.h
+22
-0
skeletons/per_support.c
skeletons/per_support.c
+2
-1
skeletons/per_support.h
skeletons/per_support.h
+2
-1
No files found.
skeletons/constr_SEQUENCE.c
View file @
9218bc1e
...
@@ -5,6 +5,7 @@
...
@@ -5,6 +5,7 @@
*/
*/
#include <asn_internal.h>
#include <asn_internal.h>
#include <constr_SEQUENCE.h>
#include <constr_SEQUENCE.h>
#include <per_opentype.h>
/*
/*
* Number of bytes left for this structure.
* Number of bytes left for this structure.
...
@@ -1026,235 +1027,6 @@ SEQUENCE_constraint(asn_TYPE_descriptor_t *td, const void *sptr,
...
@@ -1026,235 +1027,6 @@ SEQUENCE_constraint(asn_TYPE_descriptor_t *td, const void *sptr,
return
0
;
return
0
;
}
}
/*
* #10.1, #10.2
*/
static
int
uper_put_open_type
(
asn_TYPE_descriptor_t
*
td
,
asn_per_constraints_t
*
constraints
,
void
*
sptr
,
asn_per_outp_t
*
po
)
{
void
*
buf
;
ssize_t
size
;
ASN_DEBUG
(
"Encoding as open type %s"
,
td
->
name
);
size
=
uper_encode_to_new_buffer
(
td
,
constraints
,
sptr
,
&
buf
);
if
(
size
<=
0
)
return
-
1
;
ASN_DEBUG
(
"Putting %s of length %d"
,
td
->
name
,
size
);
while
(
size
)
{
ssize_t
maySave
=
uper_put_length
(
po
,
size
);
if
(
maySave
<
0
)
break
;
if
(
per_put_many_bits
(
po
,
buf
,
maySave
*
8
))
break
;
buf
=
(
char
*
)
buf
+
maySave
;
size
-=
maySave
;
}
if
(
size
)
{
FREEMEM
(
buf
);
return
-
1
;
}
return
0
;
}
typedef
struct
uper_ugot_key
{
asn_per_data_t
oldpd
;
/* Old per data source */
size_t
unclaimed
;
size_t
ot_moved
;
/* Number of bits moved by OT processing */
int
repeat
;
}
uper_ugot_key
;
static
int
uper_ugot_refill
(
asn_per_data_t
*
pd
)
{
uper_ugot_key
*
arg
=
pd
->
refill_key
;
ssize_t
next_chunk_bytes
,
next_chunk_bits
;
ssize_t
avail
;
asn_per_data_t
*
oldpd
=
&
arg
->
oldpd
;
ASN_DEBUG
(
"REFILLING (%+db) [from %d (%d->%d)_%d] now [%d (%d->%d)_%d] uncl %d"
,
pd
->
buffer
-
oldpd
->
buffer
,
oldpd
->
nbits
-
oldpd
->
nboff
,
oldpd
->
nboff
,
oldpd
->
nbits
,
oldpd
->
moved
,
pd
->
nbits
-
pd
->
nboff
,
pd
->
nboff
,
pd
->
nbits
,
pd
->
moved
,
arg
->
unclaimed
);
/* Advance our position to where pd is */
oldpd
->
buffer
=
pd
->
buffer
;
oldpd
->
nboff
=
pd
->
nboff
;
oldpd
->
nbits
-=
pd
->
moved
-
arg
->
ot_moved
;
oldpd
->
moved
+=
pd
->
moved
-
arg
->
ot_moved
;
arg
->
ot_moved
=
pd
->
moved
;
if
(
arg
->
unclaimed
)
{
/* Refill the container */
if
(
per_get_few_bits
(
oldpd
,
1
))
return
-
1
;
if
(
oldpd
->
nboff
==
0
)
{
assert
(
0
);
return
-
1
;
}
pd
->
buffer
=
oldpd
->
buffer
;
pd
->
nboff
=
oldpd
->
nboff
-
1
;
pd
->
nbits
=
oldpd
->
nbits
;
ASN_DEBUG
(
"Return from UNCLAIMED"
);
return
0
;
}
if
(
!
arg
->
repeat
)
{
ASN_DEBUG
(
"Want more but refill doesn't have it"
);
return
-
1
;
}
next_chunk_bytes
=
uper_get_length
(
oldpd
,
-
1
,
&
arg
->
repeat
);
ASN_DEBUG
(
"Open type LENGTH %d bytes at off %d, repeat %d"
,
next_chunk_bytes
,
oldpd
->
moved
,
arg
->
repeat
);
if
(
next_chunk_bytes
<
0
)
return
-
1
;
if
(
next_chunk_bytes
==
0
)
{
pd
->
refill
=
0
;
/* No more refills, naturally */
assert
(
!
arg
->
repeat
);
/* Implementation guarantee */
}
next_chunk_bits
=
next_chunk_bytes
<<
3
;
avail
=
oldpd
->
nbits
-
oldpd
->
nboff
;
if
(
avail
>=
next_chunk_bits
)
{
pd
->
nbits
=
oldpd
->
nboff
+
next_chunk_bits
;
arg
->
unclaimed
=
0
;
}
else
{
pd
->
nbits
=
oldpd
->
nbits
;
arg
->
unclaimed
=
next_chunk_bits
-
avail
;
ASN_DEBUG
(
"Parent has %d, require %d, will claim %d"
,
avail
,
next_chunk_bits
,
arg
->
unclaimed
);
}
pd
->
buffer
=
oldpd
->
buffer
;
pd
->
nboff
=
oldpd
->
nboff
;
return
0
;
}
asn_dec_rval_t
uper_get_open_type
(
asn_codec_ctx_t
*
opt_codec_ctx
,
asn_TYPE_descriptor_t
*
td
,
asn_per_constraints_t
*
constraints
,
void
**
sptr
,
asn_per_data_t
*
pd
)
{
uper_ugot_key
arg
;
asn_dec_rval_t
rv
;
ssize_t
padding
;
_ASN_STACK_OVERFLOW_CHECK
(
opt_codec_ctx
);
ASN_DEBUG
(
"Getting open type off %d (%d+%d), %p"
,
pd
->
moved
,
pd
->
nboff
,
pd
->
nbits
,
pd
->
buffer
);
arg
.
oldpd
=
*
pd
;
arg
.
unclaimed
=
0
;
arg
.
ot_moved
=
0
;
arg
.
repeat
=
1
;
pd
->
refill
=
uper_ugot_refill
;
pd
->
refill_key
=
&
arg
;
pd
->
nbits
=
pd
->
nboff
;
/* 0 good bits at this point, will refill */
pd
->
moved
=
0
;
/* This now counts the open type size in bits */
rv
=
td
->
uper_decoder
(
opt_codec_ctx
,
td
,
constraints
,
sptr
,
pd
);
ASN_DEBUG
(
"Open type %s consumed %d off of %d unclaimed=%d, repeat=%d"
,
td
->
name
,
pd
->
moved
,
arg
.
oldpd
.
moved
,
arg
.
unclaimed
,
arg
.
repeat
);
ASN_DEBUG
(
"OT1 moved %d, estimated %d uncl=%d"
,
arg
.
oldpd
.
moved
,
arg
.
oldpd
.
nboff
+
((((
int
)
arg
.
oldpd
.
buffer
)
&
0x7
)
<<
3
),
arg
.
unclaimed
);
padding
=
pd
->
moved
%
8
;
if
(
padding
)
{
int32_t
pvalue
;
if
(
padding
>
7
)
{
ASN_DEBUG
(
"Too large padding %d in open type"
,
padding
);
rv
.
code
=
RC_FAIL
;
return
rv
;
}
padding
=
8
-
padding
;
ASN_DEBUG
(
"Getting padding of %d bits"
,
padding
);
pvalue
=
per_get_few_bits
(
pd
,
padding
);
switch
(
pvalue
)
{
case
-
1
:
ASN_DEBUG
(
"Padding skip failed"
);
_ASN_DECODE_STARVED
;
case
0
:
break
;
default:
ASN_DEBUG
(
"Non-blank padding (%d bits 0x%02x)"
,
padding
,
pvalue
);
_ASN_DECODE_FAILED
;
}
}
if
(
pd
->
nbits
!=
pd
->
nboff
)
{
ASN_DEBUG
(
"Open type container overhead of %d bits!"
,
pd
->
nbits
-
pd
->
nboff
);
if
(
1
)
_ASN_DECODE_FAILED
;
arg
.
unclaimed
+=
pd
->
nbits
-
pd
->
nboff
;
}
/* Adjust pd back so it points to original data */
pd
->
nbits
=
arg
.
oldpd
.
nbits
-
(
pd
->
moved
-
arg
.
ot_moved
);
pd
->
moved
=
arg
.
oldpd
.
moved
+
(
pd
->
moved
-
arg
.
ot_moved
);
pd
->
refill
=
arg
.
oldpd
.
refill
;
pd
->
refill_key
=
arg
.
oldpd
.
refill_key
;
/* Skip data not consumed by the decoder */
if
(
arg
.
unclaimed
)
ASN_DEBUG
(
"Getting unclaimed %d"
,
arg
.
unclaimed
);
while
(
arg
.
unclaimed
)
{
size_t
toget
=
24
;
if
(
arg
.
unclaimed
<
toget
)
toget
=
arg
.
unclaimed
;
arg
.
unclaimed
-=
toget
;
switch
(
per_get_few_bits
(
pd
,
toget
))
{
case
-
1
:
ASN_DEBUG
(
"Claim of %d failed"
,
toget
);
_ASN_DECODE_STARVED
;
case
0
:
ASN_DEBUG
(
"Got claim of %d"
,
toget
);
continue
;
default:
/* Padding must be blank */
ASN_DEBUG
(
"Non-blank unconsumed padding"
);
_ASN_DECODE_FAILED
;
}
}
assert
(
pd
->
moved
==
pd
->
nboff
+
((((
int
)
pd
->
buffer
)
&
0x7
)
<<
3
));
if
(
arg
.
repeat
)
{
ASN_DEBUG
(
"Not consumed the whole thing"
);
rv
.
code
=
RC_FAIL
;
return
rv
;
}
return
rv
;
}
asn_dec_rval_t
uper_sot_suck
(
asn_codec_ctx_t
*
opt_codec_ctx
,
asn_TYPE_descriptor_t
*
td
,
asn_per_constraints_t
*
constraints
,
void
**
sptr
,
asn_per_data_t
*
pd
)
{
asn_dec_rval_t
rv
;
(
void
)
opt_codec_ctx
;
(
void
)
td
;
(
void
)
constraints
;
(
void
)
sptr
;
while
(
per_get_few_bits
(
pd
,
24
)
>=
0
);
rv
.
code
=
RC_OK
;
rv
.
consumed
=
pd
->
moved
;
return
rv
;
}
static
int
uper_skip_open_type
(
asn_codec_ctx_t
*
opt_codec_ctx
,
asn_per_data_t
*
pd
)
{
asn_TYPE_descriptor_t
s_td
;
asn_dec_rval_t
rv
;
s_td
.
name
=
"<unknown extension>"
;
s_td
.
uper_decoder
=
uper_sot_suck
;
rv
=
uper_get_open_type
(
opt_codec_ctx
,
&
s_td
,
0
,
0
,
pd
);
if
(
rv
.
code
!=
RC_OK
)
return
-
1
;
else
return
0
;
}
asn_dec_rval_t
asn_dec_rval_t
SEQUENCE_decode_uper
(
asn_codec_ctx_t
*
opt_codec_ctx
,
asn_TYPE_descriptor_t
*
td
,
SEQUENCE_decode_uper
(
asn_codec_ctx_t
*
opt_codec_ctx
,
asn_TYPE_descriptor_t
*
td
,
asn_per_constraints_t
*
constraints
,
void
**
sptr
,
asn_per_data_t
*
pd
)
{
asn_per_constraints_t
*
constraints
,
void
**
sptr
,
asn_per_data_t
*
pd
)
{
...
@@ -1413,7 +1185,7 @@ SEQUENCE_decode_uper(asn_codec_ctx_t *opt_codec_ctx, asn_TYPE_descriptor_t *td,
...
@@ -1413,7 +1185,7 @@ SEQUENCE_decode_uper(asn_codec_ctx_t *opt_codec_ctx, asn_TYPE_descriptor_t *td,
}
}
ASN_DEBUG
(
"Decoding member %s in %s %p"
,
elm
->
name
,
td
->
name
,
*
memb_ptr2
);
ASN_DEBUG
(
"Decoding member %s in %s %p"
,
elm
->
name
,
td
->
name
,
*
memb_ptr2
);
rv
=
uper_
get_open_type
(
opt_codec_ctx
,
elm
->
type
,
rv
=
uper_
open_type_get
(
opt_codec_ctx
,
elm
->
type
,
elm
->
per_constraints
,
memb_ptr2
,
pd
);
elm
->
per_constraints
,
memb_ptr2
,
pd
);
if
(
rv
.
code
!=
RC_OK
)
{
if
(
rv
.
code
!=
RC_OK
)
{
FREEMEM
(
epres
);
FREEMEM
(
epres
);
...
@@ -1429,7 +1201,7 @@ SEQUENCE_decode_uper(asn_codec_ctx_t *opt_codec_ctx, asn_TYPE_descriptor_t *td,
...
@@ -1429,7 +1201,7 @@ SEQUENCE_decode_uper(asn_codec_ctx_t *opt_codec_ctx, asn_TYPE_descriptor_t *td,
case
-
1
:
break
;
case
-
1
:
break
;
case
0
:
continue
;
case
0
:
continue
;
default:
default:
if
(
uper_
skip_open_type
(
opt_codec_ctx
,
pd
))
{
if
(
uper_
open_type_skip
(
opt_codec_ctx
,
pd
))
{
FREEMEM
(
epres
);
FREEMEM
(
epres
);
_ASN_DECODE_STARVED
;
_ASN_DECODE_STARVED
;
}
}
...
@@ -1511,7 +1283,7 @@ SEQUENCE_handle_extensions(asn_TYPE_descriptor_t *td, void *sptr,
...
@@ -1511,7 +1283,7 @@ SEQUENCE_handle_extensions(asn_TYPE_descriptor_t *td, void *sptr,
if
(
po1
&&
per_put_few_bits
(
po1
,
present
,
1
))
if
(
po1
&&
per_put_few_bits
(
po1
,
present
,
1
))
return
-
1
;
return
-
1
;
/* Encode as open type field */
/* Encode as open type field */
if
(
po2
&&
present
&&
uper_
put_open_type
(
elm
->
type
,
if
(
po2
&&
present
&&
uper_
open_type_put
(
elm
->
type
,
elm
->
per_constraints
,
*
memb_ptr2
,
po2
))
elm
->
per_constraints
,
*
memb_ptr2
,
po2
))
return
-
1
;
return
-
1
;
...
...
skeletons/file-dependencies
View file @
9218bc1e
...
@@ -61,6 +61,7 @@ xer_encoder.h xer_encoder.c # XER encoding support
...
@@ -61,6 +61,7 @@ xer_encoder.h xer_encoder.c # XER encoding support
per_support.h per_support.c # PER parsing
per_support.h per_support.c # PER parsing
per_decoder.h per_decoder.c # PER decoding support
per_decoder.h per_decoder.c # PER decoding support
per_encoder.h per_encoder.c # PER encoding support
per_encoder.h per_encoder.c # PER encoding support
per_opentype.h per_opentype.c # PER "open type" handling
CONVERTER: # THIS IS A SPECIAL SECTION
CONVERTER: # THIS IS A SPECIAL SECTION
converter-sample.c # A default name for sample transcoder
converter-sample.c # A default name for sample transcoder
...
...
skeletons/per_opentype.c
0 → 100644
View file @
9218bc1e
/*
* Copyright (c) 2007 Lev Walkin <vlm@lionet.info>. All rights reserved.
* Redistribution and modifications are permitted subject to BSD license.
*/
#include <asn_internal.h>
#include <per_support.h>
#include <constr_TYPE.h>
#include <per_opentype.h>
typedef
struct
uper_ugot_key
{
asn_per_data_t
oldpd
;
/* Old per data source */
size_t
unclaimed
;
size_t
ot_moved
;
/* Number of bits moved by OT processing */
int
repeat
;
}
uper_ugot_key
;
static
int
uper_ugot_refill
(
asn_per_data_t
*
pd
);
static
asn_dec_rval_t
uper_sot_suck
(
asn_codec_ctx_t
*
opt_codec_ctx
,
asn_TYPE_descriptor_t
*
td
,
asn_per_constraints_t
*
constraints
,
void
**
sptr
,
asn_per_data_t
*
pd
);
/*
* #10.1, #10.2
*/
int
uper_open_type_put
(
asn_TYPE_descriptor_t
*
td
,
asn_per_constraints_t
*
constraints
,
void
*
sptr
,
asn_per_outp_t
*
po
)
{
void
*
buf
;
ssize_t
size
;
ASN_DEBUG
(
"Encoding as open type %s"
,
td
->
name
);
size
=
uper_encode_to_new_buffer
(
td
,
constraints
,
sptr
,
&
buf
);
if
(
size
<=
0
)
return
-
1
;
ASN_DEBUG
(
"Putting %s of length %d"
,
td
->
name
,
size
);
while
(
size
)
{
ssize_t
maySave
=
uper_put_length
(
po
,
size
);
if
(
maySave
<
0
)
break
;
if
(
per_put_many_bits
(
po
,
buf
,
maySave
*
8
))
break
;
buf
=
(
char
*
)
buf
+
maySave
;
size
-=
maySave
;
}
if
(
size
)
{
FREEMEM
(
buf
);
return
-
1
;
}
return
0
;
}
asn_dec_rval_t
uper_open_type_get
(
asn_codec_ctx_t
*
opt_codec_ctx
,
asn_TYPE_descriptor_t
*
td
,
asn_per_constraints_t
*
constraints
,
void
**
sptr
,
asn_per_data_t
*
pd
)
{
uper_ugot_key
arg
;
asn_dec_rval_t
rv
;
ssize_t
padding
;
_ASN_STACK_OVERFLOW_CHECK
(
opt_codec_ctx
);
ASN_DEBUG
(
"Getting open type off %d (%d+%d), %p"
,
pd
->
moved
,
pd
->
nboff
,
pd
->
nbits
,
pd
->
buffer
);
arg
.
oldpd
=
*
pd
;
arg
.
unclaimed
=
0
;
arg
.
ot_moved
=
0
;
arg
.
repeat
=
1
;
pd
->
refill
=
uper_ugot_refill
;
pd
->
refill_key
=
&
arg
;
pd
->
nbits
=
pd
->
nboff
;
/* 0 good bits at this point, will refill */
pd
->
moved
=
0
;
/* This now counts the open type size in bits */
rv
=
td
->
uper_decoder
(
opt_codec_ctx
,
td
,
constraints
,
sptr
,
pd
);
ASN_DEBUG
(
"Open type %s consumed %d off of %d unclaimed=%d, repeat=%d"
,
td
->
name
,
pd
->
moved
,
arg
.
oldpd
.
moved
,
arg
.
unclaimed
,
arg
.
repeat
);
ASN_DEBUG
(
"OT1 moved %d, estimated %d uncl=%d"
,
arg
.
oldpd
.
moved
,
arg
.
oldpd
.
nboff
+
((((
int
)
arg
.
oldpd
.
buffer
)
&
0x7
)
<<
3
),
arg
.
unclaimed
);
padding
=
pd
->
moved
%
8
;
if
(
padding
)
{
int32_t
pvalue
;
if
(
padding
>
7
)
{
ASN_DEBUG
(
"Too large padding %d in open type"
,
padding
);
rv
.
code
=
RC_FAIL
;
return
rv
;
}
padding
=
8
-
padding
;
ASN_DEBUG
(
"Getting padding of %d bits"
,
padding
);
pvalue
=
per_get_few_bits
(
pd
,
padding
);
switch
(
pvalue
)
{
case
-
1
:
ASN_DEBUG
(
"Padding skip failed"
);
_ASN_DECODE_STARVED
;
case
0
:
break
;
default:
ASN_DEBUG
(
"Non-blank padding (%d bits 0x%02x)"
,
padding
,
pvalue
);
_ASN_DECODE_FAILED
;
}
}
if
(
pd
->
nbits
!=
pd
->
nboff
)
{
ASN_DEBUG
(
"Open type container overhead of %d bits!"
,
pd
->
nbits
-
pd
->
nboff
);
if
(
1
)
_ASN_DECODE_FAILED
;
arg
.
unclaimed
+=
pd
->
nbits
-
pd
->
nboff
;
}
/* Adjust pd back so it points to original data */
pd
->
nbits
=
arg
.
oldpd
.
nbits
-
(
pd
->
moved
-
arg
.
ot_moved
);
pd
->
moved
=
arg
.
oldpd
.
moved
+
(
pd
->
moved
-
arg
.
ot_moved
);
pd
->
refill
=
arg
.
oldpd
.
refill
;
pd
->
refill_key
=
arg
.
oldpd
.
refill_key
;
/* Skip data not consumed by the decoder */
if
(
arg
.
unclaimed
)
ASN_DEBUG
(
"Getting unclaimed %d"
,
arg
.
unclaimed
);
while
(
arg
.
unclaimed
)
{
size_t
toget
=
24
;
if
(
arg
.
unclaimed
<
toget
)
toget
=
arg
.
unclaimed
;
arg
.
unclaimed
-=
toget
;
switch
(
per_get_few_bits
(
pd
,
toget
))
{
case
-
1
:
ASN_DEBUG
(
"Claim of %d failed"
,
toget
);
_ASN_DECODE_STARVED
;
case
0
:
ASN_DEBUG
(
"Got claim of %d"
,
toget
);
continue
;
default:
/* Padding must be blank */
ASN_DEBUG
(
"Non-blank unconsumed padding"
);
_ASN_DECODE_FAILED
;
}
}
assert
(
pd
->
moved
==
pd
->
nboff
+
((((
int
)
pd
->
buffer
)
&
0x7
)
<<
3
));
if
(
arg
.
repeat
)
{
ASN_DEBUG
(
"Not consumed the whole thing"
);
rv
.
code
=
RC_FAIL
;
return
rv
;
}
return
rv
;
}
int
uper_open_type_skip
(
asn_codec_ctx_t
*
opt_codec_ctx
,
asn_per_data_t
*
pd
)
{
asn_TYPE_descriptor_t
s_td
;
asn_dec_rval_t
rv
;
s_td
.
name
=
"<unknown extension>"
;
s_td
.
uper_decoder
=
uper_sot_suck
;
rv
=
uper_open_type_get
(
opt_codec_ctx
,
&
s_td
,
0
,
0
,
pd
);
if
(
rv
.
code
!=
RC_OK
)
return
-
1
;
else
return
0
;
}
/*
* Internal functions.
*/
static
asn_dec_rval_t
uper_sot_suck
(
asn_codec_ctx_t
*
opt_codec_ctx
,
asn_TYPE_descriptor_t
*
td
,
asn_per_constraints_t
*
constraints
,
void
**
sptr
,
asn_per_data_t
*
pd
)
{
asn_dec_rval_t
rv
;
(
void
)
opt_codec_ctx
;
(
void
)
td
;
(
void
)
constraints
;
(
void
)
sptr
;
while
(
per_get_few_bits
(
pd
,
24
)
>=
0
);
rv
.
code
=
RC_OK
;
rv
.
consumed
=
pd
->
moved
;
return
rv
;
}
static
int
uper_ugot_refill
(
asn_per_data_t
*
pd
)
{
uper_ugot_key
*
arg
=
pd
->
refill_key
;
ssize_t
next_chunk_bytes
,
next_chunk_bits
;
ssize_t
avail
;
asn_per_data_t
*
oldpd
=
&
arg
->
oldpd
;
ASN_DEBUG
(
"REFILLING (%+db) [from %d (%d->%d)_%d] now [%d (%d->%d)_%d] uncl %d"
,
pd
->
buffer
-
oldpd
->
buffer
,
oldpd
->
nbits
-
oldpd
->
nboff
,
oldpd
->
nboff
,
oldpd
->
nbits
,
oldpd
->
moved
,
pd
->
nbits
-
pd
->
nboff
,
pd
->
nboff
,
pd
->
nbits
,
pd
->
moved
,
arg
->
unclaimed
);
/* Advance our position to where pd is */
oldpd
->
buffer
=
pd
->
buffer
;
oldpd
->
nboff
=
pd
->
nboff
;
oldpd
->
nbits
-=
pd
->
moved
-
arg
->
ot_moved
;
oldpd
->
moved
+=
pd
->
moved
-
arg
->
ot_moved
;
arg
->
ot_moved
=
pd
->
moved
;
if
(
arg
->
unclaimed
)
{
/* Refill the container */
if
(
per_get_few_bits
(
oldpd
,
1
))
return
-
1
;
if
(
oldpd
->
nboff
==
0
)
{
assert
(
0
);
return
-
1
;
}
pd
->
buffer
=
oldpd
->
buffer
;
pd
->
nboff
=
oldpd
->
nboff
-
1
;
pd
->
nbits
=
oldpd
->
nbits
;
ASN_DEBUG
(
"Return from UNCLAIMED"
);
return
0
;
}
if
(
!
arg
->
repeat
)
{
ASN_DEBUG
(
"Want more but refill doesn't have it"
);
return
-
1
;
}
next_chunk_bytes
=
uper_get_length
(
oldpd
,
-
1
,
&
arg
->
repeat
);
ASN_DEBUG
(
"Open type LENGTH %d bytes at off %d, repeat %d"
,
next_chunk_bytes
,
oldpd
->
moved
,
arg
->
repeat
);
if
(
next_chunk_bytes
<
0
)
return
-
1
;
if
(
next_chunk_bytes
==
0
)
{
pd
->
refill
=
0
;
/* No more refills, naturally */
assert
(
!
arg
->
repeat
);
/* Implementation guarantee */
}
next_chunk_bits
=
next_chunk_bytes
<<
3
;
avail
=
oldpd
->
nbits
-
oldpd
->
nboff
;
if
(
avail
>=
next_chunk_bits
)
{
pd
->
nbits
=
oldpd
->
nboff
+
next_chunk_bits
;
arg
->
unclaimed
=
0
;
}
else
{
pd
->
nbits
=
oldpd
->
nbits
;
arg
->
unclaimed
=
next_chunk_bits
-
avail
;
ASN_DEBUG
(
"Parent has %d, require %d, will claim %d"
,
avail
,
next_chunk_bits
,
arg
->
unclaimed
);
}
pd
->
buffer
=
oldpd
->
buffer
;
pd
->
nboff
=
oldpd
->
nboff
;
return
0
;
}
skeletons/per_opentype.h
0 → 100644
View file @
9218bc1e
/*
* Copyright (c) 2007 Lev Walkin <vlm@lionet.info>. All rights reserved.
* Redistribution and modifications are permitted subject to BSD license.
*/
#ifndef _PER_OPENTYPE_H_
#define _PER_OPENTYPE_H_
#ifdef __cplusplus
extern
"C"
{
#endif
asn_dec_rval_t
uper_open_type_get
(
asn_codec_ctx_t
*
opt_codec_ctx
,
asn_TYPE_descriptor_t
*
td
,
asn_per_constraints_t
*
constraints
,
void
**
sptr
,
asn_per_data_t
*
pd
);
int
uper_open_type_skip
(
asn_codec_ctx_t
*
opt_codec_ctx
,
asn_per_data_t
*
pd
);
int
uper_open_type_put
(
asn_TYPE_descriptor_t
*
td
,
asn_per_constraints_t
*
constraints
,
void
*
sptr
,
asn_per_outp_t
*
po
);
#ifdef __cplusplus
}
#endif
#endif
/* _PER_OPENTYPE_H_ */
skeletons/per_support.c
View file @
9218bc1e
/*
/*
* Copyright (c) 2005, 2006 Lev Walkin <vlm@lionet.info>. All rights reserved.
* Copyright (c) 2005, 2006, 2007 Lev Walkin <vlm@lionet.info>.
* All rights reserved.
* Redistribution and modifications are permitted subject to BSD license.
* Redistribution and modifications are permitted subject to BSD license.
*/
*/
#include <asn_system.h>
#include <asn_system.h>
...
...
skeletons/per_support.h
View file @
9218bc1e
/*
/*
* Copyright (c) 2005, 2006 Lev Walkin <vlm@lionet.info>. All rights reserved.
* Copyright (c) 2005, 2006, 2007 Lev Walkin <vlm@lionet.info>.
* All rights reserved.
* Redistribution and modifications are permitted subject to BSD license.
* Redistribution and modifications are permitted subject to BSD license.
*/
*/
#ifndef _PER_SUPPORT_H_
#ifndef _PER_SUPPORT_H_
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment