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;¢Ò
|