使用batch批处理做目录及流程选择

@echo off

rem -- http://phpnow.org
rem -- YinzCN_at_Gmail.com

setlocal enableextensions
if exist Pn\Config.cmd pushd . && goto cfg
if exist ..\Pn\Config.cmd pushd .. && goto cfg
goto :eof

:cfg
call Pn\Config.cmd
if "%php%"=="" exit /b

if "%1"=="exec" if not "%2"=="" cmd /c "%2 %3 %4 %5 %6" && goto :eof
if not "%1"=="" (
  call :%1 %2
  goto :eof
)

prompt -$g
title PHPnow %pn_ver% 控制面板 (Apache %htd_ver%, %php_dir%, %myd_dir%)
goto menu

:restart_apache
if not exist %htd_dir%\logs\httpd.pid goto :eof
echo.
echo  正在重启 Apache ...
pushd %htd_dir%
bin\%htd_exe% -k restart -n %htd_svc% || set errno=1
popd
if "%errno%"=="1" %pause%
goto :eof

:execmd
if exist %1 call %1 && goto :eof
if exist %PnCmds%\%1 call %PnCmds%\%1 && goto :eof
echo # 未找到 %1 !
%pause%
goto :eof

:menu
echo   ________________________________________________________________
echo  ^|                                                                ^|
echo  ^|         PHPnow  -  绿色 PHP + MySQL 套件  -  控制面板          ^|
echo  ^|                                                                ^|
echo  ^|     0 - VHost: 添加 虚拟主机       10 - 添加 代理虚拟主机      ^|
echo  ^|     1 - VHost: 删除 虚拟主机       11 - 取消 代理虚拟主机      ^|
echo  ^|     2 - VHost: 修改 虚拟主机       12 - 重设 MySQL root 密码   ^|
echo  ^|     3 - 开启 eAccelerator          13 - 更改 Apache 端口       ^|
echo  ^|     4 - 关闭 eAccelerator *        14 - --                     ^|
echo  ^|     5 - 开启 mod_info ^& status     15 - 升级 MySQL 数据库      ^|
echo  ^|     6 - 关闭 mod_info ^& status *   16 - 端口使用状态检测       ^|
echo  ^|     7 - Log: Apache 日志分卷       17 - 设置 error_reporting   ^|
echo  ^|     8 - Log: 默认 Apache 日志 *    18 - 配置文件 备份 / 还原   ^|
echo  ^|     9 - Log: 关闭 Apache 日志      19 - Pn 目录 命令提示符     ^|
echo  ^|     (带 * 号的为默认选项)                                      ^|
echo  ^|                                                                ^|
echo  ^|     20 - Start.cmd                 30 - Stop.cmd               ^|
echo  ^|     21 - Apa_Start.cmd             31 - Apa_Stop.cmd           ^|
echo  ^|     22 - My_Start.cmd              32 - My_Stop.cmd            ^|
echo  ^|     23 - Apa_Restart.cmd           33 - 强行终止进程并卸载     ^|
echo  ^|________________________________________________________________^|
set /p input=-^> 请选择:
cls
if "%input%"=="20" call :execmd Start.cmd
if "%input%"=="21" call :execmd Apa_Start.cmd
if "%input%"=="22" call :execmd My_Start.cmd
if "%input%"=="23" call :execmd Apa_Restart.cmd
if "%input%"=="30" call :execmd Stop.cmd
if "%input%"=="31" call :execmd Apa_Stop.cmd
if "%input%"=="32" call :execmd My_Stop.cmd
echo.
if "%input%"== "0" goto vhost_add
if "%input%"== "1" goto vhost_del
if "%input%"== "2" goto vhost_mod
if "%input%"== "3" goto eA_en
if "%input%"== "4" goto eA_dis
if "%input%"== "5" call :httpd_info en
if "%input%"== "6" call :httpd_info dis
if "%input%"== "7" call :apache_log pipe
if "%input%"== "8" call :apache_log default
if "%input%"== "9" call :apache_log dis
if "%input%"=="10" goto vProxy_add
if "%input%"=="11" goto vProxy_dis
if "%input%"=="12" goto reset_mydpwd
if "%input%"=="13" goto chg_port
if "%input%"=="14" goto end
if "%input%"=="15" goto myd_upgrade
if "%input%"=="16" goto chk_port
if "%input%"=="17" call :err_report
if "%input%"=="18" goto cfg_bak
if "%input%"=="19" cmd /k echo  # 当前目录 [ %CD% ]
if "%input%"=="33" goto force_stop
goto end

:chg_port
set /p nport=-^> 输入新的 http 端口(1-65535):
if "%nport%"=="" goto end
%php% "$p = env('nport'); if ($p !== ''.ceil($p) || 1 > $p || $p > 65535) exit(1);" || goto chg_port
%php% "chg_port(env('nport'));" || %pause% && goto end
set htd_port=%nport%
if "%1"=="noRestart" goto end
call :restart_apache
goto end

:vhost_add
echo  # 现有的虚拟主机列表 #
%php% "showvhs();" || %pause% && goto end
echo.
echo  [ 虚拟主机的主机名和标识. 例 test.com 或 blog.test.com ]
set /p hName=-^> 新增主机名:
if "%hName%"=="" goto end
echo.
echo  [ 别名用于绑定主机名以外的多个域名. 支持 * 号泛解析.
echo    如 www.test.com 或 *.test.com(泛解析，默认值)
echo    多个请用空格隔开, 如 "s1.test.com s2.test.com *.phpnow.org" ]
set /p hAlias=-^> 主机别名(可选):
:vhost_add_htdocs
echo.
echo  [ 指定网站目录. 留空则默认为 .\vhosts\%hName%]
set htdocs=
set /p htdocs=-^> 网站目录(可选):
if "%htdocs%"=="" goto vhost_add_2

%php% "$d = rpl('/', '\\\\', $_ENV['htdocs']); if (is_dir($d)) exit(0); if (file_exists($d)) exit(1); if (!@mkdir($d, 0, 1)) exit(2);" || echo  # 路径不正确或创建目录失败! && %pause% && goto vhost_add_htdocs

:vhost_add_2
echo.
echo  [ 如果分配此主机给其他用户, 并限制其权限, 请输入 y,
echo    否则, 请输入 n. 默认 Y ]
set /p p=-^> 限制 php 的 open_basedir ? (Y/n):
%php% "vhost_add(env('hName'), env('htdocs'), env('htd_port'), env('hAlias'), env('p'));" && call :restart_apache && goto end
echo.
%pause%
goto end

:vhost_del
echo  # 现有的虚拟主机列表 #
%php% "showvhs();" || %pause% && goto end
echo.
echo  [ 要删除虚拟主机, 请输入主机名或序号. ]
set /p hName=-^> 选择虚拟主机:
if "%hName%"=="" goto end
%php% "vhost_del(env('hName'));" && call :restart_apache
echo.
%pause%
goto end

:vhost_mod
echo  # 现有的虚拟主机列表 #
%php% "showvhs();" || %pause% && goto end
echo.
echo  [ 要修改虚拟主机, 请输入主机名或序号. ]
set /p hName=-^> 选择虚拟主机:
if "%hName%"=="" goto end
echo.
echo  [ 请输入新的主机别名, 原有数据将被覆盖! 留空不修改. ]
echo  [ 要在原基础上添加, 请输入 +phpnow.org 或 phpnow.org+ ]
set /p hAlias=-^> 主机别名:
echo.
echo  [ 在没有 index.php 或 index.html 文件时, 显示目录列表 ]
set /p hIndex=-^> 启用 目录索引? (y/N):
:vhost_mod_confirm
echo.
echo  [ 请检查上面的输入的内容正确无误 ]
echo.
set /p sure=-^> 确认? (y/n)
if /i "%sure%"=="n" goto end
if /i not "%sure%"=="y" goto vhost_mod_confirm
%php% "vhost_mod(env('hName'), env('hAlias'), env('hIndex'));" || %pause% && goto end
call :restart_apache
goto end

:vProxy_add
echo  [ 添加一个虚拟主机, 代理到其他 http 地址 ]
echo.
echo  # 现有的虚拟主机列表 #
%php% "showvhs();" || %pause% && goto end
:vProxy_add_hN
echo.
echo  [ 添加新的主机名. 如 test.com 或 jsp.test.com ]
set hName=
set /p hName=-^> 主机名:
if "%hName%"=="" goto end
%php% "if (regrpl('[\w\d\.\-]+', '', env('hName'))) exit(1);" && goto vProxy_add_hA
echo  # 主机名只能由 "a-z0-9.-" 组成!
%pause% && goto vProxy_add_hN
:vProxy_add_hA
echo.
echo  [ 绑定其他域名. 如 www.abc.com 或 *.abc.com(泛解析); 多个请用空格隔开 ]
set hAlias=
set /p hAlias=-^> 主机别名(可选):
if "%hAlias%"=="" set hAlias=*.%hName%
%php% "if (regrpl('[\w\d\.\- *]+', '', env('hAlias'))) exit(1);" && goto vProxy_add_hP
echo  # 主机别名只能由 "a-z0-9.-* " 组成!
%pause% && goto proxy_add_hA
:vProxy_add_hP
echo.
echo  [ 例: localhost:8080, 192.168.0.100 或 google.com ]
echo  [ 访问此虚拟主机的域名, 将代理到此目标. ]
set hPass=
set /p hPass=-^> 代理目标:
if "%hPass%"=="" goto vProxy_add_hP
%php% "if (regrpl('[a-z0-9\.\-_:\/]+', '', env('hPass'))) exit(1);" && goto vProxy_add_go
echo  # 目标地址只能由 "a-z0-9.-_:/" 组成!
%pause% && goto vProxy_add_hP
:vProxy_add_go
%php% "vProxy_add(env('hName'), env('hAlias'), env('hPass'));"
call :restart_apache
goto end

:vProxy_dis
echo  [ 继续将删除所有代理主机记录! ]
echo.
set /p sure=-^> 确认? (y/n)
if /i "%sure%"=="n" goto end
if /i "%sure%"=="y" goto un_proxy_1
goto un_proxy
:un_proxy_1
%php% "vProxy_dis();" || %pause% && goto end
call :restart_apache
goto end

:eA_en
if not exist Pn\eAccelerator*.dll ( echo # eAccelerator dll 没有找到 && %pause% && goto end )
for /f %%i in ('dir /b /o Pn\eAccelerator*.dll') do set ea_dll=%%i
%php% "frpl($php_ini, '^[;]*(zend_extension_ts=).*eAccelerator.*(\r\n)', '$1`..\..\Pn\%ea_dll%`$2');" || %pause% && goto end
call :restart_apache
goto end

:eA_dis
%php% "frpl($php_ini, '^(zend_extension_ts=.*eAccelerator.*\r\n)', ';;$1');" || %pause% && goto end
call :restart_apache
goto end

:httpd_info
if "%1"=="en" (set a=#+&&set b=) else (set b=##&&set a=)
%php% "$s = rfile($htd_cfg); $s = regrpl('^%a%(Load.*mod_info.*\r\n)', '%b%$1', $s); $s = regrpl('^%a%(Load.*mod_status.*\r\n)', '%b%$1', $s); $s = regrpl('^%a%(Include.*httpd-info.conf\r\n)', '%b%$1', $s); wfile($htd_cfg, $s);" || %pause% && goto end
call :restart_apache
goto end

:apache_log
echo  apache_log_%1();
%php% "apache_log_%1();" || %pause% && goto end
call :restart_apache
goto end

:err_report
echo   ________________________________________________________________
echo  ^|                                                                ^|
echo  ^|        设置 php error_reporting (错误报告) 等级                ^|
echo  ^|                                                                ^|
echo  ^|     0 - E_ALL ^& ~E_NOTICE ^& ~E_WARNING                         ^|
echo  ^|                               普通; 运作环境, 忽略一般警告     ^|
echo  ^|                                                                ^|
echo  ^|     1 - E_ALL                                                  ^|
echo  ^|                               严格; 调试环境, 显示所有错误     ^|
echo  ^|________________________________________________________________^|
set /p input=-^> 请选择:
if "%input%"=="0" set err_reporting=E_ALL ^& ~E_NOTICE ^& ~E_WARNING
if "%input%"=="1" set err_reporting=E_ALL
if "%err_reporting%"=="" goto end
%php% "frpl($php_ini, '^(error_reporting)\s*=.*(\r\n)', '$1 = %err_reporting%$2');" || %pause% && goto end
call :restart_apache
goto end

:reset_mydpwd
set /p newpwd=-^> 重设 root 密码:
if "%newpwd%"=="" goto reset_mydpwd
echo.
set pnTmp=%SystemRoot%\Temp\Pn_%RANDOM%.%RANDOM%
echo SET PASSWORD FOR 'root'@'localhost' = PASSWORD('%newpwd%');>%pnTmp%
if exist %myd_dir%\data\%COMPUTERNAME%.pid %net% stop %myd_svc%
set myini=%CD%\%myd_dir%\my.ini
start /b %myd_dir%\bin\%myd_exe% --defaults-file="%myini%" --init-file=%pnTmp%
%myd_dir%\bin\mysqladmin.exe shutdown -uroot -p"%newpwd%"
echo  等待 MySQL 退出 ...
echo.
%php% "while(@file_exists('%myd_dir%\data\%COMPUTERNAME%.pid')) usleep(50000);"
echo.>%pnTmp%
del %pnTmp% /Q
%net% start %myd_svc% || %pause%
goto end

:myd_upgrade
echo   ______________________________________________________________
echo  ^|                                                              ^|
echo  ^|   此功能用于更新 MySQL 数据库目录 (data 目录) 的特性到当前   ^|
echo  ^|   版本. 当 data 目录迁移到一个更新版本的 MySQL 请执行此项.   ^|
echo  ^|                                                              ^|
echo  ^|   通过调用 mysql_upgrade.exe 实现.                           ^|
echo  ^|______________________________________________________________^|
echo.
set /p sure=-^> 确认继续? (y/N):
if /i not "%sure%"=="y" goto end
:myd_upgrade_pwd
set pwd=
set /p pwd=-^> 请输入 MySQL root 密码:
%php% "chk_mysql('%myd_port%', env('pwd'));" && goto myd_upgrade_exe
if %errorlevel%==1045 (
  echo  # 密码不正确, 请重新输入.
  goto myd_upgrade_pwd
)
if %errorlevel%==2003 (
  echo  # 尝试连接 MySQL^(port:%myd_port%^) 失败.
  echo  # 请确认 MySQL 运行正常.
  %pause% & goto end
)
:myd_upgrade_exe
%myd_dir%\bin\mysql_upgrade.exe --user=root --password="%pwd%" --force
echo.
echo  # 请复查上面的执行结果, 全部 OK 即为升级成功.
%pause%
goto end

:chk_port
if not exist %Sys32%\tasklist.exe goto chk_port_1
if not exist %Sys32%\netstat.exe goto chk_port_2
%php% "chk_port('%htd_port%');"
if not errorlevel 1 echo   指定的 httpd 端口 %htd_port% 暂时未被占用.
%php% "chk_port('%myd_port%');"
if not errorlevel 1 echo   指定的 MySQL 端口 %myd_port% 暂时未被占用.
echo.
%pause% & goto end
:chk_port_1
echo  # 缺少 %Sys32%\tasklist.exe, 无法进行. & %pause% & goto end
:chk_port_2
echo  # 缺少 %Sys32%\netstat.exe, 无法进行. & %pause% & goto end

:force_stop
set taskkill=%Sys32%\taskkill.exe
if not exist %taskkill% (
  echo  # 缺少 %taskkill%, 无法进行. & %pause% & goto end
)
%taskkill% /fi "SERVICES eq %htd_svc%" /f /t
%taskkill% /fi "SERVICES eq %myd_svc%" /f /t
%net% stop %myd_svc%>nul 2>nul
%net% stop %htd_svc%>nul 2>nul
%htd_dir%\bin\%htd_exe% -k uninstall -n %htd_svc%>nul 2>nul
%myd_dir%\bin\%myd_exe% --remove %myd_svc%>nul 2>nul
del %myd_dir%\data\%COMPUTERNAME%.pid %htd_dir%\logs\httpd.pid /q>nul 2>nul
%pause%
goto end

:cfg_bak
echo   ______________________________________________________________
echo  ^|                                                              ^|
echo       备份 / 还原 下列配置文件
echo       Apache 主配置 :  %htd_dir%\conf\httpd.conf
echo       虚拟主机 配置 :  %vhs_cfg%
echo       php.ini       :  %php_dir%\php-apache2handler.ini
echo       MySQL 配置    :  %myd_dir%\my.ini
echo  ^|______________________________________________________________^|
echo.
echo  # 现有备份列表 (保存在 %cfg_bak_zip%) #
echo.
%php% "cfg_bak('show');" || %pause% && goto end
echo.
echo  # 执行操作 #
echo.
echo      B - 备份配置
echo      R - 还原配置
echo      D - 删除备份
echo.
set input=
set /p input=-^> 请选择:
echo.
if /i "%input%"=="B" goto cfg_bak_B
if /i "%input%"=="R" goto cfg_bak_R
if /i "%input%"=="D" goto cfg_bak_D
echo  # 未选择操作, 退出 & %pause% & goto end

:cfg_bak_B
set input=
set /p input= 备份名称:
if "%input%"=="" goto cfg_bak_B
%php% "cfg_bak('backup '.env('input'));"
echo.
%pause%
goto end

:cfg_bak_R
echo  # 现有备份列表 (保存在 %cfg_bak_zip%) #
echo.
%php% "cfg_bak('show');" || %pause% && goto end
echo.
echo  [ 还原之前请确认是否需要对现有配置进行备份! ]
echo.
set n=
set /p n=-^> 还原到此备份序号:
if "%n%"=="" echo  # 未执行操作! && %pause% && goto end
%php% "$p = env('n'); if ($p !== ''.ceil($p) || 0 > $p) exit(1);" || goto cfg_bak_R
%php% "cfg_bak('restore '.env('n'));" || %pause% && goto end
echo.
set input=
set /p input= 配置已还原, 立即重启服务? (y/N):
if /i not "%input%"=="y" goto end
call :restart_apache
echo.
%net% stop %myd_svc%
%net% start %myd_svc%
goto end

:cfg_bak_D
echo  # 现有备份列表 (保存在 %cfg_bak_zip%) #
echo.
%php% "cfg_bak('show');" || %pause% && goto end
echo.
set n=
set /p n=-^> 删除此序号的备份:
if "%n%"=="" echo  # 未执行操作! && %pause% && goto end
%php% "$p = env('n'); if ($p !== ''.ceil($p) || 0 > $p) exit(1);" || goto cfg_bak_D
%php% "cfg_bak('delete '.env('n'));"
echo.
%pause%
goto end

:end
prompt
popd

时间： 2024-09-13 01:48:28

使用batch批处理做目录及流程选择的相关文章

编写ASP.net,我想单击一个按钮就弹出一个目录树，选择一个目录后，将该目录的完全路径显示在一个编辑框中，请问怎样做？

问题描述编写ASP.net,我想单击一个按钮就弹出一个目录树,选择一个目录后,将该目录的完全路径显示在一个编辑框中,请问怎样做?目录树即为本机的目录急求解答! 解决方案解决方案二:这个不能得到客户端主机目录但是服务器的主机目录可以同一个页面放入buttontreeviewtextbox控件page_load中设置treeview的visible=false并且绑定目录treeview的selectednodechanged事件下:treeview的visible=truetextbox.te

mac wifi热点怎么设置?mac做wifi热点流程

苹果 Mac 系统中要把无线当作 Wifi 热点来用的话,需要电脑有其它网络接入才可以,也就是说它需要一个可以用于上网的网络,比如有线网络.尤其是对于使用 MacBook Pro 或 MacBook Air 的小伙伴,有时候出门在外时需要为手机共享无线 Wifi 网络.那么mac wifi热点怎么设置?下面小编就为大家演示mac做wifi热点流程,一起来看看吧! 由于我用的 MacBook Pro 只有一个无线网络接口,所在我需要在电脑上加装一个外接网线的网卡,如图所示我接下来做的便是把这

设计师要做正确的交互选择

设计师要做正确的交互选择,去选择那些或高端的或低端的交互技术.很重要的一点,就是你要知道什么是高端,什么是低端. 还是那句老话,现在能发明电灯的人,大家已经不会觉得他多牛,甚至还感觉有点傻.这给设计师提出一个更高的要求,首先要"知道".去使用光怪陆离的产品,就成了一个交互设计师必要的工作. 去感受成功的产品和不成功的产品,感受它们为用户提供了什么好的.坏的和丑的.好的交互但不成功的产品,好的产品但交互不好,都是有可能. 同时,好的交互是有时限的.要随着用户的升级而更新迭代: 百度在创新

VB中能不能做下拉数字选择框，带有一个计算器界面

问题描述 VB中能不能做下拉数字选择框,带有一个计算器界面 VB中能不能做下拉数字选择框,带有一个计算器界面,有点类似电话拨号盘的效果?请问怎么实现? 解决方案有一个第三方控件可以支持,http://download.csdn.net/download/xinnianle/1339962

做品牌TITLE的选择和广告选择

中介交易 http://www.aliyun.com/zixun/aggregation/6858.html">SEO诊断淘宝客云主机技术大厅现阶段,大型和中型企业步入做品牌的是越来越多,而一般做品牌在SEO方向来说只用TITLE,关键词和描述都不需要.因为品牌来说,是打响自己网站名或网站主做的一件单一的产品,比如凡客.京东.绿瘦等.现小飞来说下TITLE写的时候注意点什么和后期的一些广告投放注意事项. 1. SEO方面: 一:TITLE:TITLE的选择,根据不同的网站来写,一般

msi-想做一个让用户选择装服务端或客户端的安装包

问题描述想做一个让用户选择装服务端或客户端的安装包我现在想做一个MSI安装包,让用户选择安装服务端或者客户端,然后根据用户的选择安装不同的文件,这个功能用VS2010如何实现?哪位高手能指点一下?不胜感谢.

个人教育网站建设要做精细设计与选择

中介交易 http://www.aliyun.com/zixun/aggregation/6858.html">SEO诊断淘宝客云主机技术大厅在全球信息化快速发展的今天,当今的教育可以说也是面对信息技术的挑战.信息化教育技术的根本在于教育资源的开发,利用和创造.随着互联网的交互式教学实现了教师和学生走出了封闭教室,从静态教育信息转化为动态信息资源的互动交流,以打破了时间和空间的限制,实现教学资源共享,教育现代化促进跨越式教育的发展.在这样的时代背景下,我的个人网站成立于2000年.

word2010如何制作目录 word2010制作做目录的方法

1.要生成目录的文章 2.利用"样式" 设置文章标题格式, 样式里设置标题格式时,"段落"设置选择"大纲级别",按标题级别来选,一级标题就选大纲一级,以此类推. 利用设置好的样式,调整文章中对应的标题选择标题,例如标题1,选择修改样式利用设置好的样式,调整文章中对应的标题 3.把光标移到你要目录的位置 4.选"引用"-"目录"-"插入目录" 格式-先选择目录要用的模板:选项-启用