[LON-CAPA-cvs] cvs: modules /gerd/usagestats domain_kinds.tab update_domain_kinds.pl

[www]

www		Tue Dec  6 18:50:22 2011 EDT

  Modified files:              
    /modules/gerd/usagestats	domain_kinds.tab update_domain_kinds.pl 
  Log:
  Domain kinds
  
  
Index: modules/gerd/usagestats/domain_kinds.tab
diff -u modules/gerd/usagestats/domain_kinds.tab:1.8 modules/gerd/usagestats/domain_kinds.tab:1.9
--- modules/gerd/usagestats/domain_kinds.tab:1.8	Tue Dec  6 12:21:09 2011
+++ modules/gerd/usagestats/domain_kinds.tab	Tue Dec  6 18:50:21 2011
@@ -1,8 +1,62 @@
-clemson:Clemson:U
+rccs:Redeemer Classical Christian School:HS
+westnoble:West Noble High School:HS
+aaps:Ann Arbor Public Schools:HS
+eastahs:East Anchorage High School:HS
+lakenheath:Lakenheath High School:HS
+bvsd:Boulder Valley School District:HS
+mchs:Minooka Community High School:HS
+mvla:Mountain View-Los Altos:HS
+sarasota:Sarasota County Schools K-12:HS
+oside:Oceanside Unified School District:HS
+BCHS:Bear Creek High School:HS
+ashleyschools:Ashley Community Schools:HS
+senecavalley:Seneca Valley High School:HS
+wellston:Wellston School District:HS
+mariettahs:Marietta High School:HS
+burnaby:Burnaby School District:HS
+johnht:Johnston Heights Secondary School:HS
+kyoto-u:Kyoto University:U
+dallasisd:Dallas ISD:HS
+divinechild:Divine Child High School:HS
+rutgers:Rutgers:U
+lcc:Lower Canada College:CC
+koinonia:KoinoniaGroup:HS
+msudemo:Demo Machine:PR
+sunysb:SUNY Stony Brook:U
+showandtell:Problem Examples:PR
+ucsc:University of California, Santa Cruz:U
+UNICAMP:UNICAMP:U
+ufba:Universidade Federal da Bahia:U
+uftm:Universidade Federal do Triangulo Mineiro:U
+nagoya:Nagoya University:U
+colorado:University of Colorado:U
+harvard:Harvard University:U
+uwinnipeg:University of Winnipeg:U
+umass:University of Massachusetts Amherst:U
+nyu:New York University:U
+upm:Universidad Politecnica de Madrid:U
+umassd:University of Massachusetts Dartmouth:U
+fh-emden:Fachhochschule Emden:U
+oregonstate:Oregon State University:U
+itu:Istanbul Technical University:U
+uprm:University of Puerto Rico, Mayaguez Campus:U
+queensu:Queens University, Kingston:U
+ncku:National Cheng Kung University:U
+fh-regensburg:Fachhochschule Regensburg:U
+ucsb:University of California Santa Barbara:U
+aicasa:American International College of Arts and Sciences Antigua:HS
+sbuniv:Southwest Baptist University:U
+uclan:University of Central Lancashire:U
+montgomery:Montgomery College:U
+fh-hannover: Hannover University of Applied Sciences and Arts:U
+uwplatt:University of Wisconsin - Platteville:U
+vanier:Vanier College:U
+ucsd:University of California San Diego:U
+fh-stralsund:Stralsund University of Applied Sciences:U
+isiku:Isik University:U
 MIT:MIT:U
 saic:Art Institute Chicago:U
 carsoncity:Carson City:HS
-smuhsd:San Mateo Union High School District:HS
 asu:Arizona State:U
 otterbein:Otterbein:U
 clemson:Clemson:U
Index: modules/gerd/usagestats/update_domain_kinds.pl
diff -u modules/gerd/usagestats/update_domain_kinds.pl:1.2 modules/gerd/usagestats/update_domain_kinds.pl:1.3
--- modules/gerd/usagestats/update_domain_kinds.pl:1.2	Thu May 10 20:25:45 2007
+++ modules/gerd/usagestats/update_domain_kinds.pl	Tue Dec  6 18:50:21 2011
@@ -1,16 +1,18 @@
 open(IN,'domain_kinds.tab');
 while ($line=<IN>) {
     chomp($line);
-    my (undef,$domain,undef,undef,$type)=split(/\:/,$line);
+    my ($domain,$name,$type)=split(/\:/,$line);
     if ($type) { $domaintype{$domain}=$type; }
+#    print ">$domain $type\n";
 }
 close(IN);
-open(IN,'/home/www/loncapa/loncom/production_dns_hosts.tab');
+open(IN,'/home/www/loncapa/loncom/production_dns_domain.tab');
 while ($line=<IN>) {
     if ($line=~/^\s*\#/) { next; }
     my ($domain,$name)=split(/\:/,$line);
+#    print "====>$domain $domaintype{$domain}\n";
     unless ($domaintype{$domain}) {
-       print $line;
+       print "$domain:$name:\n";
     }
 }
 close(IN);