13339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson#!/usr/bin/perl 23339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson 33339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson$major = 1; 43339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson$minor = 3; 53339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson$micro = 7; 63339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson$binary_age = 0; 73339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson$interface_age = 0; 83339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson$gettext_package = "glib20"; 91cda3c9e017ce9359d5019bb7bc8993208523891Hans Breuer$current_minus_age = 0; 103339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson 113339995d877c825b22b344bda079fa3a05db55b4Alexander Larssonsub process_file 123339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson{ 133339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson my $outfilename = shift; 143339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson my $infilename = $outfilename . ".in"; 153339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson 163339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson open (INPUT, "< $infilename") || exit 1; 173339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson open (OUTPUT, "> $outfilename") || exit 1; 183339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson 193339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson while (<INPUT>) { 203339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson s/\@GLIB_MAJOR_VERSION\@/$major/g; 213339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson s/\@GLIB_MINOR_VERSION\@/$minor/g; 223339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson s/\@GLIB_MICRO_VERSION\@/$micro/g; 233339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson s/\@GLIB_INTERFACE_AGE\@/$interface_age/g; 243339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson s/\@GLIB_BINARY_AGE\@/$binary_age/g; 253339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson s/\@GETTEXT_PACKAGE\@/$gettext_package/g; 261cda3c9e017ce9359d5019bb7bc8993208523891Hans Breuer s/\@LT_CURRENT_MINUS_AGE@/$current_minus_age/g; 273339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson print OUTPUT; 283339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson } 293339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson} 303339995d877c825b22b344bda079fa3a05db55b4Alexander Larsson 313339995d877c825b22b344bda079fa3a05db55b4Alexander Larssonprocess_file ("config.h.win32"); 323339995d877c825b22b344bda079fa3a05db55b4Alexander Larssonprocess_file ("glibconfig.h.win32"); 333339995d877c825b22b344bda079fa3a05db55b4Alexander Larssonprocess_file ("glib/makefile.msc"); 341cda3c9e017ce9359d5019bb7bc8993208523891Hans Breuerprocess_file ("glib/glib.rc"); 353339995d877c825b22b344bda079fa3a05db55b4Alexander Larssonprocess_file ("gmodule/makefile.msc"); 361cda3c9e017ce9359d5019bb7bc8993208523891Hans Breuerprocess_file ("gmodule/gmodule.rc"); 373339995d877c825b22b344bda079fa3a05db55b4Alexander Larssonprocess_file ("gobject/makefile.msc"); 381cda3c9e017ce9359d5019bb7bc8993208523891Hans Breuerprocess_file ("gobject/gobject.rc"); 393339995d877c825b22b344bda079fa3a05db55b4Alexander Larssonprocess_file ("gthread/makefile.msc"); 401cda3c9e017ce9359d5019bb7bc8993208523891Hans Breuerprocess_file ("gthread/gthread.rc"); 413339995d877c825b22b344bda079fa3a05db55b4Alexander Larssonprocess_file ("tests/makefile.msc"); 42