File: sort_file.C

package info (click to toggle)
peruser 4b33-6
  • links: PTS
  • area: main
  • in suites: potato
  • size: 2,952 kB
  • ctags: 1,064
  • sloc: cpp: 22,367; perl: 2,733; makefile: 345; sh: 335
file content (113 lines) | stat: -rw-r--r-- 2,625 bytes parent folder | download | duplicates (2)
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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <errno.h>
#include <sys/time.h>
#include <signal.h>

#include "npserver.h"

int NP_Server::sort_file( char *filename, void ( *SIGALRM_handler )( int ))
{
   unsigned int i, count;

   char **array, buffer[ 1024 ], second_buffer[ 1024 ], third_buffer[ 1024],
      *home;
   FILE *file, *temp;


   snprintf( third_buffer, sizeof third_buffer, "%s/%s", 
             home = getenv( "HOME" ), filename );
   if (( file = fopen( third_buffer, "r" )) == NULL )
   {
      snprintf( error_message, sizeof error_message,
                "NP_Server: sort_file(): fopen() returned error: %s.",
                strerror( errno ));
      return 1;
   }

   snprintf( second_buffer, sizeof second_buffer, "%s.tmp", third_buffer );
   if (( temp = fopen( second_buffer, "w" )) == NULL )
   {
      fclose( file );
      snprintf( error_message, sizeof error_message,
                "NP_Server: sort_file(): fopen() returned error: %s.",
                strerror( errno ));
      return 1;
   }

   count = 0;
   while( fgets( buffer, sizeof buffer, file ) != NULL )
      ++count;

   if ( count > 5000 )
   {
      fclose( file );
      fclose( temp );

      snprintf( buffer, sizeof buffer, "sort %s >%s", third_buffer, 
                second_buffer );
      system( buffer );
   }
   else
   {
      if (( array = ( char **)calloc( count, sizeof *array )) == NULL )
      {
         perror( "calloc" );
         exit( 1 );
      }

      rewind( file );
      for( i = 0; i < count; ++i )
      {
         fgets( buffer, sizeof buffer, file );

         if (( array[ i ] = ( char *)malloc( sizeof( buffer ) + 1 )) == NULL )
         {
            perror( "malloc" );
            exit( 1 );
         }

         strcpy( array[ i ], buffer );
      }

      fclose( file );

      struct itimerval tval;
      if ( SIGALRM_handler != NULL )
      {
         tval.it_interval.tv_sec = 0;
         tval.it_interval.tv_usec = 250000;
         tval.it_value.tv_sec = 0;
         tval.it_value.tv_usec = 250000;

         setitimer( ITIMER_REAL, &tval, NULL );

         signal( SIGALRM, SIGALRM_handler );
      }

      qsort( array, count, sizeof *array, compare );

      if ( SIGALRM_handler != NULL )
      {
         tval.it_value.tv_sec = 0;
         tval.it_value.tv_usec = 0;

         setitimer( ITIMER_REAL, &tval, NULL );
      }

      for( i = 0; i < count; ++i )
      {
         fputs( array[ i ], temp );
         free( array [ i ] );
      }

      free( array );

      fclose( temp );
   }

   rename( second_buffer, third_buffer );

   return 0;
}