#!/usr/bin/perl -w

use lib qw(/Library/WebServer/regist.apple.co.jp/hm_lib);

use DlSubmit;
use CGI;
use CGI::Carp qw( fatalsToBrowser );
require 'conf.pl';
use strict;

my $dlsubmit = DlSubmit->new();
my %str = ();
my $err = 0;
my $onload;

my $cgi = CGI->new();
my %param = $cgi->Vars();
%str = %param;
$dlsubmit->html_entities_encode(\%str);

#インクルード読み込み
open FILE, "<$conf::temp_nav";
my @nav = <FILE>;
my $nav = join '', @nav;
close FILE;
$str{nav} = $nav;

open FILE, "<$conf::temp_footer";
my @footer = <FILE>;
my $footer = join '', @footer;
close FILE;
$str{footer} = $footer;

#画像処理
my $img_err;
($str{osxdl_main_submit}, $str{img_err}) = $dlsubmit->img('osxdl_main', '', $conf::rootdir.'/'.$conf::imgdir, 0, $conf::imgsize_submit, $conf::imgsize_max, $conf::imgsize_width_max, 0, $cgi);
if($str{img_err} == 1){
    $str{err_osxdl_main} = ' class="error"';
}

#修正時のonLoad
if( $param{keywords} eq '新規' ){
    $str{onload} = ' onLoad="isNew()"';
}
elsif( $param{keywords} eq '更新' ){
    $str{onload} = ' onLoad="isUpgrade()"';
}
elsif( $param{keywords} eq '削除' ){
    $str{onload} = ' onLoad="isDelete()"';
}

#エラーチェック
#共通項目
if( $param{confirm} eq "t" ){
    if( $param{osxdl_author_name} eq '' ){
        $str{err_osxdl_author_name} = ' class="error"';
        $err = 1;
    }
    if( $dlsubmit->chk_mail( $param{osxdl_author_mail} ) == 1 || $param{osxdl_author_mail} eq '' ){
        $str{err_osxdl_author_mail} = ' class="error"';
        $err = 1;
    }
    if( $param{osxdl_author_phone} eq '' ){
        $str{err_osxdl_author_phone} = ' class="error"';
        $err = 1;
    }
    if( $dlsubmit->chk_phone($param{osxdl_author_phone}) == 1 ){
        $str{err_osxdl_author_phone} = ' class="error"';
        $err = 1;
    }
    if( $param{osxdl_company} eq '' ){
        $str{err_osxdl_company} = ' class="error"';
        $err = 1;
    }
    if( $dlsubmit->chk_url( $param{osxdl_company_url} ) == 1 || $param{osxdl_company_url} eq '' ){
        $str{err_osxdl_company_url} = ' class="error"';
        $err = 1;
    }
    if( $param{entry_title} eq '' ){
        $str{err_entry_title} = ' class="error"';
        $err = 1;
    }
    if( $param{category_id} eq '' || $param{category_id} == 0 || $param{category_id} == 1 ){
        $str{err_category_id} = ' class="error"';
        $err = 1;
    }
    if( $param{keywords} eq '' ){
        $str{err_keywords} = ' class="error"';
        $err = 1;
    }
    #新規掲載の場合
    if( $param{keywords} eq '新規' ){

        if( $param{osxdl_version} eq '' ){
            $str{err_osxdl_version} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_license} eq '' || $param{osxdl_license} eq '0' || $param{osxdl_license} eq '1' ){
            $str{err_osxdl_license} = ' class="error"';
            $err = 1;
        }
        if( $param{entry_excerpt} eq '' ){
            $str{err_entry_excerpt} = ' class="error"';
            $err = 1;
        }
        if($param{entry_excerpt}){
            my($str_h, $str_z) = $dlsubmit->count_str($cgi->param('entry_excerpt'));
            if(eval($str_h + $str_z) > 30){
                $str{err_entry_excerpt} = ' class="error"';
                $err = 1;
            }
        }
        if( $param{entry_text} eq '' ){
            $str{err_entry_text} = ' class="error"';
            $err = 1;
        }
        if( $param{entry_text_more} eq '' ){
            $str{err_entry_text_more} = ' class="error"';
        }
        if( $param{osxdl_osx_version} eq '' || $param{osxdl_osx_version} eq 'お選びください' || $param{osxdl_osx_version} eq '-----------------' ){
            $str{err_osxdl_osx_version} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_universalbinary} eq '' ){
            $str{err_osxdl_universalbinary} = ' class="error"';
            $err = 1;
        }
        if( $dlsubmit->chk_url( $param{osxdl_download_page} ) == 1 || $param{osxdl_download_page} eq '' ){
            $str{err_osxdl_download_page} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_file_size} eq '' ){
            $str{err_osxdl_file_size} = ' class="error"';
            $err = 1;
        }
        if( $dlsubmit->chk_h_n_dot($param{osxdl_file_size}) == 1 ){
            $str{err_osxdl_file_size} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_main} eq '' ){
            $str{err_osxdl_main} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_del_apple_url} eq '' || $dlsubmit->chk_url( $param{osxdl_del_apple_url} ) == 1 || $param{osxdl_del_apple_url} !~ m!^http://www.apple.com/jp/downloads/.+$! ){
            $str{err_osxdl_del_apple_url} = ' class="error"';
        }
        if( $param{osxdl_del_reason} eq '' ){
            $str{err_osxdl_del_reason} = ' class="error"';
        }

        $str{onload} = ' onLoad="isNew()"';

    }
    #掲載内容の更新の場合
    elsif( $param{keywords} eq '更新' ){

        if( $param{osxdl_version} eq '' ){
            $str{err_osxdl_version} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_license} eq '' || $param{osxdl_license} eq '0' || $param{osxdl_license} eq '1' ){
            $str{err_osxdl_license} = ' class="error"';
            $err = 1;
        }
        if( $param{entry_excerpt} eq '' ){
            $str{err_entry_excerpt} = ' class="error"';
            $err = 1;
        }
        if($param{entry_excerpt}){
            my($str_h, $str_z) = $dlsubmit->count_str($cgi->param('entry_excerpt'));
            if(eval($str_h + $str_z) > 30){
                $str{err_entry_excerpt} = ' class="error"';
                $err = 1;
            }
        }
        if( $param{entry_text} eq '' ){
            $str{err_entry_text} = ' class="error"';
            $err = 1;
        }
        if( $param{entry_text_more} eq '' ){
            $str{err_entry_text_more} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_osx_version} eq '' || $param{osxdl_osx_version} eq 'お選びください' || $param{osxdl_osx_version} eq '-----------------' ){
            $str{err_osxdl_osx_version} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_universalbinary} eq '' ){
            $str{err_osxdl_universalbinary} = ' class="error"';
            $err = 1;
        }
        if( $dlsubmit->chk_url( $param{osxdl_download_page} ) == 1 || $param{osxdl_download_page} eq '' ){
            $str{err_osxdl_download_page} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_file_size} eq '' ){
            $str{err_osxdl_file_size} = ' class="error"';
            $err = 1;
        }
        if( $dlsubmit->chk_h_n_dot($param{osxdl_file_size}) == 1 ){
            $str{err_osxdl_file_size} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_main} eq '' ){
            $str{err_osxdl_main} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_del_apple_url} eq '' || $dlsubmit->chk_url( $param{osxdl_del_apple_url} ) == 1 || $param{osxdl_del_apple_url} !~ m!^http://www.apple.com/jp/downloads/.+$! ){
            $str{err_osxdl_del_apple_url} = ' class="error"';
        }
        if( $param{osxdl_del_reason} eq '' ){
            $str{err_osxdl_del_reason} = ' class="error"';
        }

        $str{onload} = ' onLoad="isUpgrade()"';

    }
    #掲載内容の削除の場合
    elsif( $param{keywords} eq '削除' ){

        if( $param{osxdl_version} eq '' ){
            $str{err_osxdl_version} = ' class="error"';
        }
        if( $param{osxdl_license} eq '' || $param{osxdl_license} eq '0' || $param{osxdl_license} eq '1' ){
            $str{err_osxdl_license} = ' class="error"';
        }
        if( $param{entry_excerpt} eq '' ){
            $str{err_entry_excerpt} = ' class="error"';
        }
        if( $param{entry_text} eq '' ){
            $str{err_entry_text} = ' class="error"';
        }
        if( $param{entry_text_more} eq '' ){
            $str{err_entry_text_more} = ' class="error"';
        }
        if( $param{osxdl_osx_version} eq '' || $param{osxdl_osx_version} eq 'お選びください' || $param{osxdl_osx_version} eq '-----------------' ){
            $str{err_osxdl_osx_version} = ' class="error"';
        }
        if( $param{osxdl_universalbinary} eq '' ){
            $str{err_osxdl_universalbinary} = ' class="error"';
        }
        if( $dlsubmit->chk_url( $param{osxdl_download_page} ) == 1 || $param{osxdl_download_page} eq '' ){
            $str{err_osxdl_download_page} = ' class="error"';
        }
        if( $param{osxdl_file_size} eq '' ){
            $str{err_osxdl_file_size} = ' class="error"';
        }
        if( $param{osxdl_main} eq '' ){
            $str{err_osxdl_main} = ' class="error"';
        }
        if( $param{osxdl_del_apple_url} eq '' || $dlsubmit->chk_url( $param{osxdl_del_apple_url} ) == 1 || $param{osxdl_del_apple_url} !~ m!^http://www.apple.com/jp/downloads/.+$! ){
            $str{err_osxdl_del_apple_url} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_del_reason} eq '' ){
            $str{err_osxdl_del_reason} = ' class="error"';
            $err = 1;
        }

        $str{onload} = ' onLoad="isDelete()"';

    }
    #種別選択されてない場合
    else{

        if( $param{osxdl_version} eq '' ){
            $str{err_osxdl_version} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_license} eq '' || $param{osxdl_license} eq '0' || $param{osxdl_license} eq '1' ){
            $str{err_osxdl_license} = ' class="error"';
            $err = 1;
        }
        if( $param{entry_excerpt} eq '' ){
            $str{err_entry_excerpt} = ' class="error"';
            $err = 1;
        }
        if($param{entry_excerpt}){
            my($str_h, $str_z) = $dlsubmit->count_str($cgi->param('entry_excerpt'));
            if(eval($str_h + $str_z) > 30){
                $str{err_entry_excerpt} = ' class="error"';
                $err = 1;
            }
        }
        if( $param{entry_text} eq '' ){
            $str{err_entry_text} = ' class="error"';
            $err = 1;
        }
        if( $param{entry_text_more} eq '' ){
            $str{err_entry_text_more} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_osx_version} eq '' || $param{osxdl_osx_version} eq 'お選びください' || $param{osxdl_osx_version} eq '-----------------' ){
            $str{err_osxdl_osx_version} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_universalbinary} eq '' ){
            $str{err_osxdl_universalbinary} = ' class="error"';
            $err = 1;
        }
        if( $dlsubmit->chk_url( $param{osxdl_download_page} ) == 1 || $param{osxdl_download_page} eq '' ){
            $str{err_osxdl_download_page} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_file_size} eq '' ){
            $str{err_osxdl_file_size} = ' class="error"';
            $err = 1;
        }
        if( $dlsubmit->chk_h_n_dot($param{osxdl_file_size}) == 1 ){
            $str{err_osxdl_file_size} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_main} eq '' ){
            $str{err_osxdl_main} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_del_apple_url} eq '' || $dlsubmit->chk_url( $param{osxdl_del_apple_url} ) == 1 || $param{osxdl_del_apple_url} !~ m!^http://www.apple.com/jp/downloads/.+$! ){
            $str{err_osxdl_del_apple_url} = ' class="error"';
            $err = 1;
        }
        if( $param{osxdl_del_reason} eq '' ){
            $str{err_osxdl_del_reason} = ' class="error"';
            $err = 1;
        }
    }
}

#エラーメインメッセージ
if( $err == 1 ){
    $str{err_str} = '<p class="error">必須項目が未記入です。赤色の項目部分のご記入をお願いいたします。</p>';
}

#初期値
if( $param{osxdl_company_url} eq '' ){
    $str{osxdl_company_url} = 'http://';
}
if( $param{osxdl_download_page} eq '' ){
    $str{osxdl_download_page} = 'http://';
}
if( $param{osxdl_del_apple_url} eq '' ){
    $str{osxdl_del_apple_url} = 'http://www.apple.com/jp/downloads/';
}

#radio作成
#種別
my $keywords_name = 'keywords';
my $keywords_value = {
    '新規' => '新規掲載<br>'."\n",
    '更新' => '掲載内容の更新<br>'."\n",
    '削除' => '掲載内容の削除<br>'."\n"};

my $keywords_array = [
    '新規',
    '更新',
    '削除'];

my $keywords_class = {
    '新規' => ' class="radio" onClick="isNew()"',
    '更新' => ' class="radio" onClick="isUpgrade()"',
    '削除' => ' class="radio" onClick="isDelete()"'};

$str{keywords_rad} = $dlsubmit->mk_radio( $keywords_name, $keywords_value, $keywords_array, $keywords_class, \%param );

#universalbinary
my $osxdl_universalbinary_name = 'osxdl_universalbinary';
my $osxdl_universalbinary_value = {
    'はい'   => 'はい<br>'."\n",
    'いいえ' => 'いいえ<br>'."\n"};

my $osxdl_universalbinary_array = ['はい', 'いいえ'];

my $osxdl_universalbinary_class = {
    'はい' => ' class="radio"',
    'いいえ'=>' class="radio"'};

$str{osxdl_universalbinary_rad} = $dlsubmit->mk_radio( $osxdl_universalbinary_name, $osxdl_universalbinary_value, $osxdl_universalbinary_array, $osxdl_universalbinary_class, \%param );

#select作成
#カテゴリ
my $category_id_name = 'category_id';
my $category_id_id = ' id="category"';
my $category_id_option = {
    0  => 'カテゴリをお選び下さい',
    1  => '-----------------',
    2  => 'アップル',
    3  => 'オーディオ &amp; ビデオ',
    4  => 'ビジネス &amp; SOHO',
    5  => 'カスタマイズ',
    6  => 'ドライバ',
    7  => 'ゲーム &amp; アミューズメント',
    8  => '家庭 &amp; 学習',
    9  => '画像処理 &amp; 3D',
    10 => 'インターネット &amp; 通信',
    11 => '科学 &amp; 数学',
    12 => '文書作成',
    13 => '開発ツール &amp; UNIXアプリ',
    14 => 'ユーティリティ'};

my $category_id_array = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14];
$str{category_id_sel} = $dlsubmit->mk_select( $category_id_name, $category_id_id, $category_id_option, $category_id_array, \%param );

#形態
my $osxdl_license_name = 'osxdl_license';
my $osxdl_license_id = '';
my $osxdl_license_option = {
    0              => '形態をお選びください',
    1              => '-----------------',
    'フリーウェア' => 'フリーウェア',
    'シェアウェア' => 'シェアウェア',
    'デモ'         => 'デモ',
    'ベータ'       => 'ベータ'};

my $osxdl_license_array = [0, 1, 'フリーウェア', 'シェアウェア', 'デモ', 'ベータ'];
$str{osxdl_license_sel} = $dlsubmit->mk_select( $osxdl_license_name, $osxdl_license_id, $osxdl_license_option, $osxdl_license_array, \%param );

#対応するMac OSのバージョン
my $osxdl_osx_version_name = 'osxdl_osx_version';
my $osxdl_osx_version_id = '';
my $osxdl_osx_version_option = {
    'お選びください'      =>'お選びください',
    '-----------------'   => '-----------------',
    'Mac OS X 10.4.8 以降' => 'Mac OS X 10.4.8 以降',
    'Mac OS X 10.4.7 以降' => 'Mac OS X 10.4.7 以降',
    'Mac OS X 10.4.6 以降' => 'Mac OS X 10.4.6 以降',
    'Mac OS X 10.4.5 以降' => 'Mac OS X 10.4.5 以降',
    'Mac OS X 10.4.4 以降' => 'Mac OS X 10.4.4 以降',
    'Mac OS X 10.4.3 以降' => 'Mac OS X 10.4.3 以降',
    'Mac OS X 10.4.2 以降' => 'Mac OS X 10.4.2 以降',
    'Mac OS X 10.4.1 以降' => 'Mac OS X 10.4.1 以降',
    'Mac OS X 10.4 以降'   => 'Mac OS X 10.4 以降',
    'Mac OS X 10.3.9 以降' => 'Mac OS X 10.3.9 以降',
    'Mac OS X 10.3.8 以降' => 'Mac OS X 10.3.8 以降',
    'Mac OS X 10.3.7 以降' => 'Mac OS X 10.3.7 以降',
    'Mac OS X 10.3.6 以降' => 'Mac OS X 10.3.6 以降',
    'Mac OS X 10.3.5 以降' => 'Mac OS X 10.3.5 以降',
    'Mac OS X 10.3.4 以降' => 'Mac OS X 10.3.4 以降',
    'Mac OS X 10.3.3 以降' => 'Mac OS X 10.3.3 以降',
    'Mac OS X 10.3.2 以降' => 'Mac OS X 10.3.2 以降',
    'Mac OS X 10.3.1 以降' => 'Mac OS X 10.3.1 以降',
    'Mac OS X 10.3 以降'   => 'Mac OS X 10.3 以降',
    'Mac OS X 10.2.8 以降' => 'Mac OS X 10.2.8 以降',
    'Mac OS X 10.2.7 以降' => 'Mac OS X 10.2.7 以降',
    'Mac OS X 10.2.6 以降' => 'Mac OS X 10.2.6 以降',
    'Mac OS X 10.2.5 以降' => 'Mac OS X 10.2.5 以降',
    'Mac OS X 10.2.4 以降' => 'Mac OS X 10.2.4 以降',
    'Mac OS X 10.2.3 以降' => 'Mac OS X 10.2.3 以降',
    'Mac OS X 10.2.2 以降' => 'Mac OS X 10.2.2 以降',
    'Mac OS X 10.2.1 以降' => 'Mac OS X 10.2.1 以降',
    'Mac OS X 10.2 以降'   => 'Mac OS X 10.2 以降',
    'Mac OS X 10.1.5 以降' => 'Mac OS X 10.1.5 以降',
    'Mac OS X 10.1.4 以降' => 'Mac OS X 10.1.4 以降',
    'Mac OS X 10.1.3 以降' => 'Mac OS X 10.1.3 以降',
    'Mac OS X 10.1.2 以降' => 'Mac OS X 10.1.2 以降',
    'Mac OS X 10.1.1 以降' => 'Mac OS X 10.1.1 以降',
    'Mac OS X 10.1 以降'   => 'Mac OS X 10.1 以降'};

my $osxdl_osx_version_array = [
    'お選びください',
    '-----------------',
    'Mac OS X 10.4.8 以降',
    'Mac OS X 10.4.7 以降',
    'Mac OS X 10.4.6 以降',
    'Mac OS X 10.4.5 以降',
    'Mac OS X 10.4.4 以降',
    'Mac OS X 10.4.3 以降',
    'Mac OS X 10.4.2 以降',
    'Mac OS X 10.4.1 以降',
    'Mac OS X 10.4 以降',
    'Mac OS X 10.3.9 以降',
    'Mac OS X 10.3.8 以降',
    'Mac OS X 10.3.7 以降',
    'Mac OS X 10.3.6 以降',
    'Mac OS X 10.3.5 以降',
    'Mac OS X 10.3.4 以降',
    'Mac OS X 10.3.3 以降',
    'Mac OS X 10.3.2 以降',
    'Mac OS X 10.3.1 以降',
    'Mac OS X 10.3 以降',
    'Mac OS X 10.2.8 以降',
    'Mac OS X 10.2.7 以降',
    'Mac OS X 10.2.6 以降',
    'Mac OS X 10.2.5 以降',
    'Mac OS X 10.2.4 以降',
    'Mac OS X 10.2.3 以降',
    'Mac OS X 10.2.2 以降',
    'Mac OS X 10.2.1 以降',
    'Mac OS X 10.2 以降',
    'Mac OS X 10.1.5 以降',
    'Mac OS X 10.1.4 以降',
    'Mac OS X 10.1.3 以降',
    'Mac OS X 10.1.2 以降',
    'Mac OS X 10.1.1 以降',
    'Mac OS X 10.1 以降'];

$str{osxdl_osx_version_sel} = $dlsubmit->mk_select( $osxdl_osx_version_name, $osxdl_osx_version_id, $osxdl_osx_version_option, $osxdl_osx_version_array, \%param );

#ファイル容量単位
my $osxdl_size_suffix_name = 'osxdl_size_suffix';
my $osxdl_size_suffix_id = '';
my $osxdl_size_suffix_option = {
    'K' => 'K',
    'MB' => 'MB',
    'GB' => 'GB'};
my $osxdl_size_suffix_array = ['K', 'MB', 'GB'];
$str{osxdl_size_suffix_sel} = $dlsubmit->mk_select( $osxdl_size_suffix_name, $osxdl_size_suffix_id, $osxdl_size_suffix_option, $osxdl_size_suffix_array, \%param );

#確認画面の値作成
if($param{confirm} eq 't' && $err == 0 && $param{img_reg_osxdl_main} eq '' && $param{img_del_osxdl_main} eq '' && ($param{keywords} eq '新規' || $param{keywords} eq '更新' || $param{keywords} eq '削除')){

    #申し込み種別
    $str{keywords_conf} = $$keywords_value{$param{keywords}};
    #カテゴリ
    $str{category_id_conf} = $$category_id_option{$param{category_id}};
    #システム条件
    if($param{osxdl_requirement1} || $param{osxdl_requirement2} || $param{osxdl_requirement3} || $param{osxdl_requirement4} || $param{osxdl_requirement5}){
        $str{osxdl_requirement_conf} .= '							<tr valign="top">
								<td><p><strong>システム条件（任意）</strong></p></td>
								<td></td>
								<td>'."\n";
    }
    $str{entry_excerpt_conf} = $dlsubmit->s_br($param{entry_excerpt});
    $str{entry_text_conf} = $dlsubmit->s_br($param{entry_text});
    $str{entry_text_more_conf} = $dlsubmit->s_br($param{entry_text});
    $str{osxdl_del_reason_conf} = $dlsubmit->s_br($param{osxdl_del_reason});
    $str{osxdl_del_reason_conf} = $dlsubmit->s_br($param{osxdl_del_reason});

    if($param{osxdl_requirement1}){
        $str{osxdl_requirement_conf} .= '<p>'.$param{osxdl_requirement1}.'</p>'."\n";
    }
    if($param{osxdl_requirement2}){
        $str{osxdl_requirement_conf} .= '<p>'.$param{osxdl_requirement2}.'</p>'."\n";
    }
    if($param{osxdl_requirement3}){
        $str{osxdl_requirement_conf} .= '<p>'.$param{osxdl_requirement3}.'</p>'."\n";
    }
    if($param{osxdl_requirement4}){
        $str{osxdl_requirement_conf} .= '<p>'.$param{osxdl_requirement4}.'</p>'."\n";
    }
    if($param{osxdl_requirement5}){
        $str{osxdl_requirement_conf} .= '<p>'.$param{osxdl_requirement5}.'</p>'."\n";
    }
    if($param{osxdl_requirement1} || $param{osxdl_requirement2} || $param{osxdl_requirement3} || $param{osxdl_requirement4} || $param{osxdl_requirement5}){
        $str{osxdl_requirement_conf} .= '								</td>
							</tr>'."\n";
    }
    #画像
    my($format, $w, $h) = $dlsubmit->GetImageSize($conf::rootdir.'/'.$conf::imgdir.'/'.$param{osxdl_main});
    if($w > $conf::imgsize_submit){
        $w = $conf::imgsize_submit;
    }
    $str{osxdl_main_conf} = '<img src="'.$conf::imgdir.'/'.$param{osxdl_main}.'" width="'.$w.'">';

    $str{hidden} = $dlsubmit->mk_hidden(\%str, [], ['keywords', 'osxdl_author_name', 'osxdl_author_mail', 'osxdl_author_phone', 'osxdl_company', 'osxdl_company_url', 'entry_title', 'category_id', 'osxdl_version', 'osxdl_license', 'entry_excerpt', 'entry_text', 'entry_text_more', 'osxdl_del_apple_url', 'osxdl_del_reason', 'osxdl_osx_version', 'osxdl_universalbinary', 'osxdl_requirement1', 'osxdl_requirement2', 'osxdl_requirement3', 'osxdl_requirement4', 'osxdl_requirement5', 'osxdl_download_page', 'osxdl_file_size', 'osxdl_size_suffix', 'osxdl_main', 'entry_text_more', 'osxdl_del_reason'] );

}

#メイン出力
print $cgi->header(-charset=>'utf-8');
#新規掲載確認画面
if($param{confirm} eq 't' && $err == 0 && $param{img_reg_osxdl_main} eq '' && $param{img_del_osxdl_main} eq '' && $param{keywords} eq '新規'){


    print $dlsubmit->publish_template($conf::temp_confirm_new_macosx, \%str);
}
#更新確認
elsif($param{confirm} eq 't' && $err == 0 && $param{img_reg_osxdl_main} eq '' && $param{img_del_osxdl_main} eq '' && $param{keywords} eq '更新'){
    print $dlsubmit->publish_template($conf::temp_confirm_update_macosx, \%str);
}
#削除確認
elsif($param{confirm} eq 't' && $err == 0 && $param{img_reg_osxdl_main} eq '' && $param{img_del_osxdl_main} eq '' && $param{keywords} eq '削除'){
    print $dlsubmit->publish_template($conf::temp_confirm_delete_macosx, \%str);
}
#入力フォーム
else{
    print $dlsubmit->publish_template($conf::temp_macosx, \%str);
}