nedoPC.org

#include <stdio.h>
#include <stdlib.h>

int main(int argc, char **argv) {
   long n;
   char *errptr;
   if (argc < 3) {
      goto error;
   }
   n = strtol(argv[1], &errptr, 0);
   if (*errptr != '\0') {
      goto error;
   }
   fwrite(argv[2], n, 1, stdout);
   return 0;
error:
   fprintf(stderr, "Output `length` bytes from `data` to stdout.\n");
   fprintf(stderr, "Usage: %s length data\n", argv[0]);
   return 1;
}

#include <stdio.h>
#include <stdlib.h>

int main(int argc, char **argv) {
   long n;
   char *errptr;
   if (argc < 3) {
      goto error;
   }
   n = strtol(argv[1], &errptr, 0);
   if (*errptr != '\0') {
error:
       fprintf(stderr, "Output `length` bytes from `data` to stdout.\n");
       fprintf(stderr, "Usage: %s length data\n", argv[0]);
       return 1;
   }
   fwrite(argv[2], n, 1, stdout);
   return 0;

}

               if ( X.buf[B_CMD] == CMD_GET ) {
                  if ( Glob.Type == 0xFF ) {

                     goto sendserialerr;

                  }
                  if ( ( Glob.Type == TYPE_INA ) ||  ( Glob.Type == TYPE_INA8 ) ) {

                     Tmp.Addr = &regs;
                     Tmp.Addr += X.buf[B_DATA1] + X.buf[B_DATA1];
                     X.buf[B_DATA0] = *Tmp.Addr;
                     Tmp.Addr++;
                     X.buf[B_DATA1] = *Tmp.Addr;
                     X.buf[B_SIZE]  = B_HEADER + 2;
                     goto sendserial;

                  }
                  if ( Glob.Type == TYPE_OUTD ) {

                     X.buf[B_DATA0] = Glob.b & 0x0F;
                     goto sendserialone;

                  }
                  if ( Glob.Type & TYPE_OUTPUT ) {

                     X.buf[B_SIZE]  = B_HEADER + 3;

                     X.buf[B_DATA2] = Glob.b & 0x0C;
                     goto left0;
                  }
                  if ( Glob.Type == TYPE_INAD8 ) {

                     X.buf[B_SIZE]  = B_HEADER + 8;

                     X.buf[B_DATA4] = regs.ain.data[4];
                     X.buf[B_DATA5] = regs.ain.data[5];
                     X.buf[B_DATA6] = regs.ain.data[6];
                     X.buf[B_DATA7] = regs.ain.data[7];
                     regs.ain.data[4] = 0;
                     regs.ain.data[5] = 0;
                     regs.ain.data[6] = 0;
                     regs.ain.data[7] = 0;
                     goto left1;
                  }
                  if ( Glob.Type & TYPE_INPUT ) {

                     X.buf[B_SIZE]  = B_HEADER + 4;

                     left1:
                     X.buf[B_DATA2] = regs.ain.data[2];
                     X.buf[B_DATA3] = regs.ain.data[3];
                     regs.ain.data[2] = 0;
                     regs.ain.data[3] = 0;

                     left0:
                     X.buf[B_DATA0] = regs.ain.data[0];
                     X.buf[B_DATA1] = regs.ain.data[1];
                     regs.ain.data[0] = 0;
                     regs.ain.data[1] = 0;
                     goto sendserial;

                  }
                  goto sendserialno;

               }
// ---- PUT ----
               if ( X.buf[B_CMD] == CMD_PUT ) {

                  if ( Glob.Type == TYPE_OUTS ) {

                     Tmp.Addr = &regs.sero.data + X.buf[B_DATA1];
                     *Tmp.Addr = X.buf[B_DATA2];
                     Tmp.Addr++;
                     *Tmp.Addr = X.buf[B_DATA3];
                     Tmp.Addr++;
                     *Tmp.Addr = X.buf[B_DATA4];
                     Tmp.Addr++;
                     *Tmp.Addr = X.buf[B_DATA5];
                     regs.sero.count = regs.sero.maxbits;

                     goto sendserialok;

                  }

                  if ( Glob.Type & TYPE_OUTPUT ) {

                     Tmp.b.lo = X.Buf[B_DATA1];
                     portout();
                     goto sendserialok;

                  }
                  goto sendserialno;

               }
// ----
               if ( X.buf[B_CMD] == CMD_SETNUM ) {

                  Glob.Addr = X.buf[B_DATA1];
                  Tmp.Addr  = ADDR_MODUL_NUM;
                  Tmp.Dat  = X.buf[B_DATA1];
                  writerom();
                  goto sendserialok;

               }
               if ( X.buf[B_CMD] == CMD_GETTYPE ) {

                  X.buf[B_DATA0] = Glob.Type;
                  goto sendserialone;

               }
               if ( X.buf[B_CMD] == CMD_GETROM ) {

                  Tmp.Addr = X.buf[B_DATA1];
                  readrom();
                  X.buf[B_DATA0] = Tmp.Dat;
                  goto sendserialone;

               }
               if ( X.buf[B_CMD] == CMD_SETROM ) {

                  Tmp.Addr = X.buf[B_DATA1];
                  Tmp.Dat = X.buf[B_DATA2];
                  writerom();
                  goto sendserialok;

               }
 
               sendserialno:
               X.buf[B_DATA0] = '-';
               goto sendserialone;

               sendserialerr:
               X.buf[B_DATA0] = '!';
               goto sendserialone;

               sendserialok:
               X.buf[B_DATA0] = '+';

               sendserialone:
               X.buf[B_SIZE]  = B_HEADER + 1;

               sendserial:

               DISABLE_INT_RA3

               X.buf[B_PREFIX] = 0xA5;
               X.buf[B_ADDR]   = Glob.Addr;

...
      goto error;
...