Rev 4079 | Blame | Last modification | View Log | RSS feed
<%'=====================================================' CONFIG FILE'=====================================================%><!--#include file="base_conf.asp"--><%' -- Variable Definition ------------------------------Dim OraSession, OraDatabase ' DB connectionDim scriptNameDim rootPathDim DocRepositiryLink, DocRepositiryLinkOldDim APP_ROOT, QUERIES_PATHDim archive_serverDim dpkg_archiveURLDim HTTP_PKG_ARCHIVEDim release_archiveURLDim ACCESS_MANAGER_URLDim DEPLOYMENT_MANAGER_URLDim strRelativePath ' Rel Path from script to URLDim MAIL_SERVER' -- Variable Initialisation --------------------------'Set OraSession = CreateObject("OracleInProcServer.XOraSession")'OraSession.CreateDatabasePool 1,2,1, TNS_NAME, DB_AUTHENTICATION, 0'Set OraDatabase = OraSession.GetDatabaseFromPool(5000)'Set OraSession = Application("ORA_SESSION")'Set OraDatabase = OraSession.GetDatabaseFromPool(5000)Set OraSession = CreateObject("OracleInProcServer.XOraSession")Set OraDatabase = OraSession.OpenDatabase( TNS_NAME, DB_AUTHENTICATION, Cint(0))'--------------------------------------------------------------------------------------'Returns the server of the package archiveFunction Get_Archive_Server()Dim sqry: sqry = "SELECT * FROM BUILD_SERVICE_CONFIG WHERE SERVICE='ARCHIVE SERVER'"Dim rsTempSet rsTemp = OraDatabase.DbCreateDynaset( sqry , cint(0) )Get_Archive_Server = rsTemp("config")rsTemp.Close()Set rsTemp = NothingEnd Function'--------------------------------------------------------------------------------------'Returns the server of the package archiveFunction Get_Mail_Server()Dim sqry: sqry = "SELECT * FROM BUILD_SERVICE_CONFIG WHERE SERVICE='MAIL SERVER'"Dim rsTempSet rsTemp = OraDatabase.DbCreateDynaset( sqry , cint(0) )Get_Mail_Server = rsTemp("config")rsTemp.Close()Set rsTemp = NothingEnd Function'--------------------------------------------------------------------------------------'Return a relative path to the server base. Used for relative pathing to 'images''Assumes server base is in a directory called Release_ManagerFunction GetPathToBase()Dim url,depth,rv,iiurl = request.servervariables("URL")url = Mid(url,Instr(url, "Release_Manager"))depth = len(url) - len(replace(url, "/", ""))rv = ""For ii = 2 To depthrv = rv & "../"NextGetPathToBase = rvEnd Function'--------------------------------------------------------------------------------------archive_server = Get_Archive_Server()MAIL_SERVER = Get_Mail_Server()strRelativePath = GetPathToBase()APP_ROOT = Server.MapPath(".")QUERIES_PATH = APP_ROOT &"\queries"scriptName = Mid(Request.ServerVariables("SCRIPT_NAME"), InStrRev(Request.ServerVariables("SCRIPT_NAME"), "/") + 1 )rootPath = Left( Server.MapPath( scriptName ), InStrRev(Server.MapPath( scriptName ), "\") )DocRepositiryLink = DOC_REPOSITORY_URL & "docLinkTo.asp?docnum="DocRepositiryLinkOld = DOC_REPOSITORY_URL & "docLinkTo.asp?old=1&fileid="' -- Constants ----------------------------------------HTTP_PKG_ARCHIVE = "http://" & archive_serverdpkg_archiveURL = HTTP_PKG_ARCHIVE & "/dpkg_archive/"release_archiveURL = HTTP_PKG_ARCHIVE & "/releases/"ACCESS_MANAGER_URL = "http://" & Request.ServerVariables("HTTP_HOST") & "/Access_Manager"DEPLOYMENT_MANAGER_URL = "http://" & Request.ServerVariables("HTTP_HOST") & "/Deployment_Manager"%><%'-- ERROR MESSAGES ---------------------------Const enum_MSG_ERROR = "msg_error.asp"Const enum_WMSG_ERROR = "wmsg_error.asp"Const enum_MSG_SELECTED_PACKAGES_NOW_OFFICIAL = "msg_selected_packages_now_official.asp"Const enum_MSG_PACKAGES_NOT_MADE_OFFICIAL = "msg_packages_not_made_official.asp"Const enum_MSG_PACKAGE_NOT_MADE_OFFICIAL = "msg_package_not_made_official.asp"Const enum_MSG_PACKAGE_NOT_MADE_OFFICIAL_2 = "msg_package_not_made_official_2.asp"Const enum_MSG_UNOFFICIAL_DEPENDENCIES = "msg_unofficial_dependencies.asp"Const enum_MSG_PACKAGE_CHANGETYPE_INCOMPLETE = "msg_change_type_incomplete.asp"Const enum_MSG_PACKAGE_SBOMPRIORITY_INCOMPLETE = "msg_sbom_priority_incomplete.asp"Const enum_MSG_VERSION_EXISTS = "msg_version_exists.asp"Const enum_DUPLICATE_RUNTIME_DEPENDENCY = "msg_duplicate_runtime_dependency.asp"Const enum_DUPLICATE_BUILD_DEPENDENCIES_IGNORED = "msg_duplicate_build_dependencies_ignored.asp"Const enum_MSG_BROKEN_DEPENDENCIES_FOUND = "msg_broken_dependencies_found.asp"Const enum_MSG_MISSING_DEPENDENCIES = "msg_missing_dependencies.asp"Const enum_MSG_UNOFFICIAL_DEPENDENCIES_FOUND = "msg_unofficial_dependencies_found.asp"Const enum_MSG_RELEASE_IS_NOW_OFFICIAL = "msg_release_is_now_official.asp"Const enum_MSG_NEW_UNOFFICIAL_RELEASE_CREATED = "msg_new_unofficial_release_created.asp"Const enum_MSG_DUPLICATE_AN = "msg_duplicate_an.asp"Const enum_MSG_DUPLICATE_UT = "msg_duplicate_ut.asp"Const enum_MSG_PACKAGE_INFORMATION_INCOMPLETE = "msg_package_information_incomplete.asp"Const enum_MSG_VCS_INFORMATION_INCOMPLETE = "msg_vcs_information_incomplete.asp"Const enum_MSG_VCS_SUBVERSION_CC_MIX = "msg_vcs_subversion_cc_mix.asp"Const enum_MSG_VCS_SVN_NOT_PEGGED = "msg_vcs_svn_not_pegged.asp"Const enum_MSG_AUTOBUILD_PACKAGE_IS_UNCONTROLLED = "msg_autobuild_package_is_uncontrolled.asp"Const enum_MSG_AUTOBUILD_PACKAGE_REQUIRES_BUILD_STD_AND_ENV = "msg_autobuild_package_requires_build_std_and_env.asp"Const enum_MSG_UNIT_TESTS_NOT_SUPPLIED = "msg_unit_tests_not_supplied.asp"Const enum_MSG_REASON_FOR_THIS_VERSION_NOT_SUPLIED = "msg_reason_for_this_version_not_suplied.asp"Const enum_MSG_CANNOT_REMOVE_PACKAGE = "msg_cannot_remove_package.asp"Const enum_MSG_PACKAGE_IN_USE = "msg_package_in_use.asp"Const enum_MSG_PROCESS_EXISTS = "msg_process_exists.asp"Const enum_MSG_LICENCE_EXISTS = "msg_licence_exists.asp"Const enum_MSG_NO_LICENCES_EXIST = "msg_no_licences.asp"Const enum_MSG_PACKAGE_VERSION_EXISTS = "msg_package_version_exists.asp"Const enum_MSG_PACKAGE_WIP_EXISTS = "msg_package_wip_exists.asp"Const enum_MSG_PACKAGE_VERSION_INVALID = "msg_package_version_invalid.asp"Const enum_MSG_CANNOT_AUTO_GENERATE_COTS_PKG = "msg_cannot_auto_generate_cots_pkg.asp"Const enum_MSG_VCS_EXISTS = "msg_vcs_exists.asp"Const enum_MSG_PACKAGE_WIP_EXISTS_BULK_RELEASE = "msg_package_wip_exists_bulk_release.asp"Const enum_MSG_PERMISSION_PROBLEMS_BULK_RELEASE = "msg_permission_problems_bulk_release.asp"'---------------------------------------------%><%'-- ICONS ------------------------------------Const enum_imgBlank = "<img src='images/h_trsp_dot.gif' width='19' height='17' border='0'>"Const enum_imgCritical = "<img src='images/s_critical.gif' width='19' height='17' border='0' title='Not ready to be built. Dependent packages, with a major or minor version, require building'>"Const enum_imgDeprecated = "<img src='images/bomb.gif' width='19' height='17' border='0' title='Deprecated'>"Const enum_imgProductRejected = "<img src='icons/i_product_rejected.gif' width='19' height='17' border='0' title='Rejected'>"Const enum_imgDeprecatedDependent = "<img src='images/bomb_dependant.gif' width='19' height='17' border='0' title='Dependent deprecated'>"Const enum_imgCReady = "<img src='images/s_update_critical.gif' width='19' height='17' border='0' title='Ready to build, however at least one dependency has been superseded with a major or minor version'>"Const enum_imgAR = "<img src='images/i_advisory_ripple.gif' width='19' height='17' border='0' title='Marked as advisory ripple'>"Const enum_imgARD = "<img src='images/s_advisory_ripple_dependant.png' width='19' height='17' border='0' title='Dependent marked as advisory ripple'>"Const enum_imgWarning = "<img src='images/s_warning.gif' width='19' height='17' border='0' title='Not ready to be built. Dependent packages, with a patch version, require building'>"Const enum_imgWReady = "<img src='images/s_update_warning.gif' width='19' height='17' border='0' title='Ready to build, however at least one dependency has been superseded with a patch version'>"Const enum_imgBuilding = "<img src='images/s_gear.gif' width='19' height='17' border='0' title='Work in progress'>"Const enum_imgNotFound = "<img src='images/s_not_found.gif' width='19' height='17' border='0' title='Not found'>"Const enum_imgIgnoring = "<img src='images/s_ignoring.gif' width='15' height='15' border='0' title='Latest version is ignored'>"Const enum_imgPatchIgnoring = "<img src='images/s_patch_ignoring.gif' width='19' height='17' border='0' title='Latest version is included in a patch'>"Const enum_imgPatchAvailable = "<img src='images/s_patch_available.gif' width='19' height='17' border='0' title='New patch is required'>"Const enum_imgPatch = "<img src='images/i_patch.gif' width='18' height='23' border='0' align='absmiddle' hspace='5' title='This is a patch'>"Const enum_imgPatchObsolete = "<img src='images/i_patch_obsolete.gif' width='18' height='23' border='0' align='absmiddle' hspace='5' title='Patch is obsolete'>"Const enum_imgUser = "<img src='images/i_user.gif' width='10' height='13' hspace='2' border='0' align='absmiddle' title='User'>"Const enum_imgGreenPin = "<img src='images/i_green_pin.gif' width='19' height='17' border='0' title='Pegged to prevent it being ripple built'>"Const enum_imgPending = "<img src='icons/i_pending.gif' width='12' height='14' border='0' title='Package Pending'>"Const enum_imgReleasedLocked = "<img src='images/i_locked.gif' width='13' height='15' border='0' title='Released and locked'>"Const enum_imgReleasedUnlocked = "<img src='images/i_unlocked.gif' width='16' height='15' border='0' title='Released and unlocked'>"'-- ICONS SMALL ------------------------------Const enum_SMALL_imgOK = "<img src='images/si_ok.gif' width='17' height='16' border='0' align='absmiddle' vspace='1' hspace='2'>"Const enum_SMALL_imgCritical = "<img src='images/si_critical.gif' width='17' height='16' border='0' align='absmiddle' vspace='1' hspace='2'>"Const enum_SMALL_imgCReady = "<img src='images/si_update_critical.gif' width='17' height='16' border='0' align='absmiddle' vspace='1' hspace='2'>"Const enum_SMALL_imgWarning = "<img src='images/si_warning.gif' width='17' height='16' border='0' align='absmiddle' vspace='1' hspace='2'>"Const enum_SMALL_imgWReady = "<img src='images/si_update_warning.gif' width='17' height='16' border='0' align='absmiddle' vspace='1' hspace='2'>"Const enum_SMALL_imgBuilding = "<img src='images/si_gear.gif' width='17' height='16' border='0' align='absmiddle' vspace='1' hspace='2'>"Const enum_SMALL_imgNotFound = "<img src='images/si_not_found.gif' width='17' height='16' border='0' align='absmiddle' vspace='1' hspace='2'>"'-- VERSION CONTROL CONSTANTS ------------------------------Const enum_VCS_UNCONTROLLED_TAG = "UC"Const enum_VCS_CLEARCASE_TAG = "CC"Const enum_VCS_SUBVERSION_TAG = "SVN"Const enum_VCS_CVS_TAG = "CVS"'-- OP CODES for DAEMON INSTRUCTIONS, both in terms of strings and integers -------------------------------------------''-- When adding to these, always update daemon_instructions.asp accordingly.'-- Sometimes it might be necessary to update wAddDaemonInstruction.asp as well.'-- human readable string namesConst OP_CODE_0_STR = "Ripple Build Package" ' Corresponds to OP_CODE_0_RIPPLE_BUILD_PACKAGEConst OP_CODE_1_STR = "Test Build Package" ' Corresponds to OP_CODE_1_TEST_BUILD_PACKAGE'-- equivalent integer values for use in query stringsConst OP_CODE_0_RIPPLE_BUILD_PACKAGE = "0"Const OP_CODE_1_TEST_BUILD_PACKAGE = "1"'-- PACKAGE AREA CONSTANTS ------------------------------Const enum_PKG_AREA_WIP = 0Const enum_PKG_AREA_PLANNED = 1Const enum_PKG_AREA_RELEASED = 2'-- BUILD DAEMON STATE CONSTANTS ------------------------------Const enum_DAEMON_ENABLE = NULLConst enum_DAEMON_PAUSE = 1Const enum_DAEMON_DISABLE = 2%>