1 /*
2 * %CopyrightBegin%
3 *
4 * Copyright Ericsson AB 1998-2016. All Rights Reserved.
5 *
6 * Licensed under the Apache License, Version 2.0 (the "License");
7 * you may not use this file except in compliance with the License.
8 * You may obtain a copy of the License at
9 *
10 * http://www.apache.org/licenses/LICENSE-2.0
11 *
12 * Unless required by applicable law or agreed to in writing, software
13 * distributed under the License is distributed on an "AS IS" BASIS,
14 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
15 * See the License for the specific language governing permissions and
16 * limitations under the License.
17 *
18 * %CopyrightEnd%
19 */
20 #include "eidef.h"
21 #include "putget.h"
22
ei_encode_trace(char * buf,int * index,const erlang_trace * p)23 int ei_encode_trace(char *buf, int *index, const erlang_trace *p)
24 {
25 /* { Flags, Label, Serial, FromPid, Prev } */
26 if (ei_encode_tuple_header(buf,index,5) < 0)
27 return -1;
28 if (ei_encode_long(buf,index,p->flags) < 0)
29 return -1;
30 if (ei_encode_long(buf,index,p->label) < 0)
31 return -1;
32 if (ei_encode_long(buf,index,p->serial) < 0)
33 return -1;
34 if (ei_encode_pid(buf,index,&p->from) < 0)
35 return -1;
36 if (ei_encode_long(buf,index,p->prev) < 0)
37 return -1;
38
39 /* index is updated by the functions we called */
40
41 return 0;
42 }
43
44