File: wwwtouch.hc

package info (click to toggle)
craft 3.5-10
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 18,000 kB
  • ctags: 1,602
  • sloc: cpp: 3,794; makefile: 2,319; ansic: 857; sh: 385
file content (31 lines) | stat: -rw-r--r-- 535 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
 
#include "win.h"

main (int num_params, char *shell_params [])
  {FILE *f;

   open_f;
   print_params;
   print_input;
   fclose (f);

.  open_f
     {f_open (f, "/home/hua/xyz", "w");
     }.

.  print_params
     {for (int i = 0; i < num_params; i++)
        fprintf (f, "<%s>\n", shell_params [i]);
     }.

.  print_input
     {int  l = atoi (getenv ("CONTENT_LENGTH"));
      char c;
      
      for (int i = 0; i < l; i++)
        {c = getchar ();
         fprintf (f, "%c", c);
        };
      fprintf (f, "\n");
     }.

  }