/[pxelator]/lib/PXElator/tftpd.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /lib/PXElator/tftpd.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 115 by dpavlin, Sun Aug 2 12:09:02 2009 UTC revision 128 by dpavlin, Mon Aug 3 19:59:08 2009 UTC
# Line 5  use strict; Line 5  use strict;
5    
6  use Net::TFTPd 0.03 qw(%OPCODES);  use Net::TFTPd 0.03 qw(%OPCODES);
7  use Data::Dump qw/dump/;  use Data::Dump qw/dump/;
 use Module::Refresh;  
8    
9  use server;  use server;
10    
# Line 22  sub path { Line 21  sub path {
21          return $path;          return $path;
22  }  }
23    
 STDERR->autoflush(1);  
24  use progress_bar;  use progress_bar;
25    
26  sub transfer_status {  sub transfer_status {
# Line 41  sub transfer_status { Line 39  sub transfer_status {
39  sub tftp_request {  sub tftp_request {
40          my $request = shift;          my $request = shift;
41    
42            server->refresh;
43    
44          warn 'request: ', dump( $request ) if $debug;          warn 'request: ', dump( $request ) if $debug;
45    
46          config::for_ip();          config::for_ip();
# Line 94  sub start { Line 94  sub start {
94    
95          while(1) {          while(1) {
96    
                 Module::Refresh->refresh;  
   
97                  # wait for any request (RRQ or WRQ)                  # wait for any request (RRQ or WRQ)
98                  if(my $request = $listener->waitRQ()) {                  if(my $request = $listener->waitRQ()) {
99                          tftp_request $request;                          tftp_request $request;
100                  } else {                  } elsif ( my $error = Net::TFTPd->error ) {
101                          warn Net::TFTPd->error;                          warn $error;
102                  }                  }
103    
104          }          }
Legend:
Removed from v.115  
changed lines
  Added in v.128
  ViewVC Help
Powered by ViewVC 1.1.26