Open-ILS/src/extras/fieldmapper.pl

   1 #!/usr/bin/perl
   2 use strict; use warnings;
   3 use Data::Dumper;
   4 use OpenILS::Utils::Fieldmapper;
   5
   6 my $map = $Fieldmapper::fieldmap;
   7
   8 # if a true value is provided, we generate the web (light) version of the fieldmapper
   9 my $web = $ARGV[0];
  10 # List of classes needed by the opac
  11 my @web_hints = qw/ex mvr au aou aout asv asva asvr asvq
  12                 circ acp acpl acn ccs perm_ex ahn ahr aua ac
  13                 actscecm crcd crmf crrf mus mbts aoc aus/;
  14
  15 print <<JS;
  16
  17 //  ----------------------------------------------------------------
  18 // Autogenerated by fieldmapper.pl
  19 // Requires JSON.js
  20 //  ----------------------------------------------------------------
  21
  22 function Fieldmapper() {}
  23
  24 var errorstr = "Attempt to build fieldmapper object with non-array";
  25
  26 Fieldmapper.prototype.clone = function() {
  27         var obj = new this.constructor();
  28
  29         for( var i in this.a ) {
  30                 var thing = this.a[i];
  31                 if(thing == null) continue;
  32
  33                 if( thing._isfieldmapper ) {
  34                         obj.a[i] = thing.clone();
  35                 } else {
  36
  37                         if(instanceOf(thing, Array)) {
  38                                 obj.a[i] = new Array();
  39
  40                                 for( var j in thing ) {
  41
  42                                         if( thing[j]._isfieldmapper )
  43                                                 obj.a[i][j] = thing[j].clone();
  44                                         else
  45                                                 obj.a[i][j] = thing[j];
  46                                 }
  47                         } else {
  48                                 obj.a[i] = thing;
  49                         }
  50                 }
  51         }
  52         return obj;
  53 }
  54
  55 function FMEX(message) { this.message = message; }
  56 FMEX.toString = function() { return "FieldmapperException: " + this.message + "\\n"; }
  57
  58 var _c = {};
  59
  60 JS
  61
  62 for my $object (keys %$map) {
  63
  64         if($web) {
  65                 my $hint = $map->{$object}->{hint};
  66                 next unless (grep { $_ eq $hint } @web_hints );
  67         }
  68
  69         my $short_name = $map->{$object}->{hint};
  70
  71         my @fields;
  72         for my $field (keys %{$map->{$object}->{fields}}) {
  73                 my $position = $map->{$object}->{fields}->{$field}->{position};
  74                 $fields[$position] = $field;
  75         }
  76
  77         print "_c[\"$short_name\"] = [";
  78         for my $f (@fields) { print "\"$f\","; }
  79         print "];\n"
  80
  81
  82
  83 }
  84
  85 print <<JS;
  86
  87         var string = "";
  88         for( var cl in _c ) {
  89                 string += cl + ".prototype = new Fieldmapper(); " +
  90                                                         cl + ".prototype.constructor = " + cl + ";" +
  91                                                         cl + ".baseClass = Fieldmapper.constructor;" +
  92                                                         "function " + cl + "(a) { " +
  93                                                                 "this.classname = \\\"" + cl + "\\\";" +
  94                                                                 "this._isfieldmapper = true;" +
  95                                                                 "if(a) { if(a.constructor == Array) this.a = a; else throw new FMEX(errorstr);} else this.a = []}";
  96
  97                 string += cl + "._isfieldmapper=true;";
  98
  99                 for( var pos in _c[cl] ) {
 100                         var field = _c[cl][pos];
 101                         string += cl + ".prototype." + field +
 102                                 "=function(n){if(arguments.length == 1)this.a[" +
 103                                 pos + "]=n;return this.a[" + pos + "];};";
 104                 }
 105
 106         }
 107
 108         eval(string);
 109
 110 JS
 111