home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1994 March / Source_Code_CD-ROM_Walnut_Creek_March_1994.iso / unix_c / utils / reverse.c < prev    next >
Encoding:
C/C++ Source or Header  |  1989-03-21  |  4.2 KB  |  174 lines
  1. 10-Sep-85 11:17:20-MDT,4446;000000000001
  2. Return-Path: <unix-sources-request@BRL.ARPA>
  3. Received: from BRL-TGR.ARPA by SIMTEL20.ARPA with TCP; Tue 10 Sep 85 11:17:09-MDT
  4. Received: from usenet by TGR.BRL.ARPA id a025785; 10 Sep 85 5:50 EDT
  5. From: K A Gluck <kurt@pyuxhh.uucp>
  6. Newsgroups: net.sources
  7. Subject: program to totaly reverse input
  8. Message-ID: <873@pyuxhh.UUCP>
  9. Date: 9 Sep 85 20:48:55 GMT
  10. To:       unix-sources@BRL-TGR.ARPA
  11.  
  12. rellik gub
  13. # Program to super reverse input
  14. # 
  15. # this program will completly reverse its input.
  16. # (with one exception - the output will have an extra line feed
  17. # at its beginning, and the final trainling line feed will be deleted)
  18. # for example, the folowing was a copy of the previous run through 
  19. # this program
  20. #
  21. #-------------------------------------------------------------------------
  22. # margorp siht
  23. #  hguorht nur suoiverp eht fo ypoc a saw gniwolof eht ,elpmaxe rof
  24. # )deteled eb lliw deef enil gnilniart lanif eht dna ,gninnigeb sti ta
  25. # deef enil artxe na evah lliw tuptuo eht - noitpecxe eno htiw(
  26. # .tupni sti esrever yltelpmoc lliw margorp siht
  27. #
  28. # tupni esrever repus ot margorP
  29. #
  30. #-------------------------------------------------------------------------
  31. # This is a shell archive.  Remove anything before this line, then
  32. # unpack it by saving it in a file and typing "sh file".  (Files
  33. # unpacked will be owned by you and have default permissions.)
  34. #
  35. # This archive contains:
  36. # reverse.c reverse.man
  37.  
  38. echo x - reverse.c
  39. cat > "reverse.c" << '//E*O*F reverse.c//'
  40. #include <stdio.h>
  41. #include <fcntl.h>
  42. #define strlen 256
  43.  
  44. main(argc,argv)  /* rev- lists file. */
  45.         /* argc - number of args*/
  46.         /* argv - pointer to array of char strings of args*/
  47. int argc;
  48. char *argv[];
  49. {
  50.  int fp, open(), creat() , strcmp() ;
  51.  char template[30], *mktemp() , *strcpy() ;
  52.  char *tmp;
  53. char *tmpname() ;
  54.  long pos;
  55.  int n;
  56.  
  57.  if( argc == 1 ) /* no args - halt */
  58.     { printf("rev- no argument given\n");
  59.       printf("usage-   rev file1 [{filen}]\n");
  60.     printf(" alt:    rev -    reads from stdin (pipes etc...) \n");
  61.       exit(1); }
  62.  else
  63.     while( --argc > 0 )
  64.         if( (*++argv)[0] == '-' )
  65.         {
  66.             if( ( fp = open(( tmp = ( mktemp("/tmp/revXXXXXX\0")) ),O_RDWR | O_CREAT , 0755)) == -1 )
  67.             {    printf("rev- cant open %s <<<<\n",*template);
  68.             } else {
  69.                 filecopy(0,fp);
  70.                 filerev(fp) ;
  71.                 close(fp);
  72.                 unlink(tmp);
  73.             }
  74.         } else {
  75.             if (( fp = open(*argv,0)) == -1 ) {
  76.                 printf("rev- cant open %s ###################\n",*argv);
  77.             } else {
  78.                 filerev(fp) ;
  79.                 close(fp);
  80.             }
  81.         }
  82.  }
  83.  filecopy(fpi,fpo)    /* list a file            */
  84.  int fpi , fpo;        /* the file            */
  85. { char c ;
  86.  while ( ( read(fpi,&c,1) ) > 0 ) 
  87.      write(fpo,&c,1) ; 
  88.  }
  89.  filerev(fp)    /* list a file            */
  90.  int fp;        /* the file            */
  91. { char c ;
  92.   long p ;
  93.     int flag;
  94.  long lseek() ;
  95.  int whence;
  96.  p=0L ;
  97.  whence=2;
  98.  flag=1;
  99.   while ( ( lseek(fp,p,whence ) ) != -1L )  {
  100.     p=0L-2L;
  101.     whence=1;
  102.      read(fp,&c,1) ; 
  103.     if( flag==0 )     write(1,&c,1) ; 
  104.     flag=0;
  105.     }
  106.     printf("\n");
  107.  }
  108. //E*O*F reverse.c//
  109.  
  110. echo x - reverse.man
  111. cat > "reverse.man" << '//E*O*F reverse.man//'
  112. .tr ~
  113. .de Na
  114. .br
  115. \\$1
  116. ..
  117. .de Ex
  118. .IP "" 5
  119. .B \\$1 \\$2 \$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
  120. .P
  121. ..
  122. .de Es
  123. .IP "\\$1" 5
  124. .B \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 
  125. ..
  126. .de Ee
  127. .br
  128. .B \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 
  129. ..
  130. .de Ez
  131. .P
  132. ..
  133. .tr ~
  134. .TH reverse lman "Pics System Test"
  135. .SH NAME
  136. reverse - c program to reverse files.
  137. .SH SYNOPSIS
  138. .Na "reverse files"
  139. .SH DESCRIPTION
  140. .B reverse
  141. is a filter to reverse files.
  142. It is used in a manner similar to cat (see cat(1)).
  143. .B reverse
  144. will process each of its arguments in turn, reading the files backwards.
  145. If any file has 
  146. .B -
  147. for its name, 
  148. .B reverse
  149. will create a temporary file, read standard input into that temporary file
  150. and then reverse the temporary file.
  151. .SH EXAMPLES
  152. .Es "To reverse input from terminal" reverse -
  153. .Ez
  154. .Es "To create a confusing listing" ps -ef |reverse -
  155. .Ez
  156. .Es  "To reverse the date" date |reverse -
  157. .Ez
  158. .Es "To reverse a file" who >file
  159. .Ee reverse file
  160. .Ez
  161. .SH "SEE ALSO"
  162. cat(1)
  163. .SH AUTHOR
  164. Kurt Gluck, SPL 1c273a x2023
  165. //E*O*F reverse.man//
  166.  
  167. exit 0
  168. -- 
  169. Kurt Gluck                              (201)-561-7100 x2023
  170. SPL 1c273a                              ihnp4!rruxg!kurt
  171. Bell Communications Research Inc        ihnp4!pyuxhh!kurt
  172. 50 Cragwood Road
  173. South Plainfield, NJ 07080              
  174.