home *** CD-ROM | disk | FTP | other *** search
/ rtsi.com / 2014.01.www.rtsi.com.tar / www.rtsi.com / OS9 / MM1 / UTIL / fkalias.lzh / fklocal.c < prev    next >
C/C++ Source or Header  |  1994-01-04  |  793b  |  40 lines
  1. /* released to PD by Andrzej Kotanski, Jan. 4, 1994 */
  2.  
  3. #include <stdio.h>
  4. #include <ctype.h>
  5.  
  6. static char buffer[256] = "\x1b\x2b\x06\x2a\x00\x00\x01\x00\x01\x00";
  7. static char buffer2[5] = "\x1e\x26";
  8.  
  9. fklocal(fk, alias, arglen, buffnr)
  10. int fk;
  11. char *alias;
  12. register int arglen;
  13. int buffnr;
  14. {
  15.     int pid = getpid();
  16.     
  17.     buffer[2] = buffer2[2] = pid;
  18.     buffer[3] = buffer2[3] = buffnr;
  19.     memcpy(&buffer[11], alias, arglen);
  20.     buffer[10] = arglen + 1;
  21.  
  22.     buffer2[4] = fk - 1;
  23.     
  24.     write(1, buffer, arglen + 12);
  25.     write(1, buffer2, 5);
  26.  
  27.     fprintf(stderr, "'%s' assigned to fcn key %d, buffnr %d, pid %d\n",
  28.             alias, fk, buffnr, pid);
  29. }
  30.  
  31. main()
  32. {
  33.     register int c;
  34.     
  35.     fklocal(1, "dir\n", 4, 30);
  36.  
  37.     while ( (c = getchar()) != EOF )
  38.        putchar(c);
  39. }
  40.