|
||||
1 : #!/bin/wel¢Ò 2 : ¢Ò 3 : /* file: BDdel¢Ò 4 : ¢Ò 5 : °Ô½ÃÆÇ »èÁ¦ ÇÁ·Î±×·¥ (author: ¼±¤Çö)¢Ò 6 : ¢Ò 7 : Copyright (c) 2001/03/25 by Wesoft¢Ò 8 : All Rights Reserved.¢Ò 9 : */¢Ò 10 : ¢Ò 11 : timeout(0);¢Ò 12 : path= argv[0];¢Ò 13 : if(right(path,5)=="BDdel") path= left(path, len(path) - 5);¢Ò 14 : if(path!="" && path!="./") chdir(path);¢Ò 15 : ¢Ò 16 : function cancel_message(string msg)¢Ò 17 : {¢Ò 18 : if(msg!="") print(" ERROR: ", msg, "\n");¢Ò 19 : print(" Board deletion is cancelled.\n\n");¢Ò 20 : return;¢Ò 21 : }¢Ò 22 : ¢Ò 23 : print("<<--- WelBoard V2.0.4 board deletion --->>\n\n");¢Ò 24 : if(argc>1) db= argv[1];¢Ò 25 : else¢Ò 26 : {¢Ò 27 : while(1)¢Ò 28 : {¢Ò 29 : print("1. Board DB(table) name: "); db= lrtrim(input()); print();¢Ò 30 : if(db=="") { cancel_message(""); return; }¢Ò 31 : len= len(tolower(db));¢Ò 32 : if(len>0 && (strkind(db)&0xFFF1)==0) break;¢Ò 33 : print("Bad new board name! (Usable charater: 0~9, A~Z, a~z)\n");¢Ò 34 : }¢Ò 35 : }¢Ò 36 : ¢Ò 37 : conf= "conf/" ~ db ~ ".conf";¢Ò 38 : if(!fexist(conf))¢Ò 39 : {¢Ò 40 : cancel_message("Not exist!, board name: " ~ db);¢Ò 41 : return;¢Ò 42 : }¢Ò 43 : ¢Ò 44 : print("WARNING: all data in board(", db, "), WILL BE LOST! ");¢Ò 45 : sel= choice("Are you sure (y/N)? ", "Yy\nNn");¢Ò 46 : if(sel==3) print("N");¢Ò 47 : print("\n\n");¢Ò 48 : if(sel>2) { cancel_message(""); return; }¢Ò 49 : ¢Ò 50 : break_on= -1;¢Ò 51 : include("include/board.inc");¢Ò 52 : message_form= "";¢Ò 53 : ¢Ò 54 : include(conf, -1);¢Ò 55 : print("Administrator user id: "); id= input(); print();¢Ò 56 : if(id=="") { cancel_message(""); return; }¢Ò 57 : if(id!=board_admin_id)¢Ò 58 : {¢Ò 59 : cancel_message("Incorrect administrator user id!");¢Ò 60 : return;¢Ò 61 : }¢Ò 62 : print("Administrator password: "); pass= input(); print();¢Ò 63 : depass= decode(board_admin_pass, "", decode_variable);¢Ò 64 : if(pass!=depass)¢Ò 65 : {¢Ò 66 : cancel_message("Incorrect administrator password!");¢Ò 67 : return;¢Ò 68 : }¢Ò 69 : ¢Ò 70 : print("\n\n1. Drop board table: ", db, "\n");¢Ò 71 : rt= mysql_connection("");¢Ò 72 : if(rt==MYSQL_ERR)¢Ò 73 : {¢Ò 74 : if(mysql==MYSQL_ERR) msg= "MySQL connection error!";¢Ò 75 : else msg= "MySQL select db error! (DB=" ~ mydb ~ ")";¢Ò 76 : cancel_message(msg);¢Ò 77 : return disconnect();¢Ò 78 : }¢Ò 79 : rt= mysql_query(mysql, "drop table " ~ db);¢Ò 80 : if(rt==MYSQL_ERR)¢Ò 81 : {¢Ò 82 : msg= "MySQL drop table error! (DB=" ~ mydb ~ ", TABLE=" ~ db ~ ")";¢Ò 83 : cancel_message(msg);¢Ò 84 : return disconnect();¢Ò 85 : }¢Ò 86 : print("2. Deleting board configuration file: ", conf, "\n");¢Ò 87 : unlink(conf);¢Ò 88 : upload_dir= "upload/" ~ db;¢Ò 89 : if(fexist(upload_dir)) system("rm -Rf upload/" ~ db);¢Ò 90 : print("\n>>> deleted board db=" ~ db, "\n");¢Ò 91 : return disconnect();¢Ò |
||||
|