scripts/alldiffer.lua

   1 #!/usr/bin/env lua
   2
   3 lines = {};
   4 files = {};
   5
   6 for i = 1,#arg do
   7         files[i], err = io.open(arg[i], "r");
   8         if not files[i] then
   9                 error("Can't open " .. arg[i] .. ": " .. err);
  10         end
  11 end
  12
  13 firstline = true;
  14 while true do
  15         remaining = false;
  16         for i = 1,#arg do
  17                 lines[i] = files[i]:read();
  18                 if lines[i] then
  19                         remaining = true;
  20                 end
  21         end
  22         if not remaining then
  23                 os.exit(0);
  24         end
  25
  26         alldiffer = true;
  27         for i = 1,#arg do
  28                 for j = i + 1,#arg do
  29                         if lines[i] and lines[j] and lines[i] == lines[j] then
  30                                 alldiffer = false;
  31                         end
  32                 end
  33         end
  34
  35         if alldiffer then
  36                 if not firstline then
  37                         print("-------------------------------------------------------");
  38                 end
  39                 firstline = false;
  40                 for i = 1,#arg do
  41                         if lines[i] then
  42                                 print(lines[i]);
  43                         end
  44                 end
  45         end
  46 end