ip4_bit.c

Go to the documentation of this file.

/***
  @file ip4_bit.c
  @author Jens Wehrenbrecht, feh
  @funcs ip4_bitstring, bitstring_ip4
*/
#include "ip.h"
#include "byte.h"
#include "scan.h"
#include "str.h"
#include "fmt.h"
#include "ip_bit.h"
 
#define BITSUBSTITUTION
 
static char strnum[FMT_ULONG];
 
int ip4_bitstring(stralloc *ip4string, char *ip, unsigned int prefix)
{
  int i, j;
  char ip4[4];
  int count = 0;
  unsigned char number;
#ifdef BITSUBSTITUTION
  const char *letterarray = "abcdefghijklmnopqrstuvwxyz123456";
#endif
 
  if (!stralloc_copys(ip4string,"")) return -1;
  if (!stralloc_readyplus(ip4string,32)) return -1;
  ip4_scan(ip,ip4);
 
  for (i = 0; i < 4; i++) {
    number = (unsigned char) ip4[i];
    for (j = 7; j >= 0; j--) {
      if (number & (1<<j)) {
#ifdef BITSUBSTITUTION
        if (!stralloc_catb(ip4string,letterarray + count,1)) return -1;
#else
        if (!stralloc_cats(ip4string,"1")) return -1;
#endif
      } else {
        if (!stralloc_cats(ip4string,"0")) return -1;
      }
      count++;
      prefix--;
      if (prefix == 0) return 0;
    }
  }
 
  return 1;
}
 
int bitstring_ip4(stralloc *ip4addr, stralloc *ip4string)
{
  int j;
  int num = 0;
  int value = 256;
  int prefix; 
 
  if (!stralloc_copys(ip4addr,"")) return -1;
  prefix = ip4string->len - 1;
 
  if (prefix <= 0) return 1;
  if (prefix <= 1 || prefix > 32) return 1;
 
  for (j = 1; j <= prefix; j++) {
   if (ip4string->s[j] != '0') {
      num += (value/2); 
      value /= 2;
    } else 
      value /= 2; 
    if (j % 8 == 0 || j == prefix) {
      if (!stralloc_catb(ip4addr,strnum,fmt_ulong(strnum,num))) return -1;
      if (j < 32) if (!stralloc_cats(ip4addr,".")) return -1;
      num = 0;
      value = 256;
    }
  }
  
  if (!stralloc_cats(ip4addr,"/")) return -1;
  if (!stralloc_catb(ip4addr,strnum,fmt_ulong(strnum,prefix))) return -1;
  if (!stralloc_0(ip4addr)) return -1;
 
  return 0;
}