addressing.c

#include "main-header.h"
 
// returns 1 if valid, 0 if not
int adr_isvalid(long a) {
  if (a == 0xFFFFFFFF) {
    // broadcast is a valid address
    return 1;
  }
  if (a == 0) {
    return 0;
  }
  return 1;
}
 
// pseudo-random, mostly deterministic, unique id generator for this machine
long adr_create_new_node_id() {
  char buf[64];
  byte *db;
  long res;
  int i, ln;
  int rseed;
 
  res = 0;
  esp_get_mac((char *)&buf, 64);
  if (strlen(buf) != 17) {
    printf("Invalid mac: \"%s\" (%i length)\r\n", buf, (int)strlen(buf));
    for (i = 0; i < 17; i++) {
      buf[i] = i; // deterministic and stupid
    }
  }
 
  ln = sizeof(buf);
  mculib_mcu_get_unique_id(&ln, &buf);
  rseed = buf[2];
  for (;;) {
    rseed = rseed + 5;
    // now take the device-id of the stm32 as seed
    db = (void *)&buf;
    uint32_t c = 0;
    for (i = 0; i < ln; i++) {
      printf("%x ", db[i]);
      c = c + db[i] + rseed;
    }
    printf(" == %i\r\n", c);
    res = (c & 0xFF00) >> 8;
    res = res | (c & 0xFF);
 
    // parse mac, but rolling-xor the device-id to each byte
    byte z = db[7];
    for (i = 0; i < 6; i++) {
      z = z ^ (db[i] + rseed);
      res = res << 8;
      res = res | z;
      res = res + mculib_get_seconds_since_boot() + get_systickctr();
      //res = res | ((atoh((char *)&buf[i * 3 + 4])) + z);
    }
    if (adr_isvalid(res)) {
      break;
    }
  }
  return res;
}
void node_to_str(long l, char *buf) {
  ltoh(l, buf);
}
 
void pretty_node_to_str(long l, char *buf) {
  buf[0] = 0;
  char const *t;
 
  t = NULL;
  if (l == 0x00000001) {
    t = "SERVER";
  } else if (l == 0xFFFFFFFF) {
    t = "BRDCAST";
  } else if (l == get_my_node_id()) {
    t = "ITSME";
  }
  if (t == NULL) {
    node_to_str(l, buf);
  } else {
    memcpy(buf, t, strlen(t));
    buf[strlen(t)] = 0;
  }
}
void print_node_id(long l) {
  char buf[32];
 
  node_to_str(l, (char *)&buf);
 
  IPLOG("[%D] NODE-ID: %s\r\n", mculib_get_seconds_since_boot(), (char *)&buf);
}