home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 10 / 10.iso / l / l350 / 3.ddi / EXAMPLES / WINDOWS / PUTCLIP.C < prev    next >
Encoding:
C/C++ Source or Header  |  1993-01-04  |  1.3 KB  |  57 lines
  1. /* 
  2. PUTCLIP.C -- put text on Windows clipboard
  3. */ 
  4.  
  5. #include <stdlib.h> 
  6. #include <stdio.h> 
  7. #include <string.h> 
  8. #include <dos.h> 
  9. #include <io.h> 
  10. #include <fcntl.h> 
  11. #include <pltypes.h>
  12. #include "winclip.h" 
  13.  
  14. #ifdef __WATCOMC__
  15. #define _read read
  16. #define _open open
  17. #define _close close
  18. #define _filelength filelength
  19. #endif
  20.  
  21. void fail(char *s) { puts(s); exit(1); } 
  22.  
  23. int main(int argc, char *argv[]) 
  24. { 
  25.     int f, len, maj, min; 
  26.     int rc; // number of bytes read 
  27.     char *p; 
  28.  
  29.     if (! WinOldApVersion(&maj, &min)) 
  30.       fail("This program requires Windows Enhanced mode"); 
  31.  
  32.     if (argc < 2) 
  33.         fail("usage: putclip [filename]"); 
  34.      
  35.     f = _open(argv[1], O_RDONLY);
  36.     if (f == -1)
  37.         fail("can't open file"); 
  38.     len = _filelength(f); 
  39.     if ((p = malloc(len+1)) == 0) 
  40.         fail("insufficient memory"); 
  41.     rc = _read(f, p, len);
  42.     if (rc < 0)
  43.         fail("can't read file"); 
  44.     _close(f);
  45.     p[rc] = '\0';  // must be NULL terminated 
  46.      
  47.     fputs("putclip ", stdout); 
  48.     switch (PutClipStrLen(p, rc+1)) // include space for NULL 
  49.     { 
  50.         case 0:   puts("failed"); break; 
  51.         case 1:   puts("successful"); break; 
  52.         case -1:  puts("requires Windows Enhanced mode"); break; 
  53.     } 
  54.     free(p); 
  55.     return 0; 
  56. } 
  57.