=cut
+my %read_write_keys = (
+ 'id' => 0,
+ 'text' => 0,
+ 'is_meta' => 0,
+ 'grammar_invalid' => 1,
+ 'is_nonsense' => 1,
+ 'normal_form' => 1,
+);
+
sub _reading_struct {
my( $reading ) = @_;
# Return a JSONable struct of the useful keys. Keys meant to be writable
# have a true value; read-only keys have a false value.
- my %read_write_keys = (
- 'id' => 0,
- 'text' => 0,
- 'is_meta' => 0,
- 'grammar_invalid' => 1,
- 'is_nonsense' => 1,
- 'normal_form' => 1,
- 'lexemes' => 1, # special case?
- );
my $struct = {};
map { $struct->{$_} = $reading->$_ } keys( %read_write_keys );
# Special case
$struct->{'lexemes'} = [ $reading->lexemes ];
+ # Look up any words related via spelling or orthography
+ my $sameword = sub {
+ my $t = $_[0]->type;
+ return $t eq 'spelling' || $t eq 'orthographic';
+ };
+ my @variants;
+ foreach my $sr ( $reading->related_readings( $sameword ) ) {
+ push( @variants, $sr->text );
+ }
+ $struct->{'variants'} = \@variants;
return $struct;
}
my( $self, $c, $reading_id ) = @_;
my $tradition = delete $c->stash->{'tradition'};
my $collation = $tradition->collation;
+ my $rdg = $collation->reading( $reading_id );
my $m = $c->model('Directory');
if( $c->request->method eq 'GET' ) {
- my $rdg = $collation->reading( $reading_id );
$c->stash->{'result'} = $rdg ? _reading_struct( $rdg )
: { 'error' => "No reading with ID $reading_id" };
} elsif ( $c->request->method eq 'POST' ) {
- # TODO Update the reading if we can.
+ # Are we re-lemmatizing?
+ if( $c->request->param('relemmatize') ) {
+ my $nf = $c->request->param('normal_form');
+ # TODO throw error unless $nf
+ $rdg->normal_form( $nf );
+ $rdg->lemmatize();
+ } else {
+ # Set all the values that we have for the reading.
+ # TODO error handling
+ foreach my $p ( keys %{$c->request->params} ) {
+ if( $p =~ /^morphology_(\d+)$/ ) {
+ # Set the form on the correct lexeme
+ my $midx = $1;
+ $c->log->debug( "Fetching lexeme $midx" );
+ my $lx = $rdg->lexeme( $midx );
+ my $strrep = $rdg->language . ' // '
+ . $c->request->param( $p );
+ my $idx = $lx->has_form( $strrep );
+ unless( defined $idx ) {
+ # Make the word form and add it to the lexeme.
+ $c->log->debug("Adding new form for $strrep");
+ $idx = $lx->add_matching_form( $strrep ) - 1;
+ }
+ $lx->disambiguate( $idx );
+ } elsif( $read_write_keys{$p} ) {
+ $rdg->$p( $c->request->param( $p ) );
+ }
+ }
+ }
+ $m->save( $tradition );
+ $c->stash->{'result'} = _reading_struct( $rdg );
+
}
$c->forward('View::JSON');
$('#reading_normal_form').attr( 'size', nfboxsize )
$('#reading_normal_form').val( normal_form );
// Now do the morphological properties.
+ morphology_form( reading_info['lexemes'] );
// and then open the dialog.
+ $('#reading-form').dialog("open");
+}
+
+function morphology_form ( lexlist ) {
$('#morphology').empty();
- $.each( reading_info['lexemes'], function( idx, lex ) {
+ $.each( lexlist, function( idx, lex ) {
var morphoptions = [];
$.each( lex['wordform_matchlist'], function( tdx, tag ) {
var tagstr = stringify_wordform( tag );
$('#morphology').append( el );
});
});
- $('#reading-form').dialog("open");
}
function stringify_wordform ( tag ) {
- return tag['lemma'] + ' // ' + tag['morphology'];
+ var elements = tag.split(' // ');
+ return elements[1] + ' // ' + elements[2];
}
function morph_elements ( formtag, formtxt, currform, morphoptions ) {
var formlabel = $('<label/>').attr( 'id', 'label_' + formtag ).attr(
'for', 'reading_' + formtag ).text( formtxt + ': ' );
var forminput = $('<input/>').attr( 'id', 'reading_' + formtag ).attr(
- 'name', 'reading_' + formtag ).attr( 'size', '50' ).val( currform );
+ 'name', 'reading_' + formtag ).attr( 'size', '50' ).attr(
+ 'class', 'reading_morphology' ).val( currform );
forminput.autocomplete({ source: morphoptions, minLength: 0 });
forminput.focus( function() {
if( $(this).val() == clicktag ) {
$( this ).dialog( "close" );
},
Update: function() {
- form_values = $('#reading_data_form').serialize();
- ncpath = getReadingURL();
- var reading_element = get_node_obj( $('#reading_data_id').val() );
+ var reading_id = $('#reading_id').val()
+ form_values = {
+ 'id' : reading_id,
+ 'is_nonsense': $('#reading_is_nonsense').val(),
+ 'grammar_invalid': $('#reading_grammar_invalid').val(),
+ 'normal_form': $('#reading_normal_form').val() };
+ // Add the morphology values
+ $('.reading_morphology').each( function() {
+ var rmid = $(this).attr('id');
+ rmid = rmid.substring(8);
+ form_values[rmid] = $(this).val();
+ });
+ // Make the JSON call
+ ncpath = getReadingURL( reading_id );
+ var reading_element = readingdata[reading_id];
$(':button :contains("Update")').attr("disabled", true);
var jqjson = $.post( ncpath, form_values, function(data) {
$.each( data, function(key, value) {
- reading_element.data( key, value );
+ reading_element[key] = value;
});
+ if( $('#update_workspace_button').data('locked') == false ) {
+ color_inactive( get_ellipse( reading_id ) );
+ }
$( "#reading-form" ).dialog( "close" );
});
+ // Re-color the node if necessary
+ return false;
}
},
- create: function() {},
+ create: function() {
+ // $('#reading_relemmatize').button();
+ $('#reading_relemmatize').click( function () {
+ // Send the reading for a new lemmatization and reopen the form.
+ alert( "Got a click function for relemmatize button" );
+ var reading_id = $('#reading_id').val()
+ ncpath = getReadingURL( reading_id );
+ form_values = {
+ 'normal_form': $('#reading_normal_form').val(),
+ 'relemmatize': 1 };
+ var jqjson = $.post( ncpath, form_values, function( data ) {
+ // Update the form with the return
+ if( 'reading_id' in data ) {
+ // We got back a good answer. Stash it
+ readingdata[reading_id] = data;
+ // and regenerate the morphology form.
+ morphology_form( data['lexemes'] );
+ } // else throw an error with what is in ['error']
+ });
+ // Prevent submit
+ return false;
+ });
+ },
open: function() {
$(".ui-widget-overlay").css("background", "none");
$("#dialog_overlay").show();
}
});
- $('#reading_relemmatize').button();
$('#update_workspace_button').click( function() {
var svg_enlargement = $('#svgenlargement').svg().svg('get').root();
projects / scpubgit/stemmaweb.git / commitdiff