/*
 * bitstring.c
 *
 * Toggle bits in a bitstrings
 * NB! This is a crude and simple bitstring on byte-level...
 *
 * (C) Frank Schmidt, Jesus@NorseMUD
 *
 */

static int test_bit(string str, int b) {
  return (b<strlen(str) && b >= 0) ? (str[b]=='1') : 0;
}

static int set_bit(string str, int b) {
  if (b<strlen(str)) {
    if (b >= 0) {
      str[b]='1';
      return 1;
    }
    return 0;
  }
  str += fill_string("00000000", b-strlen(str)+1);
  str[b]='1';
  return 1;
}


static int clear_bit(string str, int b) {
  if (b<strlen(str)) {
    if (b >= 0) {
      str[b]='0';
      return 1;
    }
    return 0;
  }
  str += fill_string("00000000", b-strlen(str)+1);
  str[b]='0';
  return 1;
}