elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Únete al Grupo Steam elhacker.NET


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  Separar binario por cada byte
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] 2 Ir Abajo Respuesta Imprimir
Autor Tema: Separar binario por cada byte  (Leído 8,147 veces)
Meta


Desconectado Desconectado

Mensajes: 3.438



Ver Perfil WWW
Separar binario por cada byte
« en: 1 Abril 2021, 19:15 pm »

Hola:

Al mostrar una trama de bytes, lo presento en binario y me muestra esto.

001000111100011110010111110000001011000000001101

Hay 6 Bytes que en realidad en hexadecimal es 23 C7 97 C0 B0 0D

Quiero que se me separe así en cada byte o cada 8 bit.

00100011 11000111 10010111 11000000 10110000 00001101

He intentado hacerlo con este código:
Código
  1.            // Pasar a binario.
  2.            foreach (string leer in recibidos.Select(c => Convert.ToString(c, 2)))
  3.  
  4.            {
  5.                richTextBox1.Text += leer.ToString();
  6.            }

Me pasa dos cosas.
Como en el ejemplo de arriba, si los bits empieza por cero y encuentro un uno, por ejemplo. 00000001, en la pantalla me aparece solo el 1 ignorando los sietes primeros 0. Me gusta más que se muestre así 00000001 en vez de tipo ahorrador con solo un 1.

La otra cosa, que por cada 8 bytes en binario se muestre separado como indicado arriba.

¿Es posible hacerlo?

Gracias.


En línea

WHK
Moderador Global
***
Desconectado Desconectado

Mensajes: 6.589


Sin conocimiento no hay espíritu


Ver Perfil WWW
Re: Separar binario por cada byte
« Respuesta #1 en: 1 Abril 2021, 22:42 pm »

Intenta procesarlo con un arreglo de bytes en ves de un string, mira esto:

https://stackoverflow.com/questions/5664345/string-to-binary-in-c-sharp

Código:
string.Join(" ", data.Select(byt => Convert.ToString(byt, 2).PadLeft(8, '0')));


En línea

Meta


Desconectado Desconectado

Mensajes: 3.438



Ver Perfil WWW
Re: Separar binario por cada byte
« Respuesta #2 en: 2 Abril 2021, 05:33 am »

Buenas mi muy distinguido amigo:

El problema que el código y variable recibidos me viene en string.

Lo he intentado poner en Byte y me da más problemas por todas partes. El código es enorme.

Dejo un ejemplo para que lo veas y te hagas una gran idea.


Código
  1. using System;
  2. using System.IO.Ports;
  3. using System.Linq;
  4. using System.Text;
  5. using System.Windows.Forms;
  6.  
  7. namespace Ejemplo
  8. {
  9.    public partial class Form1 : Form
  10.    {
  11.        // Utilizaremos un string como buffer de recepción.
  12.        string recibidos;
  13.  
  14.        public Form1()
  15.        {
  16.            InitializeComponent();
  17.        }
  18.  
  19.  
  20.        private void Form1_Load(object sender, EventArgs e)
  21.        {
  22.            try
  23.            {
  24.                // Codificación.
  25.                //serialPort1.Encoding = Encoding.GetEncoding(437);
  26.                //serialPort1.Encoding = Encoding.GetEncoding(28591); // 28591 es lo mismo que ISO-8859-1.
  27.                serialPort1.Encoding = Encoding.GetEncoding("ISO-8859-1");
  28.  
  29.                // Añado los puertos disponible en el PC con SerialPort.GetPortNames() al comboBox_Puerto.
  30.                comboBox_Puerto.DataSource = SerialPort.GetPortNames();
  31.  
  32.                // Añade puertos disponibles físicos  y virtuales.
  33.                serialPort1.PortName = comboBox_Puerto.Text.ToString();
  34.  
  35.                // Añadir datos recibidos en el evento.
  36.                serialPort1.DataReceived += new SerialDataReceivedEventHandler(serialPort1_DataReceived);
  37.            }
  38.  
  39.            catch (Exception error)
  40.            {
  41.                MessageBox.Show(error.Message, "Aviso:",
  42.                    MessageBoxButtons.OK, MessageBoxIcon.Warning);
  43.            }
  44.        }
  45.  
  46.        // Detecta USB o puerto serie virtual cuando lo conecta y desconecta del cable.
  47.        protected override void WndProc(ref Message USB)
  48.        {
  49.            if (USB.Msg == 0x219)
  50.            {
  51.                comboBox_Puerto.DataSource = SerialPort.GetPortNames();
  52.            }
  53.  
  54.            // Detecta si hay cambios en el usb y si los hay los refleja.
  55.            base.WndProc(ref USB);
  56.        }
  57.  
  58.        private void button_Conectar_Click(object sender, EventArgs e)
  59.        {
  60.            try
  61.            {
  62.                serialPort1.PortName = comboBox_Puerto.Text.ToString(); // Puerto seleccionado previamente.
  63.                serialPort1.BaudRate = Convert.ToInt32(comboBox_Baudios.Text); // Baudios.
  64.                serialPort1.Open(); // Abrir puerto.
  65.                comboBox_Puerto.Enabled = false;
  66.                comboBox_Baudios.Enabled = false;
  67.                button_Conectar.Enabled = false;
  68.                button_Desconectar.Enabled = true;
  69.                groupBox_Control_Zumbador.Enabled = true;
  70.            }
  71.            catch (Exception error)
  72.            {
  73.                MessageBox.Show(error.Message, "Aviso:",
  74.                MessageBoxButtons.OK, MessageBoxIcon.Warning);
  75.            }
  76.        }
  77.  
  78.        private void button_Desconectar_Click(object sender, EventArgs e)
  79.        {
  80.            try
  81.            {
  82.                serialPort1.Close(); // Cerrar puerto.
  83.                comboBox_Puerto.Enabled = true;
  84.                comboBox_Baudios.Enabled = true;
  85.                button_Conectar.Enabled = true;
  86.                button_Desconectar.Enabled = false;
  87.                groupBox_Control_Zumbador.Enabled = false;
  88.            }
  89.  
  90.            catch (Exception error)
  91.            {
  92.                MessageBox.Show(error.Message, "Aviso:",
  93.                MessageBoxButtons.OK, MessageBoxIcon.Warning);
  94.            }
  95.        }
  96.  
  97.        // Al cerrar el formulario, cierra el puerto si está abierto.
  98.        private void Form1_FormClosing(object sender, FormClosingEventArgs e)
  99.        {
  100.            try
  101.            {
  102.                serialPort1.Close(); // Cerrar puerto.
  103.            }
  104.  
  105.            catch (Exception error)
  106.            {
  107.                MessageBox.Show(error.Message, "Aviso:",
  108.                MessageBoxButtons.OK, MessageBoxIcon.Warning);
  109.            }
  110.        }
  111.  
  112.        // Al recibir datos.
  113.        private void serialPort1_DataReceived(object sender, SerialDataReceivedEventArgs e)
  114.        {
  115.            // Acumula los caracteres recibidos a nuestro 'buffer' (string).
  116.            recibidos += serialPort1.ReadExisting();
  117.  
  118.            // Invocar o llamar al proceso de tramas.
  119.            Invoke(new EventHandler(Actualizar));
  120.        }
  121.  
  122.        // Procesar los datos recibidos en el bufer y extraer tramas completas.
  123.        private void Actualizar(object sender, EventArgs e)
  124.        {
  125.  
  126.            // Asignar el valor de la trama al richTextBox.
  127.            richTextBox1.Text += recibidos;
  128.  
  129.            // Pasar a hexadecimal.
  130.            foreach (byte b in recibidos)
  131.            {
  132.                // x = minúscula, X = mayúscula.
  133.                richTextBox1.Text += b.ToString("X2");
  134.            }
  135.  
  136.            // Nueva línea.
  137.            richTextBox1.Text += Environment.NewLine;
  138.  
  139.            // Pasar a binario.
  140.            foreach (string leer in recibidos.Select(c => Convert.ToString(c, 2)))
  141.            {
  142.                richTextBox1.Text += leer.ToString();
  143.            }
  144.  
  145.            // Nueva línea.
  146.            richTextBox1.Text += Environment.NewLine;
  147.            richTextBox1.Text += Environment.NewLine;
  148.  
  149.            // Selecciona la posición final para leer los mensajes entrantes.
  150.            richTextBox1.SelectionStart = richTextBox1.Text.Length;
  151.  
  152.            // Mantiene el scroll en la entrada de cada mensaje.
  153.            richTextBox1.ScrollToCaret();
  154.  
  155.            // Limpiar.
  156.            recibidos = "";
  157.        }
  158.  
  159.        private void button_Activar_Click(object sender, EventArgs e)
  160.        {
  161.            //byte[] mBuffer = Encoding.ASCII.GetBytes("K60:1\r"); // Comando K60:1 activar.
  162.            byte[] mBuffer = Encoding.ASCII.GetBytes("X87\r"); // Comando X87 Flags.
  163.            serialPort1.Write(mBuffer, 0, mBuffer.Length);
  164.        }
  165.  
  166.        private void button_Desactivar_Click(object sender, EventArgs e)
  167.        {
  168.            byte[] mBuffer = Encoding.ASCII.GetBytes("K60:0\r"); // Comando K60:0 desactivar.
  169.            serialPort1.Write(mBuffer, 0, mBuffer.Length);
  170.        }
  171.  
  172.        private void button_Mute_temporal_Click(object sender, EventArgs e)
  173.        {
  174.            byte[] mBuffer = Encoding.ASCII.GetBytes("B\r"); // Comando K60:2 Mute temporal.
  175.            serialPort1.Write(mBuffer, 0, mBuffer.Length);
  176.        }
  177.  
  178.        private void button_Limpiar_Click(object sender, EventArgs e)
  179.        {
  180.            // Limpiar.
  181.            richTextBox1.Clear();
  182.        }
  183.    }
  184. }
En línea

@XSStringManolo
Hacker/Programador
Colaborador
***
Desconectado Desconectado

Mensajes: 2.397


Turn off the red ligth


Ver Perfil WWW
Re: Separar binario por cada byte
« Respuesta #3 en: 2 Abril 2021, 06:46 am »

Usa un bucle

Código
  1. string binario = "001000111100011110010111110000001011000000001101";
  2. string resultado = "";
  3. for (int i = 0; i < binario.Length; i += 8) {
  4.  resultado += binario.Substring(i, 8) + " ";
  5. }

Substring pilla desde el index hasta los siguientes 8 caracteres, asique si solo quedan por ejemplo 3, los pillas igual.

Te sobra un espacio al final. Puedes sumarle 8 al iterador para ver si en la siguiebte iteración ya no vas a entrar en el bucle A.K.A no añadas el espacio la última vez que iteras porque ya acabaste de añadir bytes. O reasignas con Substring usando 0, y resultado.Length -1
En línea

Mi perfil de patrocinadores de GitHub está activo! Puedes patrocinarme para apoyar mi trabajo de código abierto 💖

Meta


Desconectado Desconectado

Mensajes: 3.438



Ver Perfil WWW
Re: Separar binario por cada byte
« Respuesta #4 en: 2 Abril 2021, 10:33 am »

Buenas:

Como veo la base ya tienes una variable con 0 y 1.
Hice el foreach y for que indicaste. Me da problemas. Lo hice así para que lo pase a binario y elfor tuyo para que lo separe.


Ver zoom.

Código
  1.            // Pasar a binario.
  2.            string resultado = "";
  3.            foreach (string leer in recibidos.Select(c => Convert.ToString(c, 2)))
  4.            {
  5.                resultado += leer.ToString();
  6.            }    
  7.  
  8.            for (int i = 0; i < resultado.Length; i += 8)
  9.            {
  10.                richTextBox1.Text += resultado.Substring(i, 8) + " ";
  11.            }

Si lo hago solo así que se muestre en richTextBox me da el  mismo error.
Código
  1.            for (int i = 0; i < recibidos.Length; i += 8)
  2.            {
  3.                richTextBox1.Text += recibidos.Substring(i, 8) + " ";
  4.            }
« Última modificación: 2 Abril 2021, 10:40 am por Meta » En línea

@XSStringManolo
Hacker/Programador
Colaborador
***
Desconectado Desconectado

Mensajes: 2.397


Turn off the red ligth


Ver Perfil WWW
Re: Separar binario por cada byte
« Respuesta #5 en: 2 Abril 2021, 23:05 pm »

Uhh, no sabía que sucedía ese error.

Suma de 1 en 1 en lugar de 8 en 8 y cuando i % 8 == 0 añades un espacio.
En línea

Mi perfil de patrocinadores de GitHub está activo! Puedes patrocinarme para apoyar mi trabajo de código abierto 💖

WHK
Moderador Global
***
Desconectado Desconectado

Mensajes: 6.589


Sin conocimiento no hay espíritu


Ver Perfil WWW
Re: Separar binario por cada byte
« Respuesta #6 en: 3 Abril 2021, 03:14 am »

Eso pasa porque el tipo String en .net tiene pre filtros como la eliminación de padding vacío, hay que procesarlo como un arreglo de bytes, sino pasarás haciendo parches y de una u otra manera tendrás problema con algún valor.
En línea

Meta


Desconectado Desconectado

Mensajes: 3.438



Ver Perfil WWW
Re: Separar binario por cada byte
« Respuesta #7 en: 3 Abril 2021, 09:13 am »

Uhh, no sabía que sucedía ese error.

Suma de 1 en 1 en lugar de 8 en 8 y cuando i % 8 == 0 añades un espacio.

Si te refieres a esto.
Código
  1. for (int i = 0; i < recibidos.Length; i += 8)
  2.            {
  3.                richTextBox1.Text += recibidos.Substring(i, 1) + " ";
  4.            }

O a esto ottro.
Código
  1. for (int i = 0; i < recibidos.Length; i += 1)
  2.            {
  3.                richTextBox1.Text += recibidos.Substring(i, 8) + " ";
  4.            }

No funciona.

Eso pasa porque el tipo String en .net tiene pre filtros como la eliminación de padding vacío, hay que procesarlo como un arreglo de bytes, sino pasarás haciendo parches y de una u otra manera tendrás problema con algún valor.

Los ejemplos de Microsoft, tiene la manía de recibir datos tipo sttring aquí y pòr aquí. Es verdad que en el puerto serie se transmite byte por byte. Aquí en SerialPort.ReadExisting es funciona con string.

Dicen muchos por Internet, que para estas cosas mejor aceptar las tramas de byte tal como vienen, en byte. Guardar los datos en Byte y luego procesarlo. Ya se usaría esto otro SerialPort.Read.

El problema si usas tipo arreglo con Byte[] tienes que saber el tamaño que te llega en ese arreglo. El programa completo cambiaría por todas partes, no es cambiar de tipo a string a Byte[] así sin más. Ahí está el problema.

Encuentro otro problema con el invoke al recibir datos por el puerto serie el como se comporta.
Código
  1. // Al recibir datos.
  2.        private void serialPort1_DataReceived(object sender, SerialDataReceivedEventArgs e)
  3.        {
  4.            // Acumula los caracteres recibidos a nuestro 'buffer' (string).
  5.            recibidos += serialPort1.ReadExisting();
  6.  
  7.            // Invocar o llamar al proceso de tramas.
  8.            Invoke(new EventHandler(Actualizar));
  9.        }

Si recibo este mensaje en ASCII, o lo que sea, por ejemplo. Debería mostrar el mensaje recibido tal como aparece en el Ejemplo 1. En el Ejemlo 2, a veces se corta, como si alguien le diera Enter en medio de la frase.

Ejemplo 1:
No hay mayor tesoro que un amigo.

Ejemplo 2:
No hay mayor tesoro q
ue un amigo.

No he conseguido ningún programa estable que funcione siempre como el Ejemplo 1.

Saludos.
En línea

@XSStringManolo
Hacker/Programador
Colaborador
***
Desconectado Desconectado

Mensajes: 2.397


Turn off the red ligth


Ver Perfil WWW
Re: Separar binario por cada byte
« Respuesta #8 en: 3 Abril 2021, 13:40 pm »

Suma de 1 en 1 en lugar de 8 en 8 y cuando i % 8 == 0 añades un espacio.
Me refiería a esto.
Código
  1. for (int i = 0; i < recibidos.Length; i += 1) {
  2.  richTextBox1.Text += recibidos[i];
  3.  if (i % 8 == 0) {
  4.    richTextBox1.Text += " ";
  5.  }
  6. }
En línea

Mi perfil de patrocinadores de GitHub está activo! Puedes patrocinarme para apoyar mi trabajo de código abierto 💖

Serapis
Colaborador
***
Desconectado Desconectado

Mensajes: 3.351


Ver Perfil
Re: Separar binario por cada byte
« Respuesta #9 en: 3 Abril 2021, 18:25 pm »

En efecto cuando conviertes un numero a string y lo presentas, elimina los ceros a la izquierda. Para conservarlos, hay que formatearlo de alguna manera...

...por ejemplo tu mismo puedes crear una función exprofeso... Sí, tratando con bytes.
Código:
// Toma 1 en cada ciclo del bucle y lo concatena.
// NOTA: Va tomando el bit mas alto para concatenarlo a la derecha.
string = Funcion ByteToString(byte x)
   byte k
   entero n=128
   string s

   bucle para k desde 0 a 7
         s += (x and n)
         n /= 2
   siguiente

   devolver s
fin funcion
Tras la devolucion tu vas concatenando la secuencia al lado que interese, con un espacio o el separador que te interese.

Por otro lado, si tienes una 'ristra de bits' en una cadena de texto, ('100011100011100001110000111...'), puedes igualmente contar su longitud (o puede que sepas directamente cuantos bytes son), y seccionar la cadena en un bucle con cada 8 bits...
Código:
string = Funcion SepararBitString(string bits, string separador, buleano LtoR)  ' Left To Rigth
    entero k, j
    string s

    // comenzamos desde la derecha, por que
    // los numeros estan alineados siempre desde la derecha
    // a diferencia de los strings... esto es,
    // si faltara algun bit, seguiremos teniendo bien divididos los bytes.

    // separador se puede omitir. Si siempre sera un espacio, ponlo directamente.
   
    j = (bits.length-1)
    Si LtoR= False
        j -= 8
        s = bits.substring(j, 8)
        bucle para k desde j-8 hasta 0 en pasos de -8
            s = bits.substring(k, 8) + separador + s
        siguiente   

        // si los bits son forman bytes completos, al acabar el bucle k = -8, si no...
        si (k > -8)  // sobran bits a la izquierda que no completan un byte???
            s = bits.left(-k) + separador + s
        fin si
    si no
        bucle para k desde 0 hasta j en pasos de 8
            s += (separador + bits.substring(k, 8))
        siguiente

        // si los bits son forman bytes completos, al acabar el bucle k = j+8, si no...
        si (k < (j+8))  // sobran bits a la izquierda que no completan un byte???
            s += (separador + bits.right(k-j) )
        fin si
    fin si

    devolver s
fin funcion
En este caso tratándose del puerto serie es muy importante que tengas claro el orden en que los bits son recibidos en secuencia si de derecha a izquierda o al revés... para que la funcion opere exactamente como se espera que los datos  aparezcan y no se confundan.
A menudo si hay que hacer mas que un procesado, no importa en primera instancia que los bits queden invertidos en orden dentro del string (pudiera ser así más eficiente), siempre que la funcion final los procese y devuelve correctamente ordenados.
Es cómodo añadir bits a una cadena de texto, a la derecha a medida que se reciben serialmente... por lo que cuando deban procesarse estan al revés. Sería interesante en este caso tener un función que admita un parámetro adicional que indique justamente si deben ordenarse de derecha a izquierda o al revés y así, la misma función puede tratar ambos casos. Esta ultima funcion cumple ese requisito...

Si la secuencia de bits es muy larga, te sugiero utilizar la clase bitarray (localizada en Collections), que permite operar a muy alta velocidad operando con bits, si bien parece que tu caso es operar con cadenas. En ese caso la funcion ByteToString es muy clara y sencilla.

Suele ser más eficiente (cuando la secuencia de bits sea enorme (pongamos millones)), calcular el tamaño de la cadena de salida de antemano y crearla en su tamaño total antes de entrar al bucle, y luego en vez de añadir, simplemente se 'pega' en su ubicación de destino. La concatenacion de cadenas, exige crear para la concatenación una nueva cadena... con cadenas cortas o poco numerosas no se nota perdida de eficiencia, si se notaría si por ejemplo hubiera que procesar un fichero de cierto tamaño... pongamos 20Mb. en tanto que crear el string de una tacada y procesarlo, sería prácticamente inmediato, una concatenación cada pocos bits para 20Mb. podría demorarse algunos o bastantes segundos (depende de la potencia del equipo, obviamente).

Un control ricthtextbox, es un control pesado, no lo utilices si no vas a hacer nada complejo... si es una simple presentacion de datos usa cualquier otro control ligero de texto. Sería como contratar un camión de 4 ejes, para ir al super a hacer la compra semanal... para lo que basta el 'carrito de la compra'...
En línea

Páginas: [1] 2 Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
[Sources Code] RotBits [Byte TO Byte ]
Programación Visual Basic
x64core 8 5,333 Último mensaje 22 Octubre 2011, 00:46 am
por BlackZeroX
Filestream . Byte a Byte
.NET (C#, VB.NET, ASP)
blaron 3 2,959 Último mensaje 5 Abril 2014, 02:01 am
por Eleкtro
Suma byte a byte con acarreo en variable de 2 bytes
Programación C/C++
AlbertoBSD 2 3,984 Último mensaje 18 Mayo 2016, 18:21 pm
por AlbertoBSD
¿Cómo separar un numero binario en digitos?
Programación C/C++
Sherboc 7 9,192 Último mensaje 24 Junio 2016, 02:30 am
por AlbertoBSD
separar con espacio en blanco después de cada Mayuscula
PHP
basickdagger 0 2,942 Último mensaje 19 Marzo 2022, 03:32 am
por basickdagger
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines