diff options
Diffstat (limited to 'apps/mkcsregdb/mkcsregdb.cpp')
| -rw-r--r-- | apps/mkcsregdb/mkcsregdb.cpp | 328 |
1 files changed, 0 insertions, 328 deletions
diff --git a/apps/mkcsregdb/mkcsregdb.cpp b/apps/mkcsregdb/mkcsregdb.cpp deleted file mode 100644 index 388e9212dec..00000000000 --- a/apps/mkcsregdb/mkcsregdb.cpp +++ /dev/null @@ -1,328 +0,0 @@ -/* $Id$ - * - * To populate the registry_db, construct a codeset registry text file based - * on the OSF's Character and Code Set Registry. See DCE RFC 40.1 for details - * on obtaining the full text for the current registry. Once you have composed - * a text file containing all the desired codeset information, build and run - * mkcsregdb. The source is in $ACE_ROOT/apps/mkcsregdb. It will generate a new - * copy of this file, with the registry_db_ array properly initialized. - */ - -// FUZZ: disable check_for_streams_include -#include "ace/streams.h" - -#include "ace/Codeset_Registry.h" -#include "ace/Log_Msg.h" -#include "ace/OS_NS_sys_stat.h" -#include "ace/OS_NS_time.h" -#include "ace/OS_NS_stdio.h" -#include "ace/OS_NS_stdlib.h" -#include "ace/OS_NS_string.h" -#include "ace/OS_NS_unistd.h" - -class csdb_generator : public ACE_Codeset_Registry -{ -public: - csdb_generator (); - int read_from (const char *source); - int init_output (const char *srcfile); - int write_entry (); - int fini_output (const char *target); - int read_line (); - void write_dummy_entry(); - void fail(const char *msg); -private: - static const char * tags_[]; - static int max_line_; - int count_; - int in_entry_; - registry_entry entry_; - int linecounter_; - char *source_line_; - char *line_data_; - ifstream *inf_; - FILE *outf_; - char *tempfilename_; - char *ace_src_; -}; - -int csdb_generator::max_line_ = 1024; -const char * csdb_generator::tags_[] = { - "start", - "end", - "description ", - "loc_name ", - "rgy_value ", - "char_values ", - "max_bytes ", - 0 -}; - -csdb_generator::csdb_generator () - :count_(0), - in_entry_(0), - linecounter_(0), - source_line_ (new char[max_line_]), - line_data_ (0), - inf_ (0), - outf_ (0) -{ - ace_src_ = ACE_OS::getenv("ACE_ROOT"); -} - -void -csdb_generator::fail (const char *msg) -{ - ACE_ERROR ((LM_ERROR,"Error, line %d: %s\n",linecounter_,msg)); - ACE_OS::fclose (outf_); - ACE_OS::unlink (tempfilename_); - exit (-1); -} - -int -csdb_generator::read_line() -{ - inf_->getline (source_line_,max_line_); - line_data_ = 0; - char *cpos = ACE_OS::strchr (source_line_,'#'); - if (cpos == 0) - cpos = source_line_ + ACE_OS::strlen(source_line_); - while (cpos > source_line_ && ACE_OS::strchr(" \t",*(cpos - 1))) cpos--; - *cpos = 0; - if (cpos == source_line_) - return 0; - for (int i = 0; tags_[i]; i++) - { - cpos = ACE_OS::strstr (source_line_,tags_[i]); - if (cpos == 0) // not found - continue; - if (cpos > source_line_) // make sure it's first token - { - char *tpos = cpos-1; - while (tpos > source_line_ && ACE_OS::strchr(" \t",*tpos)) tpos--; - if (tpos > source_line_) - continue; - } - if (i == 0 && in_entry_) - fail ("\"start\" encountered twice before \"end\""); - if (i > 0 && !in_entry_) - { - char *emsg = new char[100]; - sprintf (emsg,"\"%s\" encountered before \"start\"",tags_[i]); - fail (emsg); - } - if (i > 1) - { - line_data_ = cpos + ACE_OS::strlen(tags_[i]); - while (*line_data_ && ACE_OS::strchr(" \t",(*line_data_))) - line_data_++; - } - return i+1; - } - return -1; -} - -int -csdb_generator::read_from (const char *srcfile) -{ - inf_ = new ifstream(srcfile); - char *ptr; - while (inf_->good() && !inf_->eof()) { - linecounter_++; - switch (read_line ()) { - case -1: // bogus line - fail ("unknown field tag"); - break; - case 0: // comment or blank line - break; - case 1: // start - entry_.desc_ = 0; - entry_.loc_name_ = 0; - entry_.codeset_id_ = 0; - entry_.num_sets_ = 0; - entry_.max_bytes_ = 0; - in_entry_ = 1; - break; - case 2: // end - if (entry_.codeset_id_ == 0) - fail ("entry missing rgy_value"); - if (entry_.num_sets_ == 0) - fail ("entry does not include at least one char_value"); - if (entry_.max_bytes_ == 0) - fail ("entry does not define max_bytes"); - write_entry (); - delete [] const_cast<char *> (entry_.desc_); - delete [] const_cast<char *> (entry_.loc_name_); - count_++; - in_entry_ = 0; - break; - case 3: // description - if (entry_.desc_ != 0) - fail ("duplicate description"); - entry_.desc_ = ACE_OS::strdup(line_data_); - break; - case 4: // loc_name - if (entry_.loc_name_ != 0) - fail ("duplicate loc_name"); - entry_.loc_name_ = ACE_OS::strdup(line_data_); - break; - case 5: // rgy_value - if (entry_.codeset_id_ != 0) - fail ("duplicate rgy_value"); - entry_.codeset_id_ = strtoul(line_data_,&ptr,16); - if (*ptr != 0 || entry_.codeset_id_ == 0) - { - char emsg [100]; - sprintf (emsg,"invalid rgy_value, '%s'",line_data_); - fail (emsg); - } - break; - case 6: // char_values - if (entry_.num_sets_ != 0) - fail ("duplicate char_values"); - ptr = line_data_; - do { - if (*ptr == ':') - ptr++; - ACE_CDR::UShort tmp = - static_cast<ACE_CDR::UShort> (strtoul(ptr,&ptr,16)); - if (*ptr != 0 && *ptr != ':') - { - char *emsg = new char [100]; - sprintf (emsg,"invalid symbol \'%c\' in char_values",*ptr); - fail (emsg); - } - if (entry_.num_sets_ < max_charsets_) - entry_.char_sets_[entry_.num_sets_++] = tmp; - else entry_.num_sets_++; - } while (*ptr == ':'); - if (entry_.num_sets_ > max_charsets_) - { - char *emsg = new char [200]; - sprintf (emsg,"max of %d char_values exceeded.\nIncrease ACE_Codeset_Registry::max_charsets_ to at least %d and rebuild mkcsregdb",max_charsets_,entry_.num_sets_); - fail (emsg); - } - break; - case 7: // max_bytes - if (entry_.max_bytes_ != 0) - fail ("duplicate max_bytes"); - entry_.max_bytes_ = - static_cast<ACE_CDR::UShort> (strtol(line_data_,&ptr,10)); - if (*ptr != 0) - fail ("invalid max_bytes"); - break; - } - } - return 0; -} - -int -csdb_generator::init_output (const char *srcfile) -{ - ACE_stat buf; - if (ACE_OS::stat (srcfile,&buf) != 0) - ACE_ERROR_RETURN ((LM_ERROR,"Unable to open %s\n",srcfile),-1); - - if (ace_src_ == 0) - ACE_ERROR_RETURN ((LM_ERROR,"You must first set $ACE_ROOT\n"),-1); - - time_t now = ACE_OS::time(); - tempfilename_ = ACE_OS::tempnam (ace_src_,"csdb"); - outf_ = fopen (tempfilename_,"w"); - if (outf_ == 0) - ACE_ERROR_RETURN ((LM_ERROR, "Unable to open output file, %s\n",tempfilename_),-1); - - fprintf (outf_,"// $ID: $\n"); - fprintf (outf_,"/*\n * Codeset registry DB, generated %s * source: %s\n", - ACE_OS::asctime (ACE_OS::localtime(&now)), - srcfile); - fprintf (outf_," *\n * To populate the registry_db, construct a codeset registry text file based \n"); - fprintf (outf_," * on the OSF's Character and Code Set Registry. See DCE RFC 40.1 for details\n"); - fprintf (outf_," * on obtaining the full text for the current registry. Once you have composed\n"); - fprintf (outf_," * a text file containing all the desired codeset information, build and run\n"); - fprintf (outf_," * mkcsregdb. The source is in $ACE_ROOT/apps/mkcsregdb. It will generate a new\n"); - fprintf (outf_," * copy of this file, with the registry_db_ array properly initialized.\n */\n"); - fprintf (outf_,"\n#include \"ace/Codeset_Registry.h\"\n\n%s\n%s\n{\n", - "ACE_Codeset_Registry::registry_entry const", - "ACE_Codeset_Registry::registry_db_[] ="); - return 0; -} - -int -csdb_generator::write_entry () -{ - if (count_) - fprintf (outf_,",\n"); - fprintf (outf_," {\"%s\",\"%s\",0x%08x,%d,{", - entry_.desc_, - entry_.loc_name_, - entry_.codeset_id_, - entry_.num_sets_); - for (ACE_CDR::UShort j = 0; j < entry_.num_sets_; j++) - if (j+1 < entry_.num_sets_) - fprintf (outf_,"0x%04x,",entry_.char_sets_[j]); - else - fprintf (outf_,"0x%04x",entry_.char_sets_[j]); - fprintf (outf_,"},%d}",entry_.max_bytes_); - return 0; -} - -void -csdb_generator::write_dummy_entry() -{ - entry_.desc_ = "No codesets defined"; - entry_.loc_name_ = "NONE"; - entry_.codeset_id_ = 0; - entry_.num_sets_ = 1; - entry_.char_sets_[0] = 0; - entry_.max_bytes_ = 0; - write_entry(); -} - -int -csdb_generator::fini_output (const char *tgt) -{ - char *target = new char [ACE_OS::strlen(ace_src_) + ACE_OS::strlen(tgt) + 6]; - sprintf (target,"%s/ace/%s",ace_src_,tgt); - if (count_ == 0) - write_dummy_entry(); - fprintf (outf_,"\n};\n\nsize_t const ACE_Codeset_Registry::num_registry_entries_ = %d;\n\n",count_); - fclose (outf_); - ACE_stat buf; - if (ACE_OS::stat (target,&buf) == 0) - { - char fname[200]; - int result = 0; - for (int i = 0; result == 0; i++) - { - sprintf (fname,"%s.%03d",target,i); - result = ACE_OS::stat(fname,&buf); - } - ACE_DEBUG ((LM_DEBUG,"Moving $ACE_ROOT/ace/%s to $ACE_ROOT/ace%s\n", - tgt,ACE_OS::strrchr(fname,'/'))); - if (ACE_OS::rename (target,fname) == -1) - ACE_ERROR_RETURN ((LM_ERROR,"Could not create %s\n, output stored in %s", - fname,tempfilename_),-1); - } - ACE_DEBUG ((LM_DEBUG,"writing $ACE_ROOT/ace/%s\n",tgt)); - if (ACE_OS::rename (tempfilename_,target) == -1) - ACE_ERROR_RETURN ((LM_ERROR,"Could not create %s\n, output stored in %s", - target,tempfilename_),-1); - return 0; -} - -int -main (int argc, char ** argv) -{ - ACE_CString srcname; - if (argc > 1) - srcname.set(argv[1]); - else - ACE_ERROR_RETURN ((LM_ERROR,"Usage: %s <source_file>\nwhere source file is the full path to a code set registry text file.\n",argv[0]),-1); - csdb_generator csdb; - if (csdb.init_output(srcname.c_str()) == -1) - return 0; - if (csdb.read_from (srcname.c_str()) == 0) - csdb.fini_output ("Codeset_Registry_db.cpp"); - return 0; -} |