Return to updatequery.piml CVS log

Up to [LON-CAPA] / doc / loncapafiles

Annotation of doc/loncapafiles/updatequery.piml, revision 1.2

1.2     ! harris41    1: <!-- updatequery.piml -->
1.1       harris41    2: <!-- Scott Harrison -->
                      3: 
1.2     ! harris41    4: <!-- $Id: updatequery.piml,v 1.1 2002/05/03 02:06:45 harris41 Exp $ -->
1.1       harris41    5: 
                      6: <!--
                      7: 
                      8: This file is part of the LearningOnline Network with CAPA (LON-CAPA).
                      9: 
                     10: LON-CAPA is free software; you can redistribute it and/or modify
                     11: it under the terms of the GNU General Public License as published by
                     12: the Free Software Foundation; either version 2 of the License, or
                     13: (at your option) any later version.
                     14: 
                     15: LON-CAPA is distributed in the hope that it will be useful,
                     16: but WITHOUT ANY WARRANTY; without even the implied warranty of
                     17: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
                     18: GNU General Public License for more details.
                     19: 
                     20: You should have received a copy of the GNU General Public License
                     21: along with LON-CAPA; if not, write to the Free Software
                     22: Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
                     23: 
                     24: /home/httpd/html/adm/gpl.txt
                     25: 
                     26: http://www.lon-capa.org/
                     27: 
                     28: -->
                     29: 
                     30: <piml>
                     31: <targetroot>/</targetroot>
                     32: <files>
                     33: <file>
                     34: <target dist='default'>/home/httpd/lonUsers2</target>
                     35: <perlscript mode='fg'>
                     36:   print(&lt;&lt;END);
                     37: 
                     38: 
                     39: *********************************************
                     40: *********************************************
                     41: ****                                     ****
                     42: **** LON-CAPA SYSTEM INFORMATION REQUEST ****
                     43: ****                                     ****
                     44: **** Please respond to the choices below ****
                     45: ****                                     ****
                     46: *********************************************
                     47: *********************************************
                     48: 
                     49: END
                     50: </perlscript>
                     51: </file>
                     52: <file>
                     53: <target dist='default'>/home/httpd/lonUsers2</target>
                     54: <perlscript mode='fg'>
                     55: unless (-e "<TARGET />") {
                     56:   print(&lt;&lt;END);
                     57:            WELCOME TO LON-CAPA!
                     58: 
                     59: If you have questions, please visit http://install.lon-capa.org
                     60: or contact sharrison@install.lon-capa.org.
                     61: 
                     62: ===============================================================================
                     63: The following 3 values are needed to configure LON-CAPA:
                     64: * Machine ID Name
                     65: * LON-CAPA Domain Name, and
                     66: * System Administration E-mail Address.
                     67: END
                     68: 
                     69:   print(&lt;&lt;END);
                     70: 
                     71: **** Machine ID Name ****
                     72: [this does NOT need to correspond to internet address names;
                     73:  this name MUST be unique to the whole LON-CAPA network;
                     74:  we recommend that you use a name based off of your institution;
                     75:  good examples: "msul1" or "bionetl1";
                     76:  bad examples: "loncapabox" or "studentsinside"]
                     77: ENTER MACHINE ID NAME:
                     78: END
                     79: # get machine name
                     80: # accept if valid, if not valid, tell user and repeat
                     81: 
                     82:   print(&lt;&lt;END);
                     83: 
                     84: **** Domain ****
                     85: [this does NOT need to correspond to internet address domains,
                     86:  examples might be "msu" or "bionet" or "vermontcc"]
                     87: ENTER LONCAPA DOMAIN:
                     88: END
                     89: 
                     90: # get domain name
                     91: # accept if valid, if not valid, tell user and repeat
                     92: 
                     93:   print(&lt;&lt;END);
                     94: 
                     95: **** System Administrator's E-mail ****
                     96: E-mail address of the person who will manage this machine
                     97: [should be in the form somebody@somewhere]
                     98: ENTER E-MAIL ADDRESS:
                     99: END
                    100: 
                    101: # get e-mail address
                    102: # accept if valid, if not valid, tell user and repeat
                    103: # update loncapa.conf
                    104: }
                    105: </perlscript>
                    106: </file>
                    107: <file>
                    108: <target dist='default'>/home/httpd/lonUsers2</target>
                    109: <perlscript mode='fg'>
                    110: # read values from loncapa.conf
                    111:   print(&lt;&lt;END);
                    112: 
                    113: ===============================================================================
                    114: This is now the current configuration of your machine.
                    115: 1) Machine Name: $perlsetvar{'lonHostID'}
                    116: 2) Domain Name: $perlsetvar{'lonDefDomain'}
                    117: 3) System Administrator's E-mail Address: $perlsetvar{'lonAdmEmail'}
                    118: 4) Role: $perlsetvar{'lonRole'}
                    119: 5) Cache Expiration Time: $perlsetvar{'lonExpire'}
                    120: 6) Server Load: $perlsetvar{'lonLoadLim'}
                    121: 7) Everything is correct up above
                    122: ENTER A CHOICE OF 1-6 TO CHANGE, otherwise ENTER 7:
                    123: END
                    124: 
                    125: # implement editing logic below, interactively
                    126: # update loncapa.conf until 7 is entered
                    127: 
                    128: </perlscript>
                    129: </file>
                    130: <file>
                    131: <target dist='default'>loncom/hosts.tab</target>
                    132: <perlscript mode='fg'>
                    133: unless (-l "<TARGET />") {
                    134:   print(&lt;&lt;END);
                    135: 
                    136: ===============================================================================
                    137: What hosts.tab would you like to have installed?
                    138: (hosts.tab is a listing of all other internet machines
                    139: that a server system considers to be valid server systems
                    140: on the LON-CAPA network)
                    141: 
                    142: 1) PRODUCTION - you want to deliver courses today or sometime very soon
                    143:                 on this machine
                    144: 2) DEVELOPMENT - you want to play with or explore LON-CAPA
                    145: 3) Do not install hosts.tab right now
                    146: 
                    147: ENTER 1, 2, or 3:
                    148: END
                    149: # Option number 26 will install rawhide_hosts.tab, but
                    150: # the typical user does not want to be part of an intensive
                    151: # machine test cluster.
                    152: 
                    153: # get input
                    154: # if valid then process, otherwise loop
                    155: 
                    156: }
                    157: </perlscript>
                    158: </file>
                    159: </files>
                    160: </piml>