/* SendI2C.c: 
 *   Send bytes supplied in the command line arguments over the I²C bus,
 *   using i2c.library.  Usage:
 * SendI2C  <bus address>  <data>  [<data>  [...] ]
 * where <data> are an arbitrary number of hex digits, in groups of
 * 1, 2, 3 or 4 byte.
 */

#include <stdio.h>
#include <stdlib.h>
#include <proto/exec.h>
#include <proto/i2c.h>
#include <libraries/i2c.h>

struct Library *I2C_Base;

int main(int argc, char *argv[])
{
  int result=0;
  UBYTE adr, i2cdata[1000];
  UWORD i, j, bytes=0;
  ULONG l, err;

  if (argc<3) {
    printf("Usage: \e[2m%s <addr> <data>\e[0m, ", argv[0]);
    printf("e.g. %s 70 0027 065b 4f66\n", argv[0]);
    return 5;
  }
  adr = strtoul(argv[1], NULL, 16);
  for (i=2; i<argc; i++) {
    j = strlen(argv[i]);
    if (j & 1) {
      if (j>1) printf("Warning: odd-length hex number %s\n", argv[i]);
      j++;
    }
    l = strtoul(argv[i], NULL, 16);
    j *= 4;
    while (j>0) {
      j -= 8;
      i2cdata[bytes++] = (l >> j) & 0xff;
    }
  }
  I2C_Base = OpenLibrary("i2c.library", 39);
  if (!I2C_Base) {
    printf("Can't open i2c.library V39+\n");
    return 10;
  }
  err = SendI2C(adr, bytes, i2cdata);
  if ((err & 0xff)==0) {
    printf("I²C failure: \e[1m%s\e[0m\n", I2CErrText(err));
    result = 10;
  }
  CloseLibrary(I2C_Base);

  return result;
}