scripts/convert-mudela.py

   1 #!@PYTHON@
   2
   3 # convert-mudela.py -- convertor for mudela versions
   4 #
   5 # source file of the GNU LilyPond music typesetter
   6 #
   7 # (c) 1998
   8
   9 # TODO
  10 #   use -f and -t for -s output
  11
  12 # NEWS
  13 # 0.2
  14 #  - rewrite in python
  15
  16 program_name = 'convert-mudela'
  17 version = '@TOPLEVEL_VERSION@'
  18
  19 import os
  20 import sys
  21 import __main__
  22 import getopt
  23 from string import *
  24 import re
  25 import time
  26
  27 mudela_version_re_str = '\\\\version *\"(.*)\"'
  28 mudela_version_re = re.compile(mudela_version_re_str)
  29
  30 def program_id ():
  31         return '%s (GNU LilyPond) %s' %(program_name,  version);
  32
  33 def identify ():
  34         sys.stderr.write (program_id () + '\n')
  35
  36 def usage ():
  37         sys.stdout.write (
  38                 r"""Usage: %s [OPTION]... [FILE]...
  39 Try to convert to newer mudela-versions.  The version number of the
  40 input is guessed by default from \version directive
  41
  42 Options:
  43   -h, --help             print this help
  44   -e, --edit             in place edit
  45   -f, --from=VERSION     start from version
  46   -s, --show-rules       print all rules.
  47   -t, --to=VERSION       target version
  48       --version          print program version
  49
  50 Report bugs to bugs-gnu-music@gnu.org
  51
  52 """ % program_name)
  53
  54
  55         sys.exit (0)
  56
  57 def print_version ():
  58
  59         sys.stdout.write (r"""%s
  60
  61 This is free software.  It is covered by the GNU General Public
  62 License, and you are welcome to change it and/or distribute copies of
  63 it under certain conditions.  invoke as `%s --warranty' for more
  64 information.
  65
  66 """ % (program_id() , program_name))
  67
  68 def gulp_file(f):
  69         try:
  70                 i = open(f)
  71                 i.seek (0, 2)
  72                 n = i.tell ()
  73                 i.seek (0,0)
  74         except:
  75                 print 'can\'t open file: ' + f + '\n'
  76                 return ''
  77         s = i.read (n)
  78         if len (s) <= 0:
  79                 print 'gulped empty file: ' + f + '\n'
  80         i.close ()
  81         return s
  82
  83 def str_to_tuple (s):
  84         return tuple (map (atoi, split (s,'.')))
  85
  86 def tup_to_str (t):
  87         return join (map (lambda x: '%s' % x, list (t)), '.')
  88
  89 def version_cmp (t1, t2):
  90         for x in [0,1,2]:
  91                 if t1[x] - t2[x]:
  92                         return t1[x] - t2[x]
  93         return 0
  94
  95 def guess_mudela_version(filename):
  96         s = gulp_file (filename)
  97         m = mudela_version_re.search (s)
  98         if m:
  99                 return m.group(1)
 100         else:
 101                 return ''
 102
 103 class FatalConversionError:
 104         pass
 105
 106 conversions = []
 107
 108 def show_rules (file):
 109         for x in conversions:
 110                 file.write  ('%s: %s\n' % (tup_to_str (x[0]), x[2]))
 111
 112 ############################
 113
 114 if 1:                                   # need new a namespace
 115         def conv (str):
 116                 if re.search ('\\\\octave', str):
 117                         sys.stderr.write ('\nNot smart enough to convert \\octave')
 118                         raise FatalConversionError()
 119
 120                 return lines
 121
 122         conversions.append (
 123                 ((0,1,19), conv, 'deprecated \\octave; can\'t convert automatically'))
 124
 125
 126 if 1:                                   # need new a namespace
 127         def conv (str):
 128                 str = re.sub ('\\\\textstyle([^;]+);',
 129                                          '\\\\property Lyrics . textstyle = \\1', str)
 130                 str = re.sub ('\\\\key([^;]+);', '\\\\accidentals \\1;', str)
 131
 132                 return str
 133
 134         conversions.append (
 135                 ((0,1,20), conv, 'deprecated \\textstyle, new \key syntax'))
 136
 137
 138 if 1:
 139         def conv (str):
 140                 str = re.sub ('\\\\musical_pitch', '\\\\musicalpitch',str)
 141                 str = re.sub ('\\\\meter', '\\\\time',str)
 142
 143                 return str
 144
 145         conversions.append (
 146                 ((0,1,21), conv, '\\musical_pitch -> \\musicalpitch, '+
 147                  '\\meter -> \\time'))
 148
 149 if 1:
 150         def conv (str):
 151                 return lines
 152
 153         conversions.append (
 154                 ((1,0,0), conv, '0.1.21 -> 1.0.0 '))
 155
 156
 157 if 1:
 158         def conv (str):
 159                 str = re.sub ('\\\\accidentals', '\\\\keysignature',str)
 160                 str = re.sub ('specialaccidentals *= *1', 'keyoctaviation = 0',str)
 161                 str = re.sub ('specialaccidentals *= *0', 'keyoctaviation = 1',str)
 162
 163                 return str
 164
 165         conversions.append (
 166                 ((1,0,1), conv, '\\accidentals -> \\keysignature, ' +
 167                  'specialaccidentals -> keyoctaviation'))
 168
 169 if 1:
 170         def conv(str):
 171                 if re.search ('\\\\header', lines):
 172                         sys.stderr.write ('\nNot smart enough to convert to new \\header format')
 173                 return lines
 174
 175         conversions.append ((1,0,2), conv, '\\header { key = concat + with + operator }')
 176
 177 if 1:
 178         def conv(str):
 179                 str =  re.sub ('\\\\melodic', '\\\\notes',str)
 180
 181                 return str
 182
 183         conversions.append ((1,0,3), conv, '\\melodic -> \\notes')
 184
 185 if 1:
 186         def conv(str):
 187                 str =  re.sub ('default_paper *=', '',str)
 188                 str =  re.sub ('default_midi *=', '',x)
 189
 190                 return str
 191
 192         conversions.append ((1,0,4), conv, 'default_{paper,midi}')
 193
 194 if 1:
 195         def conv(str):
 196                 str =  re.sub ('ChoireStaff', 'ChoirStaff',str)
 197                 str =  re.sub ('\\output', 'output = ',str)
 198
 199                 return str
 200
 201         conversions.append ((1,0,5), conv, 'ChoireStaff -> ChoirStaff')
 202
 203 if 1:
 204         def conv(str):
 205                 if re.search ('[a-zA-Z]+ = *\\translator',str):
 206                         sys.stderr.write ('\nNot smart enough to change \\translator syntax')
 207                         raise FatalConversionError()
 208                 return str
 209
 210         conversions.append ((1,0,6), conv, 'foo = \\translator {\\type .. } ->\\translator {\\type ..; foo; }')
 211
 212
 213 if 1:
 214         def conv(str):
 215                 str =  re.sub ('\\\\lyric', '\\\\lyrics',str)
 216
 217                 return str
 218
 219         conversions.append ((1,0,7), conv, '\\lyric -> \\lyrics')
 220
 221 if 1:
 222         def conv(str):
 223                 str =  re.sub ('\\\\\\[/3+', '\\\\times 2/3 { ',str)
 224                 str =  re.sub ('\\[/3+', '\\\\times 2/3 { [',str)
 225                 str =  re.sub ('\\\\\\[([0-9/]+)', '\\\\times \\1 {',str)
 226                 str =  re.sub ('\\[([0-9/]+)', '\\\\times \\1 { [',str)
 227                 str =  re.sub ('\\\\\\]([0-9/]+)', '}', str)
 228                 str =  re.sub ('\\\\\\]', '}',str)
 229                 str =  re.sub ('\\]([0-9/]+)', '] }', str)
 230                 return str
 231
 232         conversions.append ((1,0,10), conv, '[2/3 ]1/1 -> \\times 2/3 ')
 233
 234 if 1:
 235         def conv(str):
 236                 return lines
 237         conversions.append ((1,0,12), conv, 'Chord syntax stuff')
 238
 239
 240 if 1:
 241         def conv(str):
 242
 243
 244                 str =  re.sub ('<([^>~]+)~([^>]*)>','<\\1 \\2> ~', str)
 245
 246                 return str
 247
 248         conversions.append ((1,0,13), conv, '<a ~ b> c -> <a b> ~ c')
 249
 250 if 1:
 251         def conv(str):
 252                 str =  re.sub ('<\\[','[<', str)
 253                 str =  re.sub ('\\]>','>]', str)
 254
 255                 return str
 256
 257         conversions.append ((1,0,14), conv, '<[a b> <a b]>c -> [<a b> <a b>]')
 258
 259
 260 if 1:
 261         def conv(str):
 262                 str =  re.sub ('\\\\type','\\\\context', str)
 263                 str =  re.sub ('textstyle','textStyle', str)
 264
 265                 return str
 266
 267         conversions.append ((1,0,16), conv, '\\type -> \\context, textstyle -> textStyle')
 268
 269
 270 if 1:
 271         def conv(str):
 272                 if re.search ('\\\\repeat',str):
 273                         sys.stderr.write ('\nNot smart enough to convert \\repeat')
 274                         raise FatalConversionError()
 275                 return str
 276
 277         conversions.append ((1,0,18), conv,
 278                             '\\repeat NUM Music Alternative -> \\repeat FOLDSTR Music Alternative')
 279
 280 if 1:
 281         def conv(str):
 282                 str =  re.sub ('SkipBars','skipBars', str)
 283                 str =  re.sub ('fontsize','fontSize', str)
 284                 str =  re.sub ('midi_instrument','midiInstrument', x)
 285
 286                 return str
 287
 288         conversions.append ((1,0,19), conv,
 289                             'fontsize -> fontSize, midi_instrument -> midiInstrument, SkipBars -> skipBars')
 290
 291
 292 if 1:
 293         def conv(str):
 294                 str =  re.sub ('tieydirection','tieVerticalDirection', str)
 295                 str =  re.sub ('slurydirection','slurVerticalDirection', str)
 296                 str =  re.sub ('ydirection','verticalDirection', x)
 297
 298                 return str
 299
 300         conversions.append ((1,0,20), conv,
 301                             '{,tie,slur}ydirection -> {v,tieV,slurV}erticalDirection')
 302
 303
 304 if 1:
 305         def conv(str):
 306                 str =  re.sub ('hshift','horizontalNoteShift', str)
 307
 308                 return str
 309
 310         conversions.append ((1,0,21), conv,
 311                             'hshift -> horizontalNoteShift')
 312
 313
 314 if 1:
 315         def conv(str):
 316                 str =  re.sub ('\\\\grouping[^;]*;','', str)
 317
 318                 return str
 319
 320         conversions.append ((1,1,52), conv,
 321                             'deprecate \\grouping')
 322
 323
 324 if 1:
 325         def conv(str):
 326                 str =  re.sub ('\\\\wheel','\\\\coda', str)
 327
 328                 return str
 329
 330         conversions.append ((1,1,55), conv,
 331                             '\\wheel -> \\coda')
 332
 333 if 1:
 334         def conv(str):
 335                 str =  re.sub ('keyoctaviation','keyOctaviation', str)
 336                 str =  re.sub ('slurdash','slurDash', str)
 337
 338                 return str
 339
 340         conversions.append ((1,1,65), conv,
 341                             'slurdash -> slurDash, keyoctaviation -> keyOctaviation')
 342
 343 if 1:
 344         def conv(str):
 345                 str =  re.sub ('\\\\repeat *\"?semi\"?','\\\\repeat "volta"', str)
 346
 347                 return str
 348
 349         conversions.append ((1,1,66), conv,
 350                             'semi -> volta')
 351
 352
 353 if 1:
 354         def conv(str):
 355                 str =  re.sub ('\"?beamAuto\"? *= *\"?0?\"?','noAutoBeaming = "1"', str)
 356
 357                 return str
 358
 359         conversions.append ((1,1,67), conv,
 360                             'beamAuto -> noAutoBeaming')
 361
 362 if 1:
 363         def conv(str):
 364                 str =  re.sub ('automaticMelismas', 'automaticMelismata', str)
 365
 366                 return str
 367
 368         conversions.append ((1,2,0), conv,
 369                             'automaticMelismas -> automaticMelismata')
 370
 371 if 1:
 372         def conv(str):
 373                 str =  re.sub ('dynamicDir', 'dynamicDirection', str)
 374
 375                 return str
 376
 377         conversions.append ((1,2,1), conv,
 378                             'dynamicDir -> dynamicDirection')
 379
 380 if 1:
 381         def conv(str):
 382                 str =  re.sub ('\\\\cadenza *0 *;', '\\\\cadenzaOff', str)
 383                 str =  re.sub ('\\\\cadenza *1 *;', '\\\\cadenzaOn', str)
 384
 385                 return str
 386
 387         conversions.append ((1,3,4), conv,
 388                             '\\cadenza -> \cadenza{On|Off}')
 389
 390 ############################
 391
 392
 393 def get_conversions (from_version, to_version):
 394         def version_b (v, f = from_version, t = to_version):
 395                 return version_cmp (v[0], f) > 0 and version_cmp (v[0], t) <= 0
 396         return filter (version_b, conversions)
 397
 398
 399 def latest_version ():
 400         return conversions[-1][0]
 401
 402 def do_conversion (infile, from_version, outfile, to_version):
 403
 404         conv_list = get_conversions (from_version, to_version)
 405
 406         sys.stderr.write ('Applying conversions: ')
 407         str = infile.read ()
 408         last_conversion = ()
 409         try:
 410                 for x in conv_list:
 411                         sys.stderr.write (tup_to_str (x[0])  + ', ')
 412                         str = x[1] (str)
 413                         last_conversion = x[0]
 414
 415         except FatalConversionError:
 416                 sys.stderr.write ('Error while converting; I won\'t convert any further')
 417
 418         if last_conversion:
 419                 sys.stderr.write ('\n')
 420                 new_ver =  '\\\\version \"%s\"' % tup_to_str (last_conversion)
 421                 if re.search (mudela_version_re_str, str):
 422                         str = re.sub (mudela_version_re_str,new_ver , str)
 423                 else:
 424                         str = new_ver + '\n' + str
 425
 426                 outfile.write(str)
 427
 428         return last_conversion
 429
 430 class UnknownVersion:
 431         pass
 432
 433 def do_one_file (infile_name):
 434         sys.stderr.write ('Processing `%s\' ... '% infile_name)
 435         outfile_name = ''
 436         if __main__.edit:
 437                 outfile_name = infile_name + '.NEW'
 438         elif __main__.outfile_name:
 439                 outfile_name = __main__.outfile_name
 440
 441         if __main__.from_version:
 442                 from_version = __main__.from_version
 443         else:
 444                 guess = guess_mudela_version (infile_name)
 445                 if not guess:
 446                         raise UnknownVersion()
 447                 from_version = str_to_tuple (guess)
 448
 449         if __main__.to_version:
 450                 to_version = __main__.to_version
 451         else:
 452                 to_version = latest_version ()
 453
 454
 455         if infile_name:
 456                 infile = open (infile_name,'r')
 457         else:
 458                 infile = sys.stdin
 459
 460         if outfile_name:
 461                 outfile =  open (outfile_name, 'w')
 462         else:
 463                 outfile = sys.stdout
 464
 465         touched = do_conversion (infile, from_version, outfile, to_version)
 466
 467         if infile_name:
 468                 infile.close ()
 469
 470         if outfile_name:
 471                 outfile.close ()
 472
 473         if __main__.edit and touched:
 474                 try:
 475                         os.remove(infile_name + '~')
 476                 except:
 477                         pass
 478                 os.rename (infile_name, infile_name + '~')
 479                 os.rename (infile_name + '.NEW', infile_name)
 480
 481         sys.stderr.write ('\n')
 482         sys.stderr.flush ()
 483
 484 edit = 0
 485 to_version = ()
 486 from_version = ()
 487 outfile_name = ''
 488
 489 (options, files) = getopt.getopt (
 490         sys.argv[1:], 'o:f:t:seh', ['version', 'output', 'show-rules', 'help', 'edit', 'from=', 'to'])
 491
 492 for opt in options:
 493         o = opt[0]
 494         a = opt[1]
 495         if o== '--help' or o == '-h':
 496                 usage ()
 497                 sys.exit (0)
 498         if o == '--version' or o == '-v':
 499                 print_version ()
 500                 sys.exit (0)
 501         elif o== '--from' or o=='-f':
 502                 from_version = str_to_tuple (a)
 503         elif o== '--to' or o=='-t':
 504                 to_version = str_to_tuple (a)
 505         elif o== '--edit' or o == '-e':
 506                 edit = 1
 507         elif o== '--show-rules' or o == '-s':
 508                 show_rules (sys.stdout)
 509                 sys.exit(0)
 510         elif o == '--output' or o == '-o':
 511                 outfile_name = a
 512         else:
 513                 print o
 514                 raise getopt.error
 515
 516 identify ()
 517 for f in files:
 518         if f == '-':
 519                 f = ''
 520         try:
 521                 do_one_file (f)
 522         except UnknownVersion:
 523                 pass