Advertisement
Guest User

daniel_p

a guest
Nov 10th, 2007
72
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Perl 1.18 KB | None | 0 0
  1. backend default {
  2.         set backend.host = "127.0.0.1";
  3.         set backend.port = "8080";
  4. }
  5.  
  6. backend DOMAIN {
  7.     set backend.host = "IP";
  8.     set backend.port = "80";
  9. }
  10.  
  11. acl purge {
  12.     "localhost";
  13.     "office";
  14.     "network1"/24;
  15.     "network2"/27;
  16.     "network3"/27;
  17. }
  18.  
  19. sub vcl_recv {
  20.         if (req.http.host ~ "board.DOMAIN") {
  21.             set req.backend = DOMAIN;
  22.             if (req.request == "POST") {
  23.                 pipe;
  24.             }
  25.             pass;
  26.         }
  27.         if (req.url ~ ".*\.(jpg|gif|png|css|js)$"){
  28.                 lookup;
  29.         }
  30.         if (req.request == "PURGE") {
  31.             if (!client.ip ~ purge) {
  32.                 error 405 "Not allowed.";
  33.             }
  34.             lookup;
  35.         }
  36.  
  37. }
  38. sub vcl_hit {
  39.         if (req.request == "PURGE") {
  40.             set obj.ttl = 0s;
  41.             error 200 "Purged.";
  42.         }
  43.         if (req.http.host ~ "board.DOMAIN") {
  44.                 set obj.ttl = 0s;
  45.         }
  46. }
  47. sub vcl_miss {
  48.         if (req.request == "PURGE") {
  49.             error 404 "Not in cache.";
  50.         }
  51. }
  52. sub vcl_fetch {
  53.         if (req.url ~ ".*\.(jpg|gif|png|css|js)$"){
  54.                 insert;
  55.         }
  56. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement