| … | |
… | |
| 139 | package conn; |
139 | package conn; |
| 140 | |
140 | |
| 141 | use Socket; |
141 | use Socket; |
| 142 | use HTTP::Date; |
142 | use HTTP::Date; |
| 143 | use Convert::Scalar 'weaken'; |
143 | use Convert::Scalar 'weaken'; |
| 144 | use Linux::AIO; |
144 | use IO::AIO; |
| 145 | |
145 | |
| 146 | Linux::AIO::min_parallel $::AIO_PARALLEL; |
146 | IO::AIO::min_parallel $::AIO_PARALLEL; |
| 147 | |
147 | |
| 148 | Event->io(fd => Linux::AIO::poll_fileno, |
148 | Event->io(fd => IO::AIO::poll_fileno, |
| 149 | poll => 'r', async => 1, |
149 | poll => 'r', async => 1, |
| 150 | cb => \&Linux::AIO::poll_cb); |
150 | cb => \&IO::AIO::poll_cb); |
| 151 | |
151 | |
| 152 | our %conn; # $conn{ip}{self} => connobj |
152 | our %conn; # $conn{ip}{self} => connobj |
| 153 | our %uri; # $uri{ip}{uri}{self} |
153 | our %uri; # $uri{ip}{uri}{self} |
| 154 | our %blocked; |
154 | our %blocked; |
| 155 | our %mimetype; |
155 | our %mimetype; |
