Packages

circuits_uart

1.6.0
1.6.0 1.5.5 1.5.4 1.5.3 1.5.2 1.5.1 1.5.0 1.4.5 1.4.4 1.4.3 1.4.2 1.4.1 1.4.0 1.3.2 1.3.1 1.3.0

Discover and use UARTs and serial ports in Elixir

HexDocs

Current section

Files

Jump to
Readme
16 Versions
1 Dependency
Dependants
Files
Activity
circuits_uart src ei_copy encode_port.c
Raw

src/ei_copy/encode_port.c 

// SPDX-FileCopyrightText: Ericsson AB 1998-2013. All Rights Reserved.

//

// SPDX-License-Identifier: Apache-2.0

#include <string.h>

#include "eidef.h"

#include "eiext.h"

#include "putget.h"



int ei_encode_port(char *buf, int *index, const erlang_port *p)

{

  char *s = buf + *index;



  ++(*index); /* skip ERL_PORT_EXT */

  if (ei_encode_atom_len_as(buf, index, p->node, strlen(p->node), ERLANG_UTF8,

			    ERLANG_LATIN1|ERLANG_UTF8) < 0) {

      return -1;

  }

  if (buf) {

    put8(s,ERL_PORT_EXT);



    s = buf + *index;



    /* now the integers */

    put32be(s,p->id & 0x0fffffff /* 28 bits */);

    put8(s,(p->creation & 0x03));

  }

  

  *index += 4 + 1;

  return 0;

}