split.c

This a framework to test new ideas in transmission technology. Actual development is a LDPC-coder in

/***************************************************************************
 *    split.c  -  splits a stream in two substreams
 *                           -------------------
 *   begin                :  16 July 2003 
 *   authors              :  Selvavinayagam Gunabalan
 *   emails               :  [e-mail]
 ***************************************************************************/

/***************************************************************************
 *                                Changes
 *                                -------
 * 
 * 16 Jul 03 - Selvan - Begin 
 * 04/03/06 - ineiti - adjusted description
 *
 * 
 **************************************************************************/

/***************************************************************************
 *                                                                         *
 *   This program 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; either version 2 of the License, or     *
 *   (at your option) any later version.                                   *
 *                                                                         *
 ***************************************************************************/


/**
 * This module takes a complex input-stream and creates two output-streams,
 * one for the odd symbols, the other for the even symbols:
 *
 *                          +-- 1 3 5 ... -> out 0
 * in: 0 1 2 3 4 5 ... -> --+
 *                          +-- 0 2 4 ... -> out 1
 */

#include "spc.h"
#include "split.h"

#define DBG_LVL 0
#define MAX_OUTPUTS 8

typedef struct {
}
config_t;

typedef struct {
}
stats_t;

typedef struct {
  int ports;
}
private_t;


/*
 * The initialisation function, or constructor, 
 * is called the first time this module is instantiated.
 */

int spc_init( swr_sdb_t *context ) {
  // Begin system-definitions {
  config_t *config;
  stats_t *stats;
  MOD_INC_USE_COUNT;
  if ( sizeof( private_t ) > 0 )
    context->private_data = swr_malloc( sizeof( private_t ) );
  swr_sdb_get_config_struct( context->id, (void**)&config );
  swr_sdb_get_stats_struct( context->id, (void**)&stats );
  // } End of system-definitions

  private->ports = 0;

  // Begin system-definitions
  swr_sdb_free_stats_struct( context->id, (void**)&stats );
  swr_sdb_free_config_struct( context->id, (void**)&config );
  return 0;
  // End system-definitions
}


/*
 * To configure the inputs
 * this is called when the output-sizes change.
 */
int spc_configure_inputs( swr_sdb_t *context ) {
  // Definition of variables - don't touch
  config_t *config;
  int i;
  swr_sdb_get_config_struct( context->id, (void**)&config );

  // Counts how many ports are connected
  for ( i=0, private->ports = 0; i<MAX_OUTPUTS; i++ ){
    private->ports += port_out(i).sdb_id >= 0;
  }

  // set the input-size, we assume all output-sizes to be equal,
  // so we can take size_out( 0 ) as the general one...
  if ( private->ports ){
    size_in( 0 ) = size_out( 0 ) * private->ports;
  }

  // Definition - don't touch
  swr_sdb_free_config_struct( context->id, (void**)&config );
  return 0;
}


/*
 * To configure the outputs
 * this is called when the input-sizes change
 */
int spc_configure_outputs( swr_sdb_t *context ) {
  // Definition of variables - don't touch
  config_t *config;
  int i;
  swr_sdb_get_config_struct( context->id, (void**)&config );

  // Counts how many ports are connected
  for ( i=0, private->ports = 0; i<MAX_OUTPUTS; i++ ){
    private->ports += port_out(i).sdb_id >= 0;
  }

  // And set the output-size
  for ( i=0; i<private->ports; i++ ){
    size_out( i ) = size_in( i ) / private->ports;
  }

  // Definition - don't touch
  swr_sdb_free_config_struct( context->id, (void**)&config );
  return 0;
}


/*
 * Every time modules from the outside change the value of a configuration parameter,
 * this function is called.
 */

int spc_reconfig( swr_sdb_t *context ) {
  // Definition of variables - don't touch
  config_t *config;
  swr_sdb_get_config_struct( context->id, (void**)&config );

  // Put you code here
  // ADD HERE

  // Definition - don't touch
  swr_sdb_free_config_struct( context->id, (void**)&config );
  return 0;
}


/*
 * This is the function that implements the `main method' of the class
 * Every class has got just ONE method/working-mode.
 */
int spc_pdata( swr_sdb_t *context ) {
  // Definition of variables - don't touch
  stats_t *stats;
  SYMBOL_COMPLEX *in, *out[ MAX_OUTPUTS ];
  int i, port;

  PR_DBG( 4, "Getting data to split on %i ports\n", private->ports );

  in   = buffer_in( 0 );
  // Get all output-ports
  for ( i=0; i<private->ports; i++ ){
    out[ i ] = buffer_out( i );
  }

  // Distribute the input-symbols to the output-ports
  // port 0: in[0], in[n], in[2n], in[3n], ...
  // port 1: in[1], in[n+1], in[2n+1], in[3n+1], ...
  // ...
  // port n-1: in[n-1], in[2n-1], in[3n-1], in[4n-1], ...
  for ( i = 0; i < size_out(0); i++) {
    PR_DBG( 4, " " );
    for ( port=0; port<private->ports; port++ ){
      out[ port ][ i ] = in[ private->ports * i + port ];
      PR_DBG_CL( 4, "Out[%i][%i]: (%i,%i) ", port, i,
		 out[ port ][ i ].real, out[ port ][ i ].imag );
    }
    PR_DBG_CL( 4, "\n" );
  }

  swr_sdb_get_stats_struct( context->id, (void**)&stats );
  // Put your code here
  // ADD HERE
  swr_sdb_free_stats_struct( context->id, (void**)&stats );
  return(0);
}

/**
 * No User messages for this module
*/
int spc_custom_msg( swr_sdb_t *context, swr_usr_msg_t *data, swr_msgq ret ) {

  spc_pdata( context );

  return 0;
}




/*
 * This is the `destructor'.
 */
int spc_finalize( swr_sdb_t *context ) {
  if ( sizeof( private_t ) > 0 )
    swr_free( private );
  MOD_DEC_USE_COUNT;
  return 0;
}


/*
 * This function is called upon "insmod" and is used to register the
 * different parts of the module to the SPM.
 */
swr_spc_id_t cdb_id;
int spc_module_init(void) {
  swr_spc_desc_t *desc;
  int i;

  /**
   * Get a description-part from SPM
   * Give the following parameters:
   * Input-ports, output-ports, config-params, stat-params
   */
  desc = swr_spc_get_new_desc( 1, MAX_OUTPUTS, 0, 0 );
  if ( !desc ) {
    PR_DBG( 0, "Can't initialise the module. This is BAD!\n" );
    return -1;
  }

  /**
   * Define the different parts of config and stats. You have to define
   * them in the same order as they appear in the structures. The names
   * can be freely chosen.
   *
   * UM_CONFIG_{INT,DOUBLE,STRING128,POINTER}( "name" );
   * UM_STATS_{INT,DOUBLE,STRING128,POINTER,BLOCK}( "name" );
   */
  /**
   * The in- and outputs have also to be defined in the right order. First
   * port first. The additional flag is not used yet, but it will...
   *
   * UM_INPUT( SIG_{U8,SYMBOL_{S16,COMPLEX,MMX},SAMPLE_S12,S32}, 0 );
   * UM_OUTPUT( SIG_{U8,SYMBOL_{S16,COMPLEX,MMX},SAMPLE_S12,S32}, 0 );
   */

  UM_INPUT( SIG_SYMBOL_COMPLEX, 0 );
  for ( i=0; i<MAX_OUTPUTS; i++ ){
    UM_OUTPUT( SIG_SYMBOL_COMPLEX, 0 );
  }

  // Initialise the callback-functions. Delete the ones you don't use
  desc->fn_init              = spc_init;
  desc->fn_reconfigure       = spc_reconfig;
  desc->fn_process_data      = spc_pdata;
  desc->fn_configure_inputs  = spc_configure_inputs;
  desc->fn_configure_outputs = spc_configure_outputs;
  desc->fn_custom_msg        = NULL;
  desc->fn_finalize          = spc_finalize;

  // And register the module in the SPM. Change the name!
  cdb_id = swr_cdb_register_spc( &desc, "split" );
  if ( cdb_id == SWR_SPM_INVALID_ID ) {
    swr_spc_free_desc( desc );
    PR_DBG( 0, "Couldn't register the module!\n" );
    return 1;
  }
  PR_DBG( 4, "Ready\n" );
  return 0;
}


/*
 * This is called upon rmmod
 */
void spc_module_exit( void ) {
  PR_DBG( 4, "Freeing id: %i\n", cdb_id );
  if ( swr_cdb_unregister_spc( cdb_id ) < 0 ) {
    PR_DBG( 0, "Still in use somewhere\n" );
  }
}


module_init( spc_module_init );
module_exit( spc_module_exit );