note description: "Specialized configiration for Microsoft WindowsSDKs." legal: "See notice at end of class." status: "See notice at end of class."; date: "$date$"; revision: "$revision$" class WSDK_CONFIG inherit MSCL_CONFIG redefine batch_file_arguments, batch_file_options end EIFFEL_LAYOUT create make feature -- Access wsdk_60: STRING = "WSDK60" wsdk_61: STRING = "WSDK61" wsdk_70: STRING = "WSDK70" -- Constants defining the various supported SDKs feature {NONE} -- Access batch_file_name: STRING -- local l_result: detachable STRING do if attached {FINISH_FREEZING_EIFFEL_LAYOUT} eiffel_layout as l_layout and then l_layout.is_valid_environment then create l_result.make (256) l_result.append (l_layout.config_eif_path) if code.is_equal (wsdk_60) then l_result.append ("\windows_sdk_v6.0.bat") elseif code.is_equal (wsdk_61) then l_result.append ("\windows_sdk_v6.1.bat") elseif code.is_equal (wsdk_70) then l_result.append ("\windows_sdk_v7.0.bat") else -- We will use the default batch file. l_result := Void end end if l_result = Void then -- Default to using one found in SDK, typically happens for -- library consumers that are used in install application or are used -- with no product install base create l_result.make (256) l_result.append (install_path) l_result.append ("Bin\SetEnv.cmd") end Result := l_result end batch_file_arguments: STRING -- do create Result.make (10) if attached {FINISH_FREEZING_EIFFEL_LAYOUT} eiffel_layout as l_layout then -- Need to do the same check as in `batch_file_name' to ensure we do -- not pass the install path as an argument when we are using the config library -- in an environment that has no install-base (like an installation program) Result.append ("%"" + install_path + "%" ") end Result.append ("/Release ") if use_32bit then Result.append ("/x86") else Result.append ("/x64") end end batch_file_options: STRING -- do Result := "/V:ON" end full_product_reg_path: STRING -- do create Result.make (256) Result.append ("HKEY_LOCAL_MACHINE\SOFTWARE\") Result.append (product_reg_path) end install_path_value_name: STRING -- once Result := "InstallationFolder" end ;note copyright: "Copyright (c) 1984-2009, Eiffel Software" license: "GPL version 2 (see http://www.eiffel.com/licensing/gpl.txt)" licensing_options: "http://www.eiffel.com/licensing" copying: "[ This file is part of Eiffel Software's Eiffel Development Environment. Eiffel Software's Eiffel Development Environment is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, version 2 of the License (available at the URL listed under "license" above). Eiffel Software's Eiffel Development Environment is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with Eiffel Software's Eiffel Development Environment; if not, write to the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA ]" source: "[ Eiffel Software 5949 Hollister Ave., Goleta, CA 93117 USA Telephone 805-685-1006, Fax 805-685-6869 Website http://www.eiffel.com Customer support http://support.eiffel.com ]" end