// ------------ begin of function RockRes::init -----------//
void RockRes::init()
{
deinit();
//----- open rock bitmap resource file -------//
String str;
str = DIR_RES;
// str += "I_ROCK.RES";
str += "I_ROCK";
str += config.terrain_set;
str += ".RES";
res_bitmap.init_imported(str,1); // 1-read all into buffer
str = DIR_RES;
str += "PAL_ROC";
str += config.terrain_set;
str += ".RES";
res_pal.init_imported(str,1); // 1-read all into buffer
//------- load database information --------//
load_info();
load_bitmap_info();
//----------------------------------------//
init_flag=1;
}
static void update_db(int interval)
{
struct ifstat_ent *n, *h;
n = kern_db;
kern_db = NULL;
load_info();
h = kern_db;
kern_db = n;
for (n = kern_db; n; n = n->next) {
struct ifstat_ent *h1;
for (h1 = h; h1; h1 = h1->next) {
if (h1->ifindex == n->ifindex) {
int i;
for (i = 0; i < MAXS; i++) {
if ((long)(h1->ival[i] - n->ival[i]) < 0) {
memset(n->ival, 0, sizeof(n->ival));
break;
}
}
for (i = 0; i < MAXS; i++) {
double sample;
unsigned long incr = h1->ival[i] - n->ival[i];
n->val[i] += incr;
n->ival[i] = h1->ival[i];
sample = (double)(incr*1000)/interval;
if (interval >= scan_interval) {
n->rate[i] += W*(sample-n->rate[i]);
} else if (interval >= 1000) {
if (interval >= time_constant) {
n->rate[i] = sample;
} else {
double w = W*(double)interval/scan_interval;
n->rate[i] += w*(sample-n->rate[i]);
}
}
}
while (h != h1) {
struct ifstat_ent *tmp = h;
h = h->next;
free(tmp->name);
free(tmp);
};
h = h1->next;
free(h1->name);
free(h1);
break;
}
}
}
}
/* reloads data from the db */
static int reload_data(void)
{
int n;
struct tls_domain *tls_client_domains_tmp;
struct tls_domain *tls_server_domains_tmp;
tls_client_domains_tmp = NULL;
tls_server_domains_tmp = NULL;
load_info(&dr_dbf, db_hdl, &tls_db_table, &tls_server_domains_tmp,
&tls_client_domains_tmp);
/*
* now initialize tls virtual domains
*/
if ((n = init_tls_domains(tls_server_domains_tmp))) {
return n;
}
if ((n = init_tls_domains(tls_client_domains_tmp))) {
return n;
}
lock_start_write(dom_lock);
tls_release_all_domains(tls_client_domains);
tls_release_all_domains(tls_server_domains);
tls_client_domains = tls_client_domains_tmp;
tls_server_domains = tls_server_domains_tmp;
lock_stop_write(dom_lock);
return 0;
}
// --------- begin of function SERes::init1 ----------//
void SERes::init1()
{
deinit();
seed = m.get_time();
load_info();
sort_info();
build_index();
init_flag = 1;
}
void SpriteFrameRes::init()
{
deinit();
//------- load database information --------//
load_info();
init_flag=1;
}
/*
* Create a new self-signed X.509 certificate
*/
X509_Certificate create_self_signed_cert(const X509_Cert_Options& opts,
const Private_Key& key,
const std::string& hash_fn,
RandomNumberGenerator& rng)
{
AlgorithmIdentifier sig_algo;
X509_DN subject_dn;
AlternativeName subject_alt;
// for now, only the padding option is used
std::map<std::string,std::string> sig_opts = { {"padding",opts.padding_scheme} };
const std::vector<uint8_t> pub_key = X509::BER_encode(key);
std::unique_ptr<PK_Signer> signer(choose_sig_format(key, sig_opts, rng, hash_fn, sig_algo));
load_info(opts, subject_dn, subject_alt);
Extensions extensions = opts.extensions;
Key_Constraints constraints;
if(opts.is_CA)
{
constraints = Key_Constraints(KEY_CERT_SIGN | CRL_SIGN);
}
else
{
verify_cert_constraints_valid_for_key_type(key, opts.constraints);
constraints = opts.constraints;
}
extensions.add_new(
new Cert_Extension::Basic_Constraints(opts.is_CA, opts.path_limit),
true);
if(constraints != NO_CONSTRAINTS)
{
extensions.add_new(new Cert_Extension::Key_Usage(constraints), true);
}
std::unique_ptr<Cert_Extension::Subject_Key_ID> skid(new Cert_Extension::Subject_Key_ID(pub_key, hash_fn));
extensions.add_new(new Cert_Extension::Authority_Key_ID(skid->get_key_id()));
extensions.add_new(skid.release());
extensions.add_new(
new Cert_Extension::Subject_Alternative_Name(subject_alt));
extensions.add_new(
new Cert_Extension::Extended_Key_Usage(opts.ex_constraints));
return X509_CA::make_cert(signer.get(), rng, sig_algo, pub_key,
opts.start, opts.end,
subject_dn, subject_dn,
extensions);
}
static void server_loop(int fd)
{
struct timeval snaptime = { 0 };
struct pollfd p;
p.fd = fd;
p.events = p.revents = POLLIN;
sprintf(info_source, "%d.%lu sampling_interval=%d time_const=%d",
getpid(), (unsigned long)random(), scan_interval/1000, time_constant/1000);
load_info();
for (;;) {
int status;
time_t tdiff;
struct timeval now;
gettimeofday(&now, NULL);
tdiff = T_DIFF(now, snaptime);
if (tdiff >= scan_interval) {
update_db(tdiff);
snaptime = now;
tdiff = 0;
}
if (poll(&p, 1, scan_interval - tdiff) > 0
&& (p.revents&POLLIN)) {
int clnt = accept(fd, NULL, NULL);
if (clnt >= 0) {
pid_t pid;
if (children >= 5) {
close(clnt);
} else if ((pid = fork()) != 0) {
if (pid > 0)
children++;
close(clnt);
} else {
FILE *fp = fdopen(clnt, "w");
if (fp)
dump_raw_db(fp, 0);
exit(0);
}
}
}
while (children && waitpid(-1, &status, WNOHANG) > 0)
children--;
}
}
const char *
sw_client_service_get_display_name (SwClientService *service)
{
SwClientServicePrivate *priv;
g_return_val_if_fail (SW_CLIENT_IS_SERVICE (service), NULL);
priv = GET_PRIVATE (service);
load_info (service);
return priv->display_name;
}
void UnitRes::init()
{
deinit();
//----- open unit bitmap resource file -------//
String str;
str = DIR_RES;
str += "I_UNITLI.RES";
res_large_icon.init_imported(str, 1); // 1-don't read all into buffer
str = DIR_RES;
str += "I_UNITGI.RES";
res_general_icon.init_imported(str, 1); // 1-don't read all into buffer
str = DIR_RES;
str += "I_UNITKI.RES";
res_king_icon.init_imported(str, 1); // 1-don't read all into buffer
str = DIR_RES;
str += "I_UNITSI.RES";
res_small_icon.init_imported(str, 1); // 1-don't read all into buffer
// ######## begin Gilbert 17/10 ##########//
str = DIR_RES;
str += "I_UNITTI.RES";
res_general_small_icon.init_imported(str, 1); // 1-don't read all into buffer
str = DIR_RES;
str += "I_UNITUI.RES";
res_king_small_icon.init_imported(str, 1); // 1-don't read all into buffer
// ######## end Gilbert 17/10 ##########//
//------- load database information --------//
load_info();
load_attack_info();
//---------- set vars -----------//
mobile_monster_count = 0;
init_flag=1;
}
/*
* Create a new self-signed X.509 certificate
*/
X509_Certificate create_self_signed_cert(const X509_Cert_Options& opts,
const Private_Key& key,
const std::string& hash_fn,
RandomNumberGenerator& rng)
{
AlgorithmIdentifier sig_algo;
X509_DN subject_dn;
AlternativeName subject_alt;
std::vector<byte> pub_key = X509::BER_encode(key);
std::unique_ptr<PK_Signer> signer(choose_sig_format(key, hash_fn, sig_algo));
load_info(opts, subject_dn, subject_alt);
Key_Constraints constraints;
if(opts.is_CA)
{
constraints = Key_Constraints(KEY_CERT_SIGN | CRL_SIGN);
}
else
{
verify_cert_constraints_valid_for_key_type(key, opts.constraints);
constraints = opts.constraints;
}
Extensions extensions;
extensions.add(
new Cert_Extension::Basic_Constraints(opts.is_CA, opts.path_limit),
true);
if(constraints != NO_CONSTRAINTS)
{
extensions.add(new Cert_Extension::Key_Usage(constraints), true);
}
extensions.add(new Cert_Extension::Subject_Key_ID(pub_key));
extensions.add(
new Cert_Extension::Subject_Alternative_Name(subject_alt));
extensions.add(
new Cert_Extension::Extended_Key_Usage(opts.ex_constraints));
return X509_CA::make_cert(signer.get(), rng, sig_algo, pub_key,
opts.start, opts.end,
subject_dn, subject_dn,
extensions);
}
//----------- Begin of function PlantRes::init --------//
//!
void PlantRes::init() {
if ( init_flag )
return;
//----- read info from PLANT.DBF ------//
load_info();
//---- open bitmap resource of different resolutions ----//
load_res( ZOOM_SMALL , "PLANT", "S" );
load_res( ZOOM_MEDIUM, "PLANT", "M" );
load_res( ZOOM_LARGE , "PLANT", "L" );
//----------------------------------------//
init_flag=1;
}
//----------- Begin of function TerrainRes::init --------//
//!
void TerrainRes::init() {
if ( init_flag )
return;
//----- read info from TERRAIN.DBF ------//
load_info();
//---- open bitmap resource of different resolutions ----//
load_res( ZOOM_SMALL , "TERRA", "S" );
load_res( ZOOM_MEDIUM, "TERRA", "M" );
load_res( ZOOM_LARGE , "TERRA", "L" );
//----------------------------------------//
init_flag=1;
}
// ------- Begin of function SnowRes::init ------//
void SnowRes::init()
{
deinit();
//----- open snow ground bitmap resource file -------//
String str;
str = DIR_RES;
str += "I_SNOW.RES";
res_bitmap.init_imported(str,1); // 1-read all into buffer
//------- load database information --------//
load_info();
init_flag=1;
}
/*
* Create a PKCS #10 certificate request
*/
PKCS10_Request create_cert_req(const X509_Cert_Options& opts,
const Private_Key& key,
const std::string& hash_fn,
RandomNumberGenerator& rng)
{
X509_DN subject_dn;
AlternativeName subject_alt;
load_info(opts, subject_dn, subject_alt);
Key_Constraints constraints;
if(opts.is_CA)
{
constraints = Key_Constraints(KEY_CERT_SIGN | CRL_SIGN);
}
else
{
verify_cert_constraints_valid_for_key_type(key, opts.constraints);
constraints = opts.constraints;
}
Extensions extensions = opts.extensions;
extensions.add_new(new Cert_Extension::Basic_Constraints(opts.is_CA, opts.path_limit));
if(constraints != NO_CONSTRAINTS)
{
extensions.add_new(new Cert_Extension::Key_Usage(constraints));
}
extensions.add_new(new Cert_Extension::Extended_Key_Usage(opts.ex_constraints));
extensions.add_new(new Cert_Extension::Subject_Alternative_Name(subject_alt));
return PKCS10_Request::create(key,
subject_dn,
extensions,
hash_fn,
rng,
opts.padding_scheme,
opts.challenge);
}
//-----------------------------------------------------------------------------
device::device( const platform* platform_ptr, cl_device_id id ) :
generic_device( platform_ptr ),
opencl_object< cl_device_id >( platform_ptr->get_opencl(), id )
{
load_info();
}
item::item(std::string itemdata, game *g)
{
load_info(itemdata, g);
}
static int mod_init(void){
str s;
int n;
LM_INFO("initializing TLS protocol\n");
if (tls_db_enabled != 0 && tls_db_enabled != 1) {
tls_db_enabled = 1;
}
if (tls_db_enabled) {
/* create & init lock */
if ((dom_lock = lock_init_rw()) == NULL) {
LM_CRIT("failed to init lock\n");
return -1;
}
init_db_url(tls_db_url, 0 /*cannot be null*/);
tls_db_table.len = strlen(tls_db_table.s);
if (tls_db_table.len == 0) {
LM_ERR("db url not specified\n");
return -1;
}
id_col.len = strlen(id_col.s);
address_col.len = strlen(address_col.s);
type_col.len = strlen(type_col.s);
method_col.len = strlen(method_col.s);
verify_cert_col.len = strlen(verify_cert_col.s);
require_cert_col.len = strlen(require_cert_col.s);
certificate_col.len = strlen(certificate_col.s);
pk_col.len = strlen(pk_col.s);
crl_check_col.len = strlen(crl_check_col.s);
calist_col.len = strlen(calist_col.s);
cadir_col.len = strlen(cadir_col.s);
cplist_col.len = strlen(cplist_col.s);
dhparams_col.len = strlen(dhparams_col.s);
eccurve_col.len = strlen(eccurve_col.s);
if (db_bind_mod(&tls_db_url, &dr_dbf)) {
LM_CRIT("cannot bind to database module! "
"Did you forget to load a database module ?\n");
return -1;
}
/* init DB connection */
if ((db_hdl = dr_dbf.init(&tls_db_url)) == 0) {
LM_CRIT("cannot initialize database connection\n");
return -1;
}
if (dr_dbf.use_table(db_hdl, &tls_db_table) < 0) {
LM_ERR("cannot select table \"%.*s\"\n", tls_db_table.len, tls_db_table.s);
return -1;
}
}
if (tls_domain_avp) {
s.s = tls_domain_avp;
s.len = strlen(s.s);
if (parse_avp_spec( &s, &tls_client_domain_avp)) {
LM_ERR("cannot parse tls_client_avp");
return -1;
}
}
/*
* this has to be called before any function calling CRYPTO_malloc,
* CRYPTO_malloc will set allow_customize in openssl to 0
*/
if (!CRYPTO_set_mem_functions(os_malloc, os_realloc, os_free)) {
LM_ERR("unable to set the memory allocation functions\n");
LM_ERR("NOTE: check if you have openssl 1.0.1e-fips, as this "
"version is know to be broken; if so, you need to upgrade or "
"downgrade to a differen openssl version !!\n");
return -1;
}
#if !defined(OPENSSL_NO_COMP)
STACK_OF(SSL_COMP)* comp_methods;
/* disabling compression */
LM_WARN("disabling compression due ZLIB problems\n");
comp_methods = SSL_COMP_get_compression_methods();
if (comp_methods==0) {
LM_INFO("openssl compression already disabled\n");
} else {
sk_SSL_COMP_zero(comp_methods);
}
#endif
if (tls_init_multithread() < 0) {
LM_ERR("failed to init multi-threading support\n");
return -1;
}
SSL_library_init();
SSL_load_error_strings();
init_ssl_methods();
n = check_for_krb();
if (n==-1) {
LM_ERR("kerberos check failed\n");
return -1;
}
if ( ( n ^
#ifndef OPENSSL_NO_KRB5
1
#else
0
#endif
)!=0 ) {
LM_ERR("compiled agaist an openssl with %s"
"kerberos, but run with one with %skerberos\n",
(n==1)?"":"no ",(n!=1)?"no ":"");
return -1;
}
/*
* finish setting up the tls default domains
*/
tls_default_client_domain.type = TLS_DOMAIN_DEF|TLS_DOMAIN_CLI ;
tls_default_client_domain.addr.af = AF_INET;
tls_default_server_domain.type = TLS_DOMAIN_DEF|TLS_DOMAIN_SRV;
tls_default_server_domain.addr.af = AF_INET;
/*
* now initialize tls default domains
*/
if ( (n=init_tls_domains(&tls_default_server_domain)) ) {
return n;
}
if ( (n=init_tls_domains(&tls_default_client_domain)) ) {
return n;
}
/*
* now initialize tls virtual domains
*/
if (tls_db_enabled && load_info(&dr_dbf, db_hdl, &tls_db_table, &tls_server_domains,
&tls_client_domains)){
return -1;
}
if ( (n=init_tls_domains(tls_server_domains)) ) {
return n;
}
if ( (n=init_tls_domains(tls_client_domains)) ) {
return n;
}
/*
* we are all set
*/
return 0;
}
//---------- Begin of function TerrainRes::init -----------//
//
// This function must be called after a map is generated.
//
void TerrainRes::init()
{
deinit();
//----- open firm material bitmap resource file -------//
String str;
str = DIR_RES;
// str += "I_TERAIN.RES";
str += "I_TERN";
str += config.terrain_set;
str += ".RES";
res_bitmap.init_imported(str,1); // 1-read all into buffer
//------- load database information --------//
load_info();
load_sub_info();
str = DIR_RES;
// str += "I_TERANM.RES";
str += "I_TERA";
str += config.terrain_set;
str += ".RES";
anm_bitmap.init_imported(str,1);
load_anim_info();
//-------- init map_tile_ptr_array --------//
int i, terrainId;
for( i=0 ; i<TOTAL_TERRAIN_TYPE ; i++ )
{
if( map_tile_name_array[i] )
// ###### begin Gilbert 9/9 ########//
// map_tile_ptr_array[i] = image_spict.get_ptr(map_tile_name_array[i]) + sizeof(short)*2;
map_tile_ptr_array[i] = image_tpict.get_ptr(map_tile_name_array[i]) + sizeof(short)*2;
// ###### end Gilbert 9/9 ########//
}
//-------- init terrain_type_array ---------//
for( i=1 ; i<=TOTAL_TERRAIN_TYPE ; i++ )
{
terrainId = scan( i, ALL_MASK, i, ALL_MASK, i, ALL_MASK, i, ALL_MASK, 1 ); // scan for terrain of all four types. 1-take the first instance of the terrain bitmap that matches the given terrain types
if(terrainId)
{
terrain_type_array[i-1].first_terrain_id = terrainId;
terrain_type_array[i-1].last_terrain_id = terrainId + terrain_res[terrainId]->alternative_count_with_extra;
terrain_type_array[i-1].min_height = terrain_type_min_height_array[i-1][0];
}
else
{
// BUGHERE: should not reach this point after all terrain type are complete
terrain_type_array[i-1].first_terrain_id = 0;
terrain_type_array[i-1].last_terrain_id = 0;
terrain_type_array[i-1].min_height = terrain_type_min_height_array[i-1][0];
}
}
init_flag=1;
}
bool player::create(game *g, character_type type, std::string tempname)
{
weapon = item(g->itypes[0], 0);
int iMaxX = (g->VIEWX < 12) ? 80 : (g->VIEWX*2)+56;
int iMaxY = (g->VIEWY < 12) ? 25 : (g->VIEWY*2)+1;
WINDOW* w = newwin(25, 80, (iMaxY > 25) ? (iMaxY-25)/2 : 0, (iMaxX > 80) ? (iMaxX-80)/2 : 0);
int tab = 0, points = 38;
if (type != PLTYPE_CUSTOM) {
switch (type) {
case PLTYPE_RANDOM: {
str_max = rng(6, 12);
dex_max = rng(6, 12);
int_max = rng(6, 12);
per_max = rng(6, 12);
points = points - str_max - dex_max - int_max - per_max;
if (str_max > HIGH_STAT)
points -= (str_max - HIGH_STAT);
if (dex_max > HIGH_STAT)
points -= (dex_max - HIGH_STAT);
if (int_max > HIGH_STAT)
points -= (int_max - HIGH_STAT);
if (per_max > HIGH_STAT)
points -= (per_max - HIGH_STAT);
int num_gtraits = 0, num_btraits = 0, rn, tries;
while (points < 0 || rng(-3, 20) > points) {
if (num_btraits < MAX_TRAIT_POINTS && one_in(3)) {
tries = 0;
do {
rn = random_bad_trait();
tries++;
} while ((has_trait(rn) ||
num_btraits - traits[rn].points > MAX_TRAIT_POINTS) && tries < 5);
if (tries < 5) {
toggle_trait(rn);
points -= traits[rn].points;
num_btraits -= traits[rn].points;
}
} else {
switch (rng(1, 4)) {
case 1: if (str_max > 5) { str_max--; points++; } break;
case 2: if (dex_max > 5) { dex_max--; points++; } break;
case 3: if (int_max > 5) { int_max--; points++; } break;
case 4: if (per_max > 5) { per_max--; points++; } break;
}
}
}
while (points > 0) {
switch (rng((num_gtraits < MAX_TRAIT_POINTS ? 1 : 5), 9)) {
case 1:
case 2:
case 3:
case 4:
rn = random_good_trait();
if (!has_trait(rn) && points >= traits[rn].points &&
num_gtraits + traits[rn].points <= MAX_TRAIT_POINTS) {
toggle_trait(rn);
points -= traits[rn].points;
num_gtraits += traits[rn].points;
}
break;
case 5:
switch (rng(1, 4)) {
case 1: if (str_max < HIGH_STAT) { str_max++; points--; } break;
case 2: if (dex_max < HIGH_STAT) { dex_max++; points--; } break;
case 3: if (int_max < HIGH_STAT) { int_max++; points--; } break;
case 4: if (per_max < HIGH_STAT) { per_max++; points--; } break;
}
break;
case 6:
case 7:
case 8:
case 9:
rn = random_skill();
Skill *aSkill = Skill::skill(rn);
int level = skillLevel(aSkill);
if (level < points) {
points -= level + 1;
skillLevel(aSkill).level(level + 2);
}
break;
}
}
} break;
case PLTYPE_TEMPLATE: {
std::ifstream fin;
std::stringstream filename;
filename << "data/" << tempname << ".template";
fin.open(filename.str().c_str());
if (!fin.is_open()) {
debugmsg("Couldn't open %s!", filename.str().c_str());
return false;
}
std::string(data);
getline(fin, data);
load_info(g, data);
points = 0;
} break;
}
tab = 3;
} else
points = OPTIONS[OPT_INITIAL_POINTS];
do {
werase(w);
wrefresh(w);
switch (tab) {
case 0: tab += set_stats (w, this, points); break;
case 1: tab += set_traits (w, this, points); break;
case 2: tab += set_skills (w, this, points); break;
case 3: tab += set_description(w, this, points); break;
}
} while (tab >= 0 && tab < 4);
delwin(w);
if (tab < 0)
return false;
// Character is finalized. Now just set up HP, &c
for (int i = 0; i < num_hp_parts; i++) {
hp_max[i] = calc_HP(str_max, has_trait(PF_TOUGH));
hp_cur[i] = hp_max[i];
}
if (has_trait(PF_GLASSJAW)) {
hp_max[hp_head] = int(hp_max[hp_head] * .85);
hp_cur[hp_head] = hp_max[hp_head];
}
if (has_trait(PF_SMELLY))
scent = 800;
if (has_trait(PF_ANDROID)) {
add_bionic(bionic_id(rng(bio_memory, max_bio_start - 1)));// Other
if (bionics[my_bionics[0].id].power_cost > 0) {
add_bionic(bionic_id(rng(1, bio_ethanol))); // Power Source
max_power_level = 10;
power_level = 10;
} else {
bionic_id tmpbio;
do
tmpbio = bionic_id(rng(bio_ethanol + 1, bio_armor_legs));
while (bionics[tmpbio].power_cost > 0);
add_bionic(tmpbio);
max_power_level = 0;
power_level = 0;
}
/* CHEATER'S STUFF
add_bionic(bionic_id(rng(0, bio_ethanol))); // Power Source
for (int i = 0; i < 5; i++)
add_bionic(bionic_id(rng(bio_memory, max_bio_start - 1)));// Other
max_power_level = 80;
power_level = 80;
End of cheatery */
}
if (has_trait(PF_MARTIAL_ARTS)) {
itype_id ma_type;
do {
int choice = menu("Pick your style:",
"Karate", "Judo", "Aikido", "Tai Chi", "Taekwando", NULL);
if (choice == 1)
ma_type = itm_style_karate;
if (choice == 2)
ma_type = itm_style_judo;
if (choice == 3)
ma_type = itm_style_aikido;
if (choice == 4)
ma_type = itm_style_tai_chi;
if (choice == 5)
ma_type = itm_style_taekwando;
item tmpitem = item(g->itypes[ma_type], 0);
full_screen_popup(tmpitem.info(true).c_str());
} while (!query_yn("Use this style?"));
styles.push_back(ma_type);
}
ret_null = item(g->itypes[0], 0);
if (!styles.empty())
weapon = item(g->itypes[ styles[0] ], 0, ':');
else
weapon = item(g->itypes[0], 0);
// Nice to start out less than naked.
item tmp(g->itypes[itm_jeans_fit], 0, 'a');
worn.push_back(tmp);
tmp = item(g->itypes[itm_tshirt_fit], 0, 'b');
worn.push_back(tmp);
tmp = item(g->itypes[itm_sneakers_fit], 0, 'c');
worn.push_back(tmp);
// The near-sighted get to start with glasses.
if (has_trait(PF_MYOPIC)) {
tmp = item(g->itypes[itm_glasses_eye], 0, 'd');
worn.push_back(tmp);
}
// Likewise, the asthmatic start with their medication.
if (has_trait(PF_ASTHMA)) {
tmp = item(g->itypes[itm_inhaler], 0, 'a' + worn.size());
inv.push_back(tmp);
}
// Basic starter gear, added independently of profession.
tmp = item(g->itypes[itm_pockknife], 0,'a' + worn.size());
inv.push_back(tmp);
tmp = item(g->itypes[itm_lighter], 0,'a' + worn.size());
inv.push_back(tmp);
// make sure we have no mutations
for (int i = 0; i < PF_MAX2; i++)
my_mutations[i] = false;
return true;
}
/* reloads data from the db */
static int reload_data(void)
{
struct module_list* modules;
table_entry_t *new_data;
table_entry_t *old_data;
table_entry_t *new_head;
table_entry_t *old_head;
table_entry_info_t *new_info;
table_entry_info_t *old_info;
table_entry_value_t *new_value;
table_entry_value_t *old_value;
struct module_timestamp *aux;
new_data = load_info(&dr_dbf, db_hdl, &db_table);
if (!new_data) {
LM_CRIT("failed to load routing info\n");
return -1;
}
lock_start_write(ref_lock);
/* no more active readers -> do the swapping */
for (old_head = *tdata; old_head; old_head = old_head->next) {
for (new_head = new_data; new_head; new_head = new_head->next) {
if (old_head->cluster_id != new_head->cluster_id)
continue;
for (old_info = old_head->info; old_info; old_info = old_info->next) {
for (new_info = new_head->info; new_info; new_info = new_info->next) {
if (old_info->proto != new_info->proto)
continue;
for (old_value = old_info->value; old_value; old_value = old_value->next) {
for (new_value = new_info->value; new_value; new_value = new_value->next) {
if (su_cmp(&new_value->addr, &old_value->addr)) {
aux = new_value->in_timestamps;
new_value->in_timestamps = old_value->in_timestamps;
old_value->in_timestamps = aux;
break;
}
}
}
}
}
}
}
old_data = *tdata;
*tdata = new_data;
for (modules = clusterer_modules; modules; modules = modules->next)
modules->values = clusterer_find_nodes(modules->accept_cluster_id, modules->proto);
lock_stop_write(ref_lock);
/* free old data */
if (old_data)
free_data(old_data);
return 0;
}
static void server_loop(int fd)
{
struct timeval snaptime;
struct pollfd p;
memset(&snaptime, 0, sizeof(snaptime));
p.fd = fd;
p.events = p.revents = POLLIN;
load_info();
for (;;) {
int status;
int tdiff;
struct timeval now;
gettimeofday(&now, NULL);
tdiff = T_DIFF(now, snaptime);
// if (tdiff >= 0) {
update_db(tdiff);
snaptime = now;
tdiff = 0;
// }
if (poll(&p, 1, conf.scan_interval-tdiff) > 0
&& (p.revents&POLLIN)) {
int clnt = accept(fd, NULL, NULL);
if (clnt >= 0) {
pid_t pid;
/*
We assume forking will be ok
so update database here not
have races with forked process
*/
gettimeofday(&now, NULL);
tdiff = T_DIFF(now, snaptime);
// if (tdiff >= min_interval) {
update_db(tdiff);
snaptime = now;
tdiff = 0;
// }
poll_client(clnt);
sprintf(info_source,
"pid=%d sampling_interval=%d "
"time_const=%d",
getpid(),
conf.scan_interval/1000,
conf.time_constant/1000);
if (children >= 5) {
close(clnt);
} else if ((pid = fork()) != 0) {
if (pid>0)
children++;
close(clnt);
} else {
FILE *fp = fdopen(clnt, "w");
if (fp) {
/* Write on clients socket */
dump_raw_db(fp);
}
exit(0);
}
}
}
while (children && waitpid(-1, &status, WNOHANG) > 0)
children--;
}
}
bool player::create(game *g, character_type type, std::string tempname)
{
weapon = item(g->itypes["null"], 0);
g->u.prof = profession::generic();
WINDOW* w = newwin(25, 80, (TERMY > 25) ? (TERMY-25)/2 : 0, (TERMX > 80) ? (TERMX-80)/2 : 0);
int tab = 0, points = 38;
if (type != PLTYPE_CUSTOM) {
switch (type) {
case PLTYPE_RANDOM: {
str_max = rng(6, 12);
dex_max = rng(6, 12);
int_max = rng(6, 12);
per_max = rng(6, 12);
points = points - str_max - dex_max - int_max - per_max;
if (str_max > HIGH_STAT)
points -= (str_max - HIGH_STAT);
if (dex_max > HIGH_STAT)
points -= (dex_max - HIGH_STAT);
if (int_max > HIGH_STAT)
points -= (int_max - HIGH_STAT);
if (per_max > HIGH_STAT)
points -= (per_max - HIGH_STAT);
int num_gtraits = 0, num_btraits = 0, rn, tries;
while (points < 0 || rng(-3, 20) > points) {
if (num_btraits < MAX_TRAIT_POINTS && one_in(3)) {
tries = 0;
do {
rn = random_bad_trait();
tries++;
} while ((has_trait(rn) ||
num_btraits - traits[rn].points > MAX_TRAIT_POINTS) && tries < 5);
if (tries < 5) {
toggle_trait(rn);
points -= traits[rn].points;
num_btraits -= traits[rn].points;
}
} else {
switch (rng(1, 4)) {
case 1: if (str_max > 5) { str_max--; points++; } break;
case 2: if (dex_max > 5) { dex_max--; points++; } break;
case 3: if (int_max > 5) { int_max--; points++; } break;
case 4: if (per_max > 5) { per_max--; points++; } break;
}
}
}
while (points > 0) {
switch (rng((num_gtraits < MAX_TRAIT_POINTS ? 1 : 5), 9)) {
case 1:
case 2:
case 3:
case 4:
rn = random_good_trait();
if (!has_trait(rn) && points >= traits[rn].points &&
num_gtraits + traits[rn].points <= MAX_TRAIT_POINTS) {
toggle_trait(rn);
points -= traits[rn].points;
num_gtraits += traits[rn].points;
}
break;
case 5:
switch (rng(1, 4)) {
case 1: if (str_max < HIGH_STAT) { str_max++; points--; } break;
case 2: if (dex_max < HIGH_STAT) { dex_max++; points--; } break;
case 3: if (int_max < HIGH_STAT) { int_max++; points--; } break;
case 4: if (per_max < HIGH_STAT) { per_max++; points--; } break;
}
break;
case 6:
case 7:
case 8:
case 9:
rn = random_skill();
Skill *aSkill = Skill::skill(rn);
int level = skillLevel(aSkill);
if (level < points) {
points -= level + 1;
skillLevel(aSkill).level(level + 2);
}
break;
}
}
} break;
case PLTYPE_TEMPLATE: {
std::ifstream fin;
std::stringstream filename;
filename << "data/" << tempname << ".template";
fin.open(filename.str().c_str());
if (!fin.is_open()) {
debugmsg("Couldn't open %s!", filename.str().c_str());
return false;
}
std::string(data);
getline(fin, data);
load_info(g, data);
points = 0;
} break;
}
tab = 3;
} else
points = OPTIONS[OPT_INITIAL_POINTS];
do {
werase(w);
wrefresh(w);
switch (tab) {
case 0: tab += set_stats (w, g, this, points); break;
case 1: tab += set_traits (w, g, this, points); break;
case 2: tab += set_profession (w, g, this, points); break;
case 3: tab += set_skills (w, g, this, points); break;
case 4: tab += set_description(w, g, this, points); break;
}
} while (tab >= 0 && tab < 5);
delwin(w);
if (tab < 0)
return false;
// Character is finalized. Now just set up HP, &c
for (int i = 0; i < num_hp_parts; i++) {
hp_max[i] = calc_HP(str_max, has_trait(PF_TOUGH));
hp_cur[i] = hp_max[i];
}
if (has_trait(PF_GLASSJAW)) {
hp_max[hp_head] = int(hp_max[hp_head] * .85);
hp_cur[hp_head] = hp_max[hp_head];
}
if (has_trait(PF_SMELLY))
scent = 800;
if (has_trait(PF_ANDROID)) {
std::map<std::string,bionic_data*>::iterator random_bionic = bionics.begin();
std::advance(random_bionic,rng(0,bionics.size()-1));
add_bionic(random_bionic->first);// Other
if (bionics[my_bionics[0].id]->power_cost > 0) {
add_bionic(bionic_id(power_source_bionics[rng(0,power_source_bionics.size())])); // Power Source
max_power_level = 10;
power_level = 10;
} else {
bionic_id tmpbio;
do
tmpbio = bionic_id(unpowered_bionics[rng(0, unpowered_bionics.size())]);
while (bionics[tmpbio]->power_cost > 0);
add_bionic(tmpbio);
max_power_level = 0;
power_level = 0;
}
/* CHEATER'S STUFF
add_bionic(bionic_id(rng(0, "bio_ethanol"))); // Power Source
for (int i = 0; i < 5; i++)
add_bionic(bionic_id(rng("bio_memory", max_"bio_start" - 1)));// Other
max_power_level = 80;
power_level = 80;
End of cheatery */
}
if (has_trait(PF_MARTIAL_ARTS)) {
itype_id ma_type;
do {
int choice = menu("Pick your style:",
"Karate", "Judo", "Aikido", "Tai Chi", "Taekwondo", NULL);
if (choice == 1)
ma_type = "style_karate";
if (choice == 2)
ma_type = "style_judo";
if (choice == 3)
ma_type = "style_aikido";
if (choice == 4)
ma_type = "style_tai_chi";
if (choice == 5)
ma_type = "style_taekwondo";
item tmpitem = item(g->itypes[ma_type], 0);
full_screen_popup(tmpitem.info(true).c_str());
} while (!query_yn("Use this style?"));
styles.push_back(ma_type);
}
ret_null = item(g->itypes["null"], 0);
if (!styles.empty())
weapon = item(g->itypes[ styles[0] ], 0, ':');
else
weapon = item(g->itypes["null"], 0);
item tmp; //gets used several times
std::vector<std::string> prof_items = g->u.prof->items();
for (std::vector<std::string>::const_iterator iter = prof_items.begin(); iter != prof_items.end(); ++iter) {
item tmp = item(g->itypes.at(*iter), 0, 'a' + worn.size());
if (tmp.is_armor()) {
if (tmp.has_flag(IF_VARSIZE))
tmp.item_flags |= mfb(IF_FIT);
worn.push_back(tmp);
} else {
inv.push_back(tmp);
}
// if we start with drugs, need to start strongly addicted, too
if (tmp.is_food()) {
it_comest *comest = dynamic_cast<it_comest*>(tmp.type);
if (comest->add != ADD_NULL) {
addiction add(comest->add, 10);
g->u.addictions.push_back(add);
}
}
}
// The near-sighted get to start with glasses.
if (has_trait(PF_MYOPIC)) {
tmp = item(g->itypes["glasses_eye"], 0, 'a' + worn.size());
worn.push_back(tmp);
}
// And the far-sighted get to start with reading glasses.
if (has_trait(PF_HYPEROPIC)) {
tmp = item(g->itypes["glasses_reading"], 0, 'a' + worn.size());
worn.push_back(tmp);
}
// Likewise, the asthmatic start with their medication.
if (has_trait(PF_ASTHMA)) {
tmp = item(g->itypes["inhaler"], 0, 'a' + worn.size());
inv.push_back(tmp);
}
// Basic starter gear, added independently of profession.
tmp = item(g->itypes["pockknife"], 0,'a' + worn.size());
inv.push_back(tmp);
tmp = item(g->itypes["matches"], 0,'a' + worn.size());
inv.push_back(tmp);
// make sure we have no mutations
for (int i = 0; i < PF_MAX2; i++)
my_mutations[i] = false;
return true;
}
static void update_db(int interval)
{
struct ifstat_ent *n, *is_new, *ns;
n = kern_db;
kern_db = NULL;
load_info();
is_new = kern_db;
kern_db = n;
/*
Update current as template to detect any
new or removed devs.
*/
for (ns = is_new; ns; ns = ns->next) {
if(!conf.scan_interval)
abort();
for (n = kern_db; n; n = n->next) {
if (ns->ifindex == n->ifindex) {
int i;
for (i = 0; i < MAXS; i++) {
uint64_t diff;
double sample;
/* Handle one overflow correctly */
if( ns->val[i] < n->val[i] ) {
diff = (0xFFFFFFFF - n->val[i]) + ns->val[i];
overflow++;
}
else
diff = ns->val[i] - n->val[i];
// ns->ival[i] = n->ival[i]; /* For overflow check */
// ns->val[i] = n->val[i];
if(interval <= conf.min_interval) {
ewma = -11;
ns->rate[i] = n->rate[i];
goto done;
}
/* Calc rate */
sample = (double)(diff*1000)/interval;
if (interval >= conf.scan_interval) {
ns->rate[i] = n->rate[i]+ W*(sample-n->rate[i]);
ewma = 1;
} else if (interval >= conf.time_constant) {
ns->rate[i] = sample;
ewma = 2;
} else {
double w = W*(double)interval/conf.scan_interval;
ns->rate[i] = n->rate[i] + w*(sample-n->rate[i]);
ewma = 3;
}
done:;
}
break;
}
}
}
/* Remove old table */
while (kern_db) {
struct ifstat_ent *tmp = kern_db;
kern_db = kern_db->next;
free(tmp->name);
free(tmp);
};
kern_db = is_new; /* The most recent devs from rt_netlink */
}
bool player::create(game *g, character_type type, std::string tempname)
{
weapon = item(g->itypes["null"], 0);
g->u.prof = profession::generic();
WINDOW* w = newwin(FULL_SCREEN_HEIGHT, FULL_SCREEN_WIDTH,
(TERMY > FULL_SCREEN_HEIGHT) ? (TERMY-FULL_SCREEN_HEIGHT)/2 : 0,
(TERMX > FULL_SCREEN_WIDTH) ? (TERMX-FULL_SCREEN_WIDTH)/2 : 0);
int tab = 0, points = 38, max_trait_points = 12;
if (type != PLTYPE_CUSTOM) {
switch (type) {
case PLTYPE_RANDOM: {
str_max = rng(6, 12);
dex_max = rng(6, 12);
int_max = rng(6, 12);
per_max = rng(6, 12);
points = points - str_max - dex_max - int_max - per_max;
if (str_max > HIGH_STAT)
points -= (str_max - HIGH_STAT);
if (dex_max > HIGH_STAT)
points -= (dex_max - HIGH_STAT);
if (int_max > HIGH_STAT)
points -= (int_max - HIGH_STAT);
if (per_max > HIGH_STAT)
points -= (per_max - HIGH_STAT);
int num_gtraits = 0, num_btraits = 0, rn, tries;
while (points < 0 || rng(-3, 20) > points) {
if (num_btraits < max_trait_points && one_in(3)) {
tries = 0;
do {
rn = random_bad_trait();
tries++;
} while ((has_trait(rn) ||
num_btraits - traits[rn].points > max_trait_points) && tries < 5);
if (tries < 5) {
toggle_trait(rn);
points -= traits[rn].points;
num_btraits -= traits[rn].points;
}
} else {
switch (rng(1, 4)) {
case 1: if (str_max > 5) { str_max--; points++; } break;
case 2: if (dex_max > 5) { dex_max--; points++; } break;
case 3: if (int_max > 5) { int_max--; points++; } break;
case 4: if (per_max > 5) { per_max--; points++; } break;
}
}
}
while (points > 0) {
switch (rng((num_gtraits < max_trait_points ? 1 : 5), 9)) {
case 1:
case 2:
case 3:
case 4:
rn = random_good_trait();
if (!has_trait(rn) && points >= traits[rn].points &&
num_gtraits + traits[rn].points <= max_trait_points) {
toggle_trait(rn);
points -= traits[rn].points;
num_gtraits += traits[rn].points;
}
break;
case 5:
switch (rng(1, 4)) {
case 1: if (str_max < HIGH_STAT) { str_max++; points--; } break;
case 2: if (dex_max < HIGH_STAT) { dex_max++; points--; } break;
case 3: if (int_max < HIGH_STAT) { int_max++; points--; } break;
case 4: if (per_max < HIGH_STAT) { per_max++; points--; } break;
}
break;
case 6:
case 7:
case 8:
case 9:
rn = random_skill();
Skill *aSkill = Skill::skill(rn);
int level = skillLevel(aSkill);
if (level < points) {
points -= level + 1;
skillLevel(aSkill).level(level + 2);
}
break;
}
}
} break;
case PLTYPE_TEMPLATE: {
std::ifstream fin;
std::stringstream filename;
filename << "data/" << tempname << ".template";
fin.open(filename.str().c_str());
if (!fin.is_open()) {
debugmsg("Couldn't open %s!", filename.str().c_str());
return false;
}
std::string(data);
getline(fin, data);
load_info(g, data);
points = 0;
} break;
}
tab = NEWCHAR_TAB_MAX;
} else
points = OPTIONS[OPT_INITIAL_POINTS];
max_trait_points = OPTIONS[OPT_MAX_TRAIT_POINTS];
do {
werase(w);
wrefresh(w);
switch (tab) {
case 0: tab += set_stats (w, g, this, points); break;
case 1: tab += set_traits (w, g, this, points, max_trait_points); break;
case 2: tab += set_profession (w, g, this, points); break;
case 3: tab += set_skills (w, g, this, points); break;
case 4: tab += set_description(w, g, this, points); break;
}
} while (tab >= 0 && tab <= NEWCHAR_TAB_MAX);
delwin(w);
if (tab < 0)
return false;
// Character is finalized. Now just set up HP, &c
for (int i = 0; i < num_hp_parts; i++) {
hp_max[i] = calc_HP(str_max, has_trait(PF_TOUGH));
hp_cur[i] = hp_max[i];
}
if (has_trait(PF_HARDCORE)) {
for (int i = 0; i < num_hp_parts; i++) {
hp_max[i] = int(hp_max[i] * .25);
hp_cur[i] = hp_max[i];
}
} if (has_trait(PF_GLASSJAW)) {
hp_max[hp_head] = int(hp_max[hp_head] * .80);
hp_cur[hp_head] = hp_max[hp_head];
}
if (has_trait(PF_SMELLY))
scent = 800;
if (has_trait(PF_ANDROID)) {
bionic_id first_bio;
do {
first_bio = g->random_good_bionic();
} while (bionics[first_bio]->power_cost > 10);
add_bionic(first_bio);
add_bionic(bionic_id(power_source_bionics[rng(0,power_source_bionics.size()-1)])); // Power Source
max_power_level = 10;
power_level = 10;
}
if (has_trait(PF_MARTIAL_ARTS)) {
itype_id ma_type;
do {
int choice = menu(false, _("Pick your style:"),
_("Karate"), _("Judo"), _("Aikido"), _("Tai Chi"),
_("Taekwondo"), NULL);
if (choice == 1)
ma_type = "style_karate";
if (choice == 2)
ma_type = "style_judo";
if (choice == 3)
ma_type = "style_aikido";
if (choice == 4)
ma_type = "style_tai_chi";
if (choice == 5)
ma_type = "style_taekwondo";
item tmpitem = item(g->itypes[ma_type], 0);
full_screen_popup(tmpitem.info(true).c_str());
} while (!query_yn(_("Use this style?")));
styles.push_back(ma_type);
style_selected=ma_type;
}
if (has_trait(PF_MARTIAL_ARTS2)) {
itype_id ma_type;
do {
int choice = menu(false, _("Pick your style:"),
_("Capoeira"), _("Krav Maga"), _("Muay Thai"),
_("Ninjutsu"), _("Zui Quan"), NULL);
if (choice == 1)
ma_type = "style_capoeira";
if (choice == 2)
ma_type = "style_krav_maga";
if (choice == 3)
ma_type = "style_muay_thai";
if (choice == 4)
ma_type = "style_ninjutsu";
if (choice == 5)
ma_type = "style_zui_quan";
item tmpitem = item(g->itypes[ma_type], 0);
full_screen_popup(tmpitem.info(true).c_str());
} while (!query_yn(_("Use this style?")));
styles.push_back(ma_type);
style_selected=ma_type;
}
if (has_trait(PF_MARTIAL_ARTS3)) {
itype_id ma_type;
do {
int choice = menu(false, _("Pick your style:"),
_("Tiger"), _("Crane"), _("Leopard"), _("Snake"),
_("Dragon"), NULL);
if (choice == 1)
ma_type = "style_tiger";
if (choice == 2)
ma_type = "style_crane";
if (choice == 3)
ma_type = "style_leopard";
if (choice == 4)
ma_type = "style_snake";
if (choice == 5)
ma_type = "style_dragon";
item tmpitem = item(g->itypes[ma_type], 0);
full_screen_popup(tmpitem.info(true).c_str());
} while (!query_yn(_("Use this style?")));
styles.push_back(ma_type);
style_selected=ma_type;
}
if (has_trait(PF_MARTIAL_ARTS4)) {
itype_id ma_type;
do {
int choice = menu(false, _("Pick your style:"),
_("Centipede"), _("Viper"), _("Scorpion"), _("Lizard"),
_("Toad"), NULL);
if (choice == 1)
ma_type = "style_centipede";
if (choice == 2)
ma_type = "style_venom_snake";
if (choice == 3)
ma_type = "style_scorpion";
if (choice == 4)
ma_type = "style_lizard";
if (choice == 5)
ma_type = "style_toad";
item tmpitem = item(g->itypes[ma_type], 0);
full_screen_popup(tmpitem.info(true).c_str());
} while (!query_yn(_("Use this style?")));
styles.push_back(ma_type);
style_selected=ma_type;
}
ret_null = item(g->itypes["null"], 0);
weapon = get_combat_style();
item tmp; //gets used several times
std::vector<std::string> prof_items = g->u.prof->items();
for (std::vector<std::string>::const_iterator iter = prof_items.begin(); iter != prof_items.end(); ++iter)
{
tmp = item(item_controller->find_template(*iter), 0);
inv.push_back(tmp);
}
std::vector<addiction> prof_addictions = g->u.prof->addictions();
for (std::vector<addiction>::const_iterator iter = prof_addictions.begin(); iter != prof_addictions.end(); ++iter)
{
g->u.addictions.push_back(*iter);
}
// Grab the skills from the profession, if there are any
profession::StartingSkillList prof_skills = g->u.prof->skills();
for (profession::StartingSkillList::const_iterator iter = prof_skills.begin();
iter != prof_skills.end(); ++iter)
{
assert(Skill::skill(iter->first));
if (Skill::skill(iter->first))
{
g->u.boost_skill_level(iter->first, iter->second);
}
}
// Those who are both near-sighted and far-sighted start with bifocal glasses.
if (has_trait(PF_HYPEROPIC) && has_trait(PF_MYOPIC))
{
tmp = item(g->itypes["glasses_bifocal"], 0);
inv.push_back(tmp);
}
// The near-sighted start with eyeglasses.
else if (has_trait(PF_MYOPIC))
{
tmp = item(g->itypes["glasses_eye"], 0);
inv.push_back(tmp);
}
// The far-sighted start with reading glasses.
else if (has_trait(PF_HYPEROPIC))
{
tmp = item(g->itypes["glasses_reading"], 0);
inv.push_back(tmp);
}
// Likewise, the asthmatic start with their medication.
if (has_trait(PF_ASTHMA)) {
tmp = item(g->itypes["inhaler"], 0);
inv.push_back(tmp);
}
// Basic starter gear, added independently of profession.
tmp = item(g->itypes["pockknife"], 0);
inv.push_back(tmp);
tmp = item(g->itypes["matches"], 0);
inv.push_back(tmp);
// make sure we have no mutations
for (int i = 0; i < PF_MAX2; i++)
if (!has_base_trait(i))
my_mutations[i] = false;
// Equip any armor from our inventory. If we are unable to wear some of it due to encumberance, it will silently fail.
std::vector<item*> tmp_inv;
inv.dump(tmp_inv);
for(std::vector<item*>::iterator i = tmp_inv.begin(); i != tmp_inv.end(); ++i)
{
if( (*i)->is_armor())
{
if( (*i)->has_flag("VARSIZE"))
{
(*i)->item_tags.insert("FIT");
}
// It might be more elegant to use player::wear_item, but then we have to implement our own inventory removal.
wear(g, (*i)->invlet, false);
}
}
// Ensure that persistent morale effects (e.g. Optimist) are present at the start.
apply_persistent_morale();
return true;
}
int main(int argc, char *argv[])
{
char hist_name[128];
struct sockaddr_un sun;
FILE *hist_fp = NULL;
int ch;
int fd;
while ((ch = getopt_long(argc, argv, "hjpvVzrnasd:t:e",
longopts, NULL)) != EOF) {
switch (ch) {
case 'z':
dump_zeros = 1;
break;
case 'r':
reset_history = 1;
break;
case 'a':
ignore_history = 1;
break;
case 's':
no_update = 1;
break;
case 'n':
no_output = 1;
break;
case 'e':
show_errors = 1;
break;
case 'j':
json_output = 1;
break;
case 'p':
pretty = 1;
break;
case 'd':
scan_interval = atoi(optarg) * 1000;
if (scan_interval <= 0) {
fprintf(stderr, "ifstat: invalid scan interval\n");
exit(-1);
}
break;
case 't':
time_constant = atoi(optarg);
if (time_constant <= 0) {
fprintf(stderr, "ifstat: invalid time constant divisor\n");
exit(-1);
}
break;
case 'v':
case 'V':
printf("ifstat utility, iproute2-ss%s\n", SNAPSHOT);
exit(0);
case 'h':
case '?':
default:
usage();
}
}
argc -= optind;
argv += optind;
sun.sun_family = AF_UNIX;
sun.sun_path[0] = 0;
sprintf(sun.sun_path+1, "ifstat%d", getuid());
if (scan_interval > 0) {
if (time_constant == 0)
time_constant = 60;
time_constant *= 1000;
W = 1 - 1/exp(log(10)*(double)scan_interval/time_constant);
if ((fd = socket(AF_UNIX, SOCK_STREAM, 0)) < 0) {
perror("ifstat: socket");
exit(-1);
}
if (bind(fd, (struct sockaddr *)&sun, 2+1+strlen(sun.sun_path+1)) < 0) {
perror("ifstat: bind");
exit(-1);
}
if (listen(fd, 5) < 0) {
perror("ifstat: listen");
exit(-1);
}
if (daemon(0, 0)) {
perror("ifstat: daemon");
exit(-1);
}
signal(SIGPIPE, SIG_IGN);
signal(SIGCHLD, sigchild);
server_loop(fd);
exit(0);
}
patterns = argv;
npatterns = argc;
if (getenv("IFSTAT_HISTORY"))
snprintf(hist_name, sizeof(hist_name),
"%s", getenv("IFSTAT_HISTORY"));
else
snprintf(hist_name, sizeof(hist_name),
"%s/.ifstat.u%d", P_tmpdir, getuid());
if (reset_history)
unlink(hist_name);
if (!ignore_history || !no_update) {
struct stat stb;
fd = open(hist_name, O_RDWR|O_CREAT|O_NOFOLLOW, 0600);
if (fd < 0) {
perror("ifstat: open history file");
exit(-1);
}
if ((hist_fp = fdopen(fd, "r+")) == NULL) {
perror("ifstat: fdopen history file");
exit(-1);
}
if (flock(fileno(hist_fp), LOCK_EX)) {
perror("ifstat: flock history file");
exit(-1);
}
if (fstat(fileno(hist_fp), &stb) != 0) {
perror("ifstat: fstat history file");
exit(-1);
}
if (stb.st_nlink != 1 || stb.st_uid != getuid()) {
fprintf(stderr, "ifstat: something is so wrong with history file, that I prefer not to proceed.\n");
exit(-1);
}
if (!ignore_history) {
FILE *tfp;
long uptime = -1;
if ((tfp = fopen("/proc/uptime", "r")) != NULL) {
if (fscanf(tfp, "%ld", &uptime) != 1)
uptime = -1;
fclose(tfp);
}
if (uptime >= 0 && time(NULL) >= stb.st_mtime+uptime) {
fprintf(stderr, "ifstat: history is aged out, resetting\n");
if (ftruncate(fileno(hist_fp), 0))
perror("ifstat: ftruncate");
}
}
load_raw_table(hist_fp);
hist_db = kern_db;
kern_db = NULL;
}
if ((fd = socket(AF_UNIX, SOCK_STREAM, 0)) >= 0 &&
(connect(fd, (struct sockaddr *)&sun, 2+1+strlen(sun.sun_path+1)) == 0
|| (strcpy(sun.sun_path+1, "ifstat0"),
connect(fd, (struct sockaddr *)&sun, 2+1+strlen(sun.sun_path+1)) == 0))
&& verify_forging(fd) == 0) {
FILE *sfp = fdopen(fd, "r");
load_raw_table(sfp);
if (hist_db && source_mismatch) {
fprintf(stderr, "ifstat: history is stale, ignoring it.\n");
hist_db = NULL;
}
fclose(sfp);
} else {
if (fd >= 0)
close(fd);
if (hist_db && info_source[0] && strcmp(info_source, "kernel")) {
fprintf(stderr, "ifstat: history is stale, ignoring it.\n");
hist_db = NULL;
info_source[0] = 0;
}
load_info();
if (info_source[0] == 0)
strcpy(info_source, "kernel");
}
if (!no_output) {
if (ignore_history || hist_db == NULL)
dump_kern_db(stdout);
else
dump_incr_db(stdout);
}
if (!no_update) {
if (ftruncate(fileno(hist_fp), 0))
perror("ifstat: ftruncate");
rewind(hist_fp);
json_output = 0;
dump_raw_db(hist_fp, 1);
fclose(hist_fp);
}
exit(0);
}
int main()
{
load_info();
server();
return 0;
}
/*
* Create a PKCS #10 certificate request
*/
PKCS10_Request create_cert_req(const X509_Cert_Options& opts,
const Private_Key& key,
const std::string& hash_fn,
RandomNumberGenerator& rng)
{
AlgorithmIdentifier sig_algo;
X509_DN subject_dn;
AlternativeName subject_alt;
opts.sanity_check();
std::vector<byte> pub_key = X509::BER_encode(key);
std::unique_ptr<PK_Signer> signer(choose_sig_format(key, hash_fn, sig_algo));
load_info(opts, subject_dn, subject_alt);
const size_t PKCS10_VERSION = 0;
Extensions extensions;
extensions.add(
new Cert_Extension::Basic_Constraints(opts.is_CA, opts.path_limit));
extensions.add(
new Cert_Extension::Key_Usage(
opts.is_CA ? Key_Constraints(KEY_CERT_SIGN | CRL_SIGN) :
find_constraints(key, opts.constraints)
)
);
extensions.add(
new Cert_Extension::Extended_Key_Usage(opts.ex_constraints));
extensions.add(
new Cert_Extension::Subject_Alternative_Name(subject_alt));
DER_Encoder tbs_req;
tbs_req.start_cons(SEQUENCE)
.encode(PKCS10_VERSION)
.encode(subject_dn)
.raw_bytes(pub_key)
.start_explicit(0);
if(opts.challenge != "")
{
ASN1_String challenge(opts.challenge, DIRECTORY_STRING);
tbs_req.encode(
Attribute("PKCS9.ChallengePassword",
DER_Encoder().encode(challenge).get_contents_unlocked()
)
);
}
tbs_req.encode(
Attribute("PKCS9.ExtensionRequest",
DER_Encoder()
.start_cons(SEQUENCE)
.encode(extensions)
.end_cons()
.get_contents_unlocked()
)
)
.end_explicit()
.end_cons();
const std::vector<byte> req =
X509_Object::make_signed(signer.get(), rng, sig_algo,
tbs_req.get_contents());
return PKCS10_Request(req);
}
