gnu/dist/gdb6/gdb/testsuite/gdb.base/checkpoint.c

   1 /* This testcase is part of GDB, the GNU debugger.
   2
   3    Copyright 2005, 2006 Free Software Foundation, Inc.
   4
   5    This program is free software; you can redistribute it and/or modify
   6    it under the terms of the GNU General Public License as published by
   7    the Free Software Foundation; either version 2 of the License, or
   8    (at your option) any later version.
   9
  10    This program is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13    GNU General Public License for more details.
  14
  15    You should have received a copy of the GNU General Public License
  16    along with this program; if not, write to the Free Software
  17    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA,
  18    02110-1301, USA.  */
  19
  20 #include <stdlib.h>
  21 #include <stdio.h>
  22
  23 long lines = 0;
  24
  25 main()
  26 {
  27   char linebuf[128];
  28   FILE *in, *out;
  29   char *tmp = &linebuf[0];
  30   long i;
  31   int c = 0;
  32
  33   in  = fopen ("pi.txt", "r");
  34   out = fopen ("copy1.txt", "w");
  35
  36   if (!in || !out)
  37     {
  38       fprintf (stderr, "File open failed\n");
  39       exit (1);
  40     }
  41
  42   for (i = 0; ; i++)
  43     {
  44       if (ftell (in) != i)
  45         fprintf (stderr, "Input error at %d\n", i);
  46       if (ftell (out) != i)
  47         fprintf (stderr, "Output error at %d\n", i);
  48       c = fgetc (in);
  49       if (c == '\n')
  50         lines++;        /* breakpoint 1 */
  51       if (c == EOF)
  52         break;
  53       fputc (c, out);
  54     }
  55   printf ("Copy complete.\n");  /* breakpoint 2 */
  56   fclose (in);
  57   fclose (out);
  58   printf ("Deleting copy.\n");  /* breakpoint 3 */
  59   unlink ("copy1.txt");
  60   exit (0);                     /* breakpoint 4 */
  61 }