File name: addrbook/setup/setup (5,456 bytes) Text file viewer v1.2
    1 : #!/bin/wel¢Ò
    2 : ¢Ò
    3 : /* file: setup¢Ò
    4 : ¢Ò
    5 :    ÁÖ¼Ò·Ï ¼³Ä¡ ÇÁ·Î±×·¥ (author: ¼­±¤Çö)¢Ò
    6 : ¢Ò
    7 :    Copyright (c) 2001/02/22 by Wesoft¢Ò
    8 :    All Rights Reserved.¢Ò
    9 : */¢Ò
   10 : ¢Ò
   11 : timeout(0);¢Ò
   12 : if(right(getcwd(), 5)=="setup") chdir("..");¢Ò
   13 : ¢Ò
   14 : default_host= "localhost";¢Ò
   15 : default_db= "weladdr";¢Ò
   16 : default_decoder= "@cgipasswd";¢Ò
   17 : default_zipcode_url= "/cgi-pub/zipcode";¢Ò
   18 : default_cookie_expire= 30;¢Ò
   19 : default_register= "Auto register";¢Ò
   20 : ¢Ò
   21 : print("\n\n>>>> addrbook.wel V0.1 installer\n");¢Ò
   22 : print("\n1. Enter MySQL database user id: ");¢Ò
   23 : myuser= lrtrim(input());¢Ò
   24 : print("\n2. Enter MySQL database passwd: ");¢Ò
   25 : mypass= lrtrim(input());¢Ò
   26 : print("\n3. Enter MySQL host (", default_host, "): ");¢Ò
   27 : myhost= lrtrim(input());¢Ò
   28 : print("\n4. Enter database name (", default_db, "): ");¢Ò
   29 : mydb= lrtrim(input());¢Ò
   30 : print("\n5. Enter decode variable (", default_decoder, "): ");¢Ò
   31 : decoder= lrtrim(input());¢Ò
   32 : print("\n6. Enter URL [zipcode.wel] (", default_zipcode_url, "): ");¢Ò
   33 : zipcode_url= lrtrim(input());¢Ò
   34 : print("\n7. Enter cookie expire time (", default_cookie_expire, "min): ");¢Ò
   35 : cookie_expire= val(input());¢Ò
   36 : print("\n8. Enter online register (", default_register, "): ");¢Ò
   37 : register= ltrim(input());¢Ò
   38 : ¢Ò
   39 : while(1)¢Ò
   40 :  {¢Ò
   41 :     print("\n9. Administrator user id: ");¢Ò
   42 :     admuser= lrtrim(input());¢Ò
   43 :     if(admuser!="") break;¢Ò
   44 :  }¢Ò
   45 : while(1)¢Ò
   46 :  {¢Ò
   47 :     print("\n10. Administrator user password: ");¢Ò
   48 :     admpass= tolower(left(lrtrim(input()),12));¢Ò
   49 :     if(admpass!="") break;¢Ò
   50 :  }¢Ò
   51 : print("\n11. Administrator name: "); admname= lrtrim(input());¢Ò
   52 : print("\n12. Administrator phone: "); admphone= lrtrim(input());¢Ò
   53 : print("\n13. Administrator handphone: "); admhdphone= lrtrim(input());¢Ò
   54 : while(1)¢Ò
   55 :  {¢Ò
   56 :     print("\n14. Administrator email: ");¢Ò
   57 :     admemail= lrtrim(input());¢Ò
   58 :     if(admemail!="") break;¢Ò
   59 :  }¢Ò
   60 : ¢Ò
   61 : if(myhost=="") myhost= default_host;¢Ò
   62 : if(mydb=="") mydb= default_db;¢Ò
   63 : if(decoder=="") decoder= default_decoder;¢Ò
   64 : if(zipcode_url=="") zipcode_url= default_zipcode_url;¢Ò
   65 : len= len(zipcode_url);¢Ò
   66 : if(right(zipcode_url, 1)=="/") zipcode_url= left(zipcode_url, len-1);¢Ò
   67 : if(cookie_expire=="") cookie_expire= default_cookie_expire;¢Ò
   68 : ch= toupper(left(register, 1));¢Ò
   69 : if(ch=="Y") register= "Yes";¢Ò
   70 :  else if(ch=="N") register= "No";¢Ò
   71 :  else register= default_register;¢Ò
   72 : ¢Ò
   73 : enpass= encode(mypass, encodekey(), "", decoder);¢Ò
   74 : enadmpass= encode(admpass, encodekey(), "", decoder);¢Ò
   75 : ¢Ò
   76 : print("\n\n-------------------------------------\n");¢Ò
   77 : print("  MySQL database      user: ", myuser, "\n");¢Ò
   78 : print("  MySQL database    passwd: ", mypass, "\n");¢Ò
   79 : print("  MySQL database      host: ", myhost, "\n");¢Ò
   80 : print("  Database name / addrbook: ", mydb, "\n");¢Ò
   81 : print("  password decode variable: ", decoder, "\n");¢Ò
   82 : print("  zipcode.wel          URL: ", zipcode_url, "\n");¢Ò
   83 : print("  Cookie    expire    time: ", cookie_expire, " min\n");¢Ò
   84 : print("  Online register         : ", register, "\n");¢Ò
   85 : print("  -------------------------\n");¢Ò
   86 : print("  Administrator user     id: ", admuser, "\n");¢Ò
   87 : print("  Administrator user passwd: ", admpass, "\n");¢Ò
   88 : print("  Administrator        name: ", admname, "\n");¢Ò
   89 : print("  Administrator       phone: ", admphone, "\n");¢Ò
   90 : print("  Administrator   handphone: ", admhdphone, "\n");¢Ò
   91 : print("  Administrator       Email: ", admemail, "\n");¢Ò
   92 : print("-------------------------------------\n\n");¢Ò
   93 : ¢Ò
   94 : sel= choice(" Do you want to install?(Y/n) ", "Yy\nNn");¢Ò
   95 : if(sel==3) print("Y");¢Ò
   96 : print("\n\n");¢Ò
   97 : cancel= "Installation is cancelled.\n\n";¢Ò
   98 : if(sel>3)¢Ò
   99 :  {¢Ò
  100 :     print(cancel);¢Ò
  101 :     return;¢Ò
  102 :  }¢Ò
  103 : ch= toupper(left(register, 1));¢Ò
  104 : if(ch=="Y") register= 1;¢Ò
  105 :  else if(ch=="N") register= 0;¢Ò
  106 :  else register= 2;¢Ò
  107 : ¢Ò
  108 : mysql= mysql_connect(myhost, myuser, mypass); // MySQL ¼­¹ö ¿¬°á¢Ò
  109 : if(mysql==MYSQL_ERR)¢Ò
  110 :  {¢Ò
  111 :     print("MySQL connect error!\n", cancel);¢Ò
  112 :     return;¢Ò
  113 :  }¢Ò
  114 : ¢Ò
  115 : print("1. Creating database: mysqladmin create ", mydb, "\n");¢Ò
  116 : if(mypass=="") passoption= ""; else passoption= " -p" ~ mypass;¢Ò
  117 : mysqladmin= "mysqladmin create " ~ mydb ~ " -u" ~ myuser ~ passoption;¢Ò
  118 : system(mysqladmin);¢Ò
  119 : if(mysql_select_db(mysql, mydb)==MYSQL_ERR)¢Ò
  120 :  {¢Ò
  121 :     print("database creation error!\n", cancel);¢Ò
  122 :     return;¢Ò
  123 :  }¢Ò
  124 : ¢Ò
  125 : print("2. Creating user table: DB=", mydb, " TABLE=user");¢Ò
  126 : ¢Ò
  127 : include("setup/setup.sub");¢Ò
  128 : if(mysql_query(mysql, ADDRBOOK_USER_TABLE)==MYSQL_ERR)¢Ò
  129 :  {¢Ò
  130 :     print("\ntable 'user' creating error!\n", cancel);¢Ò
  131 :     return;¢Ò
  132 :  }¢Ò
  133 : print(" --> OK\n");¢Ò
  134 : print("3. Creating memo table: DB=", mydb, " TABLE=umemo");¢Ò
  135 : if(mysql_query(mysql, ADDRBOOK_MEMO_TABLE)==MYSQL_ERR)¢Ò
  136 :  {¢Ò
  137 :     print("\ntable 'umemo' creating error!\n", cancel);¢Ò
  138 :     return;¢Ò
  139 :  }¢Ò
  140 : print(" --> OK\n");¢Ò
  141 : print("4. Insert Administrator");¢Ò
  142 : wdtime= date(1) ~ " " ~ left(time(1),5);¢Ò
  143 : qstr= "insert into user (wdtime,id,pass,title,class,kind,useflag,"¢Ò
  144 :     ~ "name,phone,hdphone,email,pagerec)"¢Ò
  145 :     ~ strform("values ('{$wdtime}','{$admuser}','{$enadmpass}',",¢Ò
  146 :               "'Administrator','A','C','Y','{$admname}','{$admphone}',",¢Ò
  147 :               "'{$admhdphone}','{$admemail}','10')");¢Ò
  148 : ¢Ò
  149 : if(mysql_query(mysql, qstr)==MYSQL_ERR)¢Ò
  150 :  {¢Ò
  151 :     print("\nadministrator insert error!\n", cancel);¢Ò
  152 :     return;¢Ò
  153 :  }¢Ò
  154 : mysql_close(mysql);¢Ò
  155 : print(" --> OK\n");¢Ò
  156 : print("5. setup 'common.inc'");¢Ò
  157 : fp= fopen("common.inc", "w");¢Ò
  158 : if(fp==FILE_OPEN_ERR)¢Ò
  159 :  {¢Ò
  160 :     print("\ncommon.inc open error!\n", cancel);¢Ò
  161 :     return;¢Ò
  162 :  }¢Ò
  163 : formredir(fp);¢Ò
  164 : btname= "{$btname}";¢Ò
  165 : action= "{$action}";¢Ò
  166 : style= "{$style}";¢Ò
  167 : randomize();¢Ò
  168 : cookie_garbage= fix(rand(40))+1;¢Ò
  169 : formdump("setup/common.def");¢Ò
  170 : fclose(fp);¢Ò
  171 : print(" --> OK\n");¢Ò
  172 : print("6. Testing:  http://your-site/install-dir/addrbook/login.wel\n\n");¢Ò
  173 : print(" Successfuly installed, Thanks for using.\n\n");¢Ò
  174 : print(" http://wesoft.co.kr                          Tel: (054) 433-4554\n");¢Ò
  175 : return;¢Ò
File name: addrbook/setup/setup (5,456 bytes) Wesoft Corp. ¨Ï 2001 All rights reserved.