适合初学者使用的p2p和jxta方面的代码

源代码在线查看: ant.cmd

软件大小: 9597 K
上传用户: karon9999
关键词: jxta p2p 初学者 代码
下载地址: 免注册下载 普通下载 VIP

相关代码

				/* 
				   Licensed to the Apache Software Foundation (ASF) under one or more
				   contributor license agreements.  See the NOTICE file distributed with
				   this work for additional information regarding copyright ownership.
				   The ASF licenses this file to You under the Apache License, Version 2.0
				   (the "License"); you may not use this file except in compliance with
				   the License.  You may obtain a copy of the License at
				
				       http://www.apache.org/licenses/LICENSE-2.0
				
				   Unless required by applicable law or agreed to in writing, software
				   distributed under the License is distributed on an "AS IS" BASIS,
				   WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
				   See the License for the specific language governing permissions and
				   limitations under the License.
				 
				    Run ant
				*/
				
				'@echo off'
				parse arg mode envarg '::' antarg
				
				if mode\='.' & mode\='..' & mode\='/' then do
				  envarg = mode envarg
				  mode = ''
				end
				
				if antarg = '' then do
				  antarg = envarg
				  envarg = ''
				end
				
				x = setlocal()
				
				env="OS2ENVIRONMENT"
				antenv = _getenv_('antenv')
				if _testenv_() = 0 then interpret 'call "' || antenv || '"' '"' || envarg || '"'
				
				if mode = '' then mode = _getenv_('ANT_MODE' '..')
				if mode \= '/' then do
				  runrc = _getenv_('runrc')
				  antrc = _getenv_('antrc' 'antrc.cmd')
				  if mode = '..' then mode = '-r'
				  else mode = ''
				  interpret 'call "' || runrc || '"' antrc '"' || mode || '"'
				end
				
				if _testenv_() = 0 then do
				  say 'Ant environment is not set properly'
				  x = endlocal()
				  exit 16
				end
				
				settings = '-Dant.home=' || ANT_HOME '-Djava.home=' || JAVA_HOME
				
				java = _getenv_('javacmd' 'java')
				opts = value('ANT_OPTS',,env)
				args = value('ANT_ARGS',,env)
				lcp = value('LOCALCLASSPATH',,env)
				cp = value('CLASSPATH',,env)
				if value('ANT_USE_CP',,env) \= '' then do
				  if lcp \= '' & right(lcp, 1) \= ';' then lcp = lcp || ';'
				  lcp = lcp || cp
				  'SET CLASSPATH='
				end
				if lcp\='' then lcp = '-classpath' lcp
				
				cmd = java opts lcp '-jar' ANT_HOME ||'\lib\ant-launcher.jar' settings args antarg
				launcher = stream(ANT_HOME ||'\lib\ant-launcher.jar', 'C', 'query exists')
				if launcher = '' then entry = 'org.apache.tools.ant.Main'
				else entry = 'org.apache.tools.ant.launch.Launcher'
				java opts lcp entry settings args antarg
				
				x = endlocal()
				
				return rc
				
				_testenv_: procedure expose env ANT_HOME JAVA_HOME
				ANT_HOME = value('ANT_HOME',,env)
				if ANT_HOME = '' then return 0
				JAVA_HOME = value('JAVA_HOME',,env)
				if JAVA_HOME = '' then return 0
				cp = translate(value('CLASSPATH',,env))
				if pos(translate(ANT_HOME), cp) = 0 then return 0
				if pos(translate(JAVA_HOME), cp) = 0 then return 0
				return 1
				
				_getenv_: procedure expose env
				parse arg envar default
				if default = '' then default = envar
				var = value(translate(envar),,env)
				if var = '' then var = default
				return var
							

相关资源