oregano-0.84.41/ 0000755 0001750 0001750 00000000000 13424071216 012332 5 ustar ruben ruben oregano-0.84.41/macports/ 0000755 0001750 0001750 00000000000 13413640652 014166 5 ustar ruben ruben oregano-0.84.41/macports/Portfile 0000644 0001750 0001750 00000004271 13413640652 015701 0 ustar ruben ruben # -*- coding: utf-8; mode: tcl; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- vim:fenc=utf-8:ft=tcl:et:sw=4:ts=4:sts=4
# $Id$
PortSystem 1.0
PortGroup github 1.0
PortGroup active_variants 1.1
PortGroup waf 1.0
github.setup drahnr oregano 0.83.2.1 v
categories gnome science
maintainers ahoi.io:bernhard openmaintainer
license GPL-2+
description A graphical software application for schematic capture and simulation of electrical circuits.
long_description ${description} It uses Gtk+ 3.x for the frontend and ngspice or gnucap as backend for crunching numbers. \
File bugs for this port at https://github.com/drahnr/oregano
platforms darwin
checksums rmd160 7a5c06c6d7f260143ea0bbd9f92759beacde920d \
sha256 d22ab0dc9f3717759983966ea3f7a8cd266e343fab47236ec4d841660bd72fa1
# be careful not to overwrite build dependencies
# declared by the waf port group
depends_build-append \
port:intltool \
port:libtool \
port:pkgconfig
depends_lib port:desktop-file-utils \
port:rarian \
port:shared-mime-info \
port:gtk3 \
port:gtksourceview3 \
port:goocanvas2
depends_run port:gnome-themes-standard \
port:ngspice
# shipped waf does not recognize --nocache
configure.args-delete \
--nocache
# shipped waf requires target debug or release not build
build.target debug
# allow port to build with either gtk3 +x11 or +quartz backend
variant quartz {}
if {[variant_isset quartz]} {
require_active_variants gtk3 quartz
} else {
require_active_variants gtk3 x11
depends_run-append port:yelp \
port:docbook-xml
}
post-activate {
system "${prefix}/bin/scrollkeeper-update"
system "${prefix}/bin/update-desktop-database ${prefix}/share/applications"
system "${prefix}/bin/update-mime-database ${prefix}/share/mime"
system "${prefix}/bin/glib-compile-schemas ${prefix}/share/glib-2.0/schemas"
}
oregano-0.84.41/.concourse/ 0000755 0001750 0001750 00000000000 13413640652 014414 5 ustar ruben ruben oregano-0.84.41/.concourse/ubuntu/ 0000755 0001750 0001750 00000000000 13413640652 015736 5 ustar ruben ruben oregano-0.84.41/.concourse/ubuntu/pkg.lst 0000644 0001750 0001750 00000000234 13413640652 017242 0 ustar ruben ruben git gnucap ngspice python libglib2.0-dev intltool libgtk-3-dev libxml2-dev libgoocanvas-2.0-dev libgtksourceview-3.0-dev gcc clang devscripts quilt libtool
oregano-0.84.41/.concourse/ubuntu/Dockerfile 0000644 0001750 0001750 00000000157 13413640652 017733 0 ustar ruben ruben FROM ubuntu:latest
COPY pkg.lst /tmp/pkg.lst
RUN apt-get update -y
RUN apt-get install -y $(cat /tmp/pkg.lst)
oregano-0.84.41/.concourse/fedora/ 0000755 0001750 0001750 00000000000 13413640652 015654 5 ustar ruben ruben oregano-0.84.41/.concourse/fedora/buildrpm.sh 0000755 0001750 0001750 00000001425 13413640652 020033 0 ustar ruben ruben #!/usr/bin/env bash
set -x
set -e
pwd 2>&1
RPMBUILD_DIR="$(pwd)/${1}/rpmbuild"
mkdir -p ${RPMBUILD_DIR}/{SOURCES,BUILD,RPMS,SRPMS,SPECS}
./waf configure rpmspec
cp -v build/rpmspec/oregano.spec ${RPMBUILD_DIR}/SPECS/
./waf dist
cp -v oregano*.tar.xz ${RPMBUILD_DIR}/SOURCES/
cd ${RPMBUILD_DIR}
rpmbuild \
--define "_topdir %(pwd)" \
--define "_builddir %{_topdir}/BUILD" \
--define "_rpmdir %{_topdir}/RPMS" \
--define "_srcrpmdir %{_topdir}/SRPMS" \
--define "_specdir %{_topdir}/SPECS" \
--define "_sourcedir %{_topdir}/SOURCES" \
-ba SPECS/oregano.spec || exit 1
mkdir -p $(pwd)/${1}/{,s}rpm/
rm -vf ${RPMBUILD_DIR}/RPMS/x86_64/oregano-*debug*.rpm
cp -vf ${RPMBUILD_DIR}/RPMS/x86_64/oregano-*.rpm $(pwd)/${1}/rpm/
cp -vf ${RPMBUILD_DIR}/SRPMS/oregano-*.src.rpm $(pwd)/${1}/srpm/
oregano-0.84.41/.concourse/fedora/pkg.lst 0000644 0001750 0001750 00000000306 13413640652 017160 0 ustar ruben ruben make git gnucap ngspice python gtk3-devel libxml2-devel gtksourceview3-devel intltool glib2-devel goocanvas2-devel desktop-file-utils clang gcc rpmdevtools xorg-x11-server-Xvfb xorg-x11-xauth which
oregano-0.84.41/.concourse/fedora/Dockerfile 0000644 0001750 0001750 00000000147 13413640652 017650 0 ustar ruben ruben FROM fedora:latest
COPY pkg.lst /tmp/pkg.lst
RUN dnf update -y
RUN dnf install -y $(cat /tmp/pkg.lst)
oregano-0.84.41/ARCHITECTURE.md 0000644 0001750 0001750 00000003514 13413640652 014545 0 ustar ruben ruben ## ARCHITECTURE
This document is targeted at oregano developers, giving a brief overview how all pieces connect together.
### Overview
The central elements are the `schematic`, `sheet`, `schemtic-view`, `node-store`, `engine`.
The `schematic-view` displays a schematic. The `schematic-view` is one oregano window including all its UI elements.
The most important child element is the `sheet`, a canvas drawing all `*-item`s.
The `schematic` is an abstract object saving a set of strings for simulation, `node-store`, authorship and a bunch of others.
The `node-store` saves all `node`s, `wire`s, `part`s (they are all derived from `item-data`). This is the *store* part of one `schematic-view`.
For actual simulation an `engine` object is used to transform the data contained in `schematic` and `node-store` to a string being piped to the actual backend engine.
The `sheet` handles mouse interaction, triggers the creation of new `sheet-item`s (like `wire-item`,`textbox-item`, etc.). These hold a pointer of type `item-data` to the actual object data, dependant of the subclass this is a `wire`, `node` or `part` (derived classes from `item-data`). The `*-item` objects exclusive task is to handle input events, creating context menus for that item, handling events when clicking these items, handling selection as well as moving of objects. This is the *view* part of one `schematic-view`.
Note that all these objects are local to the `schematic-view`. This is required to keep it reentrant and thus run multiple windows within one process.
### Issues
The above layout is quite complex and currently there are some issues which require new `item-data` derived classes be added _first_ to the schematic and _afterwards_ being set to the proper position.
Also there is a total lack of documentation within the sourcecode which is currently being addressed.
oregano-0.84.41/.clang-format 0000644 0001750 0001750 00000003326 13413640652 014715 0 ustar ruben ruben ---
Language: Cpp
AccessModifierOffset: -4
ConstructorInitializerIndentWidth: 4
AlignEscapedNewlinesLeft: false
AlignTrailingComments: true
AllowAllParametersOfDeclarationOnNextLine: true
AllowShortBlocksOnASingleLine: false
AllowShortIfStatementsOnASingleLine: false
AllowShortLoopsOnASingleLine: false
AllowShortFunctionsOnASingleLine: All
AlwaysBreakTemplateDeclarations: true
AlwaysBreakBeforeMultilineStrings: false
#AlwaysBreakAfterDefinitionReturnType: true
BreakBeforeBinaryOperators: false
BreakBeforeTernaryOperators: true
BreakConstructorInitializersBeforeComma: false
BinPackParameters: true
ColumnLimit: 100
ConstructorInitializerAllOnOneLineOrOnePerLine: false
DerivePointerAlignment: false
ExperimentalAutoDetectBinPacking: false
IndentCaseLabels: false
IndentWrappedFunctionNames: false
IndentFunctionDeclarationAfterType: false
MaxEmptyLinesToKeep: 4
KeepEmptyLinesAtTheStartOfBlocks: true
NamespaceIndentation: None
ObjCSpaceAfterProperty: false
ObjCSpaceBeforeProtocolList: true
PenaltyBreakBeforeFirstCallParameter: 19
PenaltyBreakComment: 300
PenaltyBreakString: 1000
PenaltyBreakFirstLessLess: 120
PenaltyExcessCharacter: 1000000
PenaltyReturnTypeOnItsOwnLine: 60
PointerAlignment: Right
SpacesBeforeTrailingComments: 1
Cpp11BracedListStyle: true
Standard: Cpp11
IndentWidth: 4
TabWidth: 4
UseTab: ForIndentation
BreakBeforeBraces: Linux
SpacesInParentheses: false
SpacesInAngles: false
SpaceInEmptyParentheses: false
SpacesInCStyleCastParentheses: false
SpacesInContainerLiterals: true
SpaceBeforeAssignmentOperators: true
ContinuationIndentWidth: 4
CommentPragmas: '^ IWYU pragma:'
ForEachMacros: [ foreach, Q_FOREACH, BOOST_FOREACH ]
SpaceBeforeParens: Always
DisableFormat: false
oregano-0.84.41/tools/ 0000755 0001750 0001750 00000000000 13413640652 013476 5 ustar ruben ruben oregano-0.84.41/tools/spice2to3.awk 0000644 0001750 0001750 00000016365 13413640652 016030 0 ustar ruben ruben
#==================================================== -*- AWK -*- =====
# spice2to3.awk
#
# This awk program file is used to convert Spice2 input files to
# Spice3 format.
#
# Specifically, nonlinear dependent sources are converted from
# the polynomial model to the more general BXXXXX nonlinear
# dependent source model used in Spice3.
#
#
# Usage:
# awk -f spice2to3.awk [comments=1] inputfile > outputfile
#
# If the optional comments=1 parameter is specified, the original
# input lines that are converted will be saved as comments in the
# output file.
#
# Limitations:
# - Cubic and higher order terms are not handled except for
# the special case of a single variable
# - Initial conditions are not handled (IC=...)
# - Continued lines are not handled
# - This program uses features from GNU awk
#
#
# Mike McCarrick Feb 1995
# mmccarri@apti.com APTI, Wash DC
#======================================================================
BEGIN {
IGNORECASE = 1;
}
#----------------------------------------------------------------------
# Utility functions
#----------------------------------------------------------------------
function min(a,b) {
return (a < b) ? a : b;
}
function max(a,b) {
return (a > b) ? a : b;
}
# Turn the original input line into a comment
function make_comment(inputline) {
print "*SPICE2:";
print "*" inputline;
print "*SPICE3:";
}
# Get leading whitespace from the input line
function get_leader(inputline)
{
if ((i = match(inputline, "[^ \t]")) != 0)
return substr(inputline, 1, i-1);
else
return "";
}
# Get trailing comments from the input line
function get_trailer(inputline)
{
if ((i = index(inputline, ";")) != 0)
return substr(inputline, i, length(inputline)-i+1);
else
return "";
}
# Canonicalize the input line
function canonicalize(inputline)
{
# Strip parentheses and commas from the input line
gsub(/\(/, " ", inputline);
gsub(/\)/, " ", inputline);
gsub(/,/, " ", inputline);
# chop off any trailing comments
if ((i = index(inputline, ";")) != 0)
inputline = substr(inputline, 1, i-1);
return inputline;
}
# Convert numerical values to canonical form (the scale factors are
# not recognized for B devices at least in 3f4)
function convert_num(strval)
{
sub(/T/, "E12", strval);
sub(/G/, "E9", strval);
sub(/MEG/, "E6", strval);
sub(/K/, "E3", strval);
sub(/M/, "E-3", strval);
sub(/U/, "E-6", strval);
sub(/N/, "E-9", strval);
sub(/P/, "E-12", strval);
sub(/F/, "E-15", strval);
return strval;
}
#----------------------------------------------------------------------
# E: Voltage controlled voltage source
# G: Voltage controlled current source
# H: Current controlled voltage source
# F: Current controlled current source
#----------------------------------------------------------------------
/^ *[EGHF].+POLY/ {
# Save the old line as a comment
origline = $0;
if (comments != 0)
make_comment(origline);
# Save any leading whitespace and trailing comments
leader = get_leader($0);
trailer = get_trailer($0);
# canonicalize the input line
$0 = canonicalize($0);
# Print the new source name with its node connections
printf("%sB%s %s %s ", leader, $1, $2, $3);
# The format differs for voltage vs current controlled sources
stype = toupper(substr($1, 1, 1));
if (stype == "E" || stype == "H")
printf("V = ");
else
printf("I = ");
nvars = $5;
inodes = 6;
if (stype == "E" || stype == "G")
{
v_controlled = 1;
nnodes = 2 * nvars;
}
else
{
v_controlled = 0;
nnodes = nvars;
}
icoeff = inodes + nnodes;
ncoeff = NF - icoeff + 1;
plusflag = 0;
# Constant term
if ($icoeff != 0.0)
{
printf("%s", convert_num($icoeff));
plusflag = 1;
}
icoeff++;
ncoeff--;
# Linear terms
nlinear = min(ncoeff, nvars);
for (ic = 0; ic < nlinear; ic++)
{
if ((val = convert_num($(icoeff + ic))) != 0.0)
{
if (plusflag)
printf(" + ");
if (v_controlled)
{
ip = inodes + 2 * ic;
im = ip + 1;
if (val != 1.0)
printf("%s*V(%s,%s)", val, $ip, $im);
else
printf("V(%s,%s)", $ip, $im);
}
else
{
is = inodes + ic;
if (val != 1.0)
printf("%s*I(%s)", val, $is);
else
printf("I(%s)", $is);
}
plusflag = 1;
}
}
icoeff += ic;
ncoeff -= ic;
# Quadratic terms
nquad = min(ncoeff, nvars*(nvars+1)/2);
for (n1 = ic = 0; n1 < nvars; n1++)
{
for (n2 = 0; n2 <= n1; n2++)
{
if (ic > nquad)
break;
if ((val = convert_num($(icoeff + ic))) != 0.0)
{
if (plusflag)
printf(" + ");
if (v_controlled)
{
ip1 = inodes + 2 * n1;
im1 = ip1 + 1;
ip2 = inodes + 2 * n2;
im2 = ip2 + 1;
if (val != 1.0)
printf("%s*V(%s,%s)*V(%s,%s)", val, $ip1, $im1, $ip2, $im2);
else
printf("V(%s,%s)*V(%s,%s)", $ip1, $im1, $ip2, $im2);
}
else
{
is1 = inodes + n1;
is2 = inodes + n2;
if (val != 1.0)
printf("%s*I(%s)*I(%s)", val, $is1, $is2);
else
printf("I(%s)*I(%s)", $is1, $is2);
}
plusflag = 1;
}
ic++;
}
}
icoeff += ic;
ncoeff -= ic;
# Cubic and higher order terms are handled only for a single variable
if (ncoeff > 0 && nvars > 1)
{
print "Warning: the following source line contains" > "/dev/stderr";
print "polynomial terms greater than second order." > "/dev/stderr";
print "Convert this line manually:" > "/dev/stderr";
print origline > "/dev/stderr";
# Add a warning message comment in the output file
printf(" ; ***ERROR CONVERTING SPICE2 ENTRY\n");
next;
}
# Single variable higher-order terms
for (ic = 0; ic < ncoeff; ic++)
{
if ((val = convert_num($(icoeff + ic))) != 0.0)
{
if (plusflag)
printf(" + ");
if (v_controlled)
{
ip = inodes + 2 * ic;
im = ip + 1;
if (val != 1.0)
printf("%s*V(%s,%s)^%d", val, $ip, $im, ic+3);
else
printf("V(%s,%s)^%d", $ip, $im, ic+3);
}
else
{
is = inodes + ic;
if (val != 1.0)
printf("%s*I(%s)^%d", val, $is, ic+3);
else
printf("I(%s)^%d", $is, ic+3);
}
plusflag = 1;
}
}
# Add trailing comments to the output line
printf(" %s\n", trailer);
next;
}
#----------------------------------------------------------------------
# Default: just print out the line
#----------------------------------------------------------------------
{
print $0;
}
oregano-0.84.41/tools/oregano-convert 0000755 0001750 0001750 00000000554 13413640652 016540 0 ustar ruben ruben #!/usr/bin/perl
# Fix the namespace.
while (<>) {
if (// xmlns:ogo="http:\/\/www.dtek.chalmers.se\/~d4hult\/oregano\/v1">/;
print;
last;
}
if (/) {
if (/<[a-zA-Z]/) {
s/
* Ricardo Markiewicz
* Andres de Barbara
* Marc Lorber
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2004 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#ifndef __LOAD_COMMON_H
#define __LOAD_COMMON_H
#include
#include "coords.h"
// Note: this must be synced with Pin in part.h for now.
typedef struct
{
Coords pos;
} Connection;
typedef struct
{
gchar *name;
gchar *value;
} Property;
typedef struct
{
gchar *name;
gchar *author;
gchar *version;
GHashTable *part_hash;
GHashTable *symbol_hash;
} Library;
typedef struct
{
gchar *name;
gchar *description;
Library *library;
gchar *symbol_name;
int symbol_rotation;
gchar *refdes;
gchar *template;
gchar *model;
GSList *labels;
GSList *properties;
} LibraryPart;
#endif
oregano-0.84.41/src/netlist-editor.c 0000644 0001750 0001750 00000022766 13413640652 016254 0 ustar ruben ruben /*
* netlist-editor.c
*
*
* Authors:
* Andres de Barbara
* Marc Lorber
* Bernhard Schuster
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 2004-2008 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
* Copyright (C) 2013 Bernhard Schuster
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include
#include
#include
#include
#include
#include
#include "netlist-editor.h"
#include "netlist-helper.h"
#include "simulation.h"
#include "file.h"
#include "dialogs.h"
#include "oregano.h"
#include "debug.h"
static void netlist_editor_finalize (GObject *object);
static void netlist_editor_dispose (GObject *object);
static void netlist_editor_class_init (NetlistEditorClass *klass);
static void netlist_editor_finalize (GObject *object);
void netlist_editor_init (NetlistEditor *nle);
static GObjectClass *parent_class = NULL;
struct _NetlistEditorPriv
{
SchematicView *sv;
gchar *font;
GtkTextView *view;
GtkSourceBuffer *buffer;
GtkWindow *toplevel;
GtkButton *save, *close;
};
static void netlist_editor_class_init (NetlistEditorClass *klass)
{
GObjectClass *object_class;
object_class = G_OBJECT_CLASS (klass);
parent_class = g_type_class_peek_parent (klass);
object_class->finalize = netlist_editor_finalize;
object_class->dispose = netlist_editor_dispose;
}
static void netlist_editor_finalize (GObject *object)
{
NetlistEditor *nle = NETLIST_EDITOR (object);
if (nle->priv) {
// kill the priv struct
if (nle->priv->toplevel) {
gtk_widget_destroy (GTK_WIDGET (nle->priv->toplevel));
nle->priv->toplevel = NULL;
}
g_free (nle->priv);
}
G_OBJECT_CLASS (parent_class)->finalize (object);
}
static void netlist_editor_dispose (GObject *object)
{
NetlistEditor *nle = NETLIST_EDITOR (object);
if (nle->priv) {
}
G_OBJECT_CLASS (parent_class)->dispose (object);
}
GType netlist_editor_get_type (void)
{
static GType netlist_editor_type = 0;
if (!netlist_editor_type) {
static const GTypeInfo netlist_editor_info = {
sizeof(NetlistEditorClass), NULL, NULL,
(GClassInitFunc)netlist_editor_class_init, NULL, NULL,
sizeof(NetlistEditor), 0, (GInstanceInitFunc)netlist_editor_init,
NULL};
netlist_editor_type =
g_type_register_static (G_TYPE_OBJECT, "NetlistEditor", &netlist_editor_info, 0);
}
return netlist_editor_type;
}
void netlist_editor_save (GtkWidget *widget, NetlistEditor *nle)
{
char *name;
name = dialog_netlist_file ((SchematicView *)NULL);
if (name != NULL) {
GtkTextView *tview;
GtkTextBuffer *buffer;
GtkTextIter start, end;
FILE *fp;
tview = nle->priv->view;
buffer = gtk_text_view_get_buffer (tview);
gtk_text_buffer_get_start_iter (buffer, &start);
gtk_text_buffer_get_end_iter (buffer, &end);
fp = fopen (name, "wt");
if (!fp) {
gchar *msg;
msg = g_strdup_printf (_ ("The file %s could not be saved"), name);
oregano_error_with_title (_ ("Could not save temporary netlist file"), msg);
g_free (msg);
return;
}
fputs (gtk_text_buffer_get_text (buffer, &start, &end, FALSE), fp);
fclose (fp);
g_free (name);
}
}
// This method append OREGANO_LANGDIR directory where the netlist.lang file
// is located to the search path of GtkSourceLanguageManager.
void setup_language_manager_path (GtkSourceLanguageManager *lm)
{
gchar **lang_files;
const gchar *const *temp;
GPtrArray *dirs;
int i, lang_files_count;
char **new_langs;
dirs = g_ptr_array_new ();
// Stolen from gtranslator
for (temp = gtk_source_language_manager_get_search_path (lm); temp != NULL && *temp != NULL;
++temp)
g_ptr_array_add (dirs, g_strdup (*temp));
g_ptr_array_add (dirs, NULL);
lang_files = (gchar **)g_ptr_array_free (dirs, FALSE);
lang_files_count = g_strv_length (lang_files);
new_langs = g_new (char *, lang_files_count + 2);
for (i = 0; lang_files[i]; i++)
new_langs[i] = g_strdup (lang_files[i]);
new_langs[lang_files_count] = g_strdup (OREGANO_LANGDIR);
new_langs[lang_files_count + 1] = NULL;
g_strfreev (lang_files);
gtk_source_language_manager_set_search_path (lm, new_langs);
}
NetlistEditor *netlist_editor_new (GtkSourceBuffer *textbuffer)
{
NetlistEditor *nle;
GtkBuilder *gui;
GError *perror = NULL;
GtkWidget *toplevel;
GtkScrolledWindow *scroll;
GtkSourceView *source_view;
GtkSourceLanguageManager *lm;
GtkButton *save, *close;
GtkSourceLanguage *lang = NULL;
if (!textbuffer)
return NULL;
if ((gui = gtk_builder_new ()) == NULL) {
oregano_error (_ ("Could not create the netlist dialog"));
return NULL;
}
gtk_builder_set_translation_domain (gui, NULL);
nle = NETLIST_EDITOR (g_object_new (netlist_editor_get_type (), NULL));
if (gtk_builder_add_from_file (gui, OREGANO_UIDIR "/view-netlist.ui", &perror) <= 0) {
gchar *msg;
msg = perror->message;
oregano_error_with_title (_ ("Could not create the netlist dialog"), msg);
g_error_free (perror);
return NULL;
}
toplevel = GTK_WIDGET (gtk_builder_get_object (gui, "toplevel"));
gtk_window_set_default_size (GTK_WINDOW (toplevel), 800, 600);
gtk_window_set_title (GTK_WINDOW (toplevel), "Net List Editor\n");
scroll = GTK_SCROLLED_WINDOW (gtk_builder_get_object (gui, "netlist-scrolled-window"));
source_view = GTK_SOURCE_VIEW (gtk_source_view_new ());
lm = GTK_SOURCE_LANGUAGE_MANAGER (gtk_source_language_manager_new ());
setup_language_manager_path (lm);
g_object_set_data_full (G_OBJECT (source_view), "language-manager", lm,
(GDestroyNotify)g_object_unref);
lang = gtk_source_language_manager_get_language (lm, "netlist");
if (lang) {
const gchar *name = gtk_source_language_get_name (lang);
g_message ("Loading syntax highlighting %s from %s", name, OREGANO_LANGDIR "/netlist.lang");
gtk_source_buffer_set_language (GTK_SOURCE_BUFFER (textbuffer), lang);
gtk_source_buffer_set_highlight_syntax (GTK_SOURCE_BUFFER (textbuffer), TRUE);
gtk_source_buffer_set_highlight_matching_brackets (GTK_SOURCE_BUFFER (textbuffer), TRUE);
} else {
g_warning ("Can't load netlist.lang in %s", OREGANO_LANGDIR "/netlist.lang");
}
gtk_text_view_set_editable (GTK_TEXT_VIEW (source_view), TRUE);
gtk_text_view_set_buffer (GTK_TEXT_VIEW (source_view), GTK_TEXT_BUFFER (textbuffer));
gtk_container_add (GTK_CONTAINER (scroll), GTK_WIDGET (source_view));
close = GTK_BUTTON (gtk_builder_get_object (gui, "btn_close"));
g_signal_connect_swapped (G_OBJECT (close), "clicked", G_CALLBACK (g_object_unref),
G_OBJECT (nle));
save = GTK_BUTTON (gtk_builder_get_object (gui, "btn_save"));
g_signal_connect (G_OBJECT (save), "clicked", G_CALLBACK (netlist_editor_save), nle);
// Set tab, fonts, wrap mode, colors, etc. according
// to preferences
nle->priv->view = GTK_TEXT_VIEW (source_view);
nle->priv->toplevel = GTK_WINDOW (toplevel);
nle->priv->save = save;
nle->priv->close = close;
nle->priv->buffer = textbuffer;
gtk_widget_show_all (GTK_WIDGET (toplevel));
return nle;
}
NetlistEditor *netlist_editor_new_from_file (gchar *filename)
{
GtkSourceBuffer *buffer;
gchar *content;
gsize length;
GError *error = NULL;
NetlistEditor *editor;
if (!filename)
return NULL;
if (!(g_file_test (filename, G_FILE_TEST_EXISTS))) {
gchar *msg;
// gettext support
msg = g_strdup_printf (_ ("The file %s could not be found."), filename);
oregano_error_with_title (_ ("Could not find the required file"), msg);
g_free (msg);
return NULL;
}
buffer = gtk_source_buffer_new (NULL);
g_file_get_contents (filename, &content, &length, &error);
gtk_text_buffer_set_text (GTK_TEXT_BUFFER (buffer), content, -1);
editor = netlist_editor_new (buffer);
return editor;
}
void netlist_editor_init (NetlistEditor *nle)
{
nle->priv = g_new0 (NetlistEditorPriv, 1);
nle->priv->toplevel = NULL;
nle->priv->sv = NULL;
}
NetlistEditor *netlist_editor_new_from_schematic_view (SchematicView *sv)
{
NetlistEditor *editor;
gchar *name = "/tmp/oregano.netlist";
GError *e = NULL;
Schematic *sm;
OreganoEngine *engine;
sm = schematic_view_get_schematic (sv);
engine = oregano_engine_factory_create_engine (oregano.engine, sm);
oregano_engine_generate_netlist (engine, name, &e);
g_object_unref (engine);
if (e) {
if (g_error_matches (e, OREGANO_ERROR, OREGANO_SIMULATE_ERROR_NO_CLAMP) ||
g_error_matches (e, OREGANO_ERROR, OREGANO_SIMULATE_ERROR_NO_GND) ||
g_error_matches (e, OREGANO_ERROR, OREGANO_SIMULATE_ERROR_IO_ERROR)) {
log_append_error (schematic_get_log_store (sm), "Netlist",
_ ("Could not create a netlist"), e);
} else {
log_append_error (schematic_get_log_store (sm), "Netlist",
_ ("Unexpected error occured"), e);
}
g_clear_error (&e);
return NULL;
}
editor = netlist_editor_new_from_file (name);
if (editor) {
editor->priv->sv = sv;
}
return editor;
}
oregano-0.84.41/src/oregano.h 0000644 0001750 0001750 00000004651 13413640652 014736 0 ustar ruben ruben /*
* oregano.h
*
*
* Author:
* Richard Hult
* Ricardo Markiewicz
* Andres de Barbara
* Marc Lorber
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2004 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#ifndef __MAIN_H
#define __MAIN_H
#undef GTK_ENABLE_BROKEN
#include
G_BEGIN_DECLS
#define OREGANO_TYPE_APPLICATION (oregano_get_type ())
#define OREGANO_APPLICATION(obj) \
(G_TYPE_CHECK_INSTANCE_CAST ((obj), OREGANO_TYPE_APPLICATION, Oregano))
#define OREGANO_APPLICATION_CLASS(klass) \
(G_TYPE_CHECK_CLASS_CAST ((klass), OREGANO_TYPE_APPLICATION, OreganoClass))
#define OREGANO_IS_APPLICATION(obj) (G_TYPE_CHECK_INSTANCE_TYPE ((obj), OREGANO_TYPE_APPLICATION))
#define OREGANO_IS_APPLICATION_CLASS(klass) \
(G_TYPE_CHECK_CLASS_TYPE ((klass), OREGANO_TYPE_APPLICATION))
#define OREGANO_APPLICATION_GET_CLASS(obj) \
(G_TYPE_INSTANCE_GET_CLASS ((obj), OREGANO_TYPE_APPLICATION, OreganoClass))
typedef struct
{
GtkApplication parent_instance;
} Oregano;
typedef struct
{
GtkApplicationClass parent_class;
} OreganoClass;
typedef struct
{
GList *libraries;
GSList *clipboard;
GSettings *settings;
gint engine;
gboolean compress_files;
gboolean show_log;
gboolean show_splash;
} OreganoApp;
extern OreganoApp oregano;
extern int oregano_debugging;
Oregano *oregano_new (void);
G_END_DECLS
#endif
oregano-0.84.41/src/dialogs.c 0000644 0001750 0001750 00000020077 13413640652 014721 0 ustar ruben ruben /*
* Author:
* Richard Hult
* Ricardo Markiewicz
* Andres de Barbara
* Marc Lorber
* Bernhard Schuster
* Guido Trentalancia
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2006 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
* Copyright (C) 2013 Bernhard Schuster
* Copyright (C) 2017 Guido Trentalancia
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include
#include
#include
#include "dialogs.h"
#include "oregano.h"
#include "pixmaps/logo.xpm"
/*
* Schedule a call to the oregano_error() function so that it is
* called whenever there are no higher priority events pending.
*
* The caller should schedule this function call using the GLib
* function g_idle_add_full().
*/
gboolean oregano_schedule_error (gchar *msg) { oregano_error_with_title (msg, NULL); return G_SOURCE_REMOVE; }
/*
* Schedule a call to the oregano_error_with_title() function
* so that it is called whenever there are no higher priority
* events pending.
*
* The caller should schedule this function call using the GLib
* function g_idle_add_full().
*/
gboolean oregano_schedule_error_with_title (OreganoTitleMsg *tm)
{
oregano_error_with_title (tm->title, tm->msg);
g_free (tm->title);
g_free (tm->msg);
g_free (tm);
return G_SOURCE_REMOVE;
}
void oregano_error (gchar *msg) { oregano_error_with_title (msg, NULL); }
void oregano_error_with_title (gchar *title, gchar *msg)
{
GtkWidget *dialog;
GString *span_msg;
pid_t tid = 0;
#ifdef SYS_gettid
tid = syscall(SYS_gettid);
#endif
// make sure that this is running in the main thread
if (tid && (getpid() != tid)) {
OreganoTitleMsg *tm = g_malloc (sizeof (OreganoTitleMsg));
g_assert (tm != NULL);
tm->title = g_strdup (title);
tm->msg = g_strdup (msg);
g_idle_add_full (G_PRIORITY_DEFAULT_IDLE, (GSourceFunc) oregano_schedule_error_with_title, tm, NULL);
return;
}
span_msg = g_string_new ("");
span_msg = g_string_append (span_msg, title);
span_msg = g_string_append (span_msg, "");
if (msg && msg[0] != '\0') {
span_msg = g_string_append (span_msg, "\n\n");
span_msg = g_string_append (span_msg, msg);
}
dialog = gtk_message_dialog_new (NULL, GTK_DIALOG_MODAL, GTK_MESSAGE_ERROR,
GTK_BUTTONS_CLOSE, NULL);
gtk_message_dialog_set_markup (GTK_MESSAGE_DIALOG (dialog), span_msg->str);
gtk_dialog_set_default_response (GTK_DIALOG (dialog), GTK_RESPONSE_CLOSE);
gtk_dialog_run (GTK_DIALOG (dialog));
g_string_free (span_msg, TRUE);
gtk_widget_destroy (dialog);
}
/*
* Schedule a call to the oregano_warning() function so that it is
* called whenever there are no higher priority events pending.
*
* The caller should schedule this function call using the GLib
* function g_idle_add_full().
*/
gboolean oregano_schedule_warning (gchar *msg) { oregano_warning_with_title (msg, NULL); return G_SOURCE_REMOVE; }
/*
* Schedule a call to the oregano_warning_with_title() function
* so that it is called whenever there are no higher priority
* events pending.
*
* The caller should schedule this function call using the GLib
* function g_idle_add_full().
*/
gboolean oregano_schedule_warning_with_title (OreganoTitleMsg *tm)
{
oregano_warning_with_title (tm->title, tm->msg);
g_free (tm->title);
g_free (tm->msg);
g_free (tm);
return G_SOURCE_REMOVE;
}
void oregano_warning (gchar *msg) { oregano_warning_with_title (msg, NULL); }
void oregano_warning_with_title (gchar *title, gchar *msg)
{
GtkWidget *dialog;
GString *span_msg;
pid_t tid = 0;
#ifdef SYS_gettid
tid = syscall(SYS_gettid);
#endif
// make sure that this is running in the main thread
if (tid && (getpid() != tid)) {
OreganoTitleMsg *tm = g_malloc (sizeof (OreganoTitleMsg));
g_assert (tm != NULL);
tm->title = g_strdup (title);
tm->msg = g_strdup (msg);
g_idle_add_full (G_PRIORITY_DEFAULT_IDLE, (GSourceFunc) oregano_schedule_warning_with_title, tm, NULL);
return;
}
span_msg = g_string_new ("");
span_msg = g_string_append (span_msg, title);
span_msg = g_string_append (span_msg, "");
if (msg && msg[0] != '\0') {
span_msg = g_string_append (span_msg, "\n\n");
span_msg = g_string_append (span_msg, msg);
}
dialog = gtk_message_dialog_new (NULL, GTK_DIALOG_MODAL, GTK_MESSAGE_WARNING,
GTK_BUTTONS_CLOSE, NULL);
gtk_message_dialog_set_markup (GTK_MESSAGE_DIALOG (dialog), span_msg->str);
gtk_dialog_set_default_response (GTK_DIALOG (dialog), GTK_RESPONSE_CLOSE);
gtk_dialog_run (GTK_DIALOG (dialog));
g_string_free (span_msg, TRUE);
gtk_widget_destroy (dialog);
}
/*
* Schedule a call to the oregano_question() function so that it is
* called whenever there are no higher priority events pending.
*
* The caller should schedule this function call using the GLib
* function g_idle_add_full().
*/
gboolean oregano_schedule_question (OreganoQuestionAnswer *qa) {
qa->ans = oregano_question (qa->msg);
g_free (qa->msg);
return G_SOURCE_REMOVE;
}
gint oregano_question (gchar *msg)
{
GtkWidget *dialog;
gint ans;
dialog = gtk_message_dialog_new (NULL, GTK_DIALOG_MODAL, GTK_MESSAGE_QUESTION,
GTK_BUTTONS_YES_NO, NULL);
gtk_message_dialog_set_markup (GTK_MESSAGE_DIALOG (dialog), msg);
gtk_dialog_set_default_response (GTK_DIALOG (dialog), GTK_RESPONSE_CANCEL);
ans = gtk_dialog_run (GTK_DIALOG (dialog));
gtk_widget_destroy (dialog);
return (ans == GTK_RESPONSE_YES);
}
void dialog_about (void)
{
static GtkWidget *about = NULL;
GdkPixbuf *logo;
const gchar *authors[] = {"Richard Hult", "Margarita Manterola", "Andres de Barbara",
"Gustavo M. Pereyra", "Maximiliano Curia", "Ricardo Markiewicz",
"Marc Lorber", "Bernhard Schuster", "Guido Trentalancia",
NULL};
const char *docs[] = {"Ricardo Markiewicz (es)",
"Jordi Mallach (ca)",
"Marc Lorber (en)",
"Bernhard Schuster (de)",
NULL};
const gchar *copy = _ ("(c) 2017-2018 Guido Trentalancia\n"
"(c) 2012-2017 Bernhard Schuster\n"
"(c) 2009-2012 Marc Lorber\n"
"(c) 2003-2006 LUGFi\n"
"(c) 1999-2001 Richard Hult");
logo = gdk_pixbuf_new_from_xpm_data ((const char **)logo_xpm);
about = gtk_about_dialog_new ();
gtk_about_dialog_set_program_name (GTK_ABOUT_DIALOG (about), "Oregano");
gtk_about_dialog_set_version (GTK_ABOUT_DIALOG (about), VERSION);
gtk_about_dialog_set_copyright (GTK_ABOUT_DIALOG (about), copy);
gtk_about_dialog_set_comments (GTK_ABOUT_DIALOG (about),
_ ("Schematic capture and circuit simulation.\n"));
gtk_about_dialog_set_license (GTK_ABOUT_DIALOG (about), "GNU General Public License");
gtk_about_dialog_set_website (GTK_ABOUT_DIALOG (about), "https://ahoi.io/project/oregano");
gtk_about_dialog_set_authors (GTK_ABOUT_DIALOG (about), authors);
gtk_about_dialog_set_documenters (GTK_ABOUT_DIALOG (about), docs);
gtk_about_dialog_set_logo (GTK_ABOUT_DIALOG (about), logo);
gtk_dialog_run (GTK_DIALOG (about));
gtk_widget_destroy (about);
about = NULL;
}
oregano-0.84.41/src/settings.c 0000644 0001750 0001750 00000016626 13413640652 015144 0 ustar ruben ruben /*
* settings.c
*
*
* Authors:
* Richard Hult
* Ricardo Markiewicz
* Andres de Barbara
* Marc Lorber
* Bernhard Schuster
* Guido Trentalancia
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2006 Ricardo Markiewicz
* Copyright (C) 2008-2012 Marc Lorber
* Copyright (C) 2013 Bernhard Schuster
* Copyright (C) 2017 Guido Trentalancia
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include
#include
#include
#include
#include "oregano.h"
#include "string.h"
#include "settings.h"
#include "schematic.h"
#include "schematic-view.h"
#include "dialogs.h"
#include "oregano-utils.h"
#include "oregano-config.h"
typedef struct
{
Schematic *sm;
GtkWidget *pbox; // Property box
GtkWidget *w_show_splash;
GtkWidget *w_show_log;
GtkWidget *w_compress_files;
GtkWidget *w_engine;
} Settings;
#define SETTINGS(x) ((Settings *)(x))
GtkWidget *engine_path;
GtkWidget *button[OREGANO_ENGINE_COUNT];
static void apply_callback (GtkWidget *w, Settings *s)
{
oregano.engine = GPOINTER_TO_INT (g_object_get_data (G_OBJECT (s->w_engine), "id"));
oregano.compress_files = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (s->w_compress_files));
if (s->w_show_log)
oregano.show_log = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (s->w_show_log));
else
oregano.show_log = FALSE;
oregano.show_splash = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (s->w_show_splash));
oregano_config_save ();
gtk_widget_destroy (s->pbox);
s->pbox = NULL;
}
static void delete_event_callback (GtkWidget *w, GdkEvent *event, Settings *s)
{
apply_callback (w, s);
}
static void set_engine_name (GtkWidget *w, Settings *s)
{
int engine_id;
gchar *engine_name;
s->w_engine = w;
engine_id = GPOINTER_TO_INT (g_object_get_data (G_OBJECT (s->w_engine), "id"));
engine_name = oregano_engine_get_engine_name_by_index (engine_id);
if (g_find_program_in_path (engine_name) == NULL) {
if (gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (button[engine_id]))) {
GString *msg = g_string_new (_ ("Engine "));
msg = g_string_append (msg, engine_name);
msg = g_string_append (msg, _ (" not found\nThe engine is unable to locate "
"the external program."));
oregano_warning_with_title (_ ("Warning"), msg->str);
g_string_free (msg, TRUE);
engine_id = (engine_id + 1) % OREGANO_ENGINE_COUNT;
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (button[engine_id]), TRUE);
} else
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (button[engine_id]), FALSE);
}
g_free (engine_name);
}
gpointer settings_new (Schematic *sm)
{
Settings *s;
s = g_new0 (Settings, 1);
s->sm = sm;
return s;
}
void settings_show (GtkWidget *widget, SchematicView *sv)
{
gint i;
gboolean engine_available = FALSE;
gchar *engine_name;
GtkWidget *engine_group = NULL;
GtkWidget *w, *pbox, *toplevel;
GtkBuilder *gui;
GError *perror = NULL;
gchar *msg;
Settings *s;
Schematic *sm;
g_return_if_fail (sv != NULL);
for (i = 0; i < OREGANO_ENGINE_COUNT; i++) {
engine_name = oregano_engine_get_engine_name_by_index (i);
if (g_find_program_in_path(engine_name) != NULL) {
engine_available = TRUE;
}
g_free (engine_name);
}
if (!engine_available) {
gchar *msg;
msg = g_strdup_printf (_ ("No engine allowing analysis is available.\n"
"You need to install at least one engine ! \n"
"spice3, ngspice or gnucap."));
oregano_error_with_title (_ ("Could not create engine settings dialog"), msg);
g_free (msg);
}
if ((gui = gtk_builder_new ()) == NULL) {
oregano_error (_ ("Could not create settings dialog"));
return;
}
gtk_builder_set_translation_domain (gui, NULL);
sm = schematic_view_get_schematic (sv);
s = schematic_get_settings (sm);
// Only allow one instance of the property box per schematic.
if (GTK_WIDGET (SETTINGS (s)->pbox)) {
gdk_window_raise (gtk_widget_get_window (GTK_WIDGET (SETTINGS (s)->pbox)));
return;
}
if (gtk_builder_add_from_file (gui, OREGANO_UIDIR "/settings.ui", &perror) <= 0) {
msg = perror->message;
oregano_error_with_title (_ ("Could not create settings dialog"), msg);
g_error_free (perror);
return;
}
w = toplevel = GTK_WIDGET (gtk_builder_get_object (gui, "toplevel"));
if (!w) {
oregano_error (_ ("Could not create settings dialog"));
return;
}
g_signal_connect (G_OBJECT (w), "delete_event", G_CALLBACK (delete_event_callback), s);
pbox = toplevel;
s->pbox = GTK_WIDGET (pbox);
w = GTK_WIDGET (gtk_builder_get_object (gui, "close_bt"));
g_signal_connect (G_OBJECT (w), "clicked", G_CALLBACK (apply_callback), s);
w = GTK_WIDGET (gtk_builder_get_object (gui, "splash-enable"));
s->w_show_splash = w;
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (w), oregano.show_splash);
w = GTK_WIDGET (gtk_builder_get_object (gui, "compress-enable"));
s->w_compress_files = w;
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (w), oregano.compress_files);
if (engine_available) {
w = GTK_WIDGET (gtk_builder_get_object (gui, "log-enable"));
s->w_show_log = w;
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (w), oregano.show_log);
} else {
w = GTK_WIDGET (gtk_builder_get_object (gui, "log-enable"));
s->w_show_log = NULL;
gtk_widget_destroy (w);
}
w = GTK_WIDGET (gtk_builder_get_object (gui, "realtime-enable"));
gtk_widget_set_sensitive (w, FALSE);
if (engine_available) {
w = GTK_WIDGET (gtk_builder_get_object (gui, "engine_table"));
for (i = 0; i < OREGANO_ENGINE_COUNT; i++) {
engine_name = oregano_engine_get_engine_name_by_index (i);
if (engine_group)
button[i] = gtk_radio_button_new_with_label_from_widget (
GTK_RADIO_BUTTON (engine_group), engine_name);
else
button[i] = engine_group =
gtk_radio_button_new_with_label_from_widget (NULL, engine_name);
g_free (engine_name);
g_object_set_data (G_OBJECT (button[i]), "id", GUINT_TO_POINTER (i));
gtk_grid_attach (GTK_GRID (w), button[i], 0, i, 1, 1);
g_signal_connect (G_OBJECT (button[i]), "clicked", G_CALLBACK (set_engine_name), s);
}
} else {
w = GTK_WIDGET (gtk_builder_get_object (gui, "label50"));
gtk_widget_destroy (w);
}
// Is the engine available?
// In that case the button is active
engine_name = oregano_engine_get_engine_name_by_index (oregano.engine);
if (g_find_program_in_path (engine_name) != NULL)
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (button[oregano.engine]), TRUE);
// Otherwise the button is inactive
else
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (button[oregano.engine]), FALSE);
g_free (engine_name);
gtk_widget_show_all (toplevel);
}
oregano-0.84.41/src/clipboard.h 0000644 0001750 0001750 00000003077 13413640652 015244 0 ustar ruben ruben /*
* clipboard.h
*
*
* Authors:
* Richard Hult
* Ricardo Markiewicz
* Andres de Barbara
* Marc Lorber
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2004 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#ifndef __CLIPBOARD_H
#define __CLIPBOARD_H
typedef struct _ClipboardData ClipboardData;
typedef void (*ClipBoardFunction)(ClipboardData *data, gpointer user_data);
void clipboard_empty (void);
gboolean clipboard_is_empty (void);
void clipboard_foreach (ClipBoardFunction callback, gpointer user_data);
void clipboard_add_object (GObject *item);
GObjectClass *clipboard_data_get_item_class (ClipboardData *data);
GObject *clipboard_data_get_item_data (ClipboardData *data);
#endif
oregano-0.84.41/src/load-schematic.c 0000644 0001750 0001750 00000104650 13413640652 016154 0 ustar ruben ruben /*
* load-schematic.c
*
*
* Authors:
* Richard Hult
* Ricardo Markiewicz
* Andres de Barbara
* Marc Lorber
* Bernhard Schuster
* Guido Trentalancia
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2006 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
* Copyright (C) 2013-2014 Bernhard Schuster
* Copyright (C) 2017 Guido Trentalancia
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include
#include
#include "xml-compat.h"
#include "oregano.h"
#include "xml-helper.h"
#include "load-common.h"
#include "load-schematic.h"
#include "coords.h"
#include "part-label.h"
#include "schematic.h"
#include "sim-settings.h"
#include "textbox.h"
#include "errors.h"
#include "engines/netlist-helper.h"
#include "debug.h"
typedef enum {
PARSE_START,
PARSE_SCHEMATIC,
PARSE_TITLE,
PARSE_AUTHOR,
PARSE_VERSION,
PARSE_COMMENTS,
PARSE_SIMULATION_SETTINGS,
PARSE_TRANSIENT_SETTINGS,
PARSE_TRANSIENT_ENABLED,
PARSE_TRANSIENT_START,
PARSE_TRANSIENT_STOP,
PARSE_TRANSIENT_STEP,
PARSE_TRANSIENT_STEP_ENABLE,
PARSE_TRANSIENT_INIT_COND,
PARSE_TRANSIENT_ANALYZE_ALL,
PARSE_AC_SETTINGS,
PARSE_AC_ENABLED,
PARSE_AC_VOUT,
PARSE_AC_TYPE,
PARSE_AC_NPOINTS,
PARSE_AC_START,
PARSE_AC_STOP,
PARSE_DC_SETTINGS,
PARSE_DC_ENABLED,
PARSE_DC_VSRC,
PARSE_DC_VOUT,
PARSE_DC_START,
PARSE_DC_STOP,
PARSE_DC_STEP,
PARSE_FOURIER_SETTINGS,
PARSE_FOURIER_ENABLED,
PARSE_FOURIER_FREQ,
PARSE_FOURIER_VOUT,
PARSE_NOISE_SETTINGS,
PARSE_NOISE_ENABLED,
PARSE_NOISE_VSRC,
PARSE_NOISE_VOUT,
PARSE_NOISE_TYPE,
PARSE_NOISE_NPOINTS,
PARSE_NOISE_START,
PARSE_NOISE_STOP,
PARSE_OPTION_LIST,
PARSE_OPTION,
PARSE_OPTION_NAME,
PARSE_OPTION_VALUE,
PARSE_ZOOM,
PARSE_PARTS,
PARSE_PART,
PARSE_PART_NAME,
PARSE_PART_LIBNAME,
PARSE_PART_REFDES,
PARSE_PART_POSITION,
PARSE_PART_ROTATION,
PARSE_PART_FLIP,
PARSE_PART_SYMNAME,
PARSE_PART_TEMPLATE,
PARSE_PART_MODEL,
PARSE_PART_LABELS,
PARSE_PART_LABEL,
PARSE_PART_LABEL_NAME,
PARSE_PART_LABEL_TEXT,
PARSE_PART_LABEL_POS,
PARSE_PART_PROPERTIES,
PARSE_PART_PROPERTY,
PARSE_PART_PROPERTY_NAME,
PARSE_PART_PROPERTY_VALUE,
PARSE_WIRES,
PARSE_WIRE,
PARSE_WIRE_POINTS,
// PARSE_WIRE_LABEL,
PARSE_TEXTBOXES,
PARSE_TEXTBOX,
PARSE_TEXTBOX_TEXT,
PARSE_TEXTBOX_POSITION,
PARSE_FINISH,
PARSE_UNKNOWN,
PARSE_ERROR
} State;
typedef struct
{
State state;
State prev_state;
int unknown_depth;
GString *content;
Schematic *schematic;
SimSettings *sim_settings;
char *author;
char *title;
char *oregano_version;
char *comments;
char *textbox_text;
// Temporary place holder for a wire
Coords wire_start;
Coords wire_end;
// Temporary place holder for a part
LibraryPart *part;
PartLabel *label;
Property *property;
Coords pos;
int rotation;
IDFlip flip;
// Temporary place holder for an option
SimOption *option;
} ParseState;
static xmlEntityPtr get_entity (void *user_data, const xmlChar *name);
static void start_document (ParseState *state);
static void end_document (ParseState *state);
static void start_element (ParseState *state, const xmlChar *name, const xmlChar **attrs);
static void end_element (ParseState *state, const xmlChar *name);
static void my_characters (ParseState *state, const xmlChar *chars, int len);
static void my_warning (void *user_data, const char *msg, ...);
static void my_error (void *user_data, const char *msg, ...);
static void my_fatal_error (void *user_data, const char *msg, ...);
static void create_wire (ParseState *state);
static void create_part (ParseState *state);
static xmlSAXHandler oreganoSAXParser = {
0, // internalSubset
0, // isStandalone
0, // hasInternalSubset
0, // hasExternalSubset
0, // resolveEntity
(getEntitySAXFunc)get_entity, // getEntity
0, // entityDecl
0, // notationDecl
0, // attributeDecl
0, // elementDecl
0, // unparsedEntityDecl
0, // setDocumentLocator
(startDocumentSAXFunc)start_document, // startDocument
(endDocumentSAXFunc)end_document, // endDocument
(startElementSAXFunc)start_element, // startElement
(endElementSAXFunc)end_element, // endElement
0, // reference
(charactersSAXFunc)my_characters, // characters
0, // ignorableWhitespace
0, // processingInstruction
0, //(commentSAXFunc)0, comment
(warningSAXFunc)my_warning, // warning
(errorSAXFunc)my_error, // error
(fatalErrorSAXFunc)my_fatal_error, // fatalError
};
static void create_textbox (ParseState *state)
{
Textbox *textbox;
textbox = textbox_new (NULL);
textbox_set_text (textbox, state->textbox_text);
item_data_set_pos (ITEM_DATA (textbox), &state->pos);
schematic_add_item (state->schematic, ITEM_DATA (textbox));
}
static void create_wire (ParseState *state)
{
Coords start_pos, length;
Wire *wire;
start_pos.x = state->wire_start.x;
start_pos.y = state->wire_start.y;
length.x = state->wire_end.x - start_pos.x;
length.y = state->wire_end.y - start_pos.y;
wire = wire_new ();
wire_set_length (wire, &length);
item_data_set_pos (ITEM_DATA (wire), &state->wire_start);
schematic_add_item (state->schematic, ITEM_DATA (wire));
}
static void create_part (ParseState *state)
{
Part *part;
LibraryPart *library_part = state->part;
part = part_new_from_library_part (library_part);
if (!part) {
g_warning ("Failed to create Part from LibraryPart");
return;
}
item_data_set_pos (ITEM_DATA (part), &state->pos);
item_data_rotate (ITEM_DATA (part), state->rotation, NULL);
if (state->flip & ID_FLIP_HORIZ)
item_data_flip (ITEM_DATA (part), ID_FLIP_HORIZ, NULL);
if (state->flip & ID_FLIP_VERT)
item_data_flip (ITEM_DATA (part), ID_FLIP_VERT, NULL);
schematic_add_item (state->schematic, ITEM_DATA (part));
}
int schematic_parse_xml_file (Schematic *sm, const char *filename, GError **error)
{
ParseState state;
int retval = 0;
state.schematic = sm;
state.sim_settings = schematic_get_sim_settings (sm);
state.author = NULL;
state.title = NULL;
state.oregano_version = NULL;
state.comments = NULL;
if (!oreganoXmlSAXParseFile (&oreganoSAXParser, &state, filename)) {
g_warning ("Document not well formed!");
if (error != NULL) {
g_set_error (error, OREGANO_ERROR, OREGANO_SCHEMATIC_BAD_FILE_FORMAT,
_ ("Bad file format."));
}
retval = -1;
}
if (state.state == PARSE_ERROR) {
if (error != NULL) {
g_set_error (error, OREGANO_ERROR, OREGANO_SCHEMATIC_BAD_FILE_FORMAT,
_ ("Unknown parser error."));
}
retval = -2;
}
schematic_set_filename(sm, filename);
schematic_set_author (sm, state.author);
schematic_set_title (sm, state.title);
schematic_set_version(sm, state.oregano_version);
schematic_set_comments (sm, state.comments);
g_free(state.author);
g_free(state.title);
g_free(state.oregano_version);
g_free(state.comments);
update_schematic(sm);
return retval;
}
static void start_document (ParseState *state)
{
state->state = PARSE_START;
state->unknown_depth = 0;
state->prev_state = PARSE_UNKNOWN;
state->content = g_string_sized_new (128);
state->part = NULL;
}
static void end_document (ParseState *state)
{
if (state->unknown_depth != 0)
g_warning ("unknown_depth != 0 (%d)", state->unknown_depth);
}
static void start_element (ParseState *state, const xmlChar *name, const xmlChar **attrs)
{
switch (state->state) {
case PARSE_START:
if (xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:schematic")) {
g_warning ("Expecting 'ogo:schematic'. Got '%s'", name);
state->state = PARSE_ERROR;
} else
state->state = PARSE_SCHEMATIC;
break;
case PARSE_SCHEMATIC:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:author")) {
state->state = PARSE_AUTHOR;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:title")) {
state->state = PARSE_TITLE;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:version")) {
state->state = PARSE_VERSION;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:comments")) {
state->state = PARSE_COMMENTS;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:zoom")) {
state->state = PARSE_ZOOM;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:simulation-settings")) {
state->state = PARSE_SIMULATION_SETTINGS;
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:parts")) {
state->state = PARSE_PARTS;
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:wires")) {
state->state = PARSE_WIRES;
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:textboxes")) {
state->state = PARSE_TEXTBOXES;
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_SIMULATION_SETTINGS:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:transient")) {
state->state = PARSE_TRANSIENT_SETTINGS;
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:ac")) {
state->state = PARSE_AC_SETTINGS;
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:dc-sweep")) {
state->state = PARSE_DC_SETTINGS;
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:fourier")) {
state->state = PARSE_FOURIER_SETTINGS;
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:noise")) {
state->state = PARSE_NOISE_SETTINGS;
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:options")) {
state->state = PARSE_OPTION_LIST;
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_TRANSIENT_SETTINGS:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:enabled")) {
state->state = PARSE_TRANSIENT_ENABLED;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:start")) {
state->state = PARSE_TRANSIENT_START;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:stop")) {
state->state = PARSE_TRANSIENT_STOP;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:step")) {
state->state = PARSE_TRANSIENT_STEP;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:step-enabled")) {
state->state = PARSE_TRANSIENT_STEP_ENABLE;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:init-conditions")) {
state->state = PARSE_TRANSIENT_INIT_COND;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:analyze-all")) {
state->state = PARSE_TRANSIENT_ANALYZE_ALL;
g_string_truncate (state->content, 0);
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_AC_SETTINGS:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:enabled")) {
state->state = PARSE_AC_ENABLED;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:vout1")) {
state->state = PARSE_AC_VOUT;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:type")) {
state->state = PARSE_AC_TYPE;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:npoints")) {
state->state = PARSE_AC_NPOINTS;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:start")) {
state->state = PARSE_AC_START;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:stop")) {
state->state = PARSE_AC_STOP;
g_string_truncate (state->content, 0);
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_DC_SETTINGS:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:enabled")) {
state->state = PARSE_DC_ENABLED;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:vsrc1")) {
state->state = PARSE_DC_VSRC;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:vout1")) {
state->state = PARSE_DC_VOUT;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:start1")) {
state->state = PARSE_DC_START;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:stop1")) {
state->state = PARSE_DC_STOP;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:step1")) {
state->state = PARSE_DC_STEP;
g_string_truncate (state->content, 0);
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_FOURIER_SETTINGS:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:enabled")) {
state->state = PARSE_FOURIER_ENABLED;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:freq")) {
state->state = PARSE_FOURIER_FREQ;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:vout")) {
state->state = PARSE_FOURIER_VOUT;
g_string_truncate (state->content, 0);
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_NOISE_SETTINGS:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:enabled")) {
state->state = PARSE_NOISE_ENABLED;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:vsrc1")) {
state->state = PARSE_NOISE_VSRC;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:vout1")) {
state->state = PARSE_NOISE_VOUT;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:type")) {
state->state = PARSE_NOISE_TYPE;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:npoints")) {
state->state = PARSE_NOISE_NPOINTS;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:start")) {
state->state = PARSE_NOISE_START;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:stop")) {
state->state = PARSE_NOISE_STOP;
g_string_truncate (state->content, 0);
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_OPTION_LIST:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:option")) {
state->state = PARSE_OPTION;
state->option = g_new0 (SimOption, 1);
g_string_truncate (state->content, 0);
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_OPTION:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:name")) {
state->state = PARSE_OPTION_NAME;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:value")) {
state->state = PARSE_OPTION_VALUE;
g_string_truncate (state->content, 0);
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_PARTS:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:part")) {
state->state = PARSE_PART;
state->part = g_new0 (LibraryPart, 1);
state->rotation = 0;
state->flip = ID_FLIP_NONE;
state->label = NULL;
state->property = NULL;
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_PART:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:name")) {
state->state = PARSE_PART_NAME;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:library")) {
state->state = PARSE_PART_LIBNAME;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:refdes")) {
state->state = PARSE_PART_REFDES;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:position")) {
state->state = PARSE_PART_POSITION;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:rotation")) {
state->state = PARSE_PART_ROTATION;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:flip")) {
state->state = PARSE_PART_FLIP;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:template")) {
state->state = PARSE_PART_TEMPLATE;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:model")) {
state->state = PARSE_PART_MODEL;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:symbol")) {
state->state = PARSE_PART_SYMNAME;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:labels")) {
state->state = PARSE_PART_LABELS;
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:properties")) {
state->state = PARSE_PART_PROPERTIES;
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_PART_LABELS:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:label")) {
state->state = PARSE_PART_LABEL;
state->label = g_new0 (PartLabel, 1);
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_PART_LABEL:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:name")) {
state->state = PARSE_PART_LABEL_NAME;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:text")) {
state->state = PARSE_PART_LABEL_TEXT;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:position")) {
state->state = PARSE_PART_LABEL_POS;
g_string_truncate (state->content, 0);
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_PART_PROPERTIES:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:property")) {
state->state = PARSE_PART_PROPERTY;
state->property = g_new0 (Property, 1);
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_PART_PROPERTY:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:name")) {
state->state = PARSE_PART_PROPERTY_NAME;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:value")) {
state->state = PARSE_PART_PROPERTY_VALUE;
g_string_truncate (state->content, 0);
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_WIRES:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:wire")) {
state->state = PARSE_WIRE;
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_WIRE:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:points")) {
state->state = PARSE_WIRE_POINTS;
g_string_truncate (state->content, 0);
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_TEXTBOXES:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:textbox")) {
state->state = PARSE_TEXTBOX;
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_TEXTBOX:
if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:position")) {
state->state = PARSE_TEXTBOX_POSITION;
g_string_truncate (state->content, 0);
} else if (!xmlStrcmp (BAD_CAST name, BAD_CAST "ogo:text")) {
state->state = PARSE_TEXTBOX_TEXT;
g_string_truncate (state->content, 0);
} else {
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
}
break;
case PARSE_TRANSIENT_ENABLED:
case PARSE_TRANSIENT_START:
case PARSE_TRANSIENT_STOP:
case PARSE_TRANSIENT_STEP:
case PARSE_TRANSIENT_STEP_ENABLE:
case PARSE_AC_ENABLED:
case PARSE_AC_VOUT:
case PARSE_AC_TYPE:
case PARSE_AC_NPOINTS:
case PARSE_AC_START:
case PARSE_AC_STOP:
case PARSE_DC_ENABLED:
case PARSE_DC_VSRC:
case PARSE_DC_VOUT:
case PARSE_DC_START:
case PARSE_DC_STOP:
case PARSE_DC_STEP:
case PARSE_FOURIER_ENABLED:
case PARSE_FOURIER_FREQ:
case PARSE_FOURIER_VOUT:
case PARSE_NOISE_ENABLED:
case PARSE_NOISE_VSRC:
case PARSE_NOISE_VOUT:
case PARSE_NOISE_TYPE:
case PARSE_NOISE_NPOINTS:
case PARSE_NOISE_START:
case PARSE_NOISE_STOP:
case PARSE_WIRE_POINTS:
case PARSE_OPTION_NAME:
case PARSE_OPTION_VALUE:
case PARSE_PART_NAME:
case PARSE_PART_LIBNAME:
case PARSE_PART_TEMPLATE:
case PARSE_PART_MODEL:
case PARSE_PART_REFDES:
case PARSE_PART_POSITION:
case PARSE_PART_ROTATION:
case PARSE_PART_FLIP:
case PARSE_PART_SYMNAME:
case PARSE_PART_LABEL_NAME:
case PARSE_PART_LABEL_TEXT:
case PARSE_PART_LABEL_POS:
case PARSE_PART_PROPERTY_NAME:
case PARSE_PART_PROPERTY_VALUE:
case PARSE_TEXTBOX_POSITION:
case PARSE_TEXTBOX_TEXT:
case PARSE_ZOOM:
case PARSE_TITLE:
case PARSE_AUTHOR:
case PARSE_VERSION:
case PARSE_COMMENTS:
case PARSE_TRANSIENT_INIT_COND:
case PARSE_TRANSIENT_ANALYZE_ALL:
// there should be no tags inside these types of tags
g_message ("*** '%s' tag found", name);
state->prev_state = state->state;
state->state = PARSE_UNKNOWN;
state->unknown_depth++;
break;
case PARSE_ERROR:
break;
case PARSE_UNKNOWN:
state->unknown_depth++;
break;
case PARSE_FINISH:
// should not start new elements in this state
g_assert_not_reached ();
break;
}
// g_message("Start element %s (state %s)", name, states[state->state]);
}
static void end_element (ParseState *state, const xmlChar *name)
{
GList *libs;
Schematic *schematic = state->schematic;
switch (state->state) {
case PARSE_UNKNOWN:
state->unknown_depth--;
if (state->unknown_depth == 0)
state->state = state->prev_state;
break;
case PARSE_AUTHOR:
state->author = g_strdup (state->content->str);
state->state = PARSE_SCHEMATIC;
break;
case PARSE_TITLE:
state->title = g_strdup (state->content->str);
state->state = PARSE_SCHEMATIC;
break;
case PARSE_VERSION:
state->oregano_version = g_strdup (state->content->str);
state->state = PARSE_SCHEMATIC;
break;
case PARSE_COMMENTS:
state->comments = g_strdup (state->content->str);
state->state = PARSE_SCHEMATIC;
break;
case PARSE_ZOOM: {
double zoom;
zoom = g_strtod (state->content->str, NULL);
schematic_set_zoom (state->schematic, zoom);
state->state = PARSE_SCHEMATIC;
break;
}
case PARSE_SIMULATION_SETTINGS:
state->state = PARSE_SCHEMATIC;
break;
case PARSE_TRANSIENT_SETTINGS:
state->state = PARSE_SIMULATION_SETTINGS;
break;
case PARSE_TRANSIENT_ENABLED:
sim_settings_set_trans (state->sim_settings,
!g_ascii_strcasecmp (state->content->str, "true"));
state->state = PARSE_TRANSIENT_SETTINGS;
break;
case PARSE_TRANSIENT_START:
sim_settings_set_trans_start (state->sim_settings, state->content->str);
state->state = PARSE_TRANSIENT_SETTINGS;
break;
case PARSE_TRANSIENT_STOP:
sim_settings_set_trans_stop (state->sim_settings, state->content->str);
state->state = PARSE_TRANSIENT_SETTINGS;
break;
case PARSE_TRANSIENT_STEP:
sim_settings_set_trans_step (state->sim_settings, state->content->str);
state->state = PARSE_TRANSIENT_SETTINGS;
break;
case PARSE_TRANSIENT_STEP_ENABLE:
sim_settings_set_trans_step_enable (state->sim_settings,
!g_ascii_strcasecmp (state->content->str, "true"));
state->state = PARSE_TRANSIENT_SETTINGS;
break;
case PARSE_TRANSIENT_INIT_COND:
sim_settings_set_trans_init_cond (state->sim_settings,
!g_ascii_strcasecmp (state->content->str, "true"));
state->state = PARSE_TRANSIENT_SETTINGS;
break;
case PARSE_TRANSIENT_ANALYZE_ALL:
sim_settings_set_trans_analyze_all(state->sim_settings,
!g_ascii_strcasecmp (state->content->str, "true"));
state->state = PARSE_TRANSIENT_SETTINGS;
break;
case PARSE_AC_SETTINGS:
state->state = PARSE_SIMULATION_SETTINGS;
break;
case PARSE_AC_ENABLED:
sim_settings_set_ac (state->sim_settings,
!g_ascii_strcasecmp (state->content->str, "true"));
state->state = PARSE_AC_SETTINGS;
break;
case PARSE_AC_VOUT:
sim_settings_set_ac_vout (state->sim_settings, state->content->str);
state->state = PARSE_AC_SETTINGS;
break;
case PARSE_AC_TYPE:
sim_settings_set_ac_type (state->sim_settings, state->content->str);
state->state = PARSE_AC_SETTINGS;
break;
case PARSE_AC_NPOINTS:
sim_settings_set_ac_npoints (state->sim_settings, state->content->str);
state->state = PARSE_AC_SETTINGS;
break;
case PARSE_AC_START:
sim_settings_set_ac_start (state->sim_settings, state->content->str);
state->state = PARSE_AC_SETTINGS;
break;
case PARSE_AC_STOP:
sim_settings_set_ac_stop (state->sim_settings, state->content->str);
state->state = PARSE_AC_SETTINGS;
break;
case PARSE_DC_SETTINGS:
state->state = PARSE_SIMULATION_SETTINGS;
break;
case PARSE_DC_ENABLED:
sim_settings_set_dc (state->sim_settings,
!g_ascii_strcasecmp (state->content->str, "true"));
state->state = PARSE_DC_SETTINGS;
break;
case PARSE_DC_VSRC:
sim_settings_set_dc_vsrc (state->sim_settings, state->content->str);
state->state = PARSE_DC_SETTINGS;
break;
case PARSE_DC_VOUT:
sim_settings_set_dc_vout (state->sim_settings, state->content->str);
state->state = PARSE_DC_SETTINGS;
break;
case PARSE_DC_START:
sim_settings_set_dc_start (state->sim_settings, state->content->str);
state->state = PARSE_DC_SETTINGS;
break;
case PARSE_DC_STOP:
sim_settings_set_dc_stop (state->sim_settings, state->content->str);
state->state = PARSE_DC_SETTINGS;
break;
case PARSE_DC_STEP:
sim_settings_set_dc_step (state->sim_settings, state->content->str);
state->state = PARSE_DC_SETTINGS;
break;
case PARSE_FOURIER_SETTINGS:
state->state = PARSE_SIMULATION_SETTINGS;
break;
case PARSE_FOURIER_ENABLED:
sim_settings_set_fourier (state->sim_settings,
!g_ascii_strcasecmp (state->content->str, "true"));
state->state = PARSE_FOURIER_SETTINGS;
break;
case PARSE_FOURIER_FREQ:
sim_settings_set_fourier_frequency (state->sim_settings, state->content->str);
state->state = PARSE_FOURIER_SETTINGS;
break;
case PARSE_FOURIER_VOUT:
sim_settings_set_fourier_vout (state->sim_settings, state->content->str);
state->state = PARSE_FOURIER_SETTINGS;
break;
case PARSE_NOISE_SETTINGS:
state->state = PARSE_SIMULATION_SETTINGS;
break;
case PARSE_NOISE_ENABLED:
sim_settings_set_noise (state->sim_settings,
!g_ascii_strcasecmp (state->content->str, "true"));
state->state = PARSE_NOISE_SETTINGS;
break;
case PARSE_NOISE_VSRC:
sim_settings_set_noise_vsrc (state->sim_settings, state->content->str);
state->state = PARSE_NOISE_SETTINGS;
break;
case PARSE_NOISE_VOUT:
sim_settings_set_noise_vout (state->sim_settings, state->content->str);
state->state = PARSE_NOISE_SETTINGS;
break;
case PARSE_NOISE_TYPE:
sim_settings_set_noise_type (state->sim_settings, state->content->str);
state->state = PARSE_NOISE_SETTINGS;
break;
case PARSE_NOISE_NPOINTS:
sim_settings_set_noise_npoints (state->sim_settings, state->content->str);
state->state = PARSE_NOISE_SETTINGS;
break;
case PARSE_NOISE_START:
sim_settings_set_noise_start (state->sim_settings, state->content->str);
state->state = PARSE_NOISE_SETTINGS;
break;
case PARSE_NOISE_STOP:
sim_settings_set_noise_stop (state->sim_settings, state->content->str);
state->state = PARSE_NOISE_SETTINGS;
break;
case PARSE_OPTION_LIST:
state->state = PARSE_SIMULATION_SETTINGS;
break;
case PARSE_OPTION:
state->state = PARSE_OPTION_LIST;
sim_settings_add_option (state->sim_settings, state->option);
state->option = g_new0 (SimOption, 1);
break;
case PARSE_OPTION_NAME:
state->option->name = g_strdup (state->content->str);
state->state = PARSE_OPTION;
break;
case PARSE_OPTION_VALUE:
state->option->value = g_strdup (state->content->str);
state->state = PARSE_OPTION;
break;
case PARSE_PARTS:
state->state = PARSE_SCHEMATIC;
break;
case PARSE_PART:
create_part (state);
state->state = PARSE_PARTS;
break;
case PARSE_PART_NAME:
state->part->name = g_strdup (state->content->str);
state->state = PARSE_PART;
break;
case PARSE_PART_LIBNAME:
state->state = PARSE_PART;
state->part->library = NULL;
libs = oregano.libraries;
while (libs) {
Library *lib = (Library *)libs->data;
if (g_ascii_strcasecmp (state->content->str, lib->name) == 0) {
state->part->library = lib;
break;
}
libs = libs->next;
}
break;
case PARSE_PART_POSITION:
sscanf (state->content->str, "(%lf %lf)", &state->pos.x, &state->pos.y);
// Try to fix invalid positions
if (state->pos.x < 0)
state->pos.x = -state->pos.x;
if (state->pos.y < 0)
state->pos.y = -state->pos.y;
// Determine the maximum parts' coordinates to be used during sheet creation
if (state->pos.x > schematic_get_width(schematic))
schematic_set_width(schematic, (guint) state->pos.x);
if (state->pos.y > schematic_get_height(schematic))
schematic_set_height(schematic, (guint) state->pos.y);
state->state = PARSE_PART;
break;
case PARSE_PART_ROTATION:
sscanf (state->content->str, "%d", &state->rotation);
state->state = PARSE_PART;
break;
case PARSE_PART_FLIP:
if (g_ascii_strcasecmp (state->content->str, "horizontal") == 0)
state->flip = state->flip | ID_FLIP_HORIZ;
else if (g_ascii_strcasecmp (state->content->str, "vertical") == 0)
state->flip = state->flip | ID_FLIP_VERT;
state->state = PARSE_PART;
break;
case PARSE_PART_REFDES:
state->part->refdes = g_strdup (state->content->str);
state->state = PARSE_PART;
break;
case PARSE_PART_TEMPLATE:
state->part->template = g_strdup (state->content->str);
state->state = PARSE_PART;
break;
case PARSE_PART_MODEL:
state->part->model = g_strdup (state->content->str);
state->state = PARSE_PART;
break;
case PARSE_PART_SYMNAME:
state->part->symbol_name = g_strdup (state->content->str);
state->state = PARSE_PART;
break;
case PARSE_PART_LABELS:
state->state = PARSE_PART;
break;
case PARSE_PART_LABEL:
state->state = PARSE_PART_LABELS;
state->part->labels = g_slist_prepend (state->part->labels, state->label);
break;
case PARSE_PART_LABEL_NAME:
state->label->name = g_strdup (state->content->str);
state->state = PARSE_PART_LABEL;
break;
case PARSE_PART_LABEL_TEXT:
state->label->text = g_strdup (state->content->str);
state->state = PARSE_PART_LABEL;
break;
case PARSE_PART_LABEL_POS:
sscanf (state->content->str, "(%lf %lf)", &state->label->pos.x, &state->label->pos.y);
state->state = PARSE_PART_LABEL;
break;
case PARSE_PART_PROPERTIES:
state->state = PARSE_PART;
break;
case PARSE_PART_PROPERTY:
state->state = PARSE_PART_PROPERTIES;
state->part->properties = g_slist_prepend (state->part->properties, state->property);
break;
case PARSE_PART_PROPERTY_NAME:
state->property->name = g_strdup (state->content->str);
state->state = PARSE_PART_PROPERTY;
break;
case PARSE_PART_PROPERTY_VALUE:
state->property->value = g_strdup (state->content->str);
state->state = PARSE_PART_PROPERTY;
break;
case PARSE_WIRES:
state->state = PARSE_SCHEMATIC;
break;
case PARSE_WIRE:
state->state = PARSE_WIRES;
break;
case PARSE_WIRE_POINTS:
sscanf (state->content->str, "(%lf %lf)(%lf %lf)", &state->wire_start.x,
&state->wire_start.y, &state->wire_end.x, &state->wire_end.y);
create_wire (state);
state->state = PARSE_WIRE;
break;
case PARSE_TEXTBOXES:
state->state = PARSE_SCHEMATIC;
break;
case PARSE_TEXTBOX:
create_textbox (state);
state->state = PARSE_TEXTBOXES;
break;
case PARSE_TEXTBOX_POSITION:
sscanf (state->content->str, "(%lf %lf)", &state->pos.x, &state->pos.y);
state->state = PARSE_TEXTBOX;
break;
case PARSE_TEXTBOX_TEXT:
state->textbox_text = g_strdup (state->content->str);
state->state = PARSE_TEXTBOX;
break;
case PARSE_SCHEMATIC:
// The end of the file.
state->state = PARSE_FINISH;
break;
case PARSE_ERROR:
break;
case PARSE_START:
case PARSE_FINISH:
// There should not be a closing tag in this state.
g_assert_not_reached ();
break;
}
}
static void my_characters (ParseState *state, const xmlChar *chars, int len)
{
int i;
if (state->state == PARSE_FINISH || state->state == PARSE_START ||
state->state == PARSE_PARTS || state->state == PARSE_PART)
return;
for (i = 0; i < len; i++)
g_string_append_c (state->content, chars[i]);
}
static xmlEntityPtr get_entity (void *user_data, const xmlChar *name)
{
return xmlGetPredefinedEntity (name);
}
static void my_warning (void *user_data, const char *msg, ...)
{
va_list args;
va_start (args, msg);
g_logv ("XML", G_LOG_LEVEL_WARNING, msg, args);
va_end (args);
}
// FIXME this should not be critical but forward to the oregano log buffer
static void my_error (void *user_data, const char *msg, ...)
{
va_list args;
va_start (args, msg);
g_logv ("XML", G_LOG_LEVEL_CRITICAL, msg, args);
va_end (args);
}
static void my_fatal_error (void *user_data, const char *msg, ...)
{
va_list args;
va_start (args, msg);
g_logv ("XML", G_LOG_LEVEL_ERROR, msg, args);
va_end (args);
}
oregano-0.84.41/src/simulation.c 0000644 0001750 0001750 00000017553 13413640652 015470 0 ustar ruben ruben /*
* simulation.c
*
*
* Authors:
* Richard Hult
* Ricardo Markiewicz
* Andres de Barbara
* Marc Lorber
* Bernhard Schuster
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2006 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
* Copyright (C) 2013-2014 Bernhard Schuster
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include
#include
#include
#include "oregano.h"
#include "simulation.h"
#include "schematic.h"
#include "schematic-view.h"
#include "dialogs.h"
#include "oregano-utils.h"
#include "oregano-config.h"
#include "plot.h"
#include "gnucap.h"
#include "log.h"
//NULL terminated
const char *SimulationFunctionTypeString[] = {
"Subtraction",
"Division",
NULL
};
typedef struct
{
Schematic *sm;
SchematicView *sv;
GtkDialog *dialog;
OreganoEngine *engine;
GtkProgressBar *progress_solver;
GtkLabel *progress_label_solver;
GtkProgressBar *progress_reader;
GtkLabel *progress_label_reader;
int progress_timeout_id;
Log *logstore;
} Simulation;
static int progress_bar_timeout_cb (Simulation *s);
static void cancel_cb (GtkWidget *widget, gint arg1, Simulation *s);
static void engine_done_cb (OreganoEngine *engine, Simulation *s);
static void engine_aborted_cb (OreganoEngine *engine, Simulation *s);
static gboolean simulate_cmd (Simulation *s);
static int delete_event_cb (GtkWidget *widget, GdkEvent *event, gpointer data) { return FALSE; }
gpointer simulation_new (Schematic *sm, Log *logstore)
{
Simulation *s;
s = g_new0 (Simulation, 1);
s->sm = sm;
s->sv = NULL;
s->logstore = logstore;
return s;
}
void simulation_show_progress_bar (GtkWidget *widget, SchematicView *sv)
{
GtkWidget *w;
GtkBuilder *gui;
GError *e = NULL;
Simulation *s;
Schematic *sm;
g_return_if_fail (sv != NULL);
if (oregano.engine < 0 || oregano.engine >= OREGANO_ENGINE_COUNT)
return;
sm = schematic_view_get_schematic (sv);
s = schematic_get_simulation (sm);
if ((gui = gtk_builder_new ()) == NULL) {
log_append (s->logstore, _ ("Simulation"),
_ ("Could not create simulation dialog - Builder creation failed."));
return;
}
gtk_builder_set_translation_domain (gui, NULL);
// Only allow one instance of the dialog box per schematic.
if (s->dialog) {
gdk_window_raise (gtk_widget_get_window (GTK_WIDGET (s->dialog)));
return;
}
if (gtk_builder_add_from_file (gui, OREGANO_UIDIR "/simulation.ui", &e) <= 0) {
log_append_error (s->logstore, _ ("Simulation"), _ ("Could not create simulation dialog"),
e);
g_clear_error (&e);
return;
}
w = GTK_WIDGET (gtk_builder_get_object (gui, "toplevel"));
if (!w) {
log_append (s->logstore, _ ("Simulation"),
_ ("Could not create simulation dialog - .ui file lacks widget "
"called \"toplevel\"."));
return;
}
s->dialog = GTK_DIALOG (w);
g_signal_connect (G_OBJECT (w), "delete_event", G_CALLBACK (delete_event_cb), s);
/**
* progress bars and progress labels
*/
w = GTK_WIDGET (gtk_builder_get_object (gui, "progressbar_solver"));
s->progress_solver = GTK_PROGRESS_BAR (w);
gtk_progress_bar_set_fraction (GTK_PROGRESS_BAR (s->progress_solver), 0.0);
w = GTK_WIDGET (gtk_builder_get_object (gui, "progress_label_solver"));
s->progress_label_solver = GTK_LABEL (w);
w = GTK_WIDGET (gtk_builder_get_object (gui, "progressbar_reader"));
s->progress_reader = GTK_PROGRESS_BAR (w);
gtk_progress_bar_set_fraction (GTK_PROGRESS_BAR (s->progress_reader), 0.0);
w = GTK_WIDGET (gtk_builder_get_object (gui, "progress_label_reader"));
s->progress_label_reader = GTK_LABEL (w);
g_signal_connect (G_OBJECT (s->dialog), "response", G_CALLBACK (cancel_cb), s);
gtk_widget_show_all (GTK_WIDGET (s->dialog));
s->sv = sv;
simulate_cmd (s);
}
static int progress_bar_timeout_cb (Simulation *s)
{
g_return_val_if_fail (s != NULL, FALSE);
double p = 0;
oregano_engine_get_progress_solver (s->engine, &p);
gtk_progress_bar_set_fraction (GTK_PROGRESS_BAR (s->progress_solver), p);
gchar *current_operation = oregano_engine_get_current_operation_solver(s->engine);
gchar *str = g_strdup_printf (_ ("Progress: %s"), current_operation);
g_free(current_operation);
gtk_label_set_markup (s->progress_label_solver, str);
g_free (str);
p = 0;
oregano_engine_get_progress_reader (s->engine, &p);
gtk_progress_bar_set_fraction (GTK_PROGRESS_BAR (s->progress_reader), p);
str = g_strdup_printf (_ ("Progress: %s"),
oregano_engine_get_current_operation_reader (s->engine));
gtk_label_set_markup (s->progress_label_reader, str);
g_free (str);
return TRUE;
}
static void engine_done_cb (OreganoEngine *engine, Simulation *s)
{
if (s->progress_timeout_id != 0) {
g_source_remove (s->progress_timeout_id);
s->progress_timeout_id = 0;
// Make sure that the progress bar is completed, just for good looks.
gtk_progress_bar_set_fraction (GTK_PROGRESS_BAR (s->progress_solver), 1.0);
gtk_progress_bar_set_fraction (GTK_PROGRESS_BAR (s->progress_reader), 1.0);
}
gtk_widget_destroy (GTK_WIDGET (s->dialog));
s->dialog = NULL;
plot_show (s->engine);
if (oregano_engine_has_warnings (s->engine)) {
log_append (s->logstore, _ ("Simulation"),
_ ("Finished with warnings:")); // FIXME add actual warnings
} else {
log_append (s->logstore, _ ("Simulation"), _ ("Finished."));
}
// show log window if this is enabled in preferences
schematic_view_log_show (s->sv, FALSE);
sheet_clear_op_values (schematic_view_get_sheet (s->sv));
// I don't need the engine anymore. The plot window owns its reference to
// the engine
g_object_unref (s->engine);
s->engine = NULL;
}
static void engine_aborted_cb (OreganoEngine *engine, Simulation *s)
{
if (s->progress_timeout_id != 0) {
g_source_remove (s->progress_timeout_id);
s->progress_timeout_id = 0;
}
// g_clear_object (&(s->dialog));
if (s->dialog != NULL) {
gtk_widget_destroy (GTK_WIDGET (s->dialog));
s->dialog = NULL;
}
log_append (s->logstore, _ ("Simulation"), _ ("Aborted. See lines below for details."));
if (s->sv != NULL)
schematic_view_log_show (s->sv, TRUE);
g_object_unref (s->engine);
s->engine = NULL;
}
static void cancel_cb (GtkWidget *widget, gint arg1, Simulation *s)
{
g_return_if_fail (s != NULL);
if (s->progress_timeout_id != 0) {
g_source_remove (s->progress_timeout_id);
s->progress_timeout_id = 0;
}
if (s->engine)
oregano_engine_stop (s->engine);
gtk_widget_destroy (GTK_WIDGET (s->dialog));
s->dialog = NULL;
s->sv = NULL;
log_append (s->logstore, _ ("Simulation"), _ ("Canceled."));
}
static gboolean simulate_cmd (Simulation *s)
{
OreganoEngine *engine;
if (s->engine != NULL) {
g_clear_object (&(s->engine));
}
engine = oregano_engine_factory_create_engine (oregano.engine, s->sm);
if (!engine)
return FALSE;
s->engine = engine;
s->progress_timeout_id = g_timeout_add (250, (GSourceFunc)progress_bar_timeout_cb, s);
g_signal_connect (G_OBJECT (engine), "done", G_CALLBACK (engine_done_cb), s);
g_signal_connect (G_OBJECT (engine), "aborted", G_CALLBACK (engine_aborted_cb), s);
oregano_engine_start (engine);
return TRUE;
}
oregano-0.84.41/src/sim-settings-gui.c 0000644 0001750 0001750 00000112077 13413640652 016511 0 ustar ruben ruben /*
* sim-settings-gui.c
*
*
* Authors:
* Richard Hult
* Ricardo Markiewicz
* Andres de Barbara
* Marc Lorber
* Bernhard Schuster
* Guido Trentalancia
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2006 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
* Copyright (C) 2013-2014 Bernhard Schuster
* Copyright (C) 2017-2017 Guido Trentalancia
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include "engines/netlist-helper.h"
#include "schematic-view.h"
#include "sim-settings-gui.h"
#include
#include
static char *scale_types_list[] = {"DEC", "LIN", "OCT", NULL};
static SimOption default_options[] = {{"TEMP", NULL},
{"GMIN", NULL},
{"ABSTOL", NULL},
{"CHGTOL", NULL},
{"RELTOL", NULL},
{"VNTOL", NULL},
{"ITL1", NULL},
{"ITL2", NULL},
{"ITL4", NULL},
{"PIVREL", NULL},
{"PIVTOL", NULL},
{"TNOM", NULL},
{"TRTOL", NULL},
{"DEFAD", NULL},
{"DEFAS", NULL},
{"DEFL", NULL},
{"DEFW", NULL},
{NULL, NULL}};
SimSettingsGui *sim_settings_gui_new() {
SimSettingsGui *sim_settings_gui = g_new0(SimSettingsGui, 1);
sim_settings_gui->sim_settings = sim_settings_new();
return sim_settings_gui;
}
void sim_settings_gui_finalize(SimSettingsGui *gui) {
sim_settings_finalize(gui->sim_settings);
g_free(gui);
}
static void set_options_in_list (gchar *key, gchar *val, GtkTreeView *cl)
{
int i;
GtkTreeModel *model;
GtkTreeIter iter;
char *name;
char *value;
model = gtk_tree_view_get_model (cl);
i = 0;
while (gtk_tree_model_iter_nth_child (model, &iter, NULL, i)) {
gtk_tree_model_get (model, &iter, 0, &name, 1, &value, -1);
if (!strcmp (name, key)) {
gtk_list_store_set (GTK_LIST_STORE (model), &iter, 1, val, -1);
}
i++;
}
}
static void get_options_from_list (SimSettingsGui *s_gui)
{
int i;
gchar *name, *value;
SimOption *so;
GtkTreeModel *model;
GtkTreeIter iter;
GtkTreeView *cl = s_gui->w_opt_list;
SimSettings *s = s_gui->sim_settings;
// Empty the list
while (s->options) {
so = s->options->data;
if (so) {
g_free (so->name);
g_free (so->value);
s->options = g_list_remove (s->options, so);
g_free (so);
}
if (s->options)
s->options = s->options->next;
}
model = gtk_tree_view_get_model (cl);
i = 0;
while (gtk_tree_model_iter_nth_child (model, &iter, NULL, i)) {
SimOption *so;
gtk_tree_model_get (model, &iter, 0, &name, 1, &value, -1);
so = g_new0 (SimOption, 1);
so->name = g_strdup (name);
so->value = g_strdup (value);
s->options = g_list_append (s->options, so);
i++;
}
}
static gboolean select_opt_callback (GtkWidget *widget, GdkEventButton *event, SimSettingsGui *sim)
{
GtkTreeModel *model;
GtkTreeIter iter;
GtkTreeSelection *selection;
char *value;
if (event->button != 1)
return FALSE;
// Get the current selected row
selection = gtk_tree_view_get_selection (sim->w_opt_list);
model = gtk_tree_view_get_model (sim->w_opt_list);
if (!gtk_tree_selection_get_selected (selection, NULL, &iter)) {
return FALSE;
}
gtk_tree_model_get (model, &iter, 1, &value, -1);
if (value)
gtk_entry_set_text (sim->w_opt_value, value);
else
gtk_entry_set_text (sim->w_opt_value, "");
return FALSE;
}
static void option_setvalue (GtkWidget *w, SimSettingsGui *s)
{
const gchar *value;
GtkTreeModel *model;
GtkTreeIter iter;
GtkTreeSelection *selection;
value = gtk_entry_get_text (s->w_opt_value);
if (!value)
return;
// Get the current selected row
selection = gtk_tree_view_get_selection (s->w_opt_list);
model = gtk_tree_view_get_model (s->w_opt_list);
if (!gtk_tree_selection_get_selected (selection, NULL, &iter)) {
return;
}
gtk_list_store_set (GTK_LIST_STORE (model), &iter, 1, value, -1);
}
static void add_option (GtkWidget *w, SimSettingsGui *s)
{
GtkEntry *entry;
GtkWidget *dialog = gtk_dialog_new_with_buttons (
_ ("Add new option"), NULL, GTK_DIALOG_MODAL | GTK_DIALOG_DESTROY_WITH_PARENT,
"_Cancel", GTK_RESPONSE_REJECT, "_OK", GTK_RESPONSE_OK, NULL);
entry = GTK_ENTRY (gtk_entry_new ());
gtk_container_add (GTK_CONTAINER (gtk_dialog_get_content_area (GTK_DIALOG (dialog))),
GTK_WIDGET (entry));
gtk_widget_show (GTK_WIDGET (entry));
if (gtk_dialog_run (GTK_DIALOG (dialog)) == GTK_RESPONSE_OK) {
GtkTreeIter iter;
SimOption *opt = g_new0 (SimOption, 1);
opt->name = g_strdup (gtk_entry_get_text (entry));
opt->value = g_strdup ("");
// Warning : don't free opt later, is added to the list
sim_settings_add_option (s->sim_settings, opt);
gtk_list_store_append (GTK_LIST_STORE (gtk_tree_view_get_model (s->w_opt_list)),
&iter);
gtk_list_store_set (GTK_LIST_STORE (gtk_tree_view_get_model (s->w_opt_list)), &iter,
0, opt->name, -1);
}
gtk_widget_destroy (dialog);
}
static void option_remove (GtkWidget *w, SimSettingsGui *s)
{
GtkTreeModel *model;
GtkTreeIter iter;
GtkTreeSelection *selection;
// Get the current selected row
selection = gtk_tree_view_get_selection (s->w_opt_list);
model = gtk_tree_view_get_model (s->w_opt_list);
if (!gtk_tree_selection_get_selected (selection, NULL, &iter)) {
return;
}
gtk_list_store_set (GTK_LIST_STORE (model), &iter, 1, "", -1);
}
static void entry_changed_cb (GtkWidget *widget, SimSettingsGui *s)
{
// FIXME?
}
static int delete_event_cb (GtkWidget *widget, GdkEvent *event, SimSettingsGui *s)
{
s->pbox = NULL;
return FALSE;
}
static void trans_enable_cb (GtkWidget *widget, SimSettingsGui *s)
{
gboolean enable;
enable = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (widget));
gtk_widget_set_sensitive (s->w_trans_frame, enable);
}
static void trans_step_enable_cb (GtkWidget *widget, SimSettingsGui *s)
{
gboolean enable, step_enable;
step_enable = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (widget));
enable = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (s->w_trans_enable));
gtk_widget_set_sensitive (s->w_trans_step, step_enable & enable);
}
static void ac_enable_cb (GtkWidget *widget, SimSettingsGui *s)
{
gboolean enable;
enable = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (widget));
gtk_widget_set_sensitive (s->w_ac_frame, enable);
}
static void dc_enable_cb (GtkWidget *widget, SimSettingsGui *s)
{
gboolean enable;
enable = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (widget));
gtk_widget_set_sensitive (s->w_dcsweep_frame, enable);
}
static void fourier_enable_cb (GtkWidget *widget, SimSettingsGui *s)
{
gboolean enable;
enable = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (widget));
gtk_widget_set_sensitive (s->w_fourier_frame, enable);
}
static void fourier_add_vout_cb (GtkButton *w, SimSettingsGui *sim)
{
GtkComboBoxText *node_box;
guint i;
gboolean result = FALSE;
gchar *text;
node_box = GTK_COMBO_BOX_TEXT (sim->w_four_combobox);
// Get the node identifier
for (i = 0; (i < 1000 && result == FALSE); ++i) {
text = g_strdup_printf ("V(%d)", i);
if (!g_strcmp0 (text, gtk_combo_box_text_get_active_text (node_box)))
result = TRUE;
g_free (text);
}
text = NULL;
if (result == TRUE)
text = fourier_add_vout(sim->sim_settings, i);
if (text)
gtk_entry_set_text (GTK_ENTRY (sim->w_four_vout), text);
else
gtk_entry_set_text (GTK_ENTRY (sim->w_four_vout), "");
}
static void fourier_remove_vout_cb (GtkButton *w, SimSettingsGui *sim)
{
GtkComboBoxText *node_box;
gint result = FALSE;
gint i;
SimSettings *s = sim->sim_settings;
node_box = GTK_COMBO_BOX_TEXT (sim->w_four_combobox);
// Get the node identifier
for (i = 0; (i < 1000 && result == FALSE); i++) {
if (g_strcmp0 (g_strdup_printf ("V(%d)", i),
gtk_combo_box_text_get_active_text (node_box)) == 0)
result = TRUE;
}
if (result) {
GSList *node_slist;
gchar *text = NULL;
// Remove current data in the g_slist
{
GSList *tmp, *prev = NULL;
tmp = s->fourier_vout;
while (tmp) {
if (atoi (tmp->data) == i - 1) {
if (prev)
prev->next = tmp->next;
else
s->fourier_vout = tmp->next;
g_slist_free_1 (tmp);
break;
}
prev = tmp;
tmp = prev->next;
}
}
// Update the fourier_vout widget
node_slist = g_slist_copy (s->fourier_vout);
if (node_slist) {
if (node_slist->data && atoi (node_slist->data) > 0)
text = g_strdup_printf ("V(%d)", atoi (node_slist->data));
node_slist = node_slist->next;
}
while (node_slist) {
if (node_slist->data && atoi (node_slist->data) > 0) {
if (text)
text = g_strdup_printf ("%s V(%d)", text, atoi (node_slist->data));
else
text = g_strdup_printf ("V(%d)", atoi (node_slist->data));
}
node_slist = node_slist->next;
}
if (text)
gtk_entry_set_text (GTK_ENTRY (sim->w_four_vout), text);
else
gtk_entry_set_text (GTK_ENTRY (sim->w_four_vout), "");
g_slist_free_full (node_slist, g_free);
}
}
static void noise_enable_cb (GtkWidget *widget, SimSettingsGui *s)
{
gboolean enable;
enable = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (widget));
gtk_widget_set_sensitive (s->w_noise_frame, enable);
}
static void response_callback (GtkButton *button, SchematicView *sv)
{
g_return_if_fail (sv != NULL);
g_return_if_fail (IS_SCHEMATIC_VIEW (sv));
g_return_if_fail (button != NULL);
g_return_if_fail (GTK_IS_BUTTON (button));
gint page;
gchar *tmp = NULL;
gchar **node_ids = NULL;
Schematic *sm = schematic_view_get_schematic (sv);
SimSettingsGui *s_gui = schematic_get_sim_settings_gui(sm);
SimSettings *s = s_gui->sim_settings;
g_object_get (s_gui->notebook, "page", &page, NULL);
// Transient analysis
s->trans_enable = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (s_gui->w_trans_enable));
g_free (s->trans_start);
s->trans_start = gtk_editable_get_chars (GTK_EDITABLE (s_gui->w_trans_start), 0, -1);
g_free (s->trans_stop);
s->trans_stop = gtk_editable_get_chars (GTK_EDITABLE (s_gui->w_trans_stop), 0, -1);
g_free (s->trans_step);
s->trans_step = gtk_editable_get_chars (GTK_EDITABLE (s_gui->w_trans_step), 0, -1);
s->trans_step_enable =
gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (s_gui->w_trans_step_enable));
s->trans_init_cond =
gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (s_gui->w_trans_init_cond));
s->trans_analyze_all =
gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (s_gui->w_trans_analyze_all));
// DC
s->dc_enable = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (s_gui->w_dc_enable));
g_free (s->dc_vin);
s->dc_vin = gtk_combo_box_text_get_active_text (GTK_COMBO_BOX_TEXT (s_gui->w_dc_vin));
g_free (s->dc_vout);
s->dc_vout = NULL;
tmp = gtk_combo_box_text_get_active_text (GTK_COMBO_BOX_TEXT (s_gui->w_dc_vout));
if (tmp) {
node_ids = g_strsplit (tmp, "V(", 0);
tmp = g_strdup (node_ids[1]);
g_strfreev (node_ids);
if (tmp) {
node_ids = g_strsplit (tmp, ")", 0);
g_free (tmp);
if (node_ids[0])
s->dc_vout = g_strdup (node_ids[0]);
else
s->dc_vout = g_strdup("");
g_strfreev (node_ids);
}
}
if (s->dc_vout == NULL)
s->dc_vout = g_strdup("");
g_free (s->dc_start);
s->dc_start = g_strdup (gtk_entry_get_text (GTK_ENTRY (s_gui->w_dc_start)));
g_free (s->dc_stop);
s->dc_stop = g_strdup (gtk_entry_get_text (GTK_ENTRY (s_gui->w_dc_stop)));
g_free (s->dc_step);
s->dc_step = g_strdup (gtk_entry_get_text (GTK_ENTRY (s_gui->w_dc_step)));
// AC
s->ac_enable = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (s_gui->w_ac_enable));
g_free (s->ac_vout);
s->ac_vout = NULL;
tmp = gtk_combo_box_text_get_active_text (GTK_COMBO_BOX_TEXT (s_gui->w_ac_vout));
if (tmp) {
node_ids = g_strsplit (tmp, "V(", 0);
tmp = g_strdup (node_ids[1]);
g_strfreev (node_ids);
if (tmp) {
node_ids = g_strsplit (tmp, ")", 0);
g_free (tmp);
if (node_ids[0])
s->ac_vout = g_strdup (node_ids[0]);
else
s->ac_vout = g_strdup("");
g_strfreev (node_ids);
}
}
if (s->ac_vout == NULL)
s->ac_vout = g_strdup("");
g_free (s->ac_type);
s->ac_type = gtk_combo_box_text_get_active_text (GTK_COMBO_BOX_TEXT (s_gui->w_ac_type));
g_free (s->ac_npoints);
s->ac_npoints = g_strdup (gtk_entry_get_text (GTK_ENTRY (s_gui->w_ac_npoints)));
g_free (s->ac_start);
s->ac_start = g_strdup (gtk_entry_get_text (GTK_ENTRY (s_gui->w_ac_start)));
g_free (s->ac_stop);
s->ac_stop = g_strdup (gtk_entry_get_text (GTK_ENTRY (s_gui->w_ac_stop)));
// Fourier analysis
s->fourier_enable = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (s_gui->w_four_enable));
g_free (s->fourier_frequency);
s->fourier_frequency = g_strdup (gtk_entry_get_text (GTK_ENTRY (s_gui->w_four_freq)));
// Noise
s->noise_enable = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (s_gui->w_noise_enable));
g_free (s->noise_vin);
s->noise_vin = gtk_combo_box_text_get_active_text (GTK_COMBO_BOX_TEXT (s_gui->w_noise_vin));
g_free (s->noise_vout);
s->noise_vout = NULL;
tmp = gtk_combo_box_text_get_active_text (GTK_COMBO_BOX_TEXT (s_gui->w_noise_vout));
if (tmp) {
node_ids = g_strsplit (tmp, "V(", 0);
tmp = g_strdup (node_ids[1]);
g_strfreev (node_ids);
if (tmp) {
node_ids = g_strsplit (tmp, ")", 0);
g_free (tmp);
if (node_ids[0])
s->noise_vout = g_strdup (node_ids[0]);
else
s->noise_vout = g_strdup("");
g_strfreev (node_ids);
}
}
if (s->noise_vout == NULL)
s->noise_vout = g_strdup("");
g_free (s->noise_type);
s->noise_type = g_strdup (gtk_combo_box_text_get_active_text (GTK_COMBO_BOX_TEXT (s_gui->w_noise_type)));
g_free (s->noise_npoints);
s->noise_npoints = g_strdup (gtk_entry_get_text (GTK_ENTRY (s_gui->w_noise_npoints)));
g_free (s->noise_start);
s->noise_start = g_strdup (gtk_entry_get_text (GTK_ENTRY (s_gui->w_noise_start)));
g_free (s->noise_stop);
s->noise_stop = g_strdup (gtk_entry_get_text (GTK_ENTRY (s_gui->w_noise_stop)));
// Options
get_options_from_list (s_gui);
gtk_widget_hide (GTK_WIDGET (s_gui->pbox));
s_gui->pbox = NULL;
s_gui->notebook = NULL;
// Schematic is dirty now ;-)
schematic_set_dirty (sm, TRUE);
s->configured = TRUE;
// The simulation settings configuration has
// been triggered by an attempt to lauch the
// simulation for the first time without
// configuring it first.
if (s->simulation_requested) {
s->simulation_requested = FALSE;
schematic_view_simulate_cmd (NULL, sv);
}
}
/**
* Get the list of voltmeters (test clamps).
*
* In normal mode, this does not include the
* the type of measurement (normal, magnitude,
* phase, real, imaginary or dB) and it is used
* in DC and Fourier analysis.
*
* In AC mode, each element includes the type
* of measurement (normal, magnitude, phase,
* real, imaginary or dB) and it is used in
* AC analysis.
*/
gint get_voltmeters_list(GList **voltmeters, Schematic *sm, GError *e, gboolean with_type)
{
GSList *siter, *node_list = NULL;
if (with_type)
node_list = netlist_helper_get_voltmeters_list (sm, &e, TRUE);
else
node_list = netlist_helper_get_voltmeters_list (sm, &e, FALSE);
if (e) {
log_append_error (schematic_get_log_store (sm), _ ("SimulationSettings"),
_ ("Failed to create netlist"), e);
g_clear_error (&e);
return -1;
}
if (node_list == NULL) {
log_append (schematic_get_log_store (sm), _ ("SimulationSettings"),
_ ("No node in the schematic!"));
return -2;
}
*voltmeters = NULL;
for (siter = node_list; siter; siter = siter->next) {
gchar *tmp;
if (with_type)
tmp = g_strdup (siter->data);
else
tmp = g_strdup_printf ("V(%d)", atoi (siter->data));
*voltmeters = g_list_prepend (*voltmeters, tmp);
}
return 0;
}
/**
* Get the list of sources (indipendent voltage)
*/
gint get_voltage_sources_list(GList **sources, Schematic *sm, GError *e, gboolean ac_only)
{
GSList *siter, *node_list = NULL;
node_list = netlist_helper_get_voltage_sources_list (sm, &e, ac_only);
if (e) {
log_append_error (schematic_get_log_store (sm), _ ("SimulationSettings"),
_ ("Failed to create netlist"), e);
g_clear_error (&e);
return -1;
}
if (node_list == NULL) {
log_append (schematic_get_log_store (sm), _ ("SimulationSettings"),
_ ("No node in the schematic!"));
return -2;
}
*sources = NULL;
for (siter = node_list; siter; siter = siter->next) {
gchar *tmp;
tmp = g_strdup_printf ("V%d", atoi (siter->data));
*sources = g_list_prepend (*sources, tmp);
}
return 0;
}
/**
* FIXME this code is an ugly piece of shit, fix it!
*/
void sim_settings_show (GtkWidget *widget, SchematicView *sv)
{
int i;
gboolean found;
gint rc, active, index;
GtkWidget *toplevel, *w, *w1, *pbox, *combo_box;
GtkTreeView *opt_list;
GtkCellRenderer *cell_option, *cell_value;
GtkTreeViewColumn *column_option, *column_value;
GtkListStore *opt_model;
GtkTreeIter treeiter;
GtkBuilder *builder;
GError *e = NULL;
SimSettings *s;
GList *iter;
GList *voltmeters = NULL;
GList *voltmeters_with_type = NULL;
GList *sources = NULL;
GList *sources_ac = NULL;
GtkComboBox *node_box;
GtkListStore *node_list_store;
gchar *text, *text2;
gchar **node_ids;
GSList *slist = NULL;
g_return_if_fail (sv != NULL);
Schematic *sm = schematic_view_get_schematic (sv);
SimSettingsGui *s_gui = schematic_get_sim_settings_gui (sm);
s = s_gui->sim_settings;
// Only allow one instance of the property box per schematic.
if (s_gui->pbox != NULL) {
if (gtk_widget_get_visible (s_gui->pbox) == FALSE) {
gtk_widget_set_visible (s_gui->pbox, TRUE);
}
GdkWindow *window = gtk_widget_get_window (s_gui->pbox);
g_assert (window != NULL);
gdk_window_raise (window);
return;
}
if ((builder = gtk_builder_new ()) == NULL) {
log_append (schematic_get_log_store (sm), _ ("SimulationSettings"),
_ ("Could not create simulation settings dialog"));
return;
}
gtk_builder_set_translation_domain (builder, NULL);
gtk_builder_add_from_file (builder, OREGANO_UIDIR "/sim-settings.ui", &e);
if (e) {
log_append_error (schematic_get_log_store (sm), _ ("SimulationSettings"),
_ ("Could not create simulation settings dialog due to "
"missing " OREGANO_UIDIR "/sim-settings.ui file"),
e);
g_clear_error (&e);
return;
}
toplevel = GTK_WIDGET (gtk_builder_get_object (builder, "toplevel"));
if (toplevel == NULL) {
log_append (schematic_get_log_store (sm), _ ("SimulationSettings"),
_ ("Could not create simulation settings dialog due to missing "
"\"toplevel\" widget in " OREGANO_UIDIR "/sim-settings.ui file"));
return;
}
pbox = toplevel;
s_gui->pbox = pbox;
s_gui->notebook = GTK_NOTEBOOK (gtk_builder_get_object (builder, "notebook"));
g_signal_connect (G_OBJECT (pbox), "delete_event", G_CALLBACK (delete_event_cb), s_gui);
// Prepare options list
s_gui->w_opt_value = GTK_ENTRY (gtk_builder_get_object (builder, "opt_value"));
opt_list = GTK_TREE_VIEW (gtk_builder_get_object (builder, "option_list"));
s_gui->w_opt_list = opt_list;
// Grab the frames
s_gui->w_trans_frame = GTK_WIDGET (gtk_builder_get_object (builder, "trans_frame"));
s_gui->w_ac_frame = GTK_WIDGET (gtk_builder_get_object (builder, "ac_frame"));
s_gui->w_dcsweep_frame = GTK_WIDGET (gtk_builder_get_object (builder, "dcsweep_frame"));
s_gui->w_fourier_frame = GTK_WIDGET (gtk_builder_get_object (builder, "fourier_frame"));
s_gui->w_noise_frame = GTK_WIDGET (gtk_builder_get_object (builder, "noise_frame"));
// Create the Columns
cell_option = gtk_cell_renderer_text_new ();
cell_value = gtk_cell_renderer_text_new ();
column_option =
gtk_tree_view_column_new_with_attributes (N_ ("Option"), cell_option, "text", 0, NULL);
column_value =
gtk_tree_view_column_new_with_attributes (N_ ("Value"), cell_value, "text", 1, NULL);
// Create the model
opt_model = gtk_list_store_new (2, G_TYPE_STRING, G_TYPE_STRING);
gtk_tree_view_set_model (opt_list, GTK_TREE_MODEL (opt_model));
gtk_tree_view_append_column (opt_list, column_option);
gtk_tree_view_append_column (opt_list, column_value);
if (s->options == NULL) {
// Load defaults
for (i = 0; default_options[i].name; i++) {
gtk_list_store_append (opt_model, &treeiter);
gtk_list_store_set (opt_model, &treeiter, 0, default_options[i].name, -1);
}
} else {
// Load schematic options
for (iter = s->options; iter; iter = iter->next) {
SimOption *so = iter->data;
if (so) {
gtk_list_store_append (opt_model, &treeiter);
gtk_list_store_set (opt_model, &treeiter, 0, so->name, -1);
}
}
}
// Set the options already stored
for (iter = s->options; iter; iter = iter->next) {
SimOption *so = iter->data;
if (so)
set_options_in_list (so->name, so->value, opt_list);
}
g_signal_connect (G_OBJECT (opt_list), "button_release_event", G_CALLBACK (select_opt_callback),
s);
w = GTK_WIDGET (gtk_builder_get_object (builder, "opt_accept"));
g_signal_connect (G_OBJECT (w), "clicked", G_CALLBACK (option_setvalue), s_gui);
w = GTK_WIDGET (gtk_builder_get_object (builder, "opt_remove"));
w = GTK_WIDGET (gtk_builder_get_object (builder, "add_option"));
g_signal_connect (G_OBJECT (w), "clicked", G_CALLBACK (option_remove), s_gui);
g_signal_connect (G_OBJECT (w), "clicked", G_CALLBACK (add_option), s_gui);
// Creation of Close Button
w = GTK_WIDGET (gtk_builder_get_object (builder, "button1"));
g_signal_connect (G_OBJECT (w), "clicked", G_CALLBACK (response_callback), sv);
// Get the list of voltmeters (normal mode)
rc = get_voltmeters_list(&voltmeters, sm, e, FALSE);
if (rc) {
sim_settings_set_dc(s, FALSE);
sim_settings_set_fourier(s, FALSE);
}
// Get the list of voltmeters (AC mode, i.e. with measurement type)
rc = get_voltmeters_list(&voltmeters_with_type, sm, e, TRUE);
if (rc) {
sim_settings_set_ac(s, FALSE);
}
// Get the list of sources (all types)
rc = get_voltage_sources_list(&sources, sm, e, FALSE);
if (rc) {
sim_settings_set_dc(s, FALSE);
}
// Get the list of AC sources
rc = get_voltage_sources_list(&sources_ac, sm, e, TRUE);
if (rc) {
sim_settings_set_noise(s, FALSE);
}
// Transient //
// ********* //
w = GTK_WIDGET (gtk_builder_get_object (builder, "trans_start"));
s_gui->w_trans_start = w;
if (s->trans_start)
gtk_entry_set_text (GTK_ENTRY (w), s->trans_start);
g_signal_connect (G_OBJECT (w), "changed", G_CALLBACK (entry_changed_cb), s_gui);
w = GTK_WIDGET (gtk_builder_get_object (builder, "trans_stop"));
s_gui->w_trans_stop = w;
if (s->trans_stop)
gtk_entry_set_text (GTK_ENTRY (w), s->trans_stop);
g_signal_connect (G_OBJECT (w), "changed", G_CALLBACK (entry_changed_cb), s_gui);
w = GTK_WIDGET (gtk_builder_get_object (builder, "trans_step"));
s_gui->w_trans_step = w;
if (s->trans_step)
gtk_entry_set_text (GTK_ENTRY (w), s->trans_step);
g_signal_connect (G_OBJECT (w), "changed", G_CALLBACK (entry_changed_cb), s_gui);
w = GTK_WIDGET (gtk_builder_get_object (builder, "trans_enable"));
s_gui->w_trans_enable = w;
g_signal_connect (G_OBJECT (w), "toggled", G_CALLBACK (trans_enable_cb), s_gui);
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (w), s->trans_enable);
w = GTK_WIDGET (gtk_builder_get_object (builder, "trans_step_enable"));
s_gui->w_trans_step_enable = w;
g_signal_connect (G_OBJECT (w), "toggled", G_CALLBACK (trans_step_enable_cb), s_gui);
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (w), s->trans_step_enable);
// get the gui element
w = GTK_WIDGET (gtk_builder_get_object (builder, "trans_init_cond"));
// save the gui element to struct
s_gui->w_trans_init_cond = w;
// Set checkbox enabled, if trans_init_cond equal true.
// trans_init_cond could be set to true because
// - user opened the settings dialog some seconds ago and has set the checkbox
// - user opened old file in which there was set the checkbox state to true
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (w), s->trans_init_cond);
// get the gui element
w = GTK_WIDGET (gtk_builder_get_object (builder, "trans_analyze_all"));
// save the gui element to struct
s_gui->w_trans_analyze_all = w;
// Set checkbox enabled, if trans_analyze_all equal true.
// trans_init_cond could be set to true because
// - user opened the settings dialog some seconds ago and has set the checkbox
// - user opened old file in which there was set the checkbox state to true
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (w), s->trans_analyze_all);
// AC //
// *** //
w = GTK_WIDGET (gtk_builder_get_object (builder, "ac_enable"));
s_gui->w_ac_enable = w;
g_signal_connect (G_OBJECT (w), "toggled", G_CALLBACK (ac_enable_cb), s_gui);
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (w), s->ac_enable);
w1 = GTK_WIDGET (gtk_builder_get_object (builder, "grid14"));
// FIXME: Should enable more than just one output as in the Fourier analysis
w = GTK_WIDGET (gtk_builder_get_object (builder, "ac_vout"));
gtk_widget_destroy (w); // FIXME wtf??
combo_box = gtk_combo_box_text_new ();
gtk_grid_attach (GTK_GRID (w1), combo_box, 1, 0, 1, 1);
s_gui->w_ac_vout = combo_box;
if (voltmeters_with_type) {
index = 0;
active = 0;
for (iter = voltmeters_with_type; iter; iter = iter->next) {
if (g_strcmp0 (iter->data, "VM(0)"))
gtk_combo_box_text_append_text (GTK_COMBO_BOX_TEXT (combo_box), iter->data);
if (!g_strcmp0(s->ac_vout, iter->data))
active = index;
index++;
}
gtk_combo_box_set_active (GTK_COMBO_BOX (combo_box), active);
}
g_signal_connect (G_OBJECT (combo_box), "changed", G_CALLBACK (entry_changed_cb), s);
// Initialisation of the various scale types
w = GTK_WIDGET (gtk_builder_get_object (builder, "ac_type"));
gtk_widget_destroy (w); // FIXME wtf??
combo_box = gtk_combo_box_text_new ();
gtk_grid_attach (GTK_GRID (w1), combo_box, 1, 1, 1, 1);
s_gui->w_ac_type = combo_box;
{
index = 0;
active = 0;
for (; scale_types_list[index] != NULL; index++) {
gtk_combo_box_text_append_text (GTK_COMBO_BOX_TEXT (combo_box), scale_types_list[index]);
if (!g_strcmp0(s->ac_type, scale_types_list[index]))
active = index;
}
gtk_combo_box_set_active (GTK_COMBO_BOX (combo_box), active);
}
g_assert (GTK_IS_COMBO_BOX (combo_box));
g_signal_connect (G_OBJECT (combo_box), "changed", G_CALLBACK (entry_changed_cb), s_gui);
w = GTK_WIDGET (gtk_builder_get_object (builder, "ac_npoints"));
s_gui->w_ac_npoints = w;
gtk_entry_set_text (GTK_ENTRY (w), s->ac_npoints);
g_signal_connect (G_OBJECT (w), "changed", G_CALLBACK (entry_changed_cb), s_gui);
w = GTK_WIDGET (gtk_builder_get_object (builder, "ac_start"));
s_gui->w_ac_start = w;
gtk_entry_set_text (GTK_ENTRY (w), s->ac_start);
g_signal_connect (G_OBJECT (w), "changed", G_CALLBACK (entry_changed_cb), s_gui);
w = GTK_WIDGET (gtk_builder_get_object (builder, "ac_stop"));
s_gui->w_ac_stop = w;
gtk_entry_set_text (GTK_ENTRY (w), s->ac_stop);
g_signal_connect (G_OBJECT (w), "changed", G_CALLBACK (entry_changed_cb), s_gui);
// DC //
// ***** //
w = GTK_WIDGET (gtk_builder_get_object (builder, "dc_enable"));
s_gui->w_dc_enable = w;
g_signal_connect (G_OBJECT (w), "toggled", G_CALLBACK (dc_enable_cb), s_gui);
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (w), s->dc_enable);
w1 = GTK_WIDGET (gtk_builder_get_object (builder, "grid13"));
w = GTK_WIDGET (gtk_builder_get_object (builder, "dc_vin"));
gtk_widget_destroy (w); // FIXME wtf??
combo_box = gtk_combo_box_text_new ();
gtk_grid_attach (GTK_GRID (w1), combo_box, 1, 0, 1, 1);
s_gui->w_dc_vin = combo_box;
if (sources) {
index = 0;
active = 0;
for (iter = sources; iter; iter = iter->next) {
gtk_combo_box_text_append_text (GTK_COMBO_BOX_TEXT (combo_box), iter->data);
if (!g_strcmp0(s->dc_vin, iter->data))
active = index;
index++;
}
gtk_combo_box_set_active (GTK_COMBO_BOX (combo_box), active);
}
g_signal_connect (G_OBJECT (combo_box), "changed", G_CALLBACK (entry_changed_cb), s);
// FIXME: Should enable more than just one output as in the Fourier analysis
// FIXME: Should also allow to print currents through voltage sources
w = GTK_WIDGET (gtk_builder_get_object (builder, "dc_vout"));
gtk_widget_destroy (w); // FIXME wtf??
combo_box = gtk_combo_box_text_new ();
gtk_grid_attach (GTK_GRID (w1), combo_box, 1, 1, 1, 1);
s_gui->w_dc_vout = combo_box;
if (voltmeters) {
index = 0;
active = 0;
text = g_strdup_printf("V(%s)", s->dc_vout);
for (iter = voltmeters; iter; iter = iter->next) {
if (g_strcmp0 (iter->data, "V(0)"))
gtk_combo_box_text_append_text (GTK_COMBO_BOX_TEXT (combo_box), iter->data);
if (!g_strcmp0(text, iter->data))
active = index;
index++;
}
g_free (text);
gtk_combo_box_set_active (GTK_COMBO_BOX (combo_box), active);
}
g_signal_connect (G_OBJECT (combo_box), "changed", G_CALLBACK (entry_changed_cb), s_gui);
w = GTK_WIDGET (gtk_builder_get_object (builder, "dc_start"));
s_gui->w_dc_start = w;
gtk_entry_set_text (GTK_ENTRY (w), s->dc_start);
g_signal_connect (G_OBJECT (w), "changed", G_CALLBACK (entry_changed_cb), s_gui);
w = GTK_WIDGET (gtk_builder_get_object (builder, "dc_stop"));
s_gui->w_dc_stop = w;
gtk_entry_set_text (GTK_ENTRY (w), s->dc_stop);
g_signal_connect (G_OBJECT (w), "changed", G_CALLBACK (entry_changed_cb), s_gui);
w = GTK_WIDGET (gtk_builder_get_object (builder, "dc_step"));
s_gui->w_dc_step = w;
gtk_entry_set_text (GTK_ENTRY (w), s->dc_step);
g_signal_connect (G_OBJECT (w), "changed", G_CALLBACK (entry_changed_cb), s_gui);
// Fourier //
// ******* //
g_print ("XXXXXXXXXXXXXXXX\n");
w = GTK_WIDGET (gtk_builder_get_object (builder, "fourier_enable"));
s_gui->w_four_enable = w;
g_print ("XXXXXXXXXXXXXXXX %p %s\n", w, s->fourier_enable ? "TRUE" : "FALSE");
g_signal_connect (G_OBJECT (w), "toggled", G_CALLBACK (fourier_enable_cb), s_gui);
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (w), s->fourier_enable);
w = GTK_WIDGET (gtk_builder_get_object (builder, "fourier_freq"));
s_gui->w_four_freq = w;
g_signal_connect (G_OBJECT (w), "changed", G_CALLBACK (entry_changed_cb), s_gui);
gtk_entry_set_text (GTK_ENTRY (w), s->fourier_frequency);
w = GTK_WIDGET (gtk_builder_get_object (builder, "fourier_vout"));
s_gui->w_four_vout = w;
g_signal_connect (G_OBJECT (w), "changed", G_CALLBACK (entry_changed_cb), s_gui);
// Get rid of inexistent output vectors
text2 = NULL;
if (voltmeters) {
text = sim_settings_get_fourier_vout (s);
node_ids = g_strsplit (text, " ", 0);
g_free (text);
for (i = 0; node_ids[i] != NULL; i++) {
text = g_strdup_printf ("V(%s)", node_ids[i]);
found = FALSE;
for (iter = voltmeters; iter; iter = iter->next) {
if (!g_strcmp0 (text, iter->data))
found = TRUE;
}
g_free (text);
if (found) {
if (text2) {
text = text2;
text2 = g_strdup_printf ("%s %s", text2, node_ids[i]);
g_free (text);
} else {
text2 = g_strdup_printf ("%s", node_ids[i]);
}
}
}
if (!text2)
text2 = g_strdup ("");
sim_settings_set_fourier_vout (s, text2);
g_free (text2);
g_strfreev (node_ids);
}
text = NULL;
slist = g_slist_copy (s->fourier_vout);
if (slist) {
if (slist->data && atoi (slist->data) > 0)
text = g_strdup_printf ("V(%d)", atoi (slist->data));
slist = slist->next;
}
while (slist) {
if (slist->data && atoi (slist->data) > 0) {
if (text) {
text2 = text;
text = g_strdup_printf ("%s V(%d)", text, atoi (slist->data));
g_free (text2);
} else {
text = g_strdup_printf ("V(%d)", atoi (slist->data));
}
}
slist = slist->next;
}
if (text)
gtk_entry_set_text (GTK_ENTRY (w), text);
else
gtk_entry_set_text (GTK_ENTRY (w), "");
g_slist_free_full (slist, g_free);
// Present in the combo box the nodes of the schematic
w = GTK_WIDGET (gtk_builder_get_object (builder, "fourier_select_out"));
gtk_widget_destroy (w); // FIXME wtf???
w = GTK_WIDGET (gtk_builder_get_object (builder, "grid12"));
combo_box = gtk_combo_box_text_new ();
gtk_grid_attach (GTK_GRID (w), combo_box, 2, 2, 1, 1);
s_gui->w_four_combobox = combo_box;
node_box = GTK_COMBO_BOX (combo_box);
node_list_store = GTK_LIST_STORE (gtk_combo_box_get_model (node_box));
gtk_list_store_clear (node_list_store);
if (voltmeters) {
for (iter = voltmeters; iter; iter = iter->next) {
if (g_strcmp0 (iter->data, "V(0)"))
gtk_combo_box_text_append_text (GTK_COMBO_BOX_TEXT (node_box), iter->data);
}
gtk_combo_box_set_active (GTK_COMBO_BOX (node_box), 0);
}
g_signal_connect (G_OBJECT (node_box), "changed", G_CALLBACK (entry_changed_cb), s);
w = GTK_WIDGET (gtk_builder_get_object (builder, "fourier_add"));
s_gui->w_four_add = w;
g_signal_connect (G_OBJECT (w), "clicked", G_CALLBACK (fourier_add_vout_cb), s_gui);
w = GTK_WIDGET (gtk_builder_get_object (builder, "fourier_rem"));
s_gui->w_four_rem = w;
g_signal_connect (G_OBJECT (w), "clicked", G_CALLBACK (fourier_remove_vout_cb), s_gui);
// Noise //
// *** //
w = GTK_WIDGET (gtk_builder_get_object (builder, "noise_enable"));
s_gui->w_noise_enable = w;
g_signal_connect (G_OBJECT (w), "toggled", G_CALLBACK (noise_enable_cb), s_gui);
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (w), s->noise_enable);
w1 = GTK_WIDGET (gtk_builder_get_object (builder, "grid1"));
w = GTK_WIDGET (gtk_builder_get_object (builder, "noise_vin"));
gtk_widget_destroy (w); // FIXME wtf??
combo_box = gtk_combo_box_text_new ();
gtk_grid_attach (GTK_GRID (w1), combo_box, 1, 0, 1, 1);
s_gui->w_noise_vin = combo_box;
if (sources_ac) {
index = 0;
active = 0;
for (iter = sources_ac; iter; iter = iter->next) {
gtk_combo_box_text_append_text (GTK_COMBO_BOX_TEXT (combo_box), iter->data);
if (!g_strcmp0(s->noise_vin, iter->data))
active = index;
index++;
}
gtk_combo_box_set_active (GTK_COMBO_BOX (combo_box), active);
}
g_signal_connect (G_OBJECT (combo_box), "changed", G_CALLBACK (entry_changed_cb), s);
// FIXME: Should enable more than just one output as in the Fourier analysis
w = GTK_WIDGET (gtk_builder_get_object (builder, "noise_vout"));
gtk_widget_destroy (w); // FIXME wtf??
combo_box = gtk_combo_box_text_new ();
gtk_grid_attach (GTK_GRID (w1), combo_box, 1, 1, 1, 1);
s_gui->w_noise_vout = combo_box;
if (voltmeters) {
index = 0;
active = 0;
text = g_strdup_printf ("V(%s)", s->noise_vout);
for (iter = voltmeters; iter; iter = iter->next) {
if (g_strcmp0 (iter->data, "V(0)"))
gtk_combo_box_text_append_text (GTK_COMBO_BOX_TEXT (combo_box), iter->data);
if (!g_strcmp0(text, iter->data))
active = index;
index++;
}
g_free (text);
gtk_combo_box_set_active (GTK_COMBO_BOX (combo_box), active);
}
g_signal_connect (G_OBJECT (combo_box), "changed", G_CALLBACK (entry_changed_cb), s);
// Initialisation of the various scale types
w = GTK_WIDGET (gtk_builder_get_object (builder, "noise_type"));
gtk_widget_destroy (w); // FIXME wtf??
combo_box = gtk_combo_box_text_new ();
gtk_grid_attach (GTK_GRID (w1), combo_box, 1, 2, 1, 1);
s_gui->w_noise_type = combo_box;
{
index = 0;
active = 0;
for (; scale_types_list[index] != NULL; index++) {
gtk_combo_box_text_append_text (GTK_COMBO_BOX_TEXT (combo_box), scale_types_list[index]);
if (!g_strcmp0(s->noise_type, scale_types_list[index]))
active = index;
}
gtk_combo_box_set_active (GTK_COMBO_BOX (combo_box), active);
}
g_assert (GTK_IS_COMBO_BOX (combo_box));
g_signal_connect (G_OBJECT (combo_box), "changed", G_CALLBACK (entry_changed_cb), s_gui);
w = GTK_WIDGET (gtk_builder_get_object (builder, "noise_npoints"));
s_gui->w_noise_npoints = w;
gtk_entry_set_text (GTK_ENTRY (w), s->noise_npoints);
g_signal_connect (G_OBJECT (w), "changed", G_CALLBACK (entry_changed_cb), s_gui);
w = GTK_WIDGET (gtk_builder_get_object (builder, "noise_start"));
s_gui->w_noise_start = w;
gtk_entry_set_text (GTK_ENTRY (w), s->noise_start);
g_signal_connect (G_OBJECT (w), "changed", G_CALLBACK (entry_changed_cb), s_gui);
w = GTK_WIDGET (gtk_builder_get_object (builder, "noise_stop"));
s_gui->w_noise_stop = w;
gtk_entry_set_text (GTK_ENTRY (w), s->noise_stop);
g_signal_connect (G_OBJECT (w), "changed", G_CALLBACK (entry_changed_cb), s_gui);
gtk_widget_show_all (toplevel);
trans_enable_cb (s_gui->w_trans_enable, s_gui);
trans_step_enable_cb (s_gui->w_trans_step_enable, s_gui);
ac_enable_cb (s_gui->w_ac_enable, s_gui);
dc_enable_cb (s_gui->w_dc_enable, s_gui);
fourier_enable_cb (s_gui->w_four_enable, s_gui);
noise_enable_cb (s_gui->w_noise_enable, s_gui);
g_list_free(sources);
g_list_free(voltmeters);
g_list_free(voltmeters_with_type);
}
oregano-0.84.41/src/oregano.c 0000644 0001750 0001750 00000014027 13413640652 014727 0 ustar ruben ruben /*
* oregano.c
*
*
* Authors:
* Richard Hult
* Ricardo Markiewicz
* Andres de Barbara
* Marc Lorber
* Bernhard Schuster
* Guido Trentalancia
*
* Web page: https://ahoi.io/project/oregano
*
* Oregano, a tool for schematic capture and simulation of electronic
* circuits.
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2006 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
* Copyright (C) 2013 Bernhard Schuster
* Copyright (C) 2017 Guido Trentalancia
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#define ENABLE_NLS 1
#define HAVE_BIND_TEXTDOMAIN_CODESET 1
#define HAVE_GETTEXT 1
#define HAVE_LC_MESSAGES 1
#include
#include
#include
#include
#include
#include "dialogs.h"
#include "engine.h"
#include "schematic.h"
#include "schematic-view.h"
#include "cursors.h"
#include "load-library.h"
#include "load-schematic.h"
#include "load-common.h"
#include "oregano-config.h"
#include "stock.h"
#include "oregano.h"
#include "splash.h"
#include
G_DEFINE_TYPE (Oregano, oregano, GTK_TYPE_APPLICATION);
OreganoApp oregano;
Oregano *app;
int oregano_debugging;
static void oregano_application (GApplication *app, GFile *file);
static void oregano_activate (GApplication *application);
static void oregano_open (GApplication *application, GFile **files, gint n_files,
const gchar *hint);
static void oregano_finalize (GObject *object)
{
GList *iter;
Library *l;
cursors_shutdown ();
g_object_unref (oregano.settings);
// Free the memory used by the parts libraries
for (iter = oregano.libraries; iter; iter = iter->next) {
l = (Library *) iter->data;
g_free (l->name);
g_free (l->author);
g_free (l->version);
}
g_list_free_full (oregano.libraries, g_free);
clipboard_empty ();
G_OBJECT_CLASS (oregano_parent_class)->finalize (object);
}
static void oregano_class_init (OreganoClass *klass)
{
G_APPLICATION_CLASS (klass)->activate = oregano_activate;
G_APPLICATION_CLASS (klass)->open = oregano_open;
G_OBJECT_CLASS (klass)->finalize = oregano_finalize;
}
static void oregano_init (Oregano *object)
{
guint i;
gchar *engine_name;
cursors_init ();
stock_init ();
oregano_config_load ();
// check if the engine loaded from the configuration exists...
// otherwise pick up the next one !
engine_name = oregano_engine_get_engine_name_by_index (oregano.engine);
if (g_find_program_in_path (engine_name) == NULL) {
oregano.engine = OREGANO_ENGINE_COUNT;
for (i = 0; i < OREGANO_ENGINE_COUNT; i++) {
g_free (engine_name);
engine_name = oregano_engine_get_engine_name_by_index (i);
if (g_find_program_in_path (engine_name) != NULL) {
oregano.engine = i;
}
}
}
g_free (engine_name);
// simulation cannot run, disable log
if (oregano.engine < 0 || oregano.engine >= OREGANO_ENGINE_COUNT)
oregano.show_log = FALSE;
}
Oregano *oregano_new (void)
{
return g_object_new (oregano_get_type (), "application-id", "org.gnome.oregano", "flags",
G_APPLICATION_HANDLES_OPEN, NULL);
}
// GApplication implementation
static void oregano_activate (GApplication *application)
{
oregano_application (application, NULL);
}
static void oregano_open (GApplication *application, GFile **files, gint n_files, const gchar *hint)
{
gint i;
for (i = 0; i < n_files; i++)
oregano_application (application, files[i]);
}
static gboolean quit_hook (GSignalInvocationHint *ihint, guint n_param_values,
const GValue *param_values, gpointer data)
{
return FALSE;
}
static void oregano_application (GApplication *app, GFile *file)
{
Schematic *schematic = NULL;
SchematicView *schematic_view = NULL;
gchar *msg;
Splash *splash = NULL;
GError *error = NULL;
// Keep non localized input for ngspice
setlocale (LC_NUMERIC, "C");
if (oregano.show_splash) {
splash = oregano_splash_new (&error);
if (error) {
msg = g_strdup_printf (_ ("Failed to spawn splash-screen \'%s\''. Code %i - %s"),
OREGANO_UIDIR "splash.ui", error->code, error->message);
oregano_error (msg);
g_free (msg);
g_clear_error (&error);
// non fatal issue
}
}
// splash == NULL if showing splash is disabled
oregano_lookup_libraries (splash);
if (oregano.libraries == NULL) {
oregano_error (_ ("Could not find a parts library.\n\n"
"Supposed to be in " OREGANO_LIBRARYDIR));
return;
}
oregano.clipboard = NULL;
schematic = NULL;
if (file) {
GError *error = NULL;
char *fname = g_file_get_parse_name (file);
schematic = schematic_read (fname, &error);
if (schematic) {
schematic_view = schematic_view_new (schematic);
gtk_widget_show_all (schematic_view_get_toplevel (schematic_view));
schematic_set_filename (schematic, fname);
schematic_set_title (schematic, g_path_get_basename (fname));
}
} else {
schematic = schematic_new ();
schematic_view = schematic_view_new (schematic);
gtk_widget_show_all (schematic_view_get_toplevel (schematic_view));
}
g_signal_add_emission_hook (g_signal_lookup ("last_schematic_destroyed", TYPE_SCHEMATIC), 0,
quit_hook, NULL, NULL);
if (oregano.show_splash && splash)
oregano_splash_done (splash, _ ("Welcome to Oregano"));
} oregano-0.84.41/src/load-library.h 0000644 0001750 0001750 00000003676 13413640652 015673 0 ustar ruben ruben /*
* load-library.h
*
*
* Author:
* Richard Hult
* Ricardo Markiewicz
* Andres de Barbara
* Marc Lorber
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2004 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#ifndef __LOAD_LIBRARY_H
#define __LOAD_LIBRARY_H
#include
#include
typedef struct _SymbolObject SymbolObject;
typedef struct _LibrarySymbol LibrarySymbol;
#include "load-common.h"
struct _LibrarySymbol
{
char *name;
GSList *connections;
GSList *symbol_objects;
};
typedef enum { SYMBOL_OBJECT_LINE, SYMBOL_OBJECT_ARC, SYMBOL_OBJECT_TEXT } SymbolObjectType;
struct _SymbolObject
{
SymbolObjectType type;
union
{
struct
{
gboolean spline;
GooCanvasPoints *line;
} uline;
struct
{
double x1;
double y1;
double x2;
double y2;
} arc;
struct
{
gint x, y;
gchar str[256];
} text;
} u;
};
Library *library_parse_xml_file (const gchar *filename);
LibrarySymbol *library_get_symbol (const gchar *symbol_name);
LibraryPart *library_get_part (Library *library, const gchar *part_name);
#endif
oregano-0.84.41/src/spice2to3.awk 0000644 0001750 0001750 00000016364 13413640652 015456 0 ustar ruben ruben #==================================================== -*- AWK -*- =====
# spice2to3.awk
#
# This awk program file is used to convert Spice2 input files to
# Spice3 format.
#
# Specifically, nonlinear dependent sources are converted from
# the polynomial model to the more general BXXXXX nonlinear
# dependent source model used in Spice3.
#
#
# Usage:
# awk -f spice2to3.awk [comments=1] inputfile > outputfile
#
# If the optional comments=1 parameter is specified, the original
# input lines that are converted will be saved as comments in the
# output file.
#
# Limitations:
# - Cubic and higher order terms are not handled except for
# the special case of a single variable
# - Initial conditions are not handled (IC=...)
# - Continued lines are not handled
# - This program uses features from GNU awk
#
#
# Mike McCarrick Feb 1995
# mmccarri@apti.com APTI, Wash DC
#======================================================================
BEGIN {
IGNORECASE = 1;
}
#----------------------------------------------------------------------
# Utility functions
#----------------------------------------------------------------------
function min(a,b) {
return (a < b) ? a : b;
}
function max(a,b) {
return (a > b) ? a : b;
}
# Turn the original input line into a comment
function make_comment(inputline) {
print "*SPICE2:";
print "*" inputline;
print "*SPICE3:";
}
# Get leading whitespace from the input line
function get_leader(inputline)
{
if ((i = match(inputline, "[^ \t]")) != 0)
return substr(inputline, 1, i-1);
else
return "";
}
# Get trailing comments from the input line
function get_trailer(inputline)
{
if ((i = index(inputline, ";")) != 0)
return substr(inputline, i, length(inputline)-i+1);
else
return "";
}
# Canonicalize the input line
function canonicalize(inputline)
{
# Strip parentheses and commas from the input line
gsub(/\(/, " ", inputline);
gsub(/\)/, " ", inputline);
gsub(/,/, " ", inputline);
# chop off any trailing comments
if ((i = index(inputline, ";")) != 0)
inputline = substr(inputline, 1, i-1);
return inputline;
}
# Convert numerical values to canonical form (the scale factors are
# not recognized for B devices at least in 3f4)
function convert_num(strval)
{
sub(/T/, "E12", strval);
sub(/G/, "E9", strval);
sub(/MEG/, "E6", strval);
sub(/K/, "E3", strval);
sub(/M/, "E-3", strval);
sub(/U/, "E-6", strval);
sub(/N/, "E-9", strval);
sub(/P/, "E-12", strval);
sub(/F/, "E-15", strval);
return strval;
}
#----------------------------------------------------------------------
# E: Voltage controlled voltage source
# G: Voltage controlled current source
# H: Current controlled voltage source
# F: Current controlled current source
#----------------------------------------------------------------------
/^ *[EGHF].+POLY/ {
# Save the old line as a comment
origline = $0;
if (comments != 0)
make_comment(origline);
# Save any leading whitespace and trailing comments
leader = get_leader($0);
trailer = get_trailer($0);
# canonicalize the input line
$0 = canonicalize($0);
# Print the new source name with its node connections
printf("%sB%s %s %s ", leader, $1, $2, $3);
# The format differs for voltage vs current controlled sources
stype = toupper(substr($1, 1, 1));
if (stype == "E" || stype == "H")
printf("V = ");
else
printf("I = ");
nvars = $5;
inodes = 6;
if (stype == "E" || stype == "G")
{
v_controlled = 1;
nnodes = 2 * nvars;
}
else
{
v_controlled = 0;
nnodes = nvars;
}
icoeff = inodes + nnodes;
ncoeff = NF - icoeff + 1;
plusflag = 0;
# Constant term
if ($icoeff != 0.0)
{
printf("%s", convert_num($icoeff));
plusflag = 1;
}
icoeff++;
ncoeff--;
# Linear terms
nlinear = min(ncoeff, nvars);
for (ic = 0; ic < nlinear; ic++)
{
if ((val = convert_num($(icoeff + ic))) != 0.0)
{
if (plusflag)
printf(" + ");
if (v_controlled)
{
ip = inodes + 2 * ic;
im = ip + 1;
if (val != 1.0)
printf("%s*V(%s,%s)", val, $ip, $im);
else
printf("V(%s,%s)", $ip, $im);
}
else
{
is = inodes + ic;
if (val != 1.0)
printf("%s*I(%s)", val, $is);
else
printf("I(%s)", $is);
}
plusflag = 1;
}
}
icoeff += ic;
ncoeff -= ic;
# Quadratic terms
nquad = min(ncoeff, nvars*(nvars+1)/2);
for (n1 = ic = 0; n1 < nvars; n1++)
{
for (n2 = 0; n2 <= n1; n2++)
{
if (ic > nquad)
break;
if ((val = convert_num($(icoeff + ic))) != 0.0)
{
if (plusflag)
printf(" + ");
if (v_controlled)
{
ip1 = inodes + 2 * n1;
im1 = ip1 + 1;
ip2 = inodes + 2 * n2;
im2 = ip2 + 1;
if (val != 1.0)
printf("%s*V(%s,%s)*V(%s,%s)", val, $ip1, $im1, $ip2, $im2);
else
printf("V(%s,%s)*V(%s,%s)", $ip1, $im1, $ip2, $im2);
}
else
{
is1 = inodes + n1;
is2 = inodes + n2;
if (val != 1.0)
printf("%s*I(%s)*I(%s)", val, $is1, $is2);
else
printf("I(%s)*I(%s)", $is1, $is2);
}
plusflag = 1;
}
ic++;
}
}
icoeff += ic;
ncoeff -= ic;
# Cubic and higher order terms are handled only for a single variable
if (ncoeff > 0 && nvars > 1)
{
print "Warning: the following source line contains" > "/dev/stderr";
print "polynomial terms greater than second order." > "/dev/stderr";
print "Convert this line manually:" > "/dev/stderr";
print origline > "/dev/stderr";
# Add a warning message comment in the output file
printf(" ; ***ERROR CONVERTING SPICE2 ENTRY\n");
next;
}
# Single variable higher-order terms
for (ic = 0; ic < ncoeff; ic++)
{
if ((val = convert_num($(icoeff + ic))) != 0.0)
{
if (plusflag)
printf(" + ");
if (v_controlled)
{
ip = inodes + 2 * ic;
im = ip + 1;
if (val != 1.0)
printf("%s*V(%s,%s)^%d", val, $ip, $im, ic+3);
else
printf("V(%s,%s)^%d", $ip, $im, ic+3);
}
else
{
is = inodes + ic;
if (val != 1.0)
printf("%s*I(%s)^%d", val, $is, ic+3);
else
printf("I(%s)^%d", $is, ic+3);
}
plusflag = 1;
}
}
# Add trailing comments to the output line
printf(" %s\n", trailer);
next;
}
#----------------------------------------------------------------------
# Default: just print out the line
#----------------------------------------------------------------------
{
print $0;
}
oregano-0.84.41/src/errors.c 0000644 0001750 0001750 00000002171 13413640652 014606 0 ustar ruben ruben /*
* errors.c
*
*
* Author:
* Ricardo Markiewicz
* Marc Lorber
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 2003-2008 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include "errors.h"
GQuark oregano_error_quark (void)
{
static GQuark err = 0;
if (!err) {
err = g_quark_from_static_string ("oregano-error");
}
return err;
}
oregano-0.84.41/src/save-schematic.h 0000644 0001750 0001750 00000002405 13413640652 016173 0 ustar ruben ruben /*
* save-schematic.h
*
*
* Authors:
* Richard Hult
* Ricardo Markiewicz
* Andres de Barbara
* Marc Lorber
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2004 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#ifndef _SAVE_SCHEMATIC_H
#define _SAVE_SCHEMATIC_H
#include
#include "schematic.h"
gboolean schematic_write_xml (Schematic *sm, GError **error);
#endif
oregano-0.84.41/src/file-manager.c 0000644 0001750 0001750 00000003226 13413640652 015623 0 ustar ruben ruben /*
* file-manager.c
*
*
* Authors:
* Ricardo Markiewicz
* Andres de Barbara
* Marc Lorber
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 2003,2006 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include "file-manager.h"
FileType file_types[] = {
FILE_TYPE ("oregano", "Oregano Schematic File", schematic_parse_xml_file, schematic_write_xml)};
#define FILE_TYPES_COUNT (sizeof(file_types) / sizeof(FileType))
FileType *file_manager_get_handler (const gchar *fname)
{
int i;
gchar *ext, *ptr;
FileType *ft = NULL;
g_return_val_if_fail (fname != NULL, NULL);
ptr = ext = (gchar *)fname;
// Search for file extension
while (*ptr != '\0') {
if (*ptr == '.') {
ext = ptr + 1;
}
ptr++;
}
for (i = 0; i < FILE_TYPES_COUNT; i++)
if (!strcmp (file_types[i].extension, ext)) {
ft = &file_types[i];
break;
}
return ft;
}
oregano-0.84.41/src/tools/ 0000755 0001750 0001750 00000000000 13413640652 014265 5 ustar ruben ruben oregano-0.84.41/src/tools/cancel-info.c 0000644 0001750 0001750 00000003621 13413640652 016611 0 ustar ruben ruben /*
* cancel-info.c
*
*
* Authors:
* Michi
*
* Web page: https://ahoi.io/project/oregano
*
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include
#include "cancel-info.h"
struct _CancelInfo {
guint ref_count;
GMutex mutex;
gboolean is_cancel;
};
static void cancel_info_finalize(CancelInfo *info);
CancelInfo *cancel_info_new() {
CancelInfo *info = g_new0(CancelInfo, 1);
info->ref_count = 1;
g_mutex_init(&info->mutex);
return info;
}
void cancel_info_subscribe(CancelInfo *info) {
g_mutex_lock(&info->mutex);
info->ref_count++;
g_mutex_unlock(&info->mutex);
}
void cancel_info_unsubscribe(CancelInfo *info) {
g_mutex_lock(&info->mutex);
info->ref_count--;
guint ref_count = info->ref_count;
g_mutex_unlock(&info->mutex);
if (ref_count == 0)
cancel_info_finalize(info);
}
gboolean cancel_info_is_cancel(CancelInfo *info) {
g_mutex_lock(&info->mutex);
gboolean is_cancel = info->is_cancel;
g_mutex_unlock(&info->mutex);
return is_cancel;
}
void cancel_info_set_cancel(CancelInfo *info) {
g_mutex_lock(&info->mutex);
info->is_cancel = TRUE;
g_mutex_unlock(&info->mutex);
}
static void cancel_info_finalize(CancelInfo *info) {
g_mutex_clear(&info->mutex);
g_free(info);
}
oregano-0.84.41/src/tools/cancel-info.h 0000644 0001750 0001750 00000002275 13413640652 016622 0 ustar ruben ruben /*
* cancel-info.h
*
*
* Authors:
* Michi
*
* Web page: https://ahoi.io/project/oregano
*
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#ifndef TOOLS_CANCEL_INFO_H_
#define TOOLS_CANCEL_INFO_H_
typedef struct _CancelInfo CancelInfo;
CancelInfo *cancel_info_new();
void cancel_info_subscribe(CancelInfo *info);
void cancel_info_unsubscribe(CancelInfo *info);
gboolean cancel_info_is_cancel(CancelInfo *info);
void cancel_info_set_cancel(CancelInfo *info);
#endif /* TOOLS_CANCEL_INFO_H_ */
oregano-0.84.41/src/tools/thread-pipe.c 0000644 0001750 0001750 00000044256 13413640652 016646 0 ustar ruben ruben /**
* thread-pipe.c
*
*
* Authors:
* Michi
*
* Web page: https://ahoi.io/project/oregano
*
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
/*
*
* BASICS
* ------
* ThreadPipe can be used to efficiently communicate large
* or small data between 2 threads, whereas the data pops up
* bit by bit (or at once).
* It consists of a chain of data blocks. New
* data is appended at the one end of the chain, old data
* can be read at the other end of the pipe.
*
* If there is data (chain has more than 1 chain link), the
* reader gets to know this by locking a mutex and asking
* the state of a shared variable.
*
* If all data is read and the reader needs more data, he
* will wait until new data is available by locking a mutex
* and waiting for a conditional signal of the writer.
*
*
* Locking, unlocking and signaling can slow down the
* communication process very hard, if the data blocks are
* small. To solve this problem, an additional buffer is
* introduced.
*
* BUFFERED VERSION
* ----------------
* The problem of unbuffered ThreadPipe is that locking
* and unlocking is a very heavy work that should not
* be done too frequently. Now if the data blocks pushed
* to ThreadPipe are too small, the lock operation is
* done very often. However the positive side of small blocks
* is the real time ability.
*
* If you need only weak real time or no real time but an
* efficient use of time and money, you should use the
* buffered version of thread pipe with large (but not too
* large) buffer numbers (you can use a buffer by setting
* the buffer numbers in the constructor unequal 1).
*
* There are some approaches how to realize a buffer in the
* case of thread pipe:
* - melting incoming blocks together with realloc,
* counting the number of bytes or melting operations,
* release the block for popping when number is large enough,
* - appending incoming blocks together,
* counting the number of bytes or/and number of blocks not released,
* release the block queue if number is large enough,
* - counting time instead of space,
* - other shit
*
* Because blocks are structure elements that can be used to
* make the code more efficient AND melting operations
* can be heavy work, I think that simply appending some
* blocks and not locking/releasing every single block is
* a good way to go. Counting time instead of space may be
* a good approach for real time applications that want to
* be also efficient. But because real time is not demanded
* in a non real time simulation like ngspice or gnucap, we don't
* need to bother. But you can set the buffer numbers to 1
* and then you can use thread pipe in real time applications,
* that have far too much nop-time and really small amounts of
* data workload.
*
* Furthermore I have decided to count the number of blocks
* and the total size of not released blocks. When one of
* the counting numbers are larger than their corresponding
* buffer constants, the whole pipe queue is released for
* popping (what needs a small locking access).
*
* You have some possibilities to define the buffer constants:
* - define statements in thread-pipe.h
* - telling the constructor function what are your wishes
*
* THE FUTURE
* ----------
* An enhanced version of this could be an adaptive buffer size
* decision maker that detects the frequency of collisions
* and uses this information to adapt the optimal buffer size
* as a function of time, by extrapolating the behavior of
* the program like branch prediction technology that is used in
* processors. A good version of this could be real time capable
* in low workload times and would be optimal for time, space
* and money saving in times of high workload.
*
*/
#include
#include
#include
#include
#include "thread-pipe.h"
typedef struct _ThreadPipeData ThreadPipeData;
/**
* chain link/chain element
*/
struct _ThreadPipeData {
// introduced for efficient string support
gpointer malloc_address;
// data block
gpointer data;
// size of data block
gsize size;
// link to next chain element
ThreadPipeData *next;
};
/**
* structuring structure
*/
typedef struct {
// closing/freeing information
gboolean write_eof;
gboolean read_eof;
// buffer state information
gsize size_total;
gsize block_counter;
} ThreadPipeBufferData;
struct _ThreadPipe {
/**
* variables of reading thread
*/
ThreadPipeData *read_data;
ThreadPipeBufferData read_buffer_data;
/**
* variables of writing thread
*/
ThreadPipeData *write_data;
ThreadPipeBufferData write_buffer_data;
/**
* shared variables
*/
ThreadPipeBufferData ready_buffer_data;
/**
* synchronizing variables
*/
GMutex mutex;
GCond cond;
/**
* read-only variables
*/
guint max_block_counter;
gsize max_size_total;
};
static ThreadPipeData *thread_pipe_data_new(gpointer data, gsize size);
static ThreadPipeData *thread_pipe_data_destroy(ThreadPipe *pipe);
static void thread_pipe_destroy(ThreadPipe *pipe);
/**
* Creates a new ThreadPipe structure.
*
* I recommend using ThreadPipes like normal FIFO pipes, whereas one thread
* uses only read functions and another thread uses only write functions.
* The reading thread should make sure that read_eof will be set,
* the writing thread should make sure that write_eof will be set,
* because:
*
* ThreadPipes have 3 possibilities to close:
* 1. call thread_pipe_set_write_eof and after that read the pipe to the end
* 2. call thread_pipe_set_write_eof and after that call thread_pipe_set_read_eof
* 3. call thread_pipe_set_read_eof and after that call thread_pipe_set_write_eof
*
* Now if the creating thread of the ThreadPipe wants to close the ThreadPipe,
* and he did not touch any reading or writing functions, he does not know
* whether the pipe has been closed already automatically and will cause a
* segmentation fault eventually if he tries.
*
* @max_buffer_block_counter: 1 is the lowest number (you can't push no data).
* If 0, the default value from thread-pipe.h will be used.
* @max_buffer_block_counter: 1 is the lowest value (ThreadPipe does not allow
* to push blocks of size 0). If 0, the default value from thread-pipe.h
* will be used.
*
* returns a new ThreadPipe structure
*/
ThreadPipe *thread_pipe_new(
guint max_buffer_block_counter,
gsize max_buffer_size_total) {
ThreadPipe *thread_pipe = g_new0(ThreadPipe, 1);
g_mutex_init(&thread_pipe->mutex);
g_cond_init(&thread_pipe->cond);
ThreadPipeData *pipe_data = thread_pipe_data_new(NULL, 0);
thread_pipe->read_data = pipe_data;
thread_pipe->write_data = pipe_data;
thread_pipe->max_block_counter = max_buffer_block_counter != 0 ? max_buffer_block_counter : THREAD_PIPE_MAX_BUFFER_BLOCK_COUNTER_DEFAULT;
thread_pipe->max_size_total = max_buffer_size_total != 0 ? max_buffer_size_total : THREAD_PIPE_MAX_BUFFER_SIZE_TOTAL_DEFAULT;
return thread_pipe;
}
/**
* Pushes a block of size size to the end of the pipe. The data is copied
* to heap.
*
* Don't push, if you set write_eof already.
*
* return value will be NULL, if
* - read_eof has been set by thread_pipe_set_read_eof or
* - write_eof has been set by thread_pipe_set_write_eof (with fail message) or
* - pipe is NULL (with fail message).
*
* If read_eof has been set by thread_pipe_set_read_eof before, you can close
* the pipe by setting write_eof and you will save much time and money,
* so be sure to check return value every call. But you can also call this
* function if it makes no sense. The function recognizes then that
* pushing makes no sense and returns fast. The function is not closing the
* pipe automatically in this case because it is safer for example if the
* programmer does not check the return value.
*
* returns TRUE or FALSE
* - FALSE, if the pipe has been closed by read_eof or other events that
* indicate that you can close the pipe by setting write_eof
* - TRUE, if the pipe is living further on and it makes sense that it
* will live further on
*/
gboolean thread_pipe_push(ThreadPipe *pipe, gpointer data, gsize size) {
// Give me an object.
g_return_val_if_fail(pipe != NULL, FALSE);
// Don't push, if you set write_eof already.
g_return_val_if_fail(pipe->write_buffer_data.write_eof != TRUE, FALSE);
// Don't push no data to pipe.
g_return_val_if_fail(data != NULL, !pipe->write_buffer_data.read_eof);
g_return_val_if_fail(size != 0, !pipe->write_buffer_data.read_eof);
// pipe not active any more because no reader has interest.
if (pipe->write_buffer_data.read_eof)
return FALSE;
pipe->write_data->next = thread_pipe_data_new(data, size);
pipe->write_data = pipe->write_data->next;
pipe->write_buffer_data.block_counter++;
pipe->write_buffer_data.size_total += size;
if (pipe->write_buffer_data.block_counter < pipe->max_block_counter
&& pipe->write_buffer_data.size_total < pipe->max_size_total)
return TRUE;
g_mutex_lock(&pipe->mutex);
pipe->ready_buffer_data.block_counter += pipe->write_buffer_data.block_counter;
pipe->write_buffer_data.block_counter = 0;
pipe->ready_buffer_data.size_total += pipe->write_buffer_data.size_total;
pipe->write_buffer_data.size_total = 0;
pipe->write_buffer_data.read_eof = pipe->ready_buffer_data.read_eof;
g_cond_signal(&pipe->cond);
g_mutex_unlock(&pipe->mutex);
return !pipe->write_buffer_data.read_eof;
}
/**
* Reads a block of memory that has been pushed earlier by thread_pipe_push.
* If there is no block that has been pushed earlier, this function will
* wait until a block will be pushed or write_eof will be set.
*
* pipe will be destroyed automatically if write_eof has been set && pipe is
* empty, so be sure to check return value always!
*
* The data, stored to data_out, will be freed in the next thread_pipe_pop call,
* so be sure to copy the data, if you need it longer than one thread_pipe_pop
* cycle.
*
* Don't pop, if you set read_eof already.
*
* returns pipe or NULL
* - NULL, if the pipe has been destroyed
* - pipe, if the pipe is living further on
*/
ThreadPipe *thread_pipe_pop(ThreadPipe *pipe, gpointer *data_out, gsize *size) {
g_return_val_if_fail(pipe != NULL, pipe);
g_return_val_if_fail(data_out != NULL, pipe);
g_return_val_if_fail(size != NULL, pipe);
//Don't pop, if you set read_eof already.
g_return_val_if_fail(pipe->read_buffer_data.read_eof != TRUE, NULL);
*data_out = NULL;
*size = 0;
if (pipe->read_buffer_data.block_counter <= 0) {
g_mutex_lock(&pipe->mutex);
while (pipe->ready_buffer_data.block_counter <= 0 && !pipe->ready_buffer_data.write_eof)
g_cond_wait(&pipe->cond, &pipe->mutex);
pipe->read_buffer_data.block_counter = pipe->ready_buffer_data.block_counter;
pipe->ready_buffer_data.block_counter = 0;
pipe->read_buffer_data.size_total = pipe->ready_buffer_data.size_total;
pipe->ready_buffer_data.size_total = 0;
pipe->read_buffer_data.write_eof = pipe->ready_buffer_data.write_eof;
g_mutex_unlock(&pipe->mutex);
}
if (!thread_pipe_data_destroy(pipe)) {
thread_pipe_destroy(pipe);
return NULL;
}
*data_out = pipe->read_data->data;
*size = pipe->read_data->size;
return pipe;
}
/**
* Reads to the end of a line like fgets and pops it, or reads to the end of pipe.
*
* size_out will be the length + 1 of the string like strlen.
*
* Pushed data blocks should be 0 terminated, but don't have to.
*
* possible independent cases:
* - newline at position of block, where position in Po := {nowhere, beginning/middle, end}
* - newline at is_first block, where is_first in If := {first, not first}
* - newline at is_last block, where is_last in Il := {last, not last}
* In total there are 12 pairwise unequal cases by forming the Cartesian product of Po, If and Il
* and adding the case where there is no newline at all.
*
* returns pipe or NULL like thread_pipe_pop
*/
ThreadPipe *thread_pipe_pop_line(ThreadPipe *pipe_in, gchar **string_out, gsize *size_out) {
g_return_val_if_fail(pipe_in != NULL, pipe_in);
g_return_val_if_fail(string_out != NULL, pipe_in);
g_return_val_if_fail(size_out != NULL, pipe_in);
//Don't pop, if you set read_eof already.
g_return_val_if_fail(pipe_in->read_buffer_data.read_eof != TRUE, NULL);
*string_out = NULL;
*size_out = 0;
size_t line_size;
gchar *line;
FILE *line_file = open_memstream(&line, &line_size);
ThreadPipeData *current = NULL;
gchar *ptr = NULL;
while (TRUE) {
ptr = NULL;
if (pipe_in->read_buffer_data.block_counter <= 0) {
g_mutex_lock(&pipe_in->mutex);
while (pipe_in->ready_buffer_data.block_counter <= 0 && !pipe_in->ready_buffer_data.write_eof)
g_cond_wait(&pipe_in->cond, &pipe_in->mutex);
pipe_in->read_buffer_data.block_counter = pipe_in->ready_buffer_data.block_counter;
pipe_in->ready_buffer_data.block_counter = 0;
pipe_in->read_buffer_data.size_total = pipe_in->ready_buffer_data.size_total;
pipe_in->ready_buffer_data.size_total = 0;
pipe_in->read_buffer_data.write_eof = pipe_in->ready_buffer_data.write_eof;
g_mutex_unlock(&pipe_in->mutex);
}
current = pipe_in->read_data->next;
if (current == NULL)
break;
ptr = current->data;
while (*ptr != '\n' &&
*ptr != 0 &&
ptr - (gchar *)current->data < current->size //somebody forgot to close the string with 0?
) {
fputc(*ptr, line_file);
ptr++;
}
if (ptr - (gchar *)current->data < current->size && *ptr == '\n') {
fputc(*ptr, line_file);
ptr++;
break;
}
thread_pipe_data_destroy(pipe_in);
}
fputc(0, line_file);
fclose(line_file);
if (current == NULL) {
if (line_size == 1) {
g_free(line);
thread_pipe_destroy(pipe_in);
return NULL;
}
} else {
gchar **current_data = (gchar **)¤t->data;
gsize *current_size = ¤t->size;
*current_size -= (ptr - *current_data);
pipe_in->read_buffer_data.size_total -= (ptr - *current_data);
*current_data = ptr;
if (*current_size == 0 || (*current_size == 1 && *ptr == 0))
thread_pipe_data_destroy(pipe_in);
}
/**
* current == NULL && line_size != 1
* ||
* current != NULL
*/
gchar **old_data = (gchar **)&pipe_in->read_data->malloc_address;
gsize *old_size = &pipe_in->read_data->size;
g_free(*old_data);
*old_data = line;
*old_size = line_size;
*string_out = *old_data;
*size_out = *old_size;
return pipe_in;
}
/**
* If you are finished with writing, you have to set write_eof so that the
* memory of pipe can be freed. You can set write_eof independent of
* - read_eof
* - emptiness of pipe
* - other shit
*
* Don't push, after you called thread_pipe_set_write_eof.
*
* The memory of data and pipe will be freed, if read_eof && write_eof == TRUE.
*/
void thread_pipe_set_write_eof(ThreadPipe *pipe) {
g_return_if_fail(pipe != NULL);
g_return_if_fail(pipe->write_buffer_data.write_eof != TRUE);
g_mutex_lock(&pipe->mutex);
gboolean destroy = pipe->ready_buffer_data.read_eof;
pipe->ready_buffer_data.write_eof = TRUE;
// pipe->read_buffer_data.write_eof = TRUE;
pipe->write_buffer_data.write_eof = TRUE;
pipe->ready_buffer_data.block_counter += pipe->write_buffer_data.block_counter;
pipe->write_buffer_data.block_counter = 0;
pipe->ready_buffer_data.size_total += pipe->write_buffer_data.size_total;
pipe->write_buffer_data.size_total = 0;
g_cond_signal(&pipe->cond);
g_mutex_unlock(&pipe->mutex);
if (destroy)
thread_pipe_destroy(pipe);
}
/**
* If you are finished with reading, you have to set read_eof so that the
* memory of pipe can be freed. You can set read_eof independent of
* - write_eof
* - emptiness of pipe
* - other shit
*
* Don't pop, after you called thread_pipe_set_read_eof.
*
* The memory of data waiting in pipe to be popped, will all be freed.
*
* The memory of pipe will be freed also, if write_eof && write_eof == TRUE.
*/
void thread_pipe_set_read_eof(ThreadPipe *pipe) {
g_return_if_fail(pipe != NULL);
g_return_if_fail(pipe->read_buffer_data.read_eof != TRUE);
g_mutex_lock(&pipe->mutex);
gboolean destroy = pipe->ready_buffer_data.write_eof;
pipe->ready_buffer_data.read_eof = TRUE;
pipe->read_buffer_data.read_eof = TRUE;
// pipe->write_buffer_data.read_eof = TRUE;
pipe->read_buffer_data.write_eof = pipe->ready_buffer_data.write_eof;
pipe->read_buffer_data.block_counter += pipe->ready_buffer_data.block_counter;
pipe->ready_buffer_data.block_counter = 0;
pipe->read_buffer_data.size_total += pipe->ready_buffer_data.size_total;
pipe->ready_buffer_data.size_total = 0;
while (pipe->read_buffer_data.block_counter)
thread_pipe_data_destroy(pipe);
g_mutex_unlock(&pipe->mutex);
if (destroy)
thread_pipe_destroy(pipe);
}
/**
* copy data to a new ThreadPipeData structure
*/
static ThreadPipeData *thread_pipe_data_new(gpointer data, gsize size) {
ThreadPipeData *pipe_data = g_new0(ThreadPipeData, 1);
if (data != NULL && size != 0) {
pipe_data->malloc_address = g_malloc(size);
memcpy(pipe_data->malloc_address, data, size);
pipe_data->data = pipe_data->malloc_address;
pipe_data->size = size;
}
return pipe_data;
}
/**
* free all memory of a ThreadPipeData structure
*
* returns
* - the next block of the linked list, if there is one
* - else NULL
*/
static ThreadPipeData *thread_pipe_data_destroy(ThreadPipe *pipe) {
ThreadPipeData *pipe_data = pipe->read_data;
ThreadPipeData *next = pipe_data->next;
g_free(pipe_data->malloc_address);
g_free(pipe_data);
if (next != NULL) {
pipe->read_buffer_data.block_counter--;
pipe->read_buffer_data.size_total -= next->size;
}
pipe->read_data = next;
return next;
}
/**
* free all memory of a ThreadPipe structure
*/
static void thread_pipe_destroy(ThreadPipe *pipe) {
g_return_if_fail(pipe != NULL);
while (pipe->read_data)
thread_pipe_data_destroy(pipe);
g_mutex_clear(&pipe->mutex);
g_cond_clear(&pipe->cond);
g_free(pipe);
}
oregano-0.84.41/src/tools/thread-pipe.h 0000644 0001750 0001750 00000003157 13413640652 016646 0 ustar ruben ruben /*
* thread-pipe.h
*
*
* Authors:
* Michi
*
* Web page: https://ahoi.io/project/oregano
*
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#ifndef THREAD_PIPE_H_
#define THREAD_PIPE_H_
#define THREAD_PIPE_MAX_BUFFER_BLOCK_COUNTER_DEFAULT 20
#define THREAD_PIPE_MAX_BUFFER_SIZE_TOTAL_DEFAULT 2048
typedef struct _ThreadPipe ThreadPipe;
/**
* Constructor
*/
ThreadPipe *thread_pipe_new(
guint max_buffer_block_counter,
gsize max_buffer_size_total);
/**
* functions for writing thread
*/
gboolean thread_pipe_push(ThreadPipe *pipe, gpointer data, gsize size);
// Destructor
void thread_pipe_set_write_eof(ThreadPipe *pipe);
/**
* functions for reading thread
*/
ThreadPipe *thread_pipe_pop(ThreadPipe *pipe, gpointer *data_out, gsize *size);
ThreadPipe *thread_pipe_pop_line(ThreadPipe *pipe, gchar **data_out, gsize *size);
// Destructor
void thread_pipe_set_read_eof(ThreadPipe *pipe);
#endif /* THREAD_PIPE_H_ */
oregano-0.84.41/src/schematic-view.h 0000644 0001750 0001750 00000006712 13413640652 016214 0 ustar ruben ruben /*
* schematic-view.h
*
*
* Authors:
* Richard Hult
* Ricardo Markiewicz
* Andres de Barbara
* Marc Lorber
* Guido Trentalancia
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2004 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
* Copyright (C) 2017 Guido Trentalancia
*
* This library 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this library; if not, write to the
* Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#ifndef __SCHEMATIC_VIEW_H
#define __SCHEMATIC_VIEW_H
// typedefing before including makes circular dependencies possible
typedef struct _SchematicView SchematicView;
#include
#include "schematic.h"
#include "sheet.h"
/*
* When stretching a schematic to resize
* it, increase its width or height of
* this percentage (the recommended factor
* is 0.15 for a 15% increase).
*/
#define SCHEMATIC_STRETCH_FACTOR 0.15
typedef enum { DRAG_URI_INFO, DRAG_PART_INFO } DragTypes;
#define TYPE_SCHEMATIC_VIEW (schematic_view_get_type ())
#define SCHEMATIC_VIEW(obj) (G_TYPE_CHECK_INSTANCE_CAST ((obj), TYPE_SCHEMATIC_VIEW, SchematicView))
#define SCHEMATIC_VIEW_CLASS(klass) \
(G_TYPE_CHECK_CLASS_CAST ((klass), TYPE_SCHEMATIC_VIEW, SchematicViewClass))
#define IS_SCHEMATIC_VIEW(obj) (G_TYPE_CHECK_INSTANCE_TYPE ((obj), TYPE_SCHEMATIC_VIEW))
#define IS_SCHEMATIC_VIEW_CLASS(klass) \
(G_TYPE_INSTANCE_GET_CLASS ((obj), TYPE_SCHEMATIC_VIEW, SchematicViewClass))
typedef struct _SchematicViewClass SchematicViewClass;
typedef struct _SchematicViewPriv SchematicViewPriv;
GType schematic_view_get_type (void);
void schematic_view_simulate_cmd (GtkWidget *widget, SchematicView *sv);
SchematicView *schematic_view_new (Schematic *schematic);
Sheet *schematic_view_get_sheet (SchematicView *sv);
void schematic_view_set_sheet (SchematicView *sv, Sheet *sheet);
Schematic *schematic_view_get_schematic (SchematicView *sv);
Schematic *schematic_view_get_schematic_from_sheet (Sheet *sheet);
SchematicView *schematic_view_get_schematicview_from_sheet (Sheet *sheet);
void run_context_menu (SchematicView *sv, GdkEventButton *event);
// Signal emission wrappers.
void schematic_view_reset_tool (SchematicView *sv);
// Misc.
void schematic_view_set_browser (SchematicView *sv, gpointer p);
gpointer schematic_view_get_browser (SchematicView *sv);
void schematic_view_set_parent (SchematicView *sv, GtkDialog *dialog);
// Logging.
void schematic_view_log_show (SchematicView *sv, gboolean explicit);
gboolean schematic_view_get_log_window_exists (SchematicView *sv);
// Windows services.
GtkWidget *schematic_view_get_toplevel (SchematicView *sv);
#endif /* __SCHEMATIC_VIEW_H */
oregano-0.84.41/src/netlist-editor.h 0000644 0001750 0001750 00000004460 13413640652 016250 0 ustar ruben ruben /*
* netlist-editor.h
*
*
* Author:
* Andres de Barbara
* Marc Lorber
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 2004-2008 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#ifndef __NETLIST_EDIT_H
#define __NETLIST_EDIT_H
#include
#include
#include
#include "schematic-view.h"
#include "errors.h"
#include "engine.h"
#define TYPE_NETLIST_EDITOR (netlist_editor_get_type ())
#define NETLIST_EDITOR(obj) (G_TYPE_CHECK_INSTANCE_CAST ((obj), TYPE_NETLIST_EDITOR, NetlistEditor))
#define NETLIST_EDITOR_CLASS(klass) \
(G_TYPE_CHECK_CLASS_CAST ((klass), TYPE_NETLIST_EDITOR, NetlistEditorClass))
#define IS_NETLIST_EDITOR(obj) (G_TYPE_CHECK_INSTANCE_TYPE ((obj), TYPE_NETLIST_EDITOR))
#define IS_NETLIST_EDITOR_CLASS(klass) \
(G_TYPE_INSTANCE_GET_CLASS ((obj), TYPE_NETLIST_EDITOR, NetlistEditorClass))
typedef struct _NetlistEditor NetlistEditor;
typedef struct _NetlistEditorClass NetlistEditorClass;
typedef struct _NetlistEditorPriv NetlistEditorPriv;
struct _NetlistEditor
{
GObject parent;
NetlistEditorPriv *priv;
};
struct _NetlistEditorClass
{
GObjectClass parent_class;
// Signals go here
};
GType netlist_editor_get_type (void);
NetlistEditor *netlist_editor_new_from_file (gchar *filename);
NetlistEditor *netlist_editor_new_from_schematic_view (SchematicView *sv);
NetlistEditor *netlist_editor_new (GtkSourceBuffer *textbuffer);
#endif
oregano-0.84.41/src/pixmaps/ 0000755 0001750 0001750 00000000000 13413640652 014606 5 ustar ruben ruben oregano-0.84.41/src/pixmaps/mini_icon_plot.xcf 0000644 0001750 0001750 00000002700 13413640652 020311 0 ustar ruben ruben gimp xcf file B B c
New Layer
% 5 E h
h і h h hh h h h ' E h
h KE K KEK K K hKKKK K h KKK hEh h KK h K h ' E h
h 7[ [7[ [ [ h[[ [ h [[ h7h h [[ h [[ h ' U 3 Color
I ] m ! Є P МММММ МММММ МММММ МММММ МММММ МММММ МММММ МММММ ! dd4d4 T ԬԬԬԬԬ ԬԬԬԬԬ ԬԬԬԬԬ ԬԬԬԬԬ ԬԬԬԬԬ ԬԬԬԬԬ ԬԬԬԬԬ ԬԬԬԬԬ ! XX$X$ H ĤĤĤĤĤ ĤĤĤĤĤ ĤĤĤĤĤ ĤĤĤĤĤ ĤĤĤĤĤ ĤĤĤĤĤ ĤĤĤĤĤ ĤĤĤĤĤ
oregano-0.84.41/src/pixmaps/logo.xpm 0000644 0001750 0001750 00000261545 13413640652 016311 0 ustar ruben ruben /* XPM */
static char *logo_xpm[] = {
"285 80 2813 2",
" c None",
". c #BBBDF5",
"+ c #A0A2EB",
"@ c #ABACE9",
"# c #E8E9F4",
"$ c #EAEBF6",
"% c #E3E5EF",
"& c #EAEBF5",
"* c #E5E6F0",
"= c #DADBE4",
"- c #E6E8F1",
"; c #EAEBF4",
"> c #EAEBF3",
", c #ECEDF5",
"' c #EDEEF6",
") c #E5E7EE",
"! c #DBDDE4",
"~ c #EEF0F7",
"{ c #F4F5FC",
"] c #DEDFE7",
"^ c #EBECF4",
"/ c #E2E3EB",
"( c #E1E2EA",
"_ c #E0E2EA",
": c #D8DAE2",
"< c #E9EBF3",
"[ c #EEF0F8",
"} c #E7E8F1",
"| c #D1D2DB",
"1 c #EFF0F9",
"2 c #ECEDF6",
"3 c #E2E4ED",
"4 c #EEF0F9",
"5 c #E9EAF4",
"6 c #ECEEF8",
"7 c #ECEDF7",
"8 c #ECEDF8",
"9 c #E6E8F2",
"0 c #E6E7F2",
"a c #EAECF7",
"b c #DFE1ED",
"c c #ECEEFA",
"d c #EBEDFA",
"e c #D6D8E5",
"f c #E0E2F0",
"g c #E3E5F2",
"h c #E8EAF6",
"i c #E4E6F1",
"j c #E4E6F0",
"k c #EDEFF8",
"l c #DFE0E9",
"m c #E4E5ED",
"n c #E7E8F0",
"o c #E9EAF1",
"p c #EDEFF6",
"q c #EAEAF2",
"r c #E5E6ED",
"s c #ECEDF4",
"t c #E6E8F4",
"u c #DEE0EE",
"v c #E0E2F1",
"w c #E7EAF8",
"x c #E6E8F6",
"y c #DEE1EF",
"z c #DEE0EF",
"A c #D9DCEA",
"B c #DBDDEC",
"C c #DDE0EE",
"D c #DCDEEC",
"E c #DBDDEB",
"F c #DFE1EF",
"G c #E2E4F3",
"H c #E5E7F6",
"I c #E4E6F4",
"J c #D4D7E4",
"K c #E0E1F0",
"L c #E8EAFA",
"M c #DFE2F0",
"N c #E3E6F3",
"O c #D5D8E8",
"P c #D0D2E2",
"Q c #D7DAEA",
"R c #DEE0F1",
"S c #DDDEEF",
"T c #E0E3F4",
"U c #E3E5F6",
"V c #E2E4F5",
"W c #DFE1F2",
"X c #DCDFEF",
"Y c #E0E2F3",
"Z c #D7D8E9",
"` c #CED1E1",
" . c #E0E3F3",
".. c #E0E1F2",
"+. c #DEE1F1",
"@. c #E5E7F8",
"#. c #E4E7F7",
"$. c #E4E6F6",
"%. c #DDDFEF",
"&. c #D6D8E8",
"*. c #DFE2F3",
"=. c #E2E3F2",
"-. c #D9D9E2",
";. c #DFE0E8",
">. c #AFB0E0",
",. c #8C8DE7",
"'. c #D1D2F8",
"). c #BCBDF8",
"!. c #8E8EDC",
"~. c #B1B1EF",
"{. c #E2E3F4",
"]. c #E0E1EB",
"^. c #D7D8F4",
"/. c #D0D2F8",
"(. c #BFC0EB",
"_. c #CFD1EF",
":. c #DEE0ED",
"<. c #E5E7F2",
"[. c #E1E2ED",
"}. c #E3E4EC",
"|. c #AAC5C0",
"1. c #BEDED5",
"2. c #E9EEF3",
"3. c #E8E9F1",
"4. c #E2E4F0",
"5. c #E9EBFA",
"6. c #E2E5F3",
"7. c #E4E5F4",
"8. c #E4E7F5",
"9. c #E6E9F8",
"0. c #E3E5F3",
"a. c #E1E4F2",
"b. c #E1E2F1",
"c. c #D9DBEE",
"d. c #D7DAEC",
"e. c #DCDFF1",
"f. c #DFE2F5",
"g. c #D6D9EC",
"h. c #D4D7EA",
"i. c #D8DBED",
"j. c #D5D7EA",
"k. c #D7DAED",
"l. c #D6D9EB",
"m. c #D6D8EB",
"n. c #DADDF0",
"o. c #DCDFF2",
"p. c #D8DBEE",
"q. c #E1E4F7",
"r. c #DDE0F3",
"s. c #E7EAFD",
"t. c #E4E7FB",
"u. c #DCDFF4",
"v. c #CFD2E7",
"w. c #D1D4E9",
"x. c #D0D3E8",
"y. c #CDCFE5",
"z. c #D2D4EA",
"A. c #DEE1F7",
"B. c #E5E8FE",
"C. c #D4D6EC",
"D. c #D6D9EF",
"E. c #DBDEF4",
"F. c #D7DAEF",
"G. c #D3D6EB",
"H. c #DADDF2",
"I. c #E1E4FA",
"J. c #D7D9EF",
"K. c #E3E6FB",
"L. c #D7DAF0",
"M. c #D8DBF1",
"N. c #D4D7EC",
"O. c #DCDFF5",
"P. c #DCDEEF",
"Q. c #DADDED",
"R. c #B8BBEF",
"S. c #C4C6E7",
"T. c #DEE0F0",
"U. c #CCCEE4",
"V. c #BCBEEE",
"W. c #D1D4EE",
"X. c #D0D2EF",
"Y. c #D8DAFA",
"Z. c #C7C9F0",
"`. c #BCBDF0",
" + c #C4C5F6",
".+ c #E4E4F7",
"++ c #E1E3F5",
"@+ c #B0B2F5",
"#+ c #D7D8EA",
"$+ c #DFE0EA",
"%+ c #CFD1DA",
"&+ c #D5D7E2",
"*+ c #E5E7F3",
"=+ c #DFE0ED",
"-+ c #DADBE7",
";+ c #D7D9E4",
">+ c #D8D9E2",
",+ c #E8EAF2",
"'+ c #F0F1F8",
")+ c #EBECF3",
"!+ c #E6E7EF",
"~+ c #E1E3EF",
"{+ c #EBEDFB",
"]+ c #E3E6F4",
"^+ c #C4D1DA",
"/+ c #CDDBE4",
"(+ c #D7D9E7",
"_+ c #E0E3F1",
":+ c #E2E5F8",
"<+ c #DEE1F4",
"[+ c #E3E6F9",
"}+ c #E0E3F6",
"|+ c #DDDFF3",
"1+ c #D2D5E7",
"2+ c #D4D7E9",
"3+ c #DDDFED",
"4+ c #E2E4F4",
"5+ c #DDDDED",
"6+ c #D2D4E2",
"7+ c #D1D3E1",
"8+ c #DADCEB",
"9+ c #DFE1F0",
"0+ c #D9DBE9",
"a+ c #DFE2EF",
"b+ c #E3E4F3",
"c+ c #E7E9F8",
"d+ c #D8D9EA",
"e+ c #DFE2F2",
"f+ c #DDDFF0",
"g+ c #D8DAEB",
"h+ c #D8DAEA",
"i+ c #E1E3F4",
"j+ c #DADCED",
"k+ c #D9DBEC",
"l+ c #D9DBEB",
"m+ c #DBDDED",
"n+ c #DDE0F0",
"o+ c #DCDEEE",
"p+ c #E8EBFA",
"q+ c #E2E3F5",
"r+ c #E0E2F2",
"s+ c #E1E3F3",
"t+ c #D7DAEB",
"u+ c #D3D5E6",
"v+ c #CCCEDF",
"w+ c #D5D7ED",
"x+ c #D5D8ED",
"y+ c #D2D5EA",
"z+ c #D4D7EB",
"A+ c #D4D6E9",
"B+ c #E4E7F9",
"C+ c #E4E7F8",
"D+ c #D6D8EF",
"E+ c #C1C4F0",
"F+ c #CBCEE9",
"G+ c #DADDEB",
"H+ c #D5D8EF",
"I+ c #C8CAF0",
"J+ c #E3E5F4",
"K+ c #E6E8F7",
"L+ c #D8DBE9",
"M+ c #EFF1F8",
"N+ c #DCDEE5",
"O+ c #EAECF5",
"P+ c #E8E9F3",
"Q+ c #E1E2EF",
"R+ c #DBDCE9",
"S+ c #E0E2ED",
"T+ c #DEDFEB",
"U+ c #EDEFF9",
"V+ c #EEEFF8",
"W+ c #E6E7F0",
"X+ c #E2E4EC",
"Y+ c #DEDFEE",
"Z+ c #D6D8E7",
"`+ c #D7D8E7",
" @ c #D4D6E4",
".@ c #DCDEED",
"+@ c #D8DAEE",
"@@ c #E9ECFC",
"#@ c #D5D8EA",
"$@ c #E1E3F2",
"%@ c #E6E9F7",
"&@ c #DFE0EF",
"*@ c #DADCEA",
"=@ c #E5E8F7",
"-@ c #E7E9F5",
";@ c #EEEFF6",
">@ c #EEEFF7",
",@ c #EDEEF5",
"'@ c #DBDCE4",
")@ c #D3D4DB",
"!@ c #E3E4EB",
"~@ c #F2F3FA",
"{@ c #EFF0F8",
"]@ c #E0E2E9",
"^@ c #E1E3EA",
"/@ c #E1E1EA",
"(@ c #D3D4DC",
"_@ c #EDEDF6",
":@ c #E2E3EC",
"<@ c #D6D8E0",
"[@ c #E1E2EB",
"}@ c #E9E9F2",
"|@ c #F2F3FB",
"1@ c #DCDDE6",
"2@ c #E5E6EE",
"3@ c #EDEFF7",
"4@ c #E5E5EE",
"5@ c #D5D7E6",
"6@ c #CCCFEF",
"7@ c #B6B8E7",
"8@ c #D3D6EA",
"9@ c #D8D9F2",
"0@ c #C7CAEE",
"a@ c #E4E6F5",
"b@ c #DBDEF1",
"c@ c #D9DCEF",
"d@ c #D8DAE9",
"e@ c #DEE1F2",
"f@ c #E1E4F4",
"g@ c #D9DBEA",
"h@ c #E9EAF2",
"i@ c #DADBE6",
"j@ c #E9EAF7",
"k@ c #E7E9F4",
"l@ c #E0E1EA",
"m@ c #D4D6DD",
"n@ c #D8DAE7",
"o@ c #DEDFF0",
"p@ c #D8DBF0",
"q@ c #D5D8EC",
"r@ c #D1D4E6",
"s@ c #DBDDF0",
"t@ c #EAECFA",
"u@ c #D4D9E6",
"v@ c #C7D4DD",
"w@ c #D6E0EA",
"x@ c #E9EBF9",
"y@ c #EAECFB",
"z@ c #E1E4F1",
"A@ c #E4E6F3",
"B@ c #F1F2FA",
"C@ c #F3F4FB",
"D@ c #F4F5FD",
"E@ c #F0F1F9",
"F@ c #F1F2F9",
"G@ c #F0F2F9",
"H@ c #E7E8EF",
"I@ c #E4E6ED",
"J@ c #D7D8DF",
"K@ c #D6D7DF",
"L@ c #EFF0F4",
"M@ c #E0E0E3",
"N@ c #F5F5F7",
"O@ c #F8F8FA",
"P@ c #ECEDEF",
"Q@ c #F4F4F6",
"R@ c #F8F9FB",
"S@ c #F6F7F9",
"T@ c #E4E5E7",
"U@ c #F3F3F6",
"V@ c #EDEDF0",
"W@ c #D7D7DA",
"X@ c #F7F7FA",
"Y@ c #E8E9EB",
"Z@ c #F0F1F3",
"`@ c #DCDDDF",
" # c #F7F8FA",
".# c #FBFBFE",
"+# c #EEEEF1",
"@# c #F8F8FB",
"## c #D6D6D9",
"$# c #E5E6E9",
"%# c #F6F6F9",
"&# c #E2E3E6",
"*# c #EFF0F3",
"=# c #F9F9FC",
"-# c #E1E2E5",
";# c #F4F4F7",
"># c #EAEAED",
",# c #ECECEF",
"'# c #F2F2F5",
")# c #E4E5E8",
"!# c #DEDEE1",
"~# c #F0F1F4",
"{# c #F6F7FA",
"]# c #DEDFE2",
"^# c #E7E7EA",
"/# c #F5F5F8",
"(# c #EFEFF2",
"_# c #F8F9FC",
":# c #F4F4F9",
"<# c #EBECF5",
"[# c #CDCEF4",
"}# c #9293E2",
"|# c #B6B7E7",
"1# c #E3E4F1",
"2# c #E0E0ED",
"3# c #D4D5F0",
"4# c #B4B5F6",
"5# c #A9AAEA",
"6# c #E9EBF4",
"7# c #D4D6ED",
"8# c #CED0ED",
"9# c #CFD1F2",
"0# c #D3D6F2",
"a# c #DDDFF1",
"b# c #DEE0F2",
"c# c #D3D5F5",
"d# c #CDCFF2",
"e# c #D3D6E8",
"f# c #D5D8EB",
"g# c #DADDF3",
"h# c #D9DCF1",
"i# c #D4D7ED",
"j# c #DCDFEE",
"k# c #DBDEEB",
"l# c #E0E1EE",
"m# c #DDDEE6",
"n# c #C9CBD3",
"o# c #DDDEE8",
"p# c #ECEEF6",
"q# c #EAEBF2",
"r# c #E2E4F2",
"s# c #DADBEA",
"t# c #DADCF2",
"u# c #DFE2F8",
"v# c #DDE0F6",
"w# c #D8DAE8",
"x# c #DCDFED",
"y# c #DDDEED",
"z# c #E1E3F0",
"A# c #C4C5CD",
"B# c #7A7B82",
"C# c #797C82",
"D# c #C5C8CF",
"E# c #DFE0E7",
"F# c #F2F2F7",
"G# c #F0F0F3",
"H# c #E3E3E6",
"I# c #EAEBED",
"J# c #F5F6F8",
"K# c #F9F9FB",
"L# c #FAFBFD",
"M# c #F6F6F8",
"N# c #F1F2F3",
"O# c #DBDBDB",
"P# c #FBFBFB",
"Q# c #FAFAFA",
"R# c #E2E2E3",
"S# c #D7D7D7",
"T# c #ECECEC",
"U# c #FCFCFC",
"V# c #F2F2F2",
"W# c #DADADB",
"X# c #FDFDFD",
"Y# c #EAEAEB",
"Z# c #D5D5D5",
"`# c #FEFEFE",
" $ c #F4F4F4",
".$ c #F3F3F3",
"+$ c #F6F6F6",
"@$ c #CFD0D0",
"#$ c #D2D2D2",
"$$ c #D4D5D5",
"%$ c #F7F7F7",
"&$ c #DFDFE0",
"*$ c #DEDEDF",
"=$ c #E4E4E5",
"-$ c #F9F9F9",
";$ c #F0F0F1",
">$ c #F0F0F0",
",$ c #E7E7E8",
"'$ c #EBEBEC",
")$ c #E9E9EB",
"!$ c #E8E8EB",
"~$ c #EBECEF",
"{$ c #A5A5F7",
"]$ c #9C9DF7",
"^$ c #B1B1F3",
"/$ c #A0A0E4",
"($ c #9B9BEF",
"_$ c #B0B0FC",
":$ c #D2D2EF",
"<$ c #EFEFF4",
"[$ c #D3D4F7",
"}$ c #A3A4E7",
"|$ c #A5A5EC",
"1$ c #CFD0FA",
"2$ c #E0E2EC",
"3$ c #D5D6DE",
"4$ c #D1D2EB",
"5$ c #B8B9F6",
"6$ c #C8C9F8",
"7$ c #F0F0F8",
"8$ c #E4E6F2",
"9$ c #DBDDEE",
"0$ c #D5D7EB",
"a$ c #DCDFEC",
"b$ c #E5E8F6",
"c$ c #E1E2F7",
"d$ c #9EA0F3",
"e$ c #B3B3EE",
"f$ c #ECEDFA",
"g$ c #E2E3EE",
"h$ c #D4D4DC",
"i$ c #D6D8EE",
"j$ c #DDE0F1",
"k$ c #E0E1E8",
"l$ c #E2E4EB",
"m$ c #E1E2E9",
"n$ c #E2E3EA",
"o$ c #7D7D80",
"p$ c #222325",
"q$ c #2D2E30",
"r$ c #9D9EA0",
"s$ c #DCDCDF",
"t$ c #EBEBEE",
"u$ c #E5E6E8",
"v$ c #F3F3F5",
"w$ c #E5E5E6",
"x$ c #EAEAEA",
"y$ c #D9D9D9",
"z$ c #F1F1F2",
"A$ c #E9E9EA",
"B$ c #F3F3F4",
"C$ c #EEEEEE",
"D$ c #ECECED",
"E$ c #EDEDED",
"F$ c #FFFFFF",
"G$ c #EFEFEF",
"H$ c #E3E3E3",
"I$ c #F5F5F5",
"J$ c #E7E7E7",
"K$ c #F8F8F8",
"L$ c #F1F1F1",
"M$ c #DFDFDF",
"N$ c #D6D6D6",
"O$ c #E6E6E6",
"P$ c #CECECE",
"Q$ c #DEDEDE",
"R$ c #D7D7D8",
"S$ c #D8D8D9",
"T$ c #CAC9E5",
"U$ c #B8B7F8",
"V$ c #A3A3FD",
"W$ c #4F4FEA",
"X$ c #8685F7",
"Y$ c #E2E2FC",
"Z$ c #FCFCFD",
"`$ c #C7C8FC",
" % c #8586FD",
".% c #7B7BF5",
"+% c #B4B4F8",
"@% c #E3E3FD",
"#% c #E6E7ED",
"$% c #CBCBF1",
"%% c #8B8BEE",
"&% c #BABBEB",
"*% c #F4F5F9",
"=% c #E4E5EC",
"-% c #EDEEF7",
";% c #EBEDF5",
">% c #DADDEF",
",% c #D9DAE9",
"'% c #D0D2EE",
")% c #BABCEB",
"!% c #DEDFF3",
"~% c #E8E9F8",
"{% c #D0D1E0",
"]% c #C0C1F4",
"^% c #B1B3F1",
"/% c #C8C9E1",
"(% c #ABACEA",
"_% c #DDDFEB",
":% c #D4D6E2",
"<% c #DDE0ED",
"[% c #DBDEEC",
"}% c #EFEFF8",
"|% c #E4E6EE",
"1% c #F3F3F8",
"2% c #F1F2F4",
"3% c #F4F5F7",
"4% c #E6E6E9",
"5% c #F9F9FA",
"6% c #A6A6A7",
"7% c #292934",
"8% c #3B3B40",
"9% c #C1C1C1",
"0% c #EDEDEE",
"a% c #E9E9E9",
"b% c #E2E2E2",
"c% c #EBEBEB",
"d% c #E5E5E5",
"e% c #E0E0E0",
"f% c #DCDCDC",
"g% c #E8E8E8",
"h% c #C6C5C8",
"i% c #D8D8E8",
"j% c #DEDEFD",
"k% c #6462D9",
"l% c #8C8AF7",
"m% c #EAEAF5",
"n% c #CDCDCD",
"o% c #B0B0DD",
"p% c #9091F4",
"q% c #8A8AF1",
"r% c #9797F5",
"s% c #9D9EFC",
"t% c #BDBBF1",
"u% c #F0EFF8",
"v% c #DFDEFC",
"w% c #8181F3",
"x% c #C0C0E1",
"y% c #E1E2E4",
"z% c #E9EAEC",
"A% c #F1F1F4",
"B% c #EBECF1",
"C% c #F1F3FA",
"D% c #E3E5F1",
"E% c #D6D8E6",
"F% c #DDDFEE",
"G% c #D5D7F4",
"H% c #CBCDF1",
"I% c #CDCFEA",
"J% c #B8BAEB",
"K% c #DADBF5",
"L% c #E2E3FB",
"M% c #BEBFF6",
"N% c #B3B5E9",
"O% c #DBDDE8",
"P% c #E2E4F1",
"Q% c #D3D5E3",
"R% c #D8DAED",
"S% c #E2E3F3",
"T% c #E6E7F4",
"U% c #D0D1D9",
"V% c #E5E7EF",
"W% c #E3E4E8",
"X% c #D2D3D6",
"Y% c #DBDBDE",
"Z% c #FAFAFC",
"`% c #6C6CAC",
" & c #F4F4FA",
".& c #E4E4E4",
"+& c #D8D8D8",
"@& c #E1E1E1",
"#& c #D1D1D1",
"$& c #DDDDDD",
"%& c #C6C4E4",
"&& c #8080FA",
"*& c #DCDCE5",
"=& c #E3E3FB",
"-& c #CECEF1",
";& c #C2C2EF",
">& c #C6C6FD",
",& c #C7C6DC",
"'& c #C3C3F8",
")& c #6F6FF5",
"!& c #DCDCE9",
"~& c #E6E6E7",
"{& c #D9DADA",
"]& c #E0E0E2",
"^& c #FAFAFD",
"/& c #D9D9DC",
"(& c #E6E7EB",
"_& c #EFF0F7",
":& c #EBEDF9",
"<& c #D7D8F8",
"[& c #C2C4ED",
"}& c #D7DAF1",
"|& c #D1D4E8",
"1& c #D0D2E6",
"2& c #D6D8EC",
"3& c #D2D5E8",
"4& c #BDBFE6",
"5& c #DEE0F9",
"6& c #D7D8FC",
"7& c #B8B9EE",
"8& c #B4B5F9",
"9& c #D6D7EF",
"0& c #D8D9EC",
"a& c #DBDCE7",
"b& c #E1E2EC",
"c& c #D8D9E6",
"d& c #DADCEF",
"e& c #D9DCEE",
"f& c #E5E7FB",
"g& c #E1E3F1",
"h& c #E8E9F2",
"i& c #DBDCE5",
"j& c #DEDFE8",
"k& c #E9E9EE",
"l& c #ECEDF0",
"m& c #DADBDE",
"n& c #EDEDF5",
"o& c #C7C7D6",
"p& c #F5F5FD",
"q& c #A0A0F7",
"r& c #BBBBFE",
"s& c #D0D0D0",
"t& c #DADADA",
"u& c #D3D3D3",
"v& c #F7F7FB",
"w& c #C4C4FC",
"x& c #6666EC",
"y& c #F2F3F4",
"z& c #DADBDD",
"A& c #DADADC",
"B& c #D1D1D4",
"C& c #EDEEF2",
"D& c #E2E3F8",
"E& c #9091E9",
"F& c #CCCEF3",
"G& c #C3C4EE",
"H& c #CED0F4",
"I& c #DBDDF3",
"J& c #D2D5E9",
"K& c #E6E9FB",
"L& c #D5D7EF",
"M& c #BEC1E9",
"N& c #CACDEE",
"O& c #E7E9F3",
"P& c #E8EAF4",
"Q& c #E0E3F0",
"R& c #E8E9F0",
"S& c #F4F5FA",
"T& c #F9FAFD",
"U& c #E6E7EA",
"V& c #EEEEF0",
"W& c #DBDBDC",
"X& c #E8E8E9",
"Y& c #EBEAF0",
"Z& c #E4E4FF",
"`& c #BCBDFC",
" * c #8485FB",
".* c #8B8CFE",
"+* c #C6C5FB",
"@* c #F2F1F9",
"#* c #DEDEE6",
"$* c #DCDCF4",
"%* c #7878DF",
"&* c #A3A3F7",
"** c #CFCFCF",
"=* c #F8F8FF",
"-* c #CBCBFD",
";* c #9090F4",
">* c #E0E0E1",
",* c #ECEDEE",
"'* c #ACABCB",
")* c #8C8CF2",
"!* c #9898F9",
"~* c #9797F2",
"{* c #A6A7F5",
"]* c #DFE0F9",
"^* c #CCCFF0",
"/* c #D1D3F2",
"(* c #DFE1F3",
"_* c #C6C8EF",
":* c #D3D5E8",
"<* c #F0F1FA",
"[* c #E5E6F1",
"}* c #E7E8F4",
"|* c #E1E2EE",
"1* c #E9EAF3",
"2* c #E1E2F3",
"3* c #E0E3EF",
"4* c #EFEFF7",
"5* c #E6E7EE",
"6* c #D4D5D9",
"7* c #E3E4E6",
"8* c #BBBBEA",
"9* c #A9A8FF",
"0* c #9898F5",
"a* c #9C9BE9",
"b* c #8A89EB",
"c* c #7372E8",
"d* c #BABAF1",
"e* c #FDFDFF",
"f* c #C8C8F6",
"g* c #9B9BFE",
"h* c #C1C1FE",
"i* c #E6E6F8",
"j* c #CDCDF5",
"k* c #8B8BEF",
"l* c #BDBDFD",
"m* c #CFD4DE",
"n* c #AFBEEC",
"o* c #A6B1E7",
"p* c #CCCCCD",
"q* c #B4B4E1",
"r* c #E1E1F9",
"s* c #F6F7FB",
"t* c #D8D9E1",
"u* c #CCCDE0",
"v* c #A7A9F6",
"w* c #9495F8",
"x* c #9B9EF1",
"y* c #B8BAF3",
"z* c #D9DBF9",
"A* c #B4B6ED",
"B* c #D9DBF0",
"C* c #D3D6E9",
"D* c #D9DCED",
"E* c #DCDDE5",
"F* c #E0E1EC",
"G* c #CDCED8",
"H* c #D9DBF1",
"I* c #ECEEF5",
"J* c #D6D7DE",
"K* c #F5F5F9",
"L* c #D8D8DB",
"M* c #E1E1E2",
"N* c #DCDCDD",
"O* c #EEEEEF",
"P* c #7C7CF1",
"Q* c #B6B6FF",
"R* c #EAE9F9",
"S* c #F7F7FD",
"T* c #9796F4",
"U* c #9E9EF7",
"V* c #ECECFE",
"W* c #CCCCEB",
"X* c #A8A8FD",
"Y* c #8585F6",
"Z* c #C3C3F2",
"`* c #A6A6CF",
" = c #9E9EE5",
".= c #E0E0FE",
"+= c #CACACA",
"@= c #DDEBE6",
"#= c #ACD7D1",
"$= c #B6D0D2",
"%= c #E7E8EB",
"&= c #BFC0E0",
"*= c #B9BAE8",
"== c #CACBF8",
"-= c #DBDCFB",
";= c #DDDFE8",
">= c #8F91DD",
",= c #A3A6EF",
"'= c #D0D2F1",
")= c #E8EAF8",
"!= c #D7D9EC",
"~= c #DCDEF4",
"{= c #D6D9E9",
"]= c #DADCEC",
"^= c #E4E5F2",
"/= c #E4E6F7",
"(= c #D9DCF2",
"_= c #DBDEF3",
":= c #DADBE3",
"<= c #ECECF0",
"[= c #DEDEE0",
"}= c #F9FAFB",
"|= c #CCCCCC",
"1= c #4143EA",
"2= c #DBDBFD",
"3= c #CAC9FD",
"4= c #A0A0FE",
"5= c #E8E8FE",
"6= c #DADAF9",
"7= c #8F8FFA",
"8= c #CCCCF1",
"9= c #9E9E9E",
"0= c #2D2D38",
"a= c #5A5A71",
"b= c #DADAE4",
"c= c #F3FCFA",
"d= c #BCEFD6",
"e= c #D8F0E3",
"f= c #F9FAFC",
"g= c #D6D6E8",
"h= c #D1D2E5",
"i= c #D9DAE7",
"j= c #DFE1F1",
"k= c #D6D9EE",
"l= c #CCCFE4",
"m= c #CDD0E5",
"n= c #E7E8F3",
"o= c #D4D6E3",
"p= c #D8DAE4",
"q= c #C6C7C9",
"r= c #E8E9EC",
"s= c #E3E3E4",
"t= c #393AEF",
"u= c #F7F6FE",
"v= c #C9C9C9",
"w= c #C2C2C3",
"x= c #A4A3DE",
"y= c #8C8EFD",
"z= c #F5F5FF",
"A= c #D9D9FB",
"B= c #9191FE",
"C= c #E7E7F8",
"D= c #464646",
"E= c #040404",
"F= c #161616",
"G= c #9999A7",
"H= c #C9C9DB",
"I= c #E3E3EB",
"J= c #E1E1E7",
"K= c #F7F7F8",
"L= c #D9F0E4",
"M= c #A2DFC0",
"N= c #DEEBE4",
"O= c #FCFCFE",
"P= c #F2F2F6",
"Q= c #DDDEE5",
"R= c #DBDCE3",
"S= c #DFE0F1",
"T= c #D3D5E5",
"U= c #CFD1E2",
"V= c #DBDEEE",
"W= c #ECEEF4",
"X= c #F1F3F7",
"Y= c #FBFBFC",
"Z= c #E1E0F0",
"`= c #9291FF",
" - c #D6D6FF",
".- c #F8F7FF",
"+- c #DBDBE9",
"@- c #6767CB",
"#- c #9193FF",
"$- c #D0D0D2",
"%- c #B6B6FE",
"&- c #6767E4",
"*- c #818181",
"=- c #060612",
"-- c #3B3B42",
";- c #6262E6",
">- c #5757F4",
",- c #8E8EFE",
"'- c #A3A3FF",
")- c #9292E7",
"!- c #B4B4F3",
"~- c #EEEEFD",
"{- c #D3D3E6",
"]- c #C3C3D5",
"^- c #F1F1F9",
"/- c #D4D4D4",
"(- c #D0EDDE",
"_- c #8CD0AC",
":- c #D3D6D5",
"<- c #EBECEE",
"[- c #EEEEF3",
"}- c #D8D8E0",
"|- c #D9DCF0",
"1- c #EAECF9",
"2- c #EDEEF8",
"3- c #D4D5E1",
"4- c #D8DAE3",
"5- c #DCDDEE",
"6- c #E1E2F0",
"7- c #FDFDFE",
"8- c #B4B4B4",
"9- c #969696",
"0- c #767676",
"a- c #5D5D5D",
"b- c #515151",
"c- c #434343",
"d- c #494949",
"e- c #555555",
"f- c #696969",
"g- c #8C8C8C",
"h- c #ACACAC",
"i- c #D4D3DC",
"j- c #C4C4F4",
"k- c #A9AAFD",
"l- c #BFBEFA",
"m- c #E8E5FD",
"n- c #B5B4F5",
"o- c #5656E1",
"p- c #C7C7FC",
"q- c #DEDEE7",
"r- c #B8B8FA",
"s- c #7979E4",
"t- c #D1D1DB",
"u- c #363673",
"v- c #8C8CBC",
"w- c #E2E2E5",
"x- c #B9B9D9",
"y- c #CBCBFF",
"z- c #ABABFB",
"A- c #5B5BCD",
"B- c #5C5CE6",
"C- c #8D8DFE",
"D- c #6767FC",
"E- c #4B4BE2",
"F- c #9292FF",
"G- c #9C9CFF",
"H- c #B5B5FD",
"I- c #DDDDFE",
"J- c #C5C5D9",
"K- c #CFCFE0",
"L- c #E9E9F3",
"M- c #E7E7EE",
"N- c #FEFEFF",
"O- c #DFF9EF",
"P- c #A5E2C2",
"Q- c #EAEAEC",
"R- c #E0E0E5",
"S- c #E5E8FB",
"T- c #E8EBF9",
"U- c #F0F2F8",
"V- c #E0E3EB",
"W- c #EAECF3",
"X- c #DBDDE9",
"Y- c #DBDCED",
"Z- c #F5F6FA",
"`- c #A2A3A3",
" ; c #525252",
".; c #424242",
"+; c #4D4D4D",
"@; c #9A9A9A",
"#; c #C5C5C5",
"$; c #B8B8F9",
"%; c #4F50EA",
"&; c #2E2FED",
"*; c #8282FC",
"=; c #BCBAF0",
"-; c #E9E8F2",
";; c #D3D3E7",
">; c #D2D2F4",
",; c #C4C4FE",
"'; c #9999F2",
"); c #D8D8F4",
"!; c #8282E7",
"~; c #B7B7FF",
"{; c #E9E9F5",
"]; c #B1B1D9",
"^; c #AFAFEC",
"/; c #8F8FEA",
"(; c #8080F8",
"_; c #7979FE",
":; c #5D5DFC",
"<; c #4141E9",
"[; c #5757E6",
"}; c #9797FD",
"|; c #8E8EEE",
"1; c #9D9DE4",
"2; c #E6E6FF",
"3; c #F9F9FE",
"4; c #CCCCDF",
"5; c #F3F3FF",
"6; c #EEEEF6",
"7; c #D6D6DC",
"8; c #FBFBFD",
"9; c #FBFCFB",
"0; c #CED6D2",
"a; c #D0F5E3",
"b; c #A8DBC0",
"c; c #EAEBF0",
"d; c #E6E8F5",
"e; c #DEE1EC",
"f; c #E1E3ED",
"g; c #EDEFF5",
"h; c #E4E6EF",
"i; c #E5E7F4",
"j; c #E5E6F4",
"k; c #ECEDF1",
"l; c #C6C6C7",
"m; c #585858",
"n; c #5F5F5F",
"o; c #F7F6F7",
"p; c #CAC8FB",
"q; c #ACAAFE",
"r; c #DDDCFA",
"s; c #9999E0",
"t; c #5757F0",
"u; c #4E4EFE",
"v; c #3434ED",
"w; c #9999EB",
"x; c #FBFBFF",
"y; c #C1C1EC",
"z; c #7E7EE5",
"A; c #C8C8DD",
"B; c #B1B1F8",
"C; c #6363E1",
"D; c #7878FC",
"E; c #5D5DFD",
"F; c #5353F3",
"G; c #7F7FFF",
"H; c #A8A8FF",
"I; c #A4A4FA",
"J; c #9F9FDF",
"K; c #E0E0FF",
"L; c #D4D4E7",
"M; c #EEEEFB",
"N; c #ECECF5",
"O; c #C7C7C7",
"P; c #E3EDE8",
"Q; c #DDEAE3",
"R; c #EFF4F1",
"S; c #E8ECEC",
"T; c #D2F6E6",
"U; c #B7E0CB",
"V; c #DFE0E3",
"W; c #E2E5F7",
"X; c #E3E6FA",
"Y; c #D4D7E5",
"Z; c #E8EAF3",
"`; c #D9DCEC",
" > c #E4E5F6",
".> c #E2E5FB",
"+> c #D3D5EB",
"@> c #F1F1F5",
"#> c #F5F5F6",
"$> c #5A5A5A",
"%> c #6E6E6E",
"&> c #8F8F8F",
"*> c #A1A1A1",
"=> c #A4A4A4",
"-> c #A6A6A6",
";> c #949494",
">> c #6F6F6F",
",> c #E5E4F5",
"'> c #BFBEFF",
")> c #E6E5FF",
"!> c #FAFAFF",
"~> c #D5D5F8",
"{> c #DCDCF8",
"]> c #B4B4EF",
"^> c #9191F2",
"/> c #CBCBF6",
"(> c #DCDCDE",
"_> c #BFBFDD",
":> c #C1C1F5",
"<> c #B3B3FC",
"[> c #7E7EED",
"}> c #5656DE",
"|> c #6C6CFE",
"1> c #6F6FFD",
"2> c #5A5AF4",
"3> c #7979F7",
"4> c #9E9EFD",
"5> c #AAAAF9",
"6> c #CECEFF",
"7> c #E1E1FE",
"8> c #EAEAFD",
"9> c #E3E3F4",
"0> c #E9E9F7",
"a> c #B7DBC9",
"b> c #9FCEB5",
"c> c #E1EFE8",
"d> c #D3E3DB",
"e> c #C3F5DB",
"f> c #D4F3E3",
"g> c #E5E5E8",
"h> c #EAEBEF",
"i> c #DFE1F7",
"j> c #E7E9FA",
"k> c #D7D9EA",
"l> c #D3D5DE",
"m> c #E4E5E9",
"n> c #9B9B9B",
"o> c #5B5B5B",
"p> c #C8C8C8",
"q> c #A9A9A9",
"r> c #C3C3C3",
"s> c #BDBDBD",
"t> c #454545",
"u> c #BCBCBC",
"v> c #DDDDE8",
"w> c #E0E0E4",
"x> c #9F9FE9",
"y> c #ADADF8",
"z> c #EDEDFF",
"A> c #EBEBF4",
"B> c #C0C0E6",
"C> c #8484DF",
"D> c #7C7CEF",
"E> c #7676FD",
"F> c #4F4FFA",
"G> c #4B4BF5",
"H> c #6969F8",
"I> c #7F7FF3",
"J> c #7E7EE0",
"K> c #9494DE",
"L> c #C2C2EE",
"M> c #F8F8FE",
"N> c #E7E7F4",
"O> c #D2D2DF",
"P> c #F7F7FC",
"Q> c #B7E2CC",
"R> c #EAF4EF",
"S> c #C8CFCC",
"T> c #A1CBB5",
"U> c #A7D5BD",
"V> c #D7E6DE",
"W> c #E0E1E1",
"X> c #F4F4F8",
"Y> c #E9EAF0",
"Z> c #D5D6DF",
"`> c #D5D6DD",
" , c #D3D6EC",
"., c #F1F1FA",
"+, c #EDEDF2",
"@, c #727272",
"#, c #979797",
"$, c #CBCBCB",
"%, c #B8B8B8",
"&, c #C0C0C0",
"*, c #BABABA",
"=, c #AEAEAE",
"-, c #BFBFBF",
";, c #A3A3A3",
">, c #C2C2C2",
",, c #7373CC",
"', c #9595F3",
"), c #F1F1FE",
"!, c #EAEAFE",
"~, c #D1D1FD",
"{, c #B2B2F8",
"], c #8181E6",
"^, c #5D5DDD",
"/, c #5B5BEC",
"(, c #5959FE",
"_, c #4A4AEC",
":, c #5959E1",
"<, c #9494FD",
"[, c #A0A0F2",
"}, c #E4E4FD",
"|, c #F9F9FF",
"1, c #E4E4EC",
"2, c #93C7AC",
"3, c #9BC9B0",
"4, c #F9FBFA",
"5, c #EAF8F1",
"6, c #94CEB0",
"7, c #D2F4E5",
"8, c #E0ECE7",
"9, c #D9DBDA",
"0, c #F4F4F5",
"a, c #E6E7F8",
"b, c #E3E4ED",
"c, c #E2E3EF",
"d, c #D4D6E7",
"e, c #E4E5EE",
"f, c #EBEBED",
"g, c #A5A5A5",
"h, c #B3B3B3",
"i, c #B9B9B9",
"j, c #B1B1B1",
"k, c #B0B0B0",
"l, c #BEBEBE",
"m, c #A7A7A7",
"n, c #B5B5B5",
"o, c #7A7A7A",
"p, c #FAFBFC",
"q, c #6878B5",
"r, c #8B94E5",
"s, c #CCCCE7",
"t, c #B5B5EB",
"u, c #ABABFD",
"v, c #7A7AE7",
"w, c #5858E1",
"x, c #5151F5",
"y, c #2F2FE2",
"z, c #4747DF",
"A, c #8181F9",
"B, c #9595F7",
"C, c #A2A2F5",
"D, c #CACAFC",
"E, c #ECECFD",
"F, c #EDEDF9",
"G, c #E6E6F5",
"H, c #DFE6E2",
"I, c #78AD92",
"J, c #ACD5BF",
"K, c #EFF0EF",
"L, c #CDD3D0",
"M, c #DDF5E9",
"N, c #A2DFBF",
"O, c #AAC4B6",
"P, c #FCFEFD",
"Q, c #F1F2F7",
"R, c #E3E4F4",
"S, c #E0E2EE",
"T, c #D5D8E6",
"U, c #E2E2E7",
"V, c #838383",
"W, c #AAAAAA",
"X, c #C4C4C4",
"Y, c #AFAFAF",
"Z, c #ADADAD",
"`, c #B7B7B7",
" ' c #B6B6B6",
".' c #B2B2B2",
"+' c #636363",
"@' c #ABABAB",
"#' c #E6EEEB",
"$' c #90BEAC",
"%' c #C0E9DA",
"&' c #CDCDF1",
"*' c #BEBEFB",
"=' c #8C8CE4",
"-' c #6E6EE4",
";' c #6464F5",
">' c #3D3DEA",
",' c #2A2AD6",
"'' c #4545D7",
")' c #6E6EE3",
"!' c #9696EE",
"~' c #BFBFFA",
"{' c #D5D5FD",
"]' c #E1E1FB",
"^' c #F0F0FB",
"/' c #E3F1EA",
"(' c #A3D7BC",
"_' c #CEF0DE",
":' c #E8F0EC",
"<' c #B5D6C6",
"[' c #C8F1DD",
"}' c #DFF1E7",
"|' c #E4E4E7",
"1' c #F5F6FB",
"2' c #E6E7F6",
"3' c #DEE1F6",
"4' c #DFE1EE",
"5' c #E1E3EB",
"6' c #E4E9F3",
"7' c #BCD3CF",
"8' c #B6CCCE",
"9' c #D1DCE5",
"0' c #CFD2E4",
"a' c #EDEDEF",
"b' c #BBBBBB",
"c' c #565656",
"d' c #CCDCD4",
"e' c #8FC0A6",
"f' c #CCF0DD",
"g' c #E8E8F9",
"h' c #C5C5F2",
"i' c #A0A0E8",
"j' c #7D7DE0",
"k' c #7A7AF3",
"l' c #5D5DF3",
"m' c #1C1CD1",
"n' c #3E3EE1",
"o' c #6D6DF3",
"p' c #8181EF",
"q' c #A4A4F6",
"r' c #CECEFE",
"s' c #DDDDFD",
"t' c #E6E6FA",
"u' c #F0F0FA",
"v' c #CDE4D8",
"w' c #8EC1A6",
"x' c #C1DCCD",
"y' c #DCEFE5",
"z' c #AFD8C2",
"A' c #BFDFD0",
"B' c #F7FEFE",
"C' c #F1F2F5",
"D' c #F1F1F6",
"E' c #DBDEF0",
"F' c #E0E2EF",
"G' c #E2E9F1",
"H' c #C7D5DC",
"I' c #ABB7C0",
"J' c #A9B5BE",
"K' c #D9DCE9",
"L' c #EBEBF0",
"M' c #DDDDE0",
"N' c #4B4B4B",
"O' c #A2A2A2",
"P' c #898989",
"Q' c #9C9C9C",
"R' c #A8A8A8",
"S' c #C6C6C6",
"T' c #919191",
"U' c #C7DDD1",
"V' c #9CCDB3",
"W' c #D2EDDF",
"X' c #C1C1DA",
"Y' c #B5B5EA",
"Z' c #9090E0",
"`' c #7979E5",
" ) c #8383FA",
".) c #5656F0",
"+) c #2828DD",
"@) c #5252ED",
"#) c #7070EE",
"$) c #9191F4",
"%) c #B9C7E9",
"&) c #D5E7E3",
"*) c #EEF6F2",
"=) c #F3F6F5",
"-) c #E9EEEB",
";) c #F3F5F4",
">) c #C0DFCF",
",) c #91C4A9",
"') c #92C9AB",
")) c #A2CEB6",
"!) c #AFCABC",
"~) c #D7E0DB",
"{) c #E4E4E6",
"]) c #EDEEF1",
"^) c #E6E7EC",
"/) c #DBDDEA",
"() c #EBEEFC",
"_) c #DEE0EA",
":) c #C9DCE0",
"<) c #B0BDC6",
"[) c #CFD1E4",
"}) c #D2D4E7",
"|) c #BCCAD6",
"1) c #CFDBE3",
"2) c #E9EBF1",
"3) c #F0F1F5",
"4) c #909090",
"5) c #8E8E8E",
"6) c #9F9F9F",
"7) c #484848",
"8) c #C1DFD0",
"9) c #B0E2C8",
"0) c #E2F6EB",
"a) c #E4E4EA",
"b) c #D3D3F4",
"c) c #A1A1DE",
"d) c #8888E1",
"e) c #8AA6CF",
"f) c #72B19B",
"g) c #4FA075",
"h) c #56A87D",
"i) c #87CCA8",
"j) c #9FD8BA",
"k) c #AEDDC4",
"l) c #C9E9D8",
"m) c #ADE2C5",
"n) c #7ED8A9",
"o) c #C5E8D5",
"p) c #E1EBE6",
"q) c #E2E6E4",
"r) c #E8E9EA",
"s) c #F5F5FA",
"t) c #DCDEEB",
"u) c #CEE0E6",
"v) c #D1D3E6",
"w) c #ADAEBD",
"x) c #B6B8D3",
"y) c #9EB6C4",
"z) c #99CABC",
"A) c #A0D2BD",
"B) c #93C3AD",
"C) c #A9D2BF",
"D) c #C1E3D2",
"E) c #C1D9CD",
"F) c #CDDDD5",
"G) c #EDF2EF",
"H) c #989898",
"I) c #929292",
"J) c #FDFEFE",
"K) c #F9FCFA",
"L) c #F4F8F6",
"M) c #EFF1F1",
"N) c #F7FAF8",
"O) c #FCFDFD",
"P) c #F9FDFB",
"Q) c #DEEEE6",
"R) c #C6DFD2",
"S) c #E4EEE9",
"T) c #F3F4F3",
"U) c #E9EBF8",
"V) c #E8EAF1",
"W) c #D8DAE6",
"X) c #B0B6CE",
"Y) c #ADB1CF",
"Z) c #B5C5D8",
"`) c #95C1BA",
" ! c #CFEAE6",
".! c #E8F9F9",
"+! c #CAEDDD",
"@! c #C8EADD",
"#! c #BAE6D1",
"$! c #99CEB3",
"%! c #9DD5BA",
"&! c #A1DFBF",
"*! c #82C0A0",
"=! c #89BDA2",
"-! c #B5DFC9",
";! c #B8D8C7",
">! c #BAD0C5",
",! c #5C5C5C",
"'! c #8A8A8A",
")! c #717171",
"!! c #797D7B",
"~! c #444544",
"{! c #535454",
"]! c #868686",
"^! c #7E7E7E",
"/! c #4E4E4E",
"(! c #666666",
"_! c #686868",
":! c #505251",
"~ c #7F7F7F",
",~ c #606060",
"'~ c #505050",
")~ c #EFF0F1",
"!~ c #E5E7F5",
"~~ c #DDDEEB",
"{~ c #C5C6E8",
"]~ c #8585E5",
"^~ c #AAAAF0",
"/~ c #919195",
"(~ c #838388",
"_~ c #727284",
":~ c #6E6E85",
"<~ c #79798F",
"[~ c #66668E",
"}~ c #6E6E9D",
"|~ c #9090B5",
"1~ c #6969B2",
"2~ c #5D5DB3",
"3~ c #8888DD",
"4~ c #7D7DE5",
"5~ c #5050CF",
"6~ c #6767DD",
"7~ c #7979DD",
"8~ c #9292E3",
"9~ c #C2C2F9",
"0~ c #D9D9FA",
"a~ c #D3D3E8",
"b~ c #F6F6F7",
"c~ c #A0A0A0",
"d~ c #484949",
"e~ c #7D7D7D",
"f~ c #F2F3F8",
"g~ c #E7E9F7",
"h~ c #EEF0FC",
"i~ c #B7B7E8",
"j~ c #8484EA",
"k~ c #BEBEF2",
"l~ c #A5A5A8",
"m~ c #B4B4BB",
"n~ c #ACACC1",
"o~ c #A1A1BE",
"p~ c #C5C5E2",
"q~ c #BFBFE9",
"r~ c #A8A8E7",
"s~ c #AFAFF0",
"t~ c #8888DE",
"u~ c #7272D1",
"v~ c #9E9EFC",
"w~ c #9E9EF9",
"x~ c #6161E1",
"y~ c #7777FB",
"z~ c #A0A0F4",
"A~ c #9090DA",
"B~ c #B8B8ED",
"C~ c #D5D5E9",
"D~ c #ECECEE",
"E~ c #999999",
"F~ c #787878",
"G~ c #616462",
"H~ c #EFEFF0",
"I~ c #EBECED",
"J~ c #EBECF6",
"K~ c #ECEEFC",
"L~ c #E8E8EC",
"M~ c #F8F8F9",
"N~ c #B0B0F0",
"O~ c #9595F8",
"P~ c #747474",
"Q~ c #B6B6D3",
"R~ c #D3D3F7",
"S~ c #A6A6E3",
"T~ c #B8B8F1",
"U~ c #E3E3FC",
"V~ c #B2B2F3",
"W~ c #7979DA",
"X~ c #8787EB",
"Y~ c #9C9CEA",
"Z~ c #EDEDF7",
"`~ c #535353",
" { c #616261",
".{ c #777777",
"+{ c #4C4C4C",
"@{ c #9AB9A9",
"#{ c #898F8C",
"${ c #BFBFCA",
"%{ c #C6C6E3",
"&{ c #D7D7E4",
"*{ c #C0C0C1",
"={ c #808080",
"-{ c #F2F3F7",
";{ c #CED1E3",
">{ c #E3E5F0",
",{ c #F1F2F8",
"'{ c #9797E4",
"){ c #9696FB",
"!{ c #F0F0FF",
"~{ c #545454",
"{{ c #878787",
"]{ c #E5E5F3",
"^{ c #C8C8E8",
"/{ c #CACAEF",
"({ c #C2C2E7",
"_{ c #F7F7F9",
":{ c #464647",
"<{ c #474770",
"[{ c #5D5D7E",
"}{ c #78788E",
"|{ c #898997",
"1{ c #949496",
"2{ c #898C8B",
"3{ c #858585",
"4{ c #BABBBA",
"5{ c #95B0A2",
"6{ c #BCC8C2",
"7{ c #9C9CC3",
"8{ c #6969E2",
"9{ c #B0B0E8",
"0{ c #E5E8F5",
"a{ c #9393EC",
"b{ c #9090FF",
"c{ c #7B7B7B",
"d{ c #434344",
"e{ c #393968",
"f{ c #414176",
"g{ c #4D4D89",
"h{ c #41418E",
"i{ c #404A8A",
"j{ c #759792",
"k{ c #779B89",
"l{ c #86A293",
"m{ c #484948",
"n{ c #8D8D8D",
"o{ c #D6D6D7",
"p{ c #8282BA",
"q{ c #3232D8",
"r{ c #8483E1",
"s{ c #838392",
"t{ c #8687A6",
"u{ c #86868D",
"v{ c #9696A4",
"w{ c #9B9B9F",
"x{ c #D2D3D4",
"y{ c #D2D3D7",
"z{ c #DADDEA",
"A{ c #E9EBF2",
"B{ c #DDDFEC",
"C{ c #DBDCE2",
"D{ c #D0D0D3",
"E{ c #DADAEA",
"F{ c #7C7CD9",
"G{ c #8282E6",
"H{ c #474747",
"I{ c #4F4F50",
"J{ c #636371",
"K{ c #67677A",
"L{ c #6C6C85",
"M{ c #626285",
"N{ c #717891",
"O{ c #91A8A2",
"P{ c #7B9B8A",
"Q{ c #719683",
"R{ c #FBFCFC",
"S{ c #444444",
"T{ c #C9C9D1",
"U{ c #9191D0",
"V{ c #5F5ED9",
"W{ c #908FD9",
"X{ c #8080A0",
"Y{ c #5A5C9A",
"Z{ c #61608E",
"`{ c #99999A",
" ] c #85859F",
".] c #5657A0",
"+] c #9090A1",
"@] c #C6C6CA",
"#] c #D4D5DD",
"$] c #F2F5FE",
"%] c #CACAE7",
"&] c #7070D3",
"*] c #8686DA",
"=] c #A9ADAB",
"-] c #A2A9A6",
";] c #A1ADA8",
">] c #828282",
",] c #575757",
"'] c #C1C1CF",
")] c #9595D8",
"!] c #8A89DE",
"~] c #C2C1E0",
"{] c #8C8D93",
"]] c #61618A",
"^] c #373786",
"/] c #8A8A94",
"(] c #585896",
"_] c #2A2A90",
":] c #5C5B8F",
"<] c #ACACB2",
"[] c #E0E2F6",
"}] c #E7E9F6",
"|] c #F1F2F6",
"1] c #D8D8FB",
"2] c #8E8EF0",
"3] c #ADADEF",
"4] c #777877",
"5] c #A7A7BC",
"6] c #7676C7",
"7] c #8F8FD3",
"8] c #C3C3D0",
"9] c #84848B",
"0] c #4F4F7C",
"a] c #31317B",
"b] c #80808F",
"c] c #5E5D91",
"d] c #4A498B",
"e] c #45458E",
"f] c #9898A3",
"g] c #8989A3",
"h] c #F1F1F7",
"i] c #676767",
"j] c #BEBEEF",
"k] c #757575",
"l] c #6E7A74",
"m] c #7C7E7D",
"n] c #777A78",
"o] c #7A7D7C",
"p] c #868786",
"q] c #A3A3C0",
"r] c #7777CC",
"s] c #A3A3D1",
"t] c #C8C7C8",
"u] c #5C5C8C",
"v] c #323378",
"w] c #4A4B72",
"x] c #727288",
"y] c #646491",
"z] c #747497",
"A] c #6F6FA0",
"B] c #8080AC",
"C] c #8282AD",
"D] c #D9DAE1",
"E] c #D7D9DF",
"F] c #F0F0F4",
"G] c #A7A7EB",
"H] c #6B6BDC",
"I] c #D1D1EF",
"J] c #295B41",
"K] c #406B55",
"L] c #375E4A",
"M] c #436051",
"N] c #7D807F",
"O] c #707070",
"P] c #ABABC3",
"Q] c #7777D0",
"R] c #BCBCD9",
"S] c #52538A",
"T] c #575674",
"U] c #6D6D75",
"V] c #646487",
"W] c #55558B",
"X] c #78788F",
"Y] c #7D7DA0",
"Z] c #6C6BB1",
"`] c #9C9BB8",
" ^ c #7C7CBA",
".^ c #F1F1F3",
"+^ c #E9EBF5",
"@^ c #DEDFEC",
"#^ c #DADBE8",
"$^ c #B4B4FA",
"%^ c #7979EE",
"&^ c #F0F0FC",
"*^ c #4F6A5D",
"=^ c #7B807F",
"-^ c #727875",
";^ c #666F6B",
">^ c #646464",
",^ c #BBBBC0",
"'^ c #A6A6C9",
")^ c #D1D1D8",
"!^ c #767678",
"~^ c #5C5C8B",
"{^ c #82828F",
"]^ c #9A99A5",
"^^ c #6160A8",
"/^ c #7C7AB2",
"(^ c #5F5EC0",
"_^ c #CECFD1",
":^ c #E9ECF9",
"<^ c #E2E4F8",
"[^ c #EBEBF3",
"}^ c #DEE1F3",
"|^ c #F1F2FC",
"1^ c #A0A0F3",
"2^ c #7676E7",
"3^ c #75827C",
"4^ c #6D827A",
"5^ c #62628E",
"6^ c #6A6A96",
"7^ c #9A9A9F",
"8^ c #A09FBC",
"9^ c #7776C2",
"0^ c #5050CB",
"a^ c #E6E9FC",
"b^ c #CACCD3",
"c^ c #E7EAFC",
"d^ c #E8EAF7",
"e^ c #E5E7FA",
"f^ c #A4A5F3",
"g^ c #8E8EE9",
"h^ c #787A79",
"i^ c #62766B",
"j^ c #546D60",
"k^ c #7D7D7E",
"l^ c #70708A",
"m^ c #72728F",
"n^ c #C1C1C2",
"o^ c #7676CC",
"p^ c #4243D2",
"q^ c #595959",
"r^ c #FBFCFD",
"s^ c #D7D8E1",
"t^ c #E8EBFC",
"u^ c #E2E5F9",
"v^ c #DBDDF4",
"w^ c #A4A5EB",
"x^ c #A6A6E8",
"y^ c #797979",
"z^ c #838484",
"A^ c #576D62",
"B^ c #5E7268",
"C^ c #8C8E8D",
"D^ c #B6B6B7",
"E^ c #ADADBF",
"F^ c #A9A9D7",
"G^ c #E3E5ED",
"H^ c #DADCE9",
"I^ c #DCDEF1",
"J^ c #DCE0F2",
"K^ c #D5D7F1",
"L^ c #B4B5E4",
"M^ c #B9BAE7",
"N^ c #F2F2F4",
"O^ c #7E8683",
"P^ c #6E867A",
"Q^ c #87938E",
"R^ c #5F5F61",
"S^ c #F0F0F2",
"T^ c #E5E6F3",
"U^ c #EBEDF4",
"V^ c #C1C3EB",
"W^ c #CED0EC",
"X^ c #E5E6EA",
"Y^ c #858686",
"Z^ c #748C80",
"`^ c #859C91",
" / c #AAAEAC",
"./ c #D6D6E9",
"+/ c #56565C",
"@/ c #7B7B8E",
"#/ c #838385",
"$/ c #747486",
"%/ c #858591",
"&/ c #9C9CA1",
"*/ c #DFDFE4",
"=/ c #E1E4F8",
"-/ c #E6E8EF",
";/ c #587264",
">/ c #6A8B7A",
",/ c #A5AAA7",
"'/ c #BFBFEF",
")/ c #9999AA",
"!/ c #6F6F7C",
"~/ c #5F5F6A",
"{/ c #79797A",
"]/ c #79797F",
"^/ c #3C3C7C",
"// c #6D6D8E",
"(/ c #7272A0",
"_/ c #3D3DAC",
":/ c #3C3CB4",
"( c #D3D4D6",
",( c #D9D9DE",
"'( c #DEE0EC",
")( c #D9DBE7",
"!( c #D8DBEB",
"~( c #EEEFF3",
"{( c #F2F2F3",
"]( c #7E8C85",
"^( c #829A8E",
"/( c #99A49E",
"(( c #DFDFEE",
"_( c #B6B6DC",
":( c #B7B7CD",
"<( c #959596",
"[( c #B8B8B9",
"}( c #C0C0C2",
"|( c #C0C1C4",
"1( c #D1D2D8",
"2( c #D8D9E0",
"3( c #D0D1DE",
"4( c #DADCE8",
"5( c #CED1E6",
"6( c #DEE2E0",
"7( c #E8EBE9",
"8( c #AFB4B2",
"9( c #9D9D9F",
"0( c #A3A4A6",
"a( c #B8B9BC",
"b( c #C3C4CA",
"c( c #BABBC1",
"d( c #CACAD6",
"e( c #D1D3E7",
"f( c #D8DBE8",
"g( c #D7D7DE",
"h( c #E7E7EB",
"i( c #4A4A4A",
"j( c #A2A2A4",
"k( c #A8A8AB",
"l( c #ADAEB3",
"m( c #BCBDC3",
"n( c #BABBC6",
"o( c #B8B9C6",
"p( c #C4C6D3",
"q( c #CED0E2",
"r( c #DDDFEA",
"s( c #D4D6EA",
"t( c #D6D9ED",
"u( c #E0E3F2",
"v( c #DEE1F0",
"w( c #D6D7DB",
"x( c #D9DADB",
"y( c #D9D9DA",
"z( c #9E9E9F",
"A( c #9A9A9C",
"B( c #98999B",
"C( c #939395",
"D( c #999A9C",
"E( c #A2A2A8",
"F( c #A8A9AF",
"G( c #ADAFB9",
"H( c #B8BAC6",
"I( c #C2C3D0",
"J( c #C2C5D7",
"K( c #C7CADD",
"L( c #CFD2E5",
"M( c #D4D7E6",
"N( c #CECFDE",
"O( c #D5D8EE",
"P( c #E5E5EA",
"Q( c #7F7F8C",
"R( c #525286",
"S( c #76769B",
"T( c #9C9CA5",
"U( c #7373A1",
"V( c #62629F",
"W( c #9D9E9E",
"X( c #A3A3A5",
"Y( c #A1A1A4",
"Z( c #909196",
"`( c #95969C",
" _ c #A1A3AD",
"._ c #A9ABB7",
"+_ c #B1B3C0",
"@_ c #B4B6C9",
"#_ c #C1C3D6",
"$_ c #C1C3D7",
"%_ c #D1D3E3",
"&_ c #E9EBF6",
"*_ c #E7E8F8",
"=_ c #D1D4EF",
"-_ c #DEDFE6",
";_ c #E3E4EA",
">_ c #E6E6EB",
",_ c #D5D5D7",
"'_ c #73738B",
")_ c #4D4D88",
"!_ c #79799D",
"~_ c #797983",
"{_ c #494979",
"]_ c #646497",
"^_ c #AFAFB0",
"/_ c #A8A8A9",
"(_ c #AFAFB1",
"__ c #A2A3A4",
":_ c #9E9FA2",
"<_ c #A1A2A7",
"[_ c #A5A5AB",
"}_ c #9E9FA7",
"|_ c #9E9FA9",
"1_ c #A2A4AE",
"2_ c #ACAEBA",
"3_ c #B4B6C8",
"4_ c #B9BBCE",
"5_ c #BABCCF",
"6_ c #C1C3D2",
"7_ c #C9CBDB",
"8_ c #D3D4DF",
"9_ c #9899F1",
"0_ c #9596EC",
"a_ c #D7D8E5",
"b_ c #E0E1E9",
"c_ c #D1D2D9",
"d_ c #DADAE0",
"e_ c #D8D9DC",
"f_ c #C8C8CA",
"g_ c #C8C8C9",
"h_ c #707092",
"i_ c #4F4F90",
"j_ c #80809F",
"k_ c #333333",
"l_ c #0A0A0A",
"m_ c #A9A9AA",
"n_ c #B5B6B7",
"o_ c #B8B8BA",
"p_ c #B7B8BA",
"q_ c #B3B3B7",
"r_ c #B0B0B5",
"s_ c #A9AAB0",
"t_ c #AAABB0",
"u_ c #A1A2AC",
"v_ c #A2A3AD",
"w_ c #A7A8B2",
"x_ c #A4A6B4",
"y_ c #A3A6B4",
"z_ c #ACAEBF",
"A_ c #B8BBCD",
"B_ c #C3C5D4",
"C_ c #C9CADA",
"D_ c #CCCEDC",
"E_ c #DBDCF1",
"F_ c #D1D2E0",
"G_ c #D6D8E3",
"H_ c #CBCCD3",
"I_ c #CACBD1",
"J_ c #CACBCE",
"K_ c #BDBEBF",
"L_ c #BEBEC1",
"M_ c #BBBBBC",
"N_ c #7D7DA4",
"O_ c #6262A2",
"P_ c #9292A8",
"Q_ c #1F1F1F",
"R_ c #020202",
"S_ c #A7A7A8",
"T_ c #B1B2B4",
"U_ c #A2A2A5",
"V_ c #B6B7BA",
"W_ c #B5B6BB",
"X_ c #A7A8AE",
"Y_ c #B3B3B9",
"Z_ c #ADAEB7",
"`_ c #A5A7B2",
" : c #A6A7B2",
".: c #A9AAB5",
"+: c #A5A7B5",
"@: c #A9ABB9",
"#: c #ABADBC",
"$: c #B5B7C3",
"%: c #BBBCCA",
"&: c #BCBFCD",
"*: c #C9CAD7",
"=: c #DADBE2",
"-: c #CDCED9",
";: c #E7E9F9",
">: c #CED1E4",
",: c #D4D7E3",
"': c #D0D2DD",
"): c #CDCED4",
"!: c #C1C1C8",
"~: c #C6C7CA",
"{: c #B7B8B9",
"]: c #B0B0B2",
"^: c #BFBFC0",
"/: c #B3B3B4",
"(: c #A6A7A7",
"_: c #B2B2B3",
":: c #6B6BA6",
"<: c #6666AE",
"[: c #A5A5B1",
"}: c #454A47",
"|: c #131A16",
"1: c #7F807F",
"2: c #C5C5C6",
"3: c #CDCDCE",
"4: c #BEBEBF",
"5: c #B7B7B9",
"6: c #A8A8AA",
"7: c #ABABAD",
"8: c #B9BABD",
"9: c #B5B6BA",
"0: c #AEAFB5",
"a: c #B6B7BD",
"b: c #B3B4BE",
"c: c #ACAEB9",
"d: c #ADB0BA",
"e: c #AAACBB",
"f: c #AAADBB",
"g: c #AEB0BF",
"h: c #AFB1C0",
"i: c #BABBC8",
"j: c #C2C4CE",
"k: c #C8C9D2",
"l: c #CDCEDA",
"m: c #E9EAF5",
"n: c #CFD0E3",
"o: c #D9DBED",
"p: c #D0D2DF",
"q: c #C9CBD8",
"r: c #C6C8D4",
"s: c #C9CAD5",
"t: c #CFD0D6",
"u: c #C7C7CD",
"v: c #C0C1C7",
"w: c #C6C7CC",
"x: c #BEBEC2",
"y: c #BBBCBD",
"z: c #C7C7CA",
"A: c #B6B6B8",
"B: c #A7A7A9",
"C: c #464692",
"D: c #5E5EAE",
"E: c #9DACA6",
"F: c #49755E",
"G: c #C8C9C9",
"H: c #DCDDE0",
"I: c #C1C2C5",
"J: c #BABAC0",
"K: c #AFB0B5",
"L: c #B1B2B8",
"M: c #B8B9BF",
"N: c #AFB0BB",
"O: c #ADAFBB",
"P: c #B3B5C0",
"Q: c #B6B8C4",
"R: c #B4B7C6",
"S: c #B0B3C2",
"T: c #B1B3C2",
"U: c #B4B6C6",
"V: c #B6B7C3",
"W: c #B9BBC6",
"X: c #BEBFCC",
"Y: c #C1C2CD",
"Z: c #C6C7CE",
"`: c #CACBD4",
" < c #EAECF4",
".< c #DBDCEB",
"+< c #CDD0E1",
"@< c #CDCFE1",
"#< c #C5C8D9",
"$< c #D3D3E2",
"%< c #C6C9D5",
"&< c #C1C3CF",
"*< c #C5C7D1",
"=< c #C7C8CE",
"-< c #C9CAD0",
";< c #C5C5CB",
">< c #C2C3C6",
",< c #C7C7C9",
"'< c #C0C1C3",
")< c #B1B1B3",
"!< c #BCBCBD",
"~< c #BCBCC8",
"{< c #6868B9",
"]< c #7C7CC3",
"^< c #B5CBC2",
"/< c #71A48A",
"(< c #C9C9CA",
"_< c #D7D8D8",
":< c #E5E5E7",
"<< c #E6E7E9",
"[< c #E3E3E8",
"}< c #C6C8D2",
"|< c #BEC0CD",
"1< c #BCBECA",
"2< c #BEC0CC",
"3< c #B8BBC6",
"4< c #B5B7C7",
"5< c #B6B9C9",
"6< c #BABCCC",
"7< c #BCBFCF",
"8< c #BEC1CC",
"9< c #BDBECB",
"0< c #BDBFCC",
"a< c #C0C2CD",
"b< c #C7C8CF",
"c< c #C7C8D0",
"d< c #B8B9C3",
"e< c #CBCEDF",
"f< c #CACDDF",
"g< c #C7C9DA",
"h< c #CDCFDC",
"i< c #C4C7D3",
"j< c #C4C6D2",
"k< c #C5C7D2",
"l< c #CDCED5",
"m< c #BDBEC4",
"n< c #C6C6C9",
"o< c #BDBDC0",
"p< c #D1D1D2",
"q< c #D0D0D1",
"r< c #C2C2D8",
"s< c #8A8AD5",
"t< c #9F9FD8",
"u< c #D7DFDA",
"v< c #A4C9B6",
"w< c #81AE97",
"x< c #E8E8EA",
"y< c #E9EAEE",
"z< c #D7D8DE",
"A< c #CECFD7",
"B< c #D2D3DC",
"C< c #D0D1E1",
"D< c #CDCEDE",
"E< c #D0D3DF",
"F< c #C1C2D3",
"G< c #BCBECF",
"H< c #BFC2D1",
"I< c #C0C3D3",
"J< c #C7C9D6",
"K< c #C8CAD7",
"L< c #CBCDD9",
"M< c #C8C9D1",
"N< c #C2C3CD",
"O< c #E3E4EF",
"P< c #DCDEEA",
"Q< c #DCDDEC",
"R< c #CCCFDC",
"S< c #C1C4D5",
"T< c #C2C4D5",
"U< c #C9CCDD",
"V< c #C9CBDD",
"W< c #C2C5D6",
"X< c #C8C9D6",
"Y< c #D3D4E2",
"Z< c #D1D3DF",
"`< c #D2D3D9",
" [ c #D8D9DF",
".[ c #C4C5CB",
"+[ c #DDDDDF",
"@[ c #CCCDD0",
"#[ c #D6D7DA",
"$[ c #E7E7E9",
"%[ c #CBCBCC",
"&[ c #AFAFD8",
"*[ c #7676D0",
"=[ c #A8A8DB",
"-[ c #E2EBE7",
";[ c #B4DCC7",
">[ c #B4D8C5",
",[ c #CFCFD0",
"'[ c #D2D2D4",
")[ c #E8E9ED",
"![ c #CED1E5",
"~[ c #C8CBDF",
"{[ c #CBCEE0",
"][ c #CED1E2",
"^[ c #CBCDDB",
"/[ c #CDD0DD",
"([ c #CFD1DE",
"_[ c #D3D5E0",
":[ c #CBCCD2",
"<[ c #CACCD4",
"[[ c #CACCD6",
"}[ c #D5D7E4",
"|[ c #D4D5E0",
"1[ c #CED0DE",
"2[ c #D7D9E8",
"3[ c #D8D9E9",
"4[ c #C9CBDF",
"5[ c #D5D8E9",
"6[ c #D6D9EA",
"7[ c #D0D2E0",
"8[ c #C9CBD7",
"9[ c #D2D3DB",
"0[ c #E8E9EE",
"a[ c #9999D2",
"b[ c #6C6CCD",
"c[ c #B8B8E2",
"d[ c #DFEAE6",
"e[ c #A4D1BB",
"f[ c #BEDACB",
"g[ c #EDEEF0",
"h[ c #DBDCDF",
"i[ c #DFDFE3",
"j[ c #E0E0E8",
"k[ c #CCCCD4",
"l[ c #DBDEF2",
"m[ c #D8D9E7",
"n[ c #D9DBE8",
"o[ c #D5D8E5",
"p[ c #D9DBE6",
"q[ c #E0E0E7",
"r[ c #DCDDE4",
"s[ c #D9DAE3",
"t[ c #CFD1DD",
"u[ c #CFD1DC",
"v[ c #DFE0EB",
"w[ c #D5D6E6",
"x[ c #CDD0DC",
"y[ c #CCCFE1",
"z[ c #CFD1E3",
"A[ c #D2D5E3",
"B[ c #D4D6E5",
"C[ c #D8D9D9",
"D[ c #8B8BD4",
"E[ c #7474D9",
"F[ c #E3F0E9",
"G[ c #88BEA2",
"H[ c #AABCB2",
"I[ c #DDDDDE",
"J[ c #CFCFD2",
"K[ c #D1D3DA",
"L[ c #DADBE9",
"M[ c #DEE0F4",
"N[ c #D5D7E5",
"O[ c #E0E1ED",
"P[ c #DFDFE9",
"Q[ c #D1D4EA",
"R[ c #DCDFF0",
"S[ c #F6F6FA",
"T[ c #F6F7F8",
"U[ c #7171C9",
"V[ c #6A6AD3",
"W[ c #E6E6F3",
"X[ c #F6FAFA",
"Y[ c #A8E5C5",
"Z[ c #DCE5E0",
"`[ c #EEEFF4",
" } c #E6E8F0",
".} c #D6D7E8",
"+} c #D5D7E8",
"@} c #CFD0E0",
"#} c #D2D4E4",
"$} c #D7D8E2",
"%} c #E5E7F1",
"&} c #DEE0E8",
"*} c #DDDFE6",
"=} c #D0D3E1",
"-} c #F4F5F6",
";} c #EAEAF0",
">} c #616299",
",} c #8384C4",
"'} c #E0E1E0",
")} c #DEEDE9",
"!} c #ACEDCB",
"~} c #E7E8E9",
"{} c #EEEFF1",
"]} c #E0E0E9",
"^} c #D9DAE2",
"/} c #CFD1E7",
"(} c #DEDFEF",
"_} c #E2E3ED",
":} c #D7D9E3",
"<} c #DFE1E7",
"[} c #DDDFF2",
"}} c #898A92",
"|} c #5D5F6B",
"1} c #7A7B8A",
"2} c #E9E9EC",
"3} c #E2E3E5",
"4} c #E2E2E4",
"5} c #E7E9E9",
"6} c #D7E4DE",
"7} c #9CCEB4",
"8} c #89BFA4",
"9} c #DFEAE5",
"0} c #DFDFE2",
"a} c #E2E3E7",
"b} c #D5D6E7",
"c} c #E6E8F3",
"d} c #D4D6E6",
"e} c #D4D5E4",
"f} c #CFD1E0",
"g} c #A6A9B9",
"h} c #8F919F",
"i} c #7C7D85",
"j} c #CFD1D9",
"k} c #FAFBFE",
"l} c #F3F4F6",
"m} c #D0D1D3",
"n} c #FAFCFB",
"o} c #F9FCFB",
"p} c #E6F4F0",
"q} c #B8DCCD",
"r} c #9EC9B6",
"s} c #A6E0C7",
"t} c #DCF7F1",
"u} c #DADADD",
"v} c #E6E6EA",
"w} c #DEDFE1",
"x} c #D4D4D7",
"y} c #D2D5EB",
"z} c #D2D5E5",
"A} c #EAECF6",
"B} c #DDE0F2",
"C} c #B7BBCA",
"D} c #C7CADA",
"E} c #D7D9E9",
"F} c #D3D4E5",
"G} c #D4D7E7",
"H} c #E8E8ED",
"I} c #C7C7C8",
"J} c #979798",
"K} c #A2A2A3",
"L} c #B1B1B2",
"M} c #BFBFC1",
"N} c #C8C8CB",
"O} c #D7D7D9",
"P} c #E1E1E4",
"Q} c #D9DAF3",
"R} c #E2E2F2",
"S} c #F1F5F7",
"T} c #D3E3DE",
"U} c #A7CBBB",
"V} c #C0E1D5",
"W} c #D1ECE7",
"X} c #A2D1C1",
"Y} c #A3C8BD",
"Z} c #DCE9EC",
"`} c #ECF1F9",
" | c #DEE1EE",
".| c #D4D6DF",
"+| c #E7E9F0",
"@| c #D2D4E9",
"#| c #D5D7E7",
"$| c #F3F4FC",
"%| c #DEE0E7",
"&| c #EEEFF2",
"*| c #E1E1E3",
"=| c #BDBEC0",
"-| c #CCCCCE",
";| c #B5B6B9",
">| c #B1B2B3",
",| c #9F9FA0",
"'| c #A2A3A5",
")| c #A7A8AA",
"!| c #ADADAF",
"~| c #A6A6A9",
"{| c #AFB0B2",
"]| c #BEBEC0",
"^| c #9E9EA0",
"/| c #B3B4B5",
"(| c #C5C6C8",
"_| c #BABABC",
":| c #AAAAAD",
"<| c #BCBCBE",
"[| c #A9A9AB",
"}| c #AFB0B1",
"|| c #A6A6A8",
"1| c #B4B4B6",
"2| c #ACACAF",
"3| c #BDBEC1",
"4| c #BFBFC7",
"5| c #898AC6",
"6| c #A0A2DC",
"7| c #C8C9E5",
"8| c #D6D7E0",
"9| c #D6D7F3",
"0| c #A3A4E5",
"a| c #D2D3EC",
"b| c #CAE4DF",
"c| c #A8CEC1",
"d| c #BADED4",
"e| c #E0E9F5",
"f| c #DADBEB",
"g| c #EDEEF9",
"h| c #C7D3DD",
"i| c #C1CFD9",
"j| c #D4D9E8",
"k| c #D3D6E6",
"l| c #E6E7F7",
"m| c #DEDFE5",
"n| c #CACAD1",
"o| c #C0C1C8",
"p| c #B1B1B7",
"q| c #A6A6AC",
"r| c #9EA0A4",
"s| c #A1A1A7",
"t| c #A2A3A8",
"u| c #A6A6AD",
"v| c #A7A7AE",
"w| c #B0B0B6",
"x| c #B3B4BB",
"y| c #B6B6BD",
"z| c #B4B5BB",
"A| c #B5B5BC",
"B| c #ACADB2",
"C| c #B3B4BA",
"D| c #B0B1B6",
"E| c #A5A7AC",
"F| c #B0B1B7",
"G| c #B7B8BE",
"H| c #BCBCC3",
"I| c #C4C5CC",
"J| c #C3C5D1",
"K| c #ACADCD",
"L| c #ABADDA",
"M| c #BDBFE4",
"N| c #CBCDDF",
"O| c #B9BBE8",
"P| c #D6D8EA",
"Q| c #DEE2F0",
"R| c #CFDBE4",
"S| c #D3E1EA",
"T| c #D9E3F0",
"U| c #C3DAD9",
"V| c #AECBC6",
"W| c #E6EAF1",
"X| c #D0D1DA",
"Y| c #E5E6EF",
"Z| c #E1E3F7",
"`| c #D1D3E0",
" 1 c #C2C4D1",
".1 c #BBBCC8",
"+1 c #B3B5C1",
"@1 c #B0B1BD",
"#1 c #ACAEB8",
"$1 c #9D9FA9",
"%1 c #9D9EAA",
"&1 c #9899A4",
"*1 c #9D9FAB",
"=1 c #A3A4B0",
"-1 c #A5A6B3",
";1 c #A8AAB6",
">1 c #A8ABB7",
",1 c #AAACB8",
"'1 c #ACADB9",
")1 c #ACADB8",
"!1 c #ABADB7",
"~1 c #ABADB8",
"{1 c #AFB1BB",
"]1 c #A6A8B2",
"^1 c #A3A5AF",
"/1 c #ADAEBA",
"(1 c #B4B6C3",
"_1 c #B8BAC7",
":1 c #BFC1CF",
"<1 c #C4C6D5",
"[1 c #C1C4D7",
"}1 c #C7CADE",
"|1 c #D4D5EB",
"11 c #DCDFF3",
"21 c #E1E3F9",
"31 c #DEE3F1",
"41 c #E5E8F8",
"51 c #E2E5F5",
"61 c #DEDFEA",
"71 c #E8EAF5",
"81 c #D6D7E2",
"91 c #DDDEE7",
"01 c #D0D3E5",
"a1 c #CCCFE0",
"b1 c #C3C6D7",
"c1 c #BEC1D1",
"d1 c #B8BACA",
"e1 c #A7A9B8",
"f1 c #9EA0AD",
"g1 c #9EA0AE",
"h1 c #9D9FAD",
"i1 c #A2A5B3",
"j1 c #A4A6B5",
"k1 c #A1A2B1",
"l1 c #A2A4B2",
"m1 c #A7A9B7",
"n1 c #A8A9B8",
"o1 c #A6A7B6",
"p1 c #ADAFBE",
"q1 c #B1B4C2",
"r1 c #A9ABBA",
"s1 c #A3A5B4",
"t1 c #A6A8B7",
"u1 c #B2B4C5",
"v1 c #BABCD0",
"w1 c #BFC2D5",
"x1 c #C5C8DC",
"y1 c #C9CCE0",
"z1 c #BFC1E6",
"A1 c #DEDFF2",
"B1 c #D1D3F1",
"C1 c #C2C3EE",
"D1 c #DBDDF7",
"E1 c #D8DAF7",
"F1 c #DFE1F4",
"G1 c #DADFEC",
"H1 c #E0E7F4",
"I1 c #CEDCE5",
"J1 c #CED9E3",
"K1 c #C3DFDE",
"L1 c #BAE7D7",
"M1 c #E3E4F0",
"N1 c #EAEAF4",
"O1 c #EBEDF6",
"P1 c #D9DBE5",
"Q1 c #CDCFDD",
"R1 c #C0C1CE",
"S1 c #BABBC7",
"T1 c #B8B9C5",
"U1 c #AFAFBB",
"V1 c #ADAEB9",
"W1 c #AAACB7",
"X1 c #ADAFBA",
"Y1 c #ACAFBA",
"Z1 c #AFB0BC",
"`1 c #AEB0BB",
" 2 c #AEAFBB",
".2 c #BABCC8",
"+2 c #B4B6C2",
"@2 c #B5B6C2",
"#2 c #B9BBC7",
"$2 c #BDC0CD",
"%2 c #C2C4D3",
"&2 c #C8CAD9",
"*2 c #CED1E0",
"=2 c #CDCFE6",
"-2 c #C0C2EC",
";2 c #C0C1EF",
">2 c #DFDFF1",
",2 c #B3B4F1",
"'2 c #8485EA",
")2 c #A7A8F1",
"!2 c #9E9FF5",
"~2 c #999AF1",
"{2 c #CFD1F5",
"]2 c #E6EEF2",
"^2 c #C4DED9",
"/2 c #B5D3CC",
"(2 c #CFE8E6",
"_2 c #BBDBD5",
":2 c #B6D3D0",
"<2 c #DDE2ED",
"[2 c #D2D4DF",
"}2 c #D9DBE4",
"|2 c #E7E9F1",
"12 c #E5E7F0",
"22 c #E3E5EC",
"32 c #DFE1E8",
"42 c #CECFD6",
"52 c #CACCD2",
"62 c #BCBEC4",
"72 c #ABACB3",
"82 c #B5B7BC",
"92 c #BEBFC5",
"02 c #AFAFB5",
"a2 c #BDBEC5",
"b2 c #B6B7BC",
"c2 c #C6C7CF",
"d2 c #BBBCC4",
"e2 c #BCBDC4",
"f2 c #C1C2C9",
"g2 c #B9BBC2",
"h2 c #BBBDC6",
"i2 c #C6C7D1",
"j2 c #C9CAD6",
"k2 c #D3D4E0",
"l2 c #CFD0DE",
"m2 c #C3C5E2",
"n2 c #C1C2EA",
" . + @ # $ % & * = - ; ; > > , ' ' ' ) ! ~ { ' { , ] ^ ^ / ( _ : < [ } | 1 2 = 3 4 5 6 7 8 9 0 a b c d e e f ",
" g h i j k & l m , n o p q r s t u v w x y y z A B C D E E F G v H I J K L M N O P Q R S T U V U W X X Y Z ` O .R ..+.@.U @.#.+.$.%.&.*.=.-.;.n >.,.'.).!.~.{.].^./.(._. ",
" :.<.[.].2 }.|.1.2.3.4.5.6.D 7.v 8.9.0.a.v y u F b.a.c.d.e.f.g.h.i.g.j.k.i.l.m.n.o.p.n.q.o.r.s.t.u.v.w.v.x.y.z.A.B.A.C.D.E.F.v.G.H.A.I.H.J.t.I.K.L.M.G.v.N.O.P.&.Q.c.R.S.T.R U.V.W.z X.Y.Z.`. +.+, ++@+#+$+%+&+*+ ",
" =+-+;+>+,+'+)+!+~+G F z {+]+^+/+D (+_+:+<+l.[+}+[+[+p.|+k.1+2+2+m.o.e.v 3+4+y 5+6+7+8+9+0+D F a+b+G f E u v w c+T.d+e+f+g+h+f+i+T.j+k+l+m+n+o+&.l+*.V p+q+r+s+m+k+t+u+v+` N.w+x+y+w.x+x.v.G.z+h.A+q.B+C+p.D+E+F+G+H+I+J+K+0+L+t M+N+} O+P+8 Q+R+ ",
" S+T+U+V+W+X+V+Y+&.m+Z+`+y E @.@p.h.+@@@f.#@m.h.:+q.o.Y+B w $@b+%@K u 3+&@8+*@E M =@-@M+;@>@,@'@( )+n )@!@r !@' ~@'+r {@~ ]@^@/@(@m >@2 < V+{@_@, :@<@[@3.;.( ^ }@; |@} 1@2@3@, _@V+4@5@l+i+P.k+6@7@8@o+o+o+9@0@%@x a@l.d.b@p.p.n.n.c@c@j.A+$@G d@e@U R @.f@g@, h@'@= ; 5 i@ ",
" j@k@5 l@m@]@,@n@Q.r++.j+X W o@p@x+q@r@l.s@m.A+#@D $@t@u@v@w@9+x@y@z@A@B@{@{@C@D@E@F@' G@H@I@!@J@K@s L@M@N@O@P@Q@R@S@T@U@V@W@X@Y@Z@`@ #.#+#@#X@##$#%#&#*#=#+#-#;#=#>#U@@#,#'#=#)#!#~#{#]#^#/#(#;#_#:#^ ^ <#}.!+[#}#|#1#2#3#4#5#h@6#7#8#9#0#a#b#c#d#_+J+.@e#r@1+f#g#h#D.i#D.k+R r+%.j#k#F l#m#,@!@n#o#<.t ",
" [.7 p#H@q#1#=.r#M s#3+F L+C.N.x+D.h#t#u#v#S .@w#E F x#3+y#z#p A#B#C#D#E#2@;@/ E#F#G#H#I#J#P@V@=#K#@#L#=#,###M#N#O#P#Q#R#S#P#Q#T#U#V#W#X#Q#Y#Z#`#X# $X#X#.$+$X#@$#$P#P#$$Q#%$&$Q#`#*$=$P#-$;$Q#X#>$+$P#,$'$-$)$!$/#'#~$/#R@{$]$^$/$($_$:$<$[$}$|$1$2$3$4$5$6$'+7$8$K 9+u 8+k+f+X 9$h#t#u#v#w+0$r@A+F a$3+.@z b$x z#c$d$e$f$s+ ",
" g$<#[ ~ h$z#H x#E 3+*@i.i.o.b@s@c@p.i$j$o+g+o@e@j+l+u !+k$l$m$!@)+!@n$F#o$p$q$r$s$t$J#u$M@v$Q#w$x$+$y$Z#z$V#A$B$P#C$D$X# $E$F$F$P#%$U#G$H$I$J$O#K$P#K$>$F$%$S#G$L$T#F$P#M$N$F$X#O$`#V#P$F$`#Q$N$P#K$U#`#L$O$X#F$F$F$F$+$R$%$V#S$ $.$T$U$V$W$X$Y$Z$`$ %.%+%@%#%H#$%%%&%;#*%E#=%'+'+;@-%;%-%b.%.9$*.o@Z 8+w#e#d.A+2+1+>%q.<+,%'%)%!%~%b {%]%^%/%(% ",
" _%g$[@/ r :%z <%a+[%f n.k.p.c@c@c@a.r#L+$@_+g@+.G {@1@}%V+|%' E@1%2%3%I#,#%#4%t$5%6%7%8%9%Q$;$Q#V#0%%$`#K$-$F$C$L$I$a%T#K$Q#b%a%-$O$C$F$ $ $X#`#Q# $ $E$V#F$`#P#Q#F$-$V#F$I$c%F$P#H$#$F$+$d%F$%$e%F$`#I$c%P#.$I$U#H$f%X#>$E$Q#F$`#g%`#`#M$V#T#h%i%j%k%l%m%n%o%p%q%r%s%t%u%v%w%x%I$Z$y%z% #A%/#@#-#B%E@E@V+-%;%2 C%D%s#D y Y+E%F%c+c@e#b@i.<+<+D d@G%H%I%J%K%G@L%M%N% ",
" O%* >@>@P%F%o@v x#Q%o.<+r.n.c@R%*@9+=.v S%T%, E#' !+U%V%>@W%X%;#/#Y%)#X@Z%`#X#V#K$X#-$P#X#F$`%/$ &.&K$P#c%.&+&@&O$E$%$c%Q#`#E$%$`#F$I$Q#T#S#G$F$M$#&G$F$F$F$-$g%L$`#c%$&.&>$I$Q#`# $>$X#F$V#x$F$+$C$F$L$O$F$ $f%b%U#P#U#X#+$C$U#O$n%a%F$P#T#X#U#`#F$`#L$+$Z$%&&&`#C$*&=&-&;&>&,&R$'&)&!&U#X#D$-$X#~&-$`#{&]&J#>#;#^&G#/&(&_&!@m ,@, !@s :&$@=@<&[&}&|&|&1&f#2&3&4&7#M 5&6&_.7&8&9&0& ",
" a&b&,@m$c&[%*@[%a$d&b@e&d.g.f&{+J+$@G g&:.h&; i&j&B@k&s$;#l&m&=#X@0%,$%$n&o&,$L$V#F$K$O#a%U#T#d%Q#p&q&r&`#.$F$F$F$F$F$-$V#c%G$s&-$`##$g%X#>$ $`#-$t&+$F$O$u&.$F$H$%$U#Q$O$K$Q#.$C$E$d%O$.&S#Q$G$ $.$P#F$V#.$F$L$E$F$.$b%a%I$G$.$.$b%T#`#C$N$E$`#Q# $P#+$-$`#Q#V#F$U#%$X#X#`#Q#F$F$F$F$F$v&w&x&d%`#U##$F$`#f%.$`#P#X#X#S#-$X#X#;$y&Z@z&A&;#X@B&C&_&> {@D&E&F&9$D+G&H&I&J&h.c.k.b@K&L&M&N&0+R+;@' h&O& ",
" <.P&<#[ 9+e@Q&K J+r.p.k.l.b@8+F%3+G+H A@R&,@M+_&,@S&T&!$U&^&V&,$%$Y#W& $I$X&Y&Z&`& *.*+*@*F$+$#*7$-$.&t& $$*%*&*Q#C$F$P#G$K$`#`#X#-$ $J$`#X#@& $`#e%S#`#G$#$X#`#T#f%U#F$e%I$`#G$H$S#K$F$F$F$%$U#`#d%C$.$C$t&c%L$**Q$-$-$X#F$-$%$Q#%$E$>$L$H$C$F$E$b%>$U#+$K$U#.$I$X#G$x$F$+$C$-$a%$&+$K$T# $X#X#=*-*;*T#F$K$$&X#Q#@&E$P#d%X#P#Z#a%P#%$P#X#Q#C$>*X#`#**,*+#V@{#>#'*)*!*~*{*]*S%^*/*(*q@_*q.o.l.f#:*(+f _+.@b <*}.[*}* ",
" I |*%+1*F R .f@2*I&s@c@f.}+G C F a@3*;@4*)@5*q#6*##^#^#7*;$-$P#X#`#Q#P#F$F$F$`#U#@&8*9*0*a*b*c*d*e*+$f*g*h*i*V#K$j*k*l*.$E$F$L$#&f%U#-$`#F$`#U#`#`#P#`#X#I$G$X#C$b%`#U#O$**F$X#f%O$-$Q#`#F$x$@&X#F$-$`#F$Q$P#F$F$G$P#`#Z#Z#C$d%+$`#.&.&-$P#`#F$`#I$-$F$V#V#.$d%M$V#Q#a%.$F$G$>$F$V#V#F$L$E$U#G$y$d%+$e%m*n*o*T#`#K$%$`#Q#>$-$%$M$G$U#x$.& $@&f%`#P#T#g%F$P#b%U#K$-$X#L$p*!$=&q*r*s*t*u*v*w*x*y*z*W A*B*C*c@d.r.}+C +.D*%.f E*1@F*E% ",
" R+G*i&c+s+j+o+T.F.M.H*t#g#a@f 9+5.-@E#' I*J*K*=#L*J#=#M*S#~&>*N*O*C$>$K$-$E$K$%$L$P#F$`#@&P*Q*R*5%S*T*U*V*d%W*X*Y*Z*Q#L$`* =.=K$%$F$C$Q$T#.$H$C$P# $I$U# $O$.$`#U#U#`#U#%$F$F$Q#T#F$-$H$H$T#O$Q#`#K$d%F$X#G$`#I$+=x$`#I$V#`#F$I$G$V#@&V#X#O#f%P#T#-$`#x$g%P#F$+$X#F$`#I$Q#Q#$&>$F$b%L$F$.&G$U#.$K$F$+$J$L$Q#>$@=#=$=E$Q#H$O$F$L$g%K$F$`#`#`#Q#+$-$E$.&K$L$+&O$F$+$f%.&H$-$X#%$O*X#P#O*`#K#U&%=F@&=*===-=;=>=,='=)=v F }+!=J.~=i$l+{=]=o+*@K@O&[* ",
" ^=0 1*g&l+f+/=(=i$J.H._=P.i+W T.g n :={@;@<= #;#[=}=K$M*P#P#P#`#P#I$.$X#x$>$`#x$t&-$.$|=O$U#F$+&1=2=%$J$Q#3=4=5=S#@&6=7=8=Q#9=0=a=b=c%I$F$J$e%I$`# $+$Q#E$.$F$I$H$C$-$L$ $Q# $+$F$I$C$Q#`#X#K$ $E$$&g%G$>$x$C$V#P#F$U#E$ $U#a%Z#F$U#V#F$`#P#`#`#T#H$`#O$.$`#O#d%`#+$+&I$`#T#L$X#F$L$U#`#L$P#F$N$O$.$u&E$X#P#G$-$`#U#c=d=e=Q#-$t&@&Q#O$M$.$Q#U#`#Q#T#.$F$%$-$`#%$x$V#F$Q#V#O$b%-$K$.&Q$P#%$c%+$X#P#U#Q#w$M*f=R@+#(&g=h=H@,@i=9+3+j= .k=l=m=w.t#4+m+m+4.!@} n= ",
" o=p=h@7.W +.X N.D.F.k=T.r+i+n+F } }.<#o 6*q=r=v$v$+$.$+$K$%$V#-$%$G$U#K$x$+$X#K$-$`#K$f%X#U#O#+$`#Q#s=t=u=C$v=w=x=y=z=Z#$&A=B=C=X#D=E=F=G=H=;#F$I=J=K=I$x$K$F$I$-$X#`#I$K$K$V#V#@&$&V#F$J$**g%-$C$I$F$X#K$P#%$ $+$a%e%E$X#%$L$`#X# $T#F$.$O#T#-$E$+$U#T#O#U#C$>$X#V#c%`# $N$c%U#y$y$`#V#Q#`#V#L$`#F$a%E$%$S#L$X#I$H$Q#%$e%L=M=N=U#F$`#`#`# $L$Q#T#C$P#%$e%>$F$b%E$F$I$T#%$F$X#`#P#K$X#%$Q$e%Q#c%y$T#U#L$L$U#T#X&`#B$0%O=v$>#2%P=Q=R=;@:@F%S=T=U=%.g#M.N.|&D k#3+~+q#h&}* ",
" P&<#0+k+e+R p@w+x+k=V=j=9$F%W=X={#f=Y=U#`#`#`#P#P#%$+$I$d%M$I$L$L$%$x$e%K$G$y$.&-$x$.&`#V#+&.$I$f%X#`#P#Z=`= -.-Z$+-@-#-U#**$-%-&-f%`#*-=---;->-,-'-)-!-~-{-]-^-z=v&U#c%/-x$P#-$Q#`#U#>$-$F$V#y$G$`#M$.&Q#-$Q$H$P#X#`#%$a%d%V#J$J$U# $g%V#F$.$e%c%%$d%T#U#E$O$-$a%g%Q#c%x$F$-$G$`#F$-$E$X#V#+$Q#O#M$X#%$F$`#%$/-J$`#-$x$`#I$#$(-_-:-U#P#+$`#F$>$%$`#K$X#`#U#O$K$F$e%L$`#$&t&I$P#>$K$C$%$`#`#d%L$`#-$a%V#U#T#G$K$c%L$F$c%g%`#.$E$-$K#<->#^&[-3.V+X+}-0.T.]=k+|->%l.#@f F a.1-G@2- ",
" 3-4-_ b.o+5-D.t#t#D.5-o+g+6- &/#7-`#E$$$8-9-0-a-b-c-d-e-f-g-h-P$g%I$H$O#G$M$#$J$.$Q$@&-$a%H$X#K$C$+$V#e%V#X#E$i-j-k-l-m-n-o-p-K$$&q-r-s-e%U#t-u-v-w-x-y-z-A-B-C-D-E-F-G-H-I-z=J-K-Y=L-M-X#N-@&Q#F$-$J$Q#F$T#L$U#K$f%#&@&g%-$F$-$X#F$U#Q#X#V#O#T#F$L$J$ $K$>$%$K$I$-$P#.$+$K$x$G$X#E$J$U#X#`#U#P#%$P#`#U#K$X#-$X#F$+$Z#H$K$L$%$`#+$:-O-P-@&`#>$/-F$X#y$E$`#@&T#`#a%n%Q#`#C$X#`#g%g%P#I$@&G$#&e%Q#`#**g%U#T#J$K$X#.$P#`#K$P#F$%$Q#F$+$C$%$%$W&=$`#Q-l&_#+#R-3., h@v j=0+ @#@p.}+S-T-0.l#U-W=V- ",
" p#W-X-Y-g+5-N.N.L.4+{.D*3+;@Z-7-`#~&`- ;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;+;@;M$E$O##;s&x$+&O#G$O$T#P#P#U#`#U#X#`#`#x$*$L-$;%;&;*;=;-;I$;;>;,;';x$F$);!;~;%$J$F$I$u&@&`#{;];^;/;(;_;:;<;[;};|;1;2;3;4;5;N-6;7;8;F$d% $`#Q#`#F$+$Q$-$F$.&+$`#E$a%P#F$T#+$`#+$+$U#.$O$ $H$#$g%G$ $U#K$I$K$`#O$a%%$d%C$F$c%J$-$P#V# $`#X#X#X#9;K$L$L$J$I$U#g%0;a;b;@&`# $.&F$U#T#G$`#%$I$U#g%+=-$P#O#`#`#L$E$F$`#V#`#E$+&X#F$#&P#`#Z#O#Q#U#H$L$a%e%I$+$G$K$`#X#Q#U#P#Q$M$ $=$G$U#B$*$I#(#c;s }%!@g 5.x@y@f&}+r.]+d;e;f;g;h; ",
" 3 q#i;a@z h#E.t#p@F m+j;, E*k;`#U#l;m;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;n;**H$.&g%e%e%g%N$S#d%f%@&L$c%E$P#F$V#.$X#U#o;p;q;r;-$G$s;t;u;v;w;x;y;z;h*Q#+$F$+$T#Q#U#.$T#>$g%-$X#>$A;8*B;%*C;D;E;F;G;H;I;J;K;Z%L;M;7-N;x;e*`#V#F$F$M$C$`#a%O;L$`#H$g%U#E$U#F$`#`#F$U#g%a%y$O$-$$&t&+$P#Q$>$`#P#U#F$C$J$K$I$b%>$ $.$P#Q#P;Q;R;-$ $Q#-$c%S;T;U;.&U#.&S#-$-$T#C$U#Q#`#`#K$C$U#Q#O$E$P#c%b%F$P#g%`#%$/-`#Q#Z#`#`#c%O$`#U#+$`#Q$O#Q#>$O#O$%$G$M$P#F$P#`#`#-$P#`#F$C$K$P#Y#;#@#V;r _&, 8$x 0.f#W;X;d.Y;F%i;h@& ",
" Z;' 0+`; >.>+>i$Q.]=j=8$n H@@>#>`#@&$>.;.;.;.;.;.;.;.;%>&>*>=>->=>;>>>.;.;.;.;.;.;.;.;.;>>u&Q$b%O$x$E$L$V#x$x$L$N$#$.$-$T#-$F$L$@&,>'>)>F$>$O#G$!>~>{>e*]>^>/>Q$c%F$E$G$`#`#Q#-$X#P#F$F$F$Q#Q#%$f%Z#T#(>_>:><>[>}>|>1>2>3>4>5>6>7>8>9>0>m%4*@#N--$t&K$`#c%a%@&P$T#+$x$U#`#`#P#K$d%x$X#L$V#U#U#/-L$`#E$C$U# $O$ $U#`#X#-$ $P#X#a>b>c>X#`#F$x$s&d>e>f>%$F$g%d%X#.$.&C$.$H$C$Q#.$%$P#Q#P#Q#%$J$g%F$Q#.$F$U#L$`#V##$+$-$O$g%P#C$%$F$Q#%$`#Q#c%F$`#+$S#F$`#J$X#F$V#C$U#K$.$`#`#%$U#`#X&g>/#h>E#;@P%F T-$@y+x+i>j>k>,%t*l> ",
" h&,@t j=P.p@t#E.f+R g@:=> s m>I#X#P#n>.;.;.;.;.;.;.;o>@;p>P$v=p>h-q>|=v=r>s>n>t>.;.;.;.;.;.;.;.;u>9%y$N$f%a%C$>$I$-$H$d%U#T#S#Q#F$c%/-%$v>w>P#G$/- $F$+$U#X#x>y>z>-$Q#F$Q$g%U#K$O#a% $V#P#F$`#F$F$X#G$C$-$g%x$P#P#H$$&Q#A>B>J;C>D>E>F>G>H>I>J>K>L>M>N>O>N-O=P>N-`#%$%$V#Z#%$P#@&c%`#-$M$Q#U#`#F$`#S#V#`#V#L$`#.$O#c%C$x$U#F$L$P#`#Q>b>R>U#`#F$T#S>T>U>V>Q#F$+$P#`#P# $-$I$O$L$c%M$L$-$E$+$`#c%+&c%U#P#%$K$F$F$F$K$>$U#K$T#L$K$$&$&`#Q# $F$Q#>$P#`#X#I$F$K$f%+$P#T#%$U#L$b%K$H$b%`#-$W>I$X#K#^#X>Y>s F@8+e@T.t#E.L.2* .9+> <# ",
" Z>`>e G y |& ,N.T j>c+.,q +,%#O@M#`#Q#@,.;.;.;.;.;.;.;#,$,$,$,p>O;#;%,q>&,*,=,-,-,=,%>.;.;.;.;.;.;.;.;;,$,r>>,f%|=$,d%V#$&$&U#K$O;L$`#P#I$`#Q#T#`#>$P$P#U#t&P#X#,,',), $X#F$y$b%Q#F$E$+$V#@&I$F$Q$a%P#F$E$%$F$E$ $F$F$g%E$F$X#K$E$+&O$I$V#!,~,{,],^,/,(,_,:,<,[,~.},x;|,F$%#1,@#N-%$c%F$K$e%c%S#H$F$K$S#c%`#`#X#`#Q#G$K$E$@&U#.$Q$ $-$2,3,4,K$T#X#5,6,7,8,9,-$F$g%x$P#I$V#U#U#.$U#Q#x$+$F$O$.$F$a%#$T#Q#G$H$**Q$%$P#.$-$`#`#I$%$F$C$J$-$b%b%F$.$f%O$X# $G$+$L$E$F$X#Q#F$`#X#U#Q#O$a%`#L$v=H$X#>$W&0,3% #Z-I*} B T a,v#I&H*r+4+*+H@b, ",
" c,n 1#&@E S-k.k=d,&.F e,/ <$z%f,-$X#`#U#%>.;.;.;.;.;.;D=g,h,h-i,9%j,k,*,l,s>l,h,m,n,u>=,h-o,.;.;.;.;.;.;.;.;->v=**S#S#u&.&a%y$@&Q#L$P$E$Q#x$c%F$`#U#X#.$Z#F$X#@&F$p,q,r,`#S#V#`#$&b%U#`#V#X#K$O#-$F$t&x$U#F$O$%$F$Z#M$-$F$O$I$F$F$F$F$L$+$F$+$T#%$F$P#Q#X#U#s,t,u,v,w,x,y,z,A,B,C,D,E,F,G,!>`#X#O@D$>$F$ $t&d%-$.&a%F$K$c%-$P#Q#`#K$T#L$H,I,J,X#K,L,M,N,O,P,U#f%`#F$.&>$`#x$M$U#+$M$Q#L$Q$Q#F$+&I$F$Q#d%+$F$.$P#J$s&L$-$O#a%P#V#$&>$`#%$P#`#L$V#F$%$g%T#P#U#%$+$>$V#F$>$e%g%x$x$-$`#P#-$F$+$O$I$Q#d%N$G$0%z$Y=R@Q,/ , R,9$9$N.w+F.G a.4.^ 9 ",
" V%S,T,3+b@f.<+$@l+ @h&' U,g>N@M*Z#-$I$`#V,.;.;.;.;.;.;.;W,X,Y,@;Z,`,g,9==,%,k, 'Y,*>.'l,u>*,#;+'.;.;.;.;.;.;.;.;@'s>$,u&+&b%O$e%x$K$G$b%K$+$@&O$+$c%+$P#O$#$`#K$J$`##'$'%'P#a%P#P#e%L$U#$&t&`#K$t&F$`#+&f%`#P#P#`#`#Q#E$U#F$H$Q#F$@&H$P# $V#P#I$$&I$F$-$L$Q#U#/-a%X#+$-$F$A>&'*'='-';'>',''')'!'~'{']'^'F$X@(#+$5%c%T#F$L$Q$C$x$O$F$Q#+$F$/'('_'`#:'<'['}'Z#>$G$S#X#P#x$-$`#%$C$F$`#V#-$O#s&`#F$$,E$`#-$g%X#F$.&P#U#>$P#F$e%L$X#>$@&+$+$d%%$F$ $Q#F$+$P#`#`#F$F$F$X#`#F$K$V#V#O$**d%X#x$c%U#+$>$Q#`#+$>$%$g%O$+$T#A$|'1'{@2 2'P.j+3's@k.u 9+4'5' ",
" 6'7'8'9'0'1+c@G D g > ] S&X@a'=$X#V#+&X#`# '.;.;.;.;.;.;.;g-j,h,k,->Z,k,@'->Z,.' 'b'*,m,*,>,k,n,i,**.;.;.;.;.;.;.;.;c'=> 'v=9%P$b%+&M$I$.&.&Q#U#-$X#`#Q#P#U#c%H$.$O$T#P#d'e'f'%$C$`#V#t&I$X#P#G$`#Q#C$F$Q#t&S#L$.& $U#U#U#-$`#-$+&-$`#%$e%X# $Q$C$X#+$X#F$F$K$X#`#g%V# $V#P#X#X#U#X#e%J$Q#`#g'h'i'j'k'l'm'n'o'p'q'r's't'u'N--$.$-$-$%$F$L$a%-$v'w'x'y'z'A'B'U#X#U# $a%X#L$u&G$`#%$E$ $%$`#X#C$e%F$Q#t&T#U#.&$&F$U#+=T#`#C$C$I$.$U#`#-$L$X#V##&-$ $t&I$P#$&L$X#a%@&K$ $O$+$`#`#`#F$U#f%a%U#e%T#U#V#f%a%U#>$ $K$.&c%`#I$&$,$8;C'D''+{@J+T.3+n.E'>%9+F'{@D% ",
" G'H'I'J'l.1+K'v A@)+_&L'M'N@X#;$M$F$ $f%F$ $c-.;.;.;.;.;.;N'n,O'*>;>P'Q'R'*>j,`,i,-,>,S'`,#;p>W,Y,s>&,9=.;.;.;.;.;.;.;.;T'k,s>&,+=t&f%d%V#T#H$E$C$b%E$X#`#`#`#I$K$X#P#Q#P#U'V'W'V#G$`#T#S#x$-$C$T#F$K$I$F$`#X#%$I$g%C$-$d%$&-$X#L$#$J$U#.$J$F$X#L$`#L$J$.$G$g%F$`#%$K$P# $O#%$U#Q$+$P#a%g%-$X#U#U#-$T#K$`#M$X'Y'Z'`' ).)+)@)#)$)%)&)*)X#`#=)-);)>),)')))!)~)+$V#c%L$ $%$`#x$y$>$I$a%x$c%J$-$Q#.&y$P#U#-$`#`#.$x$`#+$/-d%Q#x$a%C$O$L$P#.&J$X#I$**`#X#f%U#U#f%c%`#-$t&P#V#+=g%K$x$O$P#-$e%%$U#a%+$U#U# $-$K$e%c%G$f%c%K$U#+$K$`#w${)])^)> , /)(+D k.f#_+()*+_) ",
" l@:)<)[)})C*|)1)>@2)3)f=V&=$V#`# $T#F$V#a%F$4).;.;.;.;.;.;.;T'j,q>=>9=5)@;6)5)h-%,k,m,v=-,n,#&s&n%+=O;-,N$.;.;.;.;.;.;.;.;7)Q'=,u>#;#$y$$&c%L$C$G$g%Z#Z#O$a%K$X#d%a%K$V#%$U#8)9)0)I$+$P#V#c%.$x$**H$X#O$e%-$P#X#`#U#G$O$%$+$C$Q#P#+$a%V#L$S#J$%$a%E$Q#-$ $-$T#S#`#-$M$M$X#%$+&+$-$H$a%K$C$J$-$Q#s& $-$c%P#X#U#K$K$C$b%-$`#a)b)c)d)e)f)g)h)i)j)k)l)m)n)o)p)q)c%C$O$a%Q$S#C$X#g%b%I$ $L$Q#K$>$%$`#O$$& $T#x$P#`#>$x$`#%$V#X#U#%$+$I$c%V#I$J$V#U#E$#$U#%$M$K$-$C$T#U#`#+$F$X#d%-$L$@&L$P#.$#&-$>$Z#+$-$d%C$K$-$ $I$C$g%-$`#X#%$U#F$.$-$`#r)2%s)R&)@t)a.E'n.c@u b , ",
" m S,u)A+v)w)x)y)z)A)B)C)D)E)F)G)-$C$ $-$ $P#I$.;.;.;.;.;.;.;.;m,n>;>@;n>9=O'*>9-W,-,b'%,s&S'u>+&u&r>r>#&S'$,H).;.;.;.;.;.;.;.;I)->*>s>v=#;-,J$>$O$%$P#P#P#Q#Q#X#P#g%s&#&+=E$U#J)K)L)d%>$K$.$V#%$P#T#V#U#c%H$ $d%$& $Q#d%s&O$V#J$L$.$c%.$P#.$c% $+$H$Q$a%`#`#F$-$C$U#%$E$+$X#`#X#`#X#-$G$%$C$x$ $ $a%I$.$N$-$-$-$P#P#T#c%U#`#X#U#>$x$%$I$T#M)N)O)`#P)Q)R)S)T)I$I$ $.$+$V#g%.$Q#g%@& $a%O$-$+$ $U#`#c%C$+$y$O# $C$N$M$%$J$O#c%K$-$Q#L$E$I$K$%$-$P#+$L$X#I$a%Q#K$x$H$t&@&O$C$V#x$X#P#%$X#F$`#`#U#K$E$-$.$O;|=+$+$%$%$G$+&K$Q#y$S#d%>$ $Q#`#Y#%$Y=f=W%,@U)v a$c@:+j=D%] ",
" V)W)[%l.J&X)Y)Z)`) !.!+!@!#!$!%!&!*!=!-!;!>!O)n,.;.;.;.;.;.;.;,!O'4)'!I)T'9-g,q>m,8-v=|=u&f%Z##&e%#&&,v=t&$,s>Q$.;.;.;.;.;.;.;.;f-@;*>h,s>8-8-H$g%S#O$%$ $P#`#-$*,)!%$%$I$+$F$a%!!~!{!]!$,G$c%N$O$I$>$%$P#U#%$U#X#`#`#F$`#+$I$K$a%G$g%#$H$%$G$a% $P#U#`#T#Z#d%K$I$K$X#F$P#y$@'^!a-/! ;(!V,Z,+&c%C$d%@&L$J$S#I$L$b%-$ $M$O#%$U#U#P#+$-$X#F$Q#u&@;_!d-c-:!$C$V#U#`#E$X,|!1!2! ;b-n;1!R's&a%M$G$a%u&V#c%P$g% $+$>$C$C$b%a%b%|=O$L$z$V&s)E@[@$@%.A.I&r+4';. ",
" > b w#g.f#3!4!5!6!7!8!9!0!a!b!c!d!e!f!g!h!i!j!X#k!.;.;.;.;.;.;.;'!Q'4)&>l!]!4)g,j,Y,s>n%>,s&d%Z#S#a%g%g%H$b%s&&,E$D=.;.;.;.;.;.;.;.;#,;>=>`,&,>,$&.&d%G$P#F$V#W,c-.;.;x$x$+$`#-,.;.;.;.;m;M$T#x$$,v=a%J$Z#x$K$`#U#/-T'n;t>d-a-m!s>J$V#a%N$.&L$y$s&T#>$T#I$U#%$+$P#.$F$L$;>.;.;.;.;.;.;.;.;.;.;.;t>q>/-f%J$$&e%.$I$+$ $V#J$e%K$K$Q#L$E$`#+$O'.;.;.;.;.;.;.;.;.;.;n!|=o!p!a%Q$v=T#C$x$I$P#Q#Q#U#U#.&P#F$`#G$*,q!@&V#d%V#`#g%|!+'c-t>+';>$,d%E$b%n%O#T#f%.&I$c%V#X#>$E$-$X#X#U#`#P#-,m;.;.;.;.;.;.;.;.;.;.;.;.;r!/-b%u&J$x$Q$Z#S#%$-$P#Q#I$`#-$H$+$I$x$y$v$u$s!m r#Y p@t!.@A@>@ ",
" X+~+9+f#f#z V=u!v!w!S#>*y$n%K$U#/-x$`#x!y!X#z!A!B!.;.;.;.;.;.;.;.;C!D!E!F!G!H!9=h-*,l,|=t&p>f%T#e%H$G$M$Q$g%a%/-s&c%'!.;.;.;.;.;.;.;.;I!J!&>m,u>e%L$-$F$-$Q$5).;.;.;.;.;+&J$`#l,.;.;.;.;.;q!f%O$O$J$Q$T#E$J$U#`#$,K!.;.;.;.;.;.;.;.;.;L!s&$&a%E$E$b%>$T#Q$E$+$Q#P#X#`#h,.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;d-X,M$$&$&f%s&u>n>b%$&H$T#L$K$U#`#s>t>.;.;.;.;.;.;.;.;.;.;.;.;.;M!N!e%S#-,O$e%X,+&C$E$L$P#`#`#E$u>+'.;.;.;>$V#P#-$g,.;.;.;.;.;.;.;.;t>n,e%e%b%a%M$T#L$@&V#P#$&**>$K$U#`#/-N'.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;o,r>u&M$d%T#d%S#@&K$+$+$U#L$.&F$F$Q#V#`#V#$-O!}..@U P!p.M Q!^ ",
" [*n@0+k.h.(+D%R!S!T!`#F$F$ $$&P#%$#$**U#C$Q$Q#C$ $Z#.;.;.;.;.;.;.;.;U!V!W!X!Y!Z!`! ~.~+~@~#~$~x$V#>$ $%$N$f%C$e%s&s&H$l,.;.;.;.;.;.;.;.;'!V,%~|!`,+$|=g,f-.;.;.;.;.;.;.;.;a%F$Z#.;.;.;.;.;.;&~ 'n%$&y$Z#d%+$`#H$f-.;.;.;.;.;.;.;.;.;.;.;.;.;9-t&H$.&b%T#O$T#L$u&#&I$U#J!.;.;.;.;.;4)8-X,v=*>5).;.;.;.;.;.;.;.;.;.;.;.;.;*~y$s&y$u&N$F$E$=~.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;-~N$P$p>.&@&s&Q$-$H$Z#u>g-d-.;.;.;.;.;.;G$`#.$;~.;.;.;.;.;.;.;.;.;.;.;>~+=e%$&S#x$C$O$ $-$O#O#%$%$X#9=.;.;.;.;.;.;&>s>|=N$O;q>,~.;.;.;.;.;.;'~i,#;**e%J$$&b% $>$L$K$Q$/-L$-$>$%$F$`#I$)~k&/ !~j=m.#@y#~~# ",
" E@F h.i.w#n@5*{~]~^~>$%$`#.$x$F$U#c%M$F$-$C$-$d%.$q>.;.;.;.;.;.;.;.;/~(~_~:~<~[~}~|~1~2~3~4~5~6~7~8~9~0~a~b~+$J$N$+&f%+&.;.;.;.;.;.;.;.;o,J!4)c~%,O$.;.;.;.;.;.;.;.;.;.;.;U#J$c-.;.;.;.;.;.;>>n,-,u&$,v=K$K$#,.;.;.;.;]!9%+&M$>,g,c-.;.;.;.;.;'!** '#$f%v=#$f%a%.$`#%~.;.;.;.;.;m,Q$t&N$u&S'$,h-.;.;.;.;.;.;.;.;.;.;.;.;1!y$y$@&a%C$G$.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;d~-,>,O;y$M$d%>$G$.;.;.;.;.;.;.;.;.;.;.;`#y$d-.;.;.;.;.;.;.;.;.;.;.;.;.;I)/-n%i,b%H$#$V#.$u&@&U#`##,.;.;.;.;.;c-=>N$|=X,|=S'9%v=e~.;.;.;.;.;.;+;k,-,+=#&u&N$f%g%I$-$.$>$-$+$Q$a%F$I$K$`#K#f~|@g~u g.d.f s ",
" -%h~1-p.u X-)+s)i~j~k~f%J$Q#@&O$`#+$d%c%`#`#U#`#+$U#'!.;.;.;.;.;.;.;.;V,>~0-*-I)Q'l~m~n~o~p~q~r~s~t~u~v~w~x~y~$;z~A~B~C~D~.;.;.;.;.;.;.;.;q!r!%~E~=,t&.;.;.;.;.;.;.;.;.;.;.;c%+;.;.;.;.;.;.;.;F~Z,`,p>s&-$ $_!.;.;.;.;%~M$**|=+&O;-,**.;.;.;.;.;.;c~X,u&Z#$,n%N$C$U#P$.;.;.;.;.;>>$,s&>,-,p>r>*,e%a-.;.;.;.;.;.;.;.;.;.;.;m!v=|=S#t&c%c%.;.;K!q>O;Z#+&&,i,g,G~.;.;.;.;.;.;.;.;n>s>X,P$n%+&O$%,.;.;.;.;.;.;.;.;.;.;.;g,.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;c-u>9%`,y$+&n%T#T#f%g%`#p>.;.;.;.;.;.;n>v=P$>,s>u>->Z,X,y$'~.;.;.;.;.;.;>>u>|=v=Z#y$P$#$g%+$a%+$X#-$T#%$F$b%$&+$H~I~s)>@/)3+d.G+F'J~",
" '+K~K&l.E !@L~M~N~O~K;T#+$F$T#.$`# $@&>$P#E$c%I$ $`#&~.;.;.;.;.;.;.;.;^!e~P~^!4)4)|!b'b'u>M$x$>$7$L;Q~I-R~S~T~U~V~W~X~Y~Z~.;.;.;.;.;.;.;.;`~)!m!l!T'I!%>m;c-.;.;.;.;.;.;.;.; {.;.;.;.;.;.;.;.;e~Q'@'n,g%%$_!.;.;.;.;N'n%+&>,#;**u>h,f%.{.;.;.;.;.;+{j,>,#&+&M$e%G$Q# ;.;.;.;.;.;*>-,S'j,R'u>Y,->p>b'.;.;.;.;.;.;P~j,Y,->W,n,h,`,+=8-n%x$.;.;6)f%t&O#Z#p>#;>,@{#{.;.;.;.;.;.;.;F~=,i,X,`,$,Q$**${%{&{*{.;.;.;.;.;.;.;.;.;e~q>b'9%b'q>={.;.;.;.;.;.;.;.;9==,@'+=u&+&O$@&f%%$%$t>.;.;.;.;.;N'R's>9%i,b'u>i,.'l,r>X,.;.;.;.;.;.;.;T'`,v=s&+&N$#&O#>$P$>$P#g%b%P#F$g%M$K$>$=$N@-{m$E ;{3&v > ",
">{d;5.[+F%4.,{K# $'{){!{>$Q#`#g%C$U#K$$&I$`#L$.$K$J$`#~{.;.;.;.;.;.;.;.;>~={={{{9-6)=,>,S'+=$&$&@&Q#H$s&>$K$ $K=.#]{^{/{({_{.;.;.;.;.;.;.;.;:{<{[{}{|{1{`,u>l,+=.;.;.;.;.;.;.;.;.;2{;>;,m,h-/!.;V,=>@'l,F$n>.;.;.;.;.;3{|=**s>r>#;u>l,#&v=.;.;.;.;.;.;;>j,r>r>s&f%+$t&.;.;.;.;.;.;Y,k,u>n,j,`,8-.'u>H$.;.;.;.;.;.;~{->->q>=,8-j,i,+=#;X,**.;K!n%p>j,%,**l,Y,4{5{6{q!.;.;.;.;.;.;~{'!q>%,R'8-/-O#7{8{9{#>.;.;.;.;.;.;.;.;|!H)c~j,.'n,i,h-=,.;.;.;.;.;.;.;J!6)O'h,=,r>M$**v=`#j,.;.;.;.;.;.;J!m,=,n,W,h-n,Y,->b'i,g%c-.;.;.;.;.;.;n!@;@'n,**N$t&a%G$L$%$Q#g%Z#F$F$g%g%`#V#c%U#+#,@4.w#d.0{q#",
"e,f r.}+C r k;}==#a{b{`#U#-$`#H$d%X#K$P$-$F$@&Q#U#b%`#t>.;.;.;.;.;.;.;.;>~o,c{m!#,m,`,p>N$b%T#C$ $P#V#H$x$d%O#C$`#T#M$E$L$`#.;.;.;.;.;.;.;.;d{e{f{g{h{i{j{k{l{8!.;.;.;.;.;.;.;m{|!9-n{4)9=|!6)d-E~*>h-@&c%.;.;.;.;.;.;@;j,8-@;q>=,@'h,9%a%.;.;.;.;.;.;e~j, 'W,&,s&Q#|!.;.;.;.;.;.;m,6)R'->q>k,W,=,i,I$.;.;.;.;.;.;c-H)9-%~#,@'h-j,>,|=#$$,O'h-e%N$s>n,p>b'8-8-9=->O;.;.;.;.;.;.;.;n{*>h-->*>>,o{p{q{r{Y=.;.;.;.;.;.;.;s{t{u{E~m,v{w{h-Y,P$=~.;.;.;.;.;.;=~I!->`,8-X,+&v=t&Q#d-.;.;.;.;.;.;9=m,R'R'9=;,k,W,q>*,i,t&V,.;.;.;.;.;.;.;g,->m,#;O;>,e%d%O#.&Q#%$g%Q#X# $Q#X#E$g%P#x{y{q#z{f#8.A{",
"~ u k.J+B{C{D{X&E{F{G{P#+$K$`#P#%$F$X#d%F$U#v=%$P#$&U#H{.;.;.;.;.;.;.;.;*-F~r!m!l!I!Y, 'l,$&T#L$K$P#`#P#+$b%+&O$C$H$**d%V#`#.;.;.;.;.;.;.;.;I{J{K{L{M{N{O{P{Q{R{.;.;.;.;.;.;.;9-5)5)g-n{;>T'P'6)@;;>R'%$h-.;.;.;.;.;.;Y,s>%,g,->m,9-c~*> $.;.;.;.;.;.;$>W,=,;,-,r>U#(!.;.;.;.;.;.;8-R'=>H)c~@'#,|!.'P#.;.;.;.;.;.;S{n{;>'!T'O'O'=>i,X,.'=,9%|=/-+&Z#**+=>,-, '=>;,T#.;.;.;.;.;.;.;'!n>;,Z,*,v=T{U{V{W{`#.;.;.;.;.;.;.;X{Y{Z{`{ ].]+]W,h-u>@].;.;.;.;.;.;m;3{|!h-j,>,#&+=G$H$.;.;.;.;.;.;.;6)E~O'E~5)|!@'Z,h,u>-,|=u>.;.;.;.;.;.;.;9-g,W,b'-,l,/-Q$+=+=L$L$@&E$%$>$F$`#`#F$`#K$T@m w#o.J+#]",
"p $@<+$]{ 3)~&Y#%]&]*]K$J$H$K$d%d%U#Q#.$F$-$e%P#K$O$U#~{.;.;.;.;.;.;.;.;m!o,P~g-n>;,i,r>@'S#T#O#g%Q#E$+$`#P#`#X#Q#C$M$>$ $`#.;.;.;.;.;.;.;.;2!F~e~3{'!E~=]-];]`#.;.;.;.;.;.;.;]!3{>]^!]!5)4);>6)9=|!8-`#n;.;.;.;.;.;.;Y,h,Y,@'q>W,->Y,k,U#.;.;.;.;.;.;t>6)g,E~h,s>X#d-.;.;.;.;.;.;Y,q>g,#,O'W,q>;,i,U#.;.;.;.;.;.;,]3{n{5)g-n>6)c~ 'v=#&P$**p>v=P$S'v=p>&,l,n,@'8-K$.;.;.;.;.;.;.;e~I)H)@;q>r>'])]!]~]N-.;.;.;.;.;.;.;{]]]^]/](]_]:]R'@'<]/@.;.;.;.;.;.;N'J!@;@;5)*,+=b'+$*,.;.;.;.;.;.;.;q>;,6)9-J!#,9=#,W,s>l,l,O#.;.;.;.;.;.;.;*-E~c~W,n,r>Z#b%t&$&.$.$x$J$N$+&C$E$G$X#X#X#%#n&K []v 5*",
"'@B g.}]p |]}=`#1]2]3]`#.$T#>$u&N$K$G$H$`#>$f%.$K$.$P#*~.;.;.;.;.;.;.;.;%~F~)!{{9-g,s>$,#;+&J$s&g%P#@&c%`#c%.$`#`#@&O$%$I$P#.;.;.;.;.;.;.;.;)!%>o,>~>~@;Z,=>k,F$.;.;.;.;.;.;.;4]1!.{F~J!m!]!I)*>Q'c~r> $.;.;.;.;.;.;.;+$U#P#P#U#P#P#P#U#X#.;.;.;.;.;.;.;l!@;T'->b'K$t>.;.;.;.;.;.;l!O'|!J!4)R'k,j,p>P#.;.;.;.;.;.;)!={m!3{V,E~n>E~`,p>u&y$Q$S#/-#$-,+=#&/-M$d%L$F$K$.;.;.;.;.;.;.;V,n{T'J!l!i,5]6]7]8]F$.;.;.;.;.;.;.;9]0]a]b]c]d]e]f]E~g]h].;.;.;.;.;.;c->~;>Q'=>`,&,R'-$g-.;.;.;.;.;.;.;;,|!@;E~5)=>m,O'b'S'#;8-T#.;.;.;.;.;.;.;i]4)@;E~n>h-+=f%|=e%I$+$-$`#`#-$-$H$d%Q#>$M*(#B@a.}+]+,@",
"> v })_+b E#Z@`#B~s-j]%$P#`#`#g%a%P#G$J$-$d%**a%>$O$%$5).;.;.;.;.;.;.;.;T'F~k]>~V,&>*,v=/-O$x$e%.$P#.$V#U#@&P$F$P#M$t&K$I$I$.;.;.;.;.;.;.;.;J!)!c{F~r!@;Z,E~*>F$.;.;.;.;.;.;.;l]m]n]o]p]%~{{#,->#,Q'p>d%.;.;.;.;.;.;.;d-N'N'N'N'N'N'N'N'd-.;.;.;.;.;.;.;I!H)n>q>.'c%&~.;.;.;.;.;.;;>|!9-3{]!I)|!n,N$L$.;.;.;.;.;.;&>3{'!g-4)Q'*>#,n,X,v=O#@&#$y$O$G$K$F$-$x$***>=~.;.;.;.;.;.;.;.;={m!I)P';>n,q]r]s]t]F$.;.;.;.;.;.;.;u]v]w]x]y]z]A]B]@'C]Y=.;.;.;.;.;.;.;@,g-I!|!j,n,q>U#i].;.;.;.;.;.;.;3{&>I!I!g-m,Y,R'S'P$#&`,+$.;.;.;.;.;.;.;'~4)9-@;@;R'S'S#9%b%G$e%L$P#X#F$F$V#I$X#F$E$2%E@I q.B D]",
"V+7.1+n.z E]F]O=G]H]I]G$>$P#F$e%L$F$Q#X#F$+$d%L$L$x$L$h-.;.;.;.;.;.;.;.;n{o,={n{I)9=*,u>X,d%g%Q$c%K$G$C$F$V#Q$F$Q#O$t&%$G$O$.;.;.;.;.;.;.;.;T'P~e~J!^!c~Z,Z,Y,F$.;.;.;.;.;.;.;J]K]L]M]N]I)n>g,Z,k,j,#$O#.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.; ;9-l!E~->k,n%6).;.;.;.;.;.;5)H);>I!9=6)H)8-C$t&.;.;.;.;.;c-n{V,P'5)9-c~@'.'%,%,&,M$x$V#`#-$f%j,r!.;.;.;.;.;.;.;.;.;.;.;.;.;O]*-5)l!5)Y,P]Q]R]O#F$.;.;.;.;.;.;.;S]T]U]V]W]X]Y]Z]`] ^`#.;.;.;.;.;.;.;P~{{'!g-m,k,=,`#/!.;.;.;.;.;.;.;={'!T'T'5)R'h-E~%,u&u&9%Q#.;.;.;.;.;.;.;S{>~T'@;;,.'X,P$l,J$C$#$c%%$+=E$X#G$%$X#Q#.^-{_&x@q..@=%",
"+^@^7+e&g&#^,@L#$^%^&^ $d%P#F$+&%$F$>$%$`#`#g%%$K$+$ $O#.;.;.;.;.;.;.;.;P~O]c{'!&>*>b'`,-,e%c%.&c%Q#x$g%F$J$y$-$I$f%O#K$P#S#.;.;.;.;.;.;.;.;{{%>1!>~>]*>=, 'X,F$.;.;.;.;.;.;.;*^=^-^;^>]H)Q'm, 's>r>f%y$.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.; ;&~o,5)n>I)'!;>n{I);,.'u>S#.;.;.;.;.;.;'~9-&>&>Q'=>g,P$F$T'.;.;.;.;.;P'^!e~m!*-'!*>W,%,+=s&Z#%$`#C$Q't>.;.;.;.;.;.;>^m!t&.;.;.;.;.;.;.;k]1!g-E~P'@;,^'^)^u&F$.;.;.;.;.;.;.;'!!^*-V!~^{^]^^^/^(^F$.;.;.;.;.;.;.;={%~P';>m,W,h,U#c-.;.;.;.;.;.;.;1!={g-T'n>R' 'l,#;y$Z#$,X#.;.;.;.;.;.;.;t>0-n{I!|!R'&,O;h-H$G$x$Q#P#C$%$`#s&G$Q#&$_^J@F':^<^Q&)+",
" [^(+r.}^w#5*|^1^2^`#P#.&X#`#Q$`#F$.$C$X#U#O#Q#K$C$V#L$.;.;.;.;.;.;.;.;H{F~o,P'{{c~b'8-u>f%c%g%V#U#G$.$F$.&a%`#Q#T#c%%$U#h-.;.;.;.;.;.;.;m;r!P~c{P~c{6)g,;,-,F$.;.;.;.;.;.;.;3^4^>]]!n{Q'9==,s> 'X,M$t&.;.;.;.;.;.;.;#,g-{{m!'!%~I)@;l!H)W,=>Q'=>*>T'5)9-&>#,;,j, '#;%>.;.;.;.;.;.;T'Z,n{I!Y,N$U#M$.;.;.;.;.;f-Q']!J!'!^!%~g,m,8-**Z#Q#K$T'.;.;.;.;.;.;*-g,u>X,X,F$.;.;.;.;.;.;.;.{r!g-I!O'j,>,S'+&#&F$.;.;.;.;.;.;.;%~r!J!5^6^7^j,8^9^0^F$.;.;.;.;.;.;.;>]'!{{9-m,9=Z,Q#d-.;.;.;.;.;.;.;1!o,>~]!E~R' '#;#&t&P$$,`#.;.;.;.;.;.;.;b-V,'!l!9=q>s>p>O;f%@&a%%$P#X#X#-$O#V#`#Y=F#R&f a^:+G+b^",
" 1*z#c+c^0.d^e^f^g^X#K$g%L$Q#H$I$P#E$-$F$X#x$`#Q#J$.$E$(!.;.;.;.;.;.;.;.;5)e~P'9-m,i,b'S'M$b%u&>$ $b%+$F$T#.$X#P#.$+$-$`#>^.;.;.;.;.;.;.;m!>>0-*-c{*-c~R'W,9%F$.;.;.;.;.;.;.;h^i^j^V,9-=>j,s>O;|=#&M$M$.;.;.;.;.;.;.;&>3{={]!g-I)n>;,W,h-Y,->I)g,;,]!g-n>&>6)*>h,h,h-S't>.;.;.;.;.;.;J!H$P#F$.$9%t>.;.;.;.;_!6)c~{{'!I!]!;>=,Y,s>Z#K$.$$>.;.;.;.;.;={u>O;P$v=X,X,F$.;.;.;.;.;.;.;k]L!m!l!n>h,u>*,#$f%F$.;.;.;.;.;.;.;g-={k^l^m^4)j,n^o^p^F$.;.;.;.;.;.;.;{{'!V,9-g,E~m, $q^.;.;.;.;.;.;.;l!3{J!]!E~g,;,*,/-$&$,+=`#.;.;.;.;.;.;.;(!c{>~>]l!@'`,#;/-e%t&$&+$G$d%P#K$x$>$r^Z-'+D%g&:+)=P%s^",
" 5*r#t^u^J+v^w^x^Z$X#`#F$`#-$Q#I$S#O$`#%$.& $L$V# $C$9%.;.;.;.;.;.;.;.;>~y^]!g-9=n, '+=@&c%$&+$K$O$Q#F$H$f%O$$&#$b%P#V#.;.;.;.;.;.;.;.;T'k]o,V,J!4)g,R'Z,S'F$.;.;.;.;.;.;.;={z^A^B^C^|!Y,-,&,#;y$e%f,.;.;.;.;.;.;.;^!>>=~c{V,>]T'c~|!g,.'Y,=>Z,->I!c~O'Q'W,@'b'9%s>+= 't>.;.;.;.;.;.;.;.;c-.;.;.;.;.;.;g-O'=>c~%~l!@;J!9=n,j,S'a%X#f-.;.;.;.;.;>~+=.'k,r>-,h-j,F$.;.;.;.;.;.;.;.{)!]!n{;>.' 'k,p>t&F$.;.;.;.;.;.;.;n{m!m!5)4)T'*>D^E^F^F$.;.;.;.;.;.;.;g-%~'!H)=>R'n,c%F~.;.;.;.;.;.;.;;>{{{{>]l!h-j,O;S#@&O#M$U#.;.;.;.;.;.;.;e~*-V,e~5)R'h-@'p>.&y$$&+$L$g% $P#V#.^1'G^H^z I^q.!~'+ ",
" j S,8.J^o.K^L^M^S&N^B$X#Q#Q#F$Q#c%T#X#c%f%C$d%d% $d%d%c-.;.;.;.;.;.;.;c-{{V,V,I)W,m,i,y$b%G$+$I$E$`#`#F$F$P#G$#&O$`#8-.;.;.;.;.;.;.;1!V,^!^!]!P'n>h- 'Z,O;F$.;.;.;.;.;.;.;%~P'O^P^Q^#,m,u>h,u>y$S#[-.;.;.;.;.;.;.;R^>~1!^!={c{{{6)E~;>m,h-R'j,m,9-=>@'W,h,n,&,-,l,**p>W,y^.;.;.;.;.;.;.;.;.;.;.;.;^!=,Y,c~m,Q'9-Q'c~@;=,u>=,O;I$u&.;.;.;.;.;.;*,$,.'h-b'*,@'h,F$.;.;.;.;.;.;.;c{c{{{l!O'.'l,l,n%Q$F$.;.;.;.;.;.;.;&>m!m!9-*>=,u>p>**O#F$.;.;.;.;.;.;.;]!m!>]9-O'@'`,e%->.;.;.;.;.;.;.;5)3{{{e~>]@'h,b'+&+&N$E$-$.;.;.;.;.;.;.;T'J!{{{{;>m,@'h,P$H$u&O#V#%$Q$T#K$S^D'{@v .@l.r.a@T^O& ",
" U^h 0{C.G.V^W^>@X^*$&$**y$L$V#O$V#F$.$G$%$d%J$L$**#;=,.;.;.;.;.;.;.;.;n{3{4)|!@'k,i,P$$,S#G$Q$#$+$P#+$F$`#K$t&P#Q#N'.;.;.;.;.;.;.;5)y^P~*-P'&>c~j,-,u>s&F$.;.;.;.;.;.;.;P'3{Y^Z^`^ /l,|=$,#&M$$&./+/.;.;.;.;.;.;.;@/y^>~#/$/%/&/q>@'j,j,k,`,h-|!@'Z,q>i,l,>,v=#;P$#;f%`#|=.;.;.;.;.;.;'~f-]!|!m,i,h,H)E~m,4)g-*>->g,%,>,s>s&P#T'.;.;.;.;.;.;X,X, '-> '`,h,`,F$.;.;.;.;.;.;.;.{1!]!n{H)=,l,#;s&y$F$.;.;.;.;.;.;.;4)J!={T'6)W,u>9%9%u&F$.;.;.;.;.;.;.;*-*-F~3{O'O'=>p>#&.;.;.;.;.;.;.;n{3{{{m!m!=,u>s>+&**l,G$.$.;.;.;.;.;.;.;J!^!3{J!H)R'8-S'Z#H$S#g%%$P#w$*$N**/~ 8$F%e&=/8.A@3@ ",
" -/}]2*(=E.g#a@B@P>^&a'H~%$E$u&E$F$O$>$U#b%.& $J$$&$&b-.;.;.;.;.;.;.;.;@;%~#,W,Y,b'S#e%J$>$g%M$.$L$**S#`#>$.&`#R'.;.;.;.;.;.;.;P'={P~L!3{'!>]I) 'r>r>u&F$.;.;.;.;.;.;.;5)*-F~;/>/,/*,P$n%9%e%x$'/)/.;.;.;.;.;.;.;!/~/{/]/^///(/_/:/%,r>s&/-/-/-.&-$-$n,.;.;O]E~J!^!&>I!@;g,->R'k,.'Z,->->I!g-O'g,9-W,S'&,$,`#n;.;.;.;.;.;.;`,i,.'|!j,h-9-#$F$.;.;.;.;.;.;.;k]e~]!]!{{#,R'&,|=-,F$.;.;.;.;.;.;.;4)'!P';>Q'6)`,X,u>s&F$.;.;.;.;.;.;.;5)g-n{l!O'->c~j,J$.;.;.;.;.;.;.;>>V,]!g-9-Z,u>+=S#+&s&I$@&.;.;.;.;.;.;m;3{V,]!.{H)R'*>k,N$@&|=E$K$K$5%'#m>=%|/v s@p.v 1/|% ",
" 2/5@3/k=J...9+2 ^-s)8;`#`#L$P#F$x$K$X#H$y$c%O#@&@&#;.;.;.;.;.;.;.;.;&~P'n{->*>j,P$S#d%G$L$ $-$P#V#C$U#%$`#O#.;.;.;.;.;.;.;r!l!m!e~.{P'5){{&>u>p>$,Z#F$.;.;.;.;.;.;.;4)%~4/5/6/R'Y,s&t&9%f%M$7/8/.;.;.;.;.;.;.;.;9/0/a/b/c/d/e/f/g/h/i/j/v=X,S'**#&#&S#$&s&V#`#H$q!.;.;.;6)H)m!^!^!.{3{Q'#,4)=>Z,W,R'W,=>O'=,n, '*,$,O;**U#D=.;.;.;.;.;.;Z,k,W,=>W,k,S#F$S#.;.;.;.;.;.;.;.{>]'!9-;,Z,`,+=#$%,F$.;.;.;.;.;.;.;T'J!3{9-=>Y,&,n%#$O#F$.;.;.;.;.;.;.;P''!%~I!=>k,`,&,$&={.;.;.;.;.;.;.;{{^!e~&>R'*,+=#$/-Q$U#u>.;.;.;.;.;.;4)P'{{{{V,E~R'm,8-N$N$u>>*V#k/l/~@3.h K+m/}+6.A@K@ ",
" J+n/o/g#E.k+o@I p/q/_#z$G$X#F$K$`#`#P#I$K$p>#$b%v==>.;.;.;.;.;.;.;.;1!m,*>*>h,r>%,$,J$t&y$g%.$%$-$U#F$.&c-.;.;.;.;.;.;>^l!>~*-e~c{'!#,@;;,>,+=u&$&F$.;.;.;.;.;.;.;4)'!r/s/t/j,-,s&f%$&@&u/v/w/x/.;.;.;.;.;.;.;.;b'n>y/z/A/B/C/D/E/F/Y%K$E$Z,&,|=#$f%b%a%-$E~.;.;.;.;.;y$$&+&S#S##$N$t&+&u&t&Q$S#N$**`,g,j,i,9%v=#&S#e%Q# ;.;.;.;.;.;.;I)r>.'9%e%P#+$k,.;.;.;.;.;.;.;.;P~1!{{4)*>k,`,**t&M$F$.;.;.;.;.;.;.;&>={P~g-@;m,&,&,+=Q$F$.;.;.;.;.;.;.;J!={k]J!6)k,j,u>|=#$.;.;.;.;.;.;.;l!*-.{m!6)->s>v=l,e%`#_!.;.;.;.;.; ;>]P~c{3{%~|!h-b'+=y$f%G/k/H/I/H@g K'$@<+f.K+J/C% ",
" K/L/ >I&M/E.W E ] 4*N/B&8;K$y$ $U# $K$-$V#a%g%y$u>6).;.;.;.;.;.;.;.;@,|=m,j,X,O;y$H$M$t&e%g%T#P#`#9%.;.;.;.;.;.;.;f-g,E~T'P'>~^!5)Q'I!@;.'i,+=@&`#.;.;.;.;.;.;.;4)V,O/P/Q/m,n,**y$Q$T#R/S/T/u&.;.;.;.;.;.;.;.;.;U/V/@]W/X/u&M'Y/Y=Q#/->^L!n%**$&H$O$U#h-.;.;.;.;.;.;c-'!;,q>q>g,R'q>R'=>R'W,R'Z, 'S'Q$t&h-@'9%>,r>/-V#r!.;.;.;.;.;.;.;m!u&M$u&;,d-.;.;.;.;.;.;.;.;.;1!e~e~c{5)@'R'%,u&Z#`#.;.;.;.;.;.;.;4)'!>]n{I)@;n,=,u>N$F$.;.;.;.;.;.;.;5)n{3{*-6)k,h-.'v=|=>].;.;.;.;.;.;7)Q'>~T'->8->,|=X,Q#@&.;.;.;.;.;.;#,5)>~.{y^={E~h-j,S'f%=$I#k;H@H@d;a.d.i.i.E%Z/1* ",
" `/t@Y g+M.M.T.Y x } '@K*2%s=+$I$M$C$-$>$H$x$y$>,p>m,.;.;.;.;.;.;.;.;d-%,H$b%M$H$x$G$+$P#`#-$S#_!.;.;.;.;.;.;.;={m,n>I)4)5)%~n{E~R'q>b'+=#;#$g%U#.;.;.;.;.;.;.;I)]! (.(+(Q'=,$,v=#$a%@(#($(@&*>.;.;.;.;.;.;.;.;.;.;%(&(*(=(-(X/z/d-.;.;E~M$b%H$d%a%X#,].;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;/!j,r>v=#;*,p>#&@'.;.;.;.;.;.;.;.;.;.;.;.;.;~{e%.;.;.;.;.;.;.;{{J!P'5)n>Z,8-u>**$,`#.;.;.;.;.;.;.;4)n{&>E~;,k,9%+=#&S#F$.;.;.;.;.;.;.;V,5)n{={=>k,l,p>****>,q^.;.;.;.;.;.;P~.'H)O'Y,#;@&-$+$,!.;.;.;.;.;%~9-l!g-m!m!{{|!n,;(D^>(,(J@n$'(u _+>%p.$@y )(j& ",
" }]p#D R h#N.h#W !(D >@,@~(@#{(Q$Y# $y$/-E$N$&,$,b';,&~.;.;.;.;.;.;.;.;c-J! '#&t&Z#n%`,J!c-.;.;.;.;.;.;.;`~6);,;,I)k]m!4)m!g-;,Y,b'$,O#@&x$-$I$.;.;.;.;.;.;.; 'c~](^(/(Q'j,P$u&y$J$((_(:(P$*,]!.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;S{Y,$,S#$&@&g%+$d-.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;>^s>#&s&+&**S#.;.;.;.;.;.;.;.;.;.;.;.;P~g,F$.;.;.;.;.;.;.;i,S#g,%~@;Y,u>+=S#.&X#.;.;.;.;.;.;.;4)]!'!#,Q'R'&,**t&e%F$.;.;.;.;.;.;.;V,5)P'e~Q'->Y,&,**#&O;&,e-.;.;.;.;.;.;a-#&.$K$F$-$**q^.;.;.;.;.;I)q>n>I!'!5)#,<(g,[(}(|(1(2(3( @g@c.o.<+K i;G@4( ",
" P+H Y +.L.y+5(X Y+:%J*o L@H#D$P#D$J$V#b%Z#N$-,j,W,I!,].;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;`~I!*,.'O'g,n>]!I!H)g-g-=,j,->N$X# $V#a%n{.;.;.;.;.;.;.;k]Z#6(7(8(|!Y,p>O;&,+&c%G$T#d%S'n,H).;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.; ;;,v=n%**#&t&O$e%l!.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;%>`,&,u&Z#Z#c~.;.;.;.;.;.;.;.;.;.;P'@;=>F$.;.;.;.;.;.;.;.;c{%~P'I!h->,u&$&I$.$.;.;.;.;.;.;.;n,R'W,c~I!@;=,i,+=Q$F$.;.;.;.;.;.;.;h,=,Y,I!6)O'9=@'b' 'h,>,8-r!.;.;.;.;.;.;.;.;m;e-.;.;.;.;.;.;e-g,=>m,6)E~I!9-|!9(0(a(b(c(d(6+(+1+r@d.F 3+X-; ",
" d;-%g&W X z.F.e(f(B z#!@g(h(X@,$0%L$H$@&Q$#$#;*,;,n>n>c{i(.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;N'={@'b'->`,;,I)|!|!E~Q'6)6)Q'%,n,g,t&C$.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;q>s>+=u&p>y$e%d%T#a%>,j,r>Z,={.;.;.;.;.;.;.;.;.;.;.;.;,~c~9%v=**#$#&**u&+&+=*,F~.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;6)=,v=+=+=S'&>.;.;.;.;.;.;.;b-E~&>@;c~F$.;.;.;.;.;.;.;.;.;.;&>n>&,%$g%g%e%{{.;.;.;.;.;.;.;V,+&@&`,=>k,&,#;s&$&F$.;.;.;.;.;.;.;'!Q$H$g,g,@'.'X,**O;r>$,&,q>H)+'.;.;.;.;.;.;.;.;.;.;.;.;o>@;u>Y,H)=>9=n>Q'9=j(k(l(m(n(o(p(q(n.c@z{A 4.' r( ",
" $+>@g&T.%.s(8@t(u(v(:.> ;@w(<-(#x(y(M$N$|=-,@'m,g,Q'H)Q'9-3{0-,~K!H{c-i(~{>^c{&>=>=,*,O;S'9%b'8-->#,E~|!;>@;R'W,h-r>X,9%e%>,.;.;.;.;.;.;7)i(d-.;.;.;.;.;.;.;*> 'v=Z#y$H$O#u&E$c%O#`,+=u>=,;,4)]!=~ ;7).;D=2!c{9-9=h,l,h-n,S'9%P$S#O#Q$O#Z#P$=,m,>>.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;.;>]8-*,8-i,r>n,;,g-(!/!c-,]={l!g-&>#,9=O'.;.;.;.;.;.;.;.;.;.;5)T'O'6).;.;.;.;.;.;.;.;.;.;.;.;.;.;.;E~=,&,&,n%+&t&.;.;.;.;.;.;.;.;.;.;.;->W,%,$,**p>P$+&#&p>s>@'@;4)y^q!+;c-D= ;;~^!T'k,>,>,s>=,z(g,A(B(C(D(E(F(G(H(I(J(K(L(M(8+@^U%]. ",
" b,N(P% .Q.H*O(H.9$j$0.} ^ )+P(H#&$S#N$O;k,Y,k,*>*>c~I)9-6)=>W,Y,j,Z,*,*,k,s>v=8-g,.'*,`,`,.'Z,->g,R'm,@'8-%,-,P$X,&,@&S##;Z#t&S#y$$,h,j,Y,c~l!I!Q(R(S(Q'l!Q'h- '|=Q$e%d%G$E$J$/-u&|=-,j,9-6)#,c{*-T'J!P'6)|!#,Y,`,i,s>X,l,9%p>N$$&M$M$c%U# $]!.;.;q^I)%~'!>~@,c{]!3{4)E~l!m!c-.;.;.;.;.;.;.;a-->k,R'Z,-,n,Y, 'W,c~@;3{F~P'P'J!T'E~#,O'T(U(V(@;4)J!>~n{n{J!H)R'O'8-S'n%+&y$#$p>&,.'E~6)E~3{#,9=H)W,s>i,p>**p>S#O##;i,`,W,@;@;E~;>Q'W,h-%,+=/-u>#;N$Z#P$#;*,Z,->n>H)@;9=g,W,j,m,->8-O'->n,m,W(X(Y(7^Z(`( _._+_@_#_$_%_Z+g@^ O+ ",
" &_*_d#=_n+C.C.O(j=j+r+z#-_;_>_|'s$,_p>>,l,9=;,q>9-E~=>c~=>Z,h,m,`,l,n,l,r>b';,Z,Y,E~*>->=>;,=>q>W,n,&,>,|=+&y$e%c%x$d%x$b%u&N$#&n,R'->6)Q'H)'_)_!_;,@'i,s>-,#$f%#$#&>$d%P$s&$,O;#;s>k,q>c~n{'!#,n{n{6)E~&>h-.'.'j,>,S'%,q>|=N$$,V#`#+&/!.;.;=~|!T'^!={r!>^F~J!.{3{5)>~3{s>e-.;.;.;.;.;.;D=n>m,E~*>8-@'W,=,R'->O'#,g-&>'!{{I!H);>@;~_{_]_c~I)J!'!l!I!n>;,=,.' 'i,8-O;s&i,s>l,R'9-;,H)3{l!;,@'n,r>+=u&Z#$,s&f%i,l,s>m,I)c~6)5)=>=,Y,b'n%S#S##$$&t&Z#P$ '`,.'E~9=;,=>q>=,.'j, 'u>^_/_(___:_<_[_}_|_1_2_3_4_5_6_7_w#E*8_ ",
" 9_0_(*P.l+D.H*g#u.v @a_b_c_d_e_q=f_g_9%*,n,m,->h-I!T'j,Y,I!%,u>q>u>l,-,->*,i,Q'j,8-Z,@'g,O'9- '&,j,&,S#$&.&C$c%c%G$E$O$M$N$X,8-=>n>9=6)h_i_j_R'k,s>#;P$O#@&f%$&>$c%t&u&v=u>r>h,->=,@'*>9=c~6)6);,O'Q'W,h,8-8-l,s>p>-,+&e%Q#K$;>.;.;.;i(E~#,5)P'3{V,)!>]m!^!P'T'F~1!O'+=.;.;.;.;.;.;7);>Q'|!R'j,Z,h-m,;>*>q>6)|!9=l!9-*>g,;,^!k_l_n!R'@;P'4)@;#,@;=>j,l,p>**/-+&N$$,#;l,O'H)W,n>J!4)R'q>q>n,9%N$Q$O#b%M$/-n%r>k,Q'W,=>P'9=W,9==,P$P$y$Q$O#Z#f%N$9%r>l,;,;,@'H)c~=,=,m_n_o_p_q_r_s_t_u_v_w_x_y_z_A_B_C_D_D]b& ",
" E_3 F%Y Y T v#:+l.E% @F_G_2(H_I_J_K_L_M_m_m_`,Z,Q' '.'@;u>i,I!->&,s>*>-,u>H)s>l,b'-,r>O;-,**#$&,+=Z##$>,Q$Z##$b%e%Q$e%y$**#; '=,h-R'N_O_P_Z,k,l,>,u>s&H$g%O$T#V#E$a%Q$Z#S#&,h,b'8-;,*>q>|!Q'R'=>O'm,h,*,l,>,9%S'v=y$>$-$n;.;.;.;.;n{I!H)'!]!'!J!r!g-5)5)9-H)I)'!|!>$.;.;.;.;.;.;,]{{l!P'*>=,8-*,s>m,8-j,I!=>R'9=@;R'W,O')!Q_R_+;|!->l!|!;,I!I)Q'O' '+=$,|=/-y$P$$,+=8-h-.'@'O';,=,Y,n,-,&,P$#$$,M$f%X,*,X,>,%,h,j,Z,Y,h,h-%,$,8-i,H$O#9%$&O#O;P$p>&,h, '=,S_8-T_U_V_W_X_Y_Z_`_ :.:+:@:#:$:%:&:*:=:-: ",
" t)J~m#$@;:9+3&>:t!f#,:Q%e ':):!:b(~:{:]:^:/:(:&,_:9=u>9%i,Y,X,-,j,X,l,6)8-X,l, '$,**|=f%e%$&c%>$.$+$ $c%e%H$P$>,>, 'b'S'8-->j,k,::<:[:.'u>p>**$,+&d%d%f%M$Q$S#H$x$.&e%y$s&n%X,.'.'i,R'q>Y,m,*>n>@;=,&,>,O;#;p>t&%$*,.;.;.;.;.;W,O'9=5)3{&>{{e~;>9-l!|!O'c~I!=>U#.;.;.;.;.;.;P~*-J!e~5)6)O'%,&,W,9%l,n>Z, 'j,g, 'i,->O'}:|:1:n,h-I!@'h,8- 'i,m,*,P$p>>,/-|=9%|=+=.'%,s>n,n,i,s>9%v=s&/-y$N$#$M$b%u&r>O;O;u>*,b'b'&,#;|=u&O#Q$t&a%.&P$y$S#2:3:X,4:5:5:6:7:8:9:0:a:b:c:G(d:e:f:g:h:H(i:j:c_k:l: ",
" m:{@z#0+*@Y;l.n:o:x#p:q:r:s:t:u:v:w:x:y:z:A:B:s>X,-,-,$,X,&,$,|=v=S's&+=9%/-Z#n%Q$s&N$G$T#E$K$-$K$%$ $T#E$O$y$**P$%,*>h-=>C:D:]:O'k,n%N$P$b%a%T#L$I$T#/-J$C$@&S#>,#&S#O;u>9%r>b'l,s>%,u>b'Y,s>n%O;+=s&t&H$`#@,.;.;.;.;.;R'O'c~T'%~l!5)n{6)*>c~=>=,=>9=`,U#.;.;.;.;.;.;5){{n{;>n>=>R'*,9%h-+=S'R'j,r>&, 'S'O;%,|=E:F:G:+=>,8--,9%i,r>p>q> '#$Z#f%@&u&s&S#|==>u>X,m,Y,9%&,&,P$y$M$d%d%b%a%x$d%O#N$P$r>S'u>%,r>#;O;/-Q$y$#$b%G$>$G$c%{)H:B&q=I:J:K:L:M:N:O:P:Q:R:S:T:U:V:W:X:Y:Z:`: ",
" 8$ <6;~+B .<,<'<)<^:s&!,-,W,v=**%,#;s&#&/-S#N$$,>,/-d%`#H{.;.;.;.;.;W,=>O';>4)9-l!9-g,g,q>`,u>%,8-/-I$.;.;.;.;.;.;5)J!P'I)Q'=>Z,l,p>|=u&s&r>S'P$>,`,#&p>s>:-^,n,s&$,S'O#M$s&J$H$/-e%b%Q$t&Z#u&**u&n%v=/-u&(_{1*_&h f 8+w#eq<@&.&H$C$G$d%c%-$.$c% $Q# $+$T#N$t&+&S's&e%y$N$y$r$T#g%$&b%Q$|=O#t&k,O;O#>,S#@&$&S#**f%u&K$d-.;.;.;.;.;9==>=>6)9=*>=>q>h,q>g,u>p>%,*,G$t&.;.;.;.;.;i]^!V,J!J!#,O'R's>S'v=/-/-|=N$$&N$s&Q$+&#$ub'%,P$+&|=S'$&O#t&O$J$H$c%J$O#a%.&P$S#f%-,>,f%f%$,b%d%M$O$.&S#G$x$$,y$N$#$f%O#>,#$f%O#e%J$A$x$L$%$@,.;.;.;.;.;4)=>O';>Q'=>g,h,l,l,`,|=#& 'y$`#m!.;.;.;.;.;9-]!P'n{;>9=q>.'r>S'X,#$P$#;/-Q$M$O$O$M$b%-[;[>[T#O$u&+=t&H$s&`,u&M$b%b%.&T#L$>$C$G$x$M$a%O$+&O;H$@&$,M$b%a%.$ $>$+$I$C$c%&$,[$&$&8-p6[F_ @}[7[8[=:-_b_:@9[#]0[A%r=A%;#A$R#a%M*W&B$M*O# $%$a%V#%$L$>$V#C$E$E$a[b[c[J$s&/-+&|=$&L$ $+$Q#U#Q#%$U#U#Q#-$O$+&M$Z#u&t&s&u&a%J$y$M$x$E$T#L$G$a%C$.$G$a%n,.;.;.;.;.;L!m,6)g-I);>]!g,s>u>%,+&$&t&U#Q$.;.;.;.;.;>]J!*-g-%~#,;,m,`,v=S#M$d%H$N$e%$&Z#.&@&v=+&d[e[f[V#V#O#O#T#C$C$e%**y$J$Q$P$Z#b%Q$O$ $E$a%C$C$g%M$c%a%O#f%v=+='$0%w$L$x$c%+$N#g[,#r=h[i[j[3$k[`>!@Z/a.=.(+F o.v)t!l[3&m[F n[o[p[q[r[s[t[ ",
" u[v[V%= 8+w[x[n[F%d.y[z[2+e#Q%A[B[&.`;k+ @}.W+m#; W=*%O@ #%#^&^&Q@w$-$.$C[D$M*M$J$M$b%L$ $D[E[@( $.&T#+$H$H$.$ $V#K$Q#T#L$%$ $Q#`#P#I$V#a%C$>$S#S#>$x$Z#Z#M$t&Q$.&b%Q$.&.$e%n%+&.;.;.;.;.;.;->q>c~=>R'R'%,X,s>8-M$E$U#E$+;.;.;.;.;_!;,3{3{I)={g-->;,Y,|=S#O#a%G$N$C$I$>$ $.$@&g%F[G[H[g%%$+&u&T#V#>$.$T#E$I$L$.&.&H$s&@&%$H$#$.&I$c%J$G$V#.$+$~&I[;$t$^#])Y%J[e_N/5'}.}.K@K[L[3[A 8+G+z M[r.A+k.!=N[B[F E%1/2@R&n [* ",
" O[P[#]}.i;M N[w#w#C*f#2&i#Q[ ,O(R[&.l+Q o+e 9[,@_&o >@'+S[<-O@;#>#X@T[{(L$N*S'L$%$U[V[W[%$c%%$-$C$V#-$Q#+$U#X#t&a%I$.& $`#C$%$X#V#%$P#b%a%K$+$G$C$H$@&L$V#C$e%.&Q#%$c%@&R'.;.;.;.;.;.;|!#$l,h, '-,$,y$J$Q#`#s&d-.;.;.;.;_!Z,;,%~P'H)E~@;Z,j,*,u&#&r>G$ $O;V#.$E$-$Q#+$-$X[Y[Z[%$P#G$@&.$C$S#M$@&b%G$I$.$-$-$.&C$-$X&|=s=K$.$L$z$^#,#/#&#w-`[A{<#, ; }/ e,D .}l++}@}#}G.3&t!j.p.c@7.&@G %@4.)+>@b_$} ",
" %}&}*},@)(=}2[$@P.!(P.D.t#x.N.G.O(x#f(0.%@_+f P%}.n$^ / k$_&s*-}S@3%!#t$;}>},}-$%$W&Q#V#s&>$%$E$E$P#`#T#K$X#J$Q#F$#$>$X#g%+$U#M$f%>$T#>$-$K$V#%$X#X#J$C$-$E$C$>$e%'!.;.;.;.;.;.;+;Z,e%.$P#F$P#>$P$f-.;.;.;.;.;J!n>=>g,I)g-n>E~I!@'8-X,+&e%d%V#.$b%I$T##&V#K$y$'})}!}y!X#X# $>$P#U#U#-$I$H~{(L$>*w$.$&$~}/#/#z&.^J#{}3%~(b_h@1 ]}^}l@`+&.5-j$h+h+%.9$5(z./}l=x.q@8+u 0+2[(}i;-/, <#_} ",
" g$:}<}{@e,:@f l+Y-]=j+h+x+p.h.n.}+r.[}u v z H 8+w#4'm$!@5*;@s 9[}}|}1},#U@2} #;#3}/#U@4}I[Y#N**$`#X#A$X#`#s&+$`# $P#X#`#-$Q#b%@&Q#.$Z#+$%$U#.$%$G$P$+&x$J$Z#9=.;.;.;.;.;.;.;.;.;.;t>.;.;.;.;.;.;.;n!=,r>*,k,q>n>#,=>->q>n,8--,$&f%t& $>$g%K$Q# $X#U#G$5}6}7}8}9}+$o{o{>$I$-$p,=#f==#=#@#R@S@0}a}_&)+l@x V W X n+h+P z.x+L.m=v.G.G.+>o@b}h+%.]=P%{@;@> 9 c} ",
" *+0 n 3.m#5@d}e}z w 9+2[o.d&i.e&c.l.s@b.v ]+L a@M f}g}h}i}j}m#[@2 h&G^V+, :#k}=#*#H:=#;#H#T&l}m}a'X#K$X#X#X#`#X#;$W>X#`#w$X#Q#-$P#X#X#+$G$>$a%s&#$`,^!c-.;.;.;.;.;.;.;.;.;.;.;.;c-^!=>b'X,-,k,Z,R'@;9=q>=,`,&,X,n%@&Q$M*+$c%R#B$%$%$U#X#n}o}p}q}r}s}t}$#u}v}w}x}m>s n h@q#q#_&_&)+V)t f .@b$p+_+]+H X x+y+k=N.i#y}v.9$]=z}h+/=l+%.f ^}!+;%A}$+ ",
" F'O&3.r W-5*n[.@B w#k#C u >%<+o.B}S-d&#@>%P!C}D}d,T=d}E}d}F}G}Q@3.:@3.3.3.E@R&J*H};#>#S@U@W@>#K#V@H/S@ #X@R@3%>#f,-$P#C$C$L$x$I}+&P$^_Z,c~n{)!,!i(c-7) ;&~e~#,m_#;s&l,8--,h,9-q>h-J}K}h-m_L}M}N}O}P}U&+#l}Q}R};#P@2}S}T}U}V}W}X}Y}Z}`} X+k$o :.E z g@5@3+ |8+[%r#<+o.B}S-d&#@>%P!G.]=j+m+]=d}l+F :=s[^ V+.|%}t ",
" 2$6#U^+|5*=%~~9+I $@g&T-Y+*@x#@|z.v.5(v.y+F.~=M.G.Y-d}!(o+T=#|k+k>h+T.g&~+)+;@) ^ ~@'+_&$|o / A{m$D]r[%|R&m>&|3%M@[=g[*|=|,_-|;|]:>|6:,|'|0()|!|~|{|]|p_^|/|(|_|:|<|_|[|}|)<||{|1|2|3|4|5|6|7|8|W+9|0|a|B@D@{@~ b|c|d|e|Y d}P.i+g+.}h+5-G 0..@r@0'l.#@#@k.d&d&n.q.v g&b$Q<*@B f|9$u ;%, ^ } g|Q! ",
" g a 4 ( {@~@;.R=b h|i|j|g+k|&.X r+f+v.x+Q[ ,g#m=x.t#F.y+q@b@E $@l|u M c+)=K+K+G K+v k#_+C D b r h@_&H@-_n m|H_n|o|0:L:p|q|r|s|t|q|u|v|w|x|y|z|A|M:B|E(z|C|[_D|t_E|F|G|H|I|J|K|L|M|N|G}7#O|P|K+;:g&F Q|R|S|T|.>D.C.O.y+x.h#t#s(e#p.b@9+C C F r#_+G J+F%S,;@>@n +|b_.|4(w# ",
" c}U|V|W|^ X|^}h&Y|=.5-l+Q.P.#.S T.e@o+%.4+b@b@r.Z|[][+:+f.b@B}o.m/s@k.m.f#c.x#g@D r#.@E%E%Q%`|h< 1.1+1@1#1$1%1&1%1*1=1-1;1>1,1'1)1!1~1{1c:]1#1^1.:/1(1_1:1<1[1}1m=|1D.g.c@s@r.}+e.g.o.c@11h#2131r++.8+%.4151K Y+.@3+P%5*n$, B@!+p 1 6171 ",
" T%|*811@, 2 91e, @n ~@{@~ E@|@3.~@'+;@_&b L+k#.2,2'2)2!2~2{2]2^2/2(2_2:2<2 ",
" ~+4.|*[2O&5 }21*|212 }2232k[`>42=<526272829202M:92a2b2m(m(y|o|c2d2e2f2g2h2i2k tEXtComment Created with The GIMPd%n IDATxi][;y}; UU<mJ0I qwQ+Iɗ&RK(iV-E:nh7 xrUݺ;g>{~ǵVxz}+VHTSuyy<^v(9!hTU|># #}TOJ)("˲9EvJp{rwww3+/;햍v$"0 ˲ yvCT @K)BPYrF @y!(YtJ MSs8pYp y}s9k1U$TeQVJJeQBAX,n;G~ppY՞ huOH5+Kf't$Gq0 ɲ !Z+@ت*J((J,KI]߹BZK묐RBJsc UU !`rd=
b,O VUIc*Y, 8eYLYQV%QQeR*8YKtPV%RH8kqcZkXk ,ɘNCH%Z+eQ1Q
@Is!UUaWi4ψKcB`qDa
RJ (~ P=^5eYJ9s4 A9'DQTI7GQ^9;t4]?wF9\i)JGȋ"ωtRa :RH,4ibEkg-R) k-8AREeYX c,Y3͐RbE Av3N4E+
69#nVY,sFkkt; I @C<' G i:A8E-t 6a6<5ӛq}y&T-bq| Rr|S!t D!`PaPRKK'X
,t%%YNMf)4acLq <] m<(w25_2xk<^1((kkZ3Q"r$ N*s*q D;[1;SiTjJDHt1F1 $E^3Z^Ik ca TâD)!D WѼگ|HJKWPb6ŵ[U)A qYÎ$J4eURaqα\9H!$ qB)A*ֆ} y$Z^*pgϞB)Ei Ox ;SX +yLlmm>$M3ZIRa0 t4b1]ISQ5ūlEIJYy0ܻW
TL3e1RU] >l3 z"¢Z |e$!Z,)Qn82d8'㍍38:/,E?{bcdb߾}s9j].;B8SUC sxJ)Q
}Yk%@A!zrt\4KkUZ1XVU "uT5kb6/i\xa;"$ijBZ,3pp8s,B^K"#tlnEVu}wvbf>)IX,a<Ϲ{.H))˒hDUU }4EZ
hɲcΟw [[8tH)f,K.RJ{}~c G$gNS%W.O9> qpW5 oԩ Eg>#X.z]Bi7ŠU, :2k E$er 8QC礙^_*{}Gkݻɍ'?c)$:v:L_{}< F*,o:ƏW_ ,RH)1=@[k+sl+%8ϩQh `,0PX'K
,ӌ$Np8,'N"t;GG ] L+]a]]Y.H!iBbID'Du;\t) AiQZKFk!Ð
Rh(s6)q 73@$!h۫Ҹ[-(jJV{\>}nr(o.
<ϛy5okkr -(Nrd2C]UbQ +Cr7m;=! qW*{-m{5j{M5,)a0CQ"YYam0ju9sX'4%]HQudy0Lr;s)Xf8$a#vM)nO< cIN7ao,G߸yþv*B)mQ믏'Z"wN^|:
r J+a:wUٳ8Ny]$~S$h((K @*AWL!eZDKJ DIu)$Z P`*KNg$,c!8: k1Z[[BX/TS$f4U )o6ayspx#Q׆NӰVE!FAt:e2$ LSΝ;`0 U`>u
ZGGGLS(4 P ZO k?f\K C8n~h 咇 r677ݼc=Oa xZ_Oy%y1 V XrLLEVBAkh Pdg
咽=>v\-k
Ajđ3 +66
EQaJ-%,Eq2V8lY ;oR_XnZB^2ͥTZ7u7,K.N{os :/_;B Me(cB:{ZNG_ʲ*ˢOXRPu5C$NCȲ j![$`2_#K*#
8'h5
!Z,Ì[EnKQFf3SE NNNhZHYK$I 4q cmd_V<[w)s PjΜ=.eGG4$U5z><
t5^p"ܹOmH"M iRܿǙPҒĂ 6oV}!~HY
NH먌ak[hA[c㒵"R*WעʈoMoZsز:5>}u}t|̑B,з Nj廅
VR+D=2N!4Myӛr$˲$0$Ic$p8d>sM.\ YIJ >| CQ 2 Ð7n :5Q9_Ӱ R{= Rx#W , ʲl =2c9;;;Xk
A"ի1QDI_ ﳽu`< (1L3$\ss:t=+f9u>&:6wKTdhI%X9LE+%¡[3UY]Q+A8\T8xUJRQV (
tt?ձOA祗Icp=kN;*z|L+sH%!( 9B!PJh 2^'B w V!'h4ԩ<_6~rΝ;mΟ?l@ާBpT]MrαAQ
S
K)lM=LZn!888 MSΜ9@-'s˽Y %4ԩS$IBUUE15s(˒/664h4b5LkEi_}9eկ3llJ9xM%Qb9{F2J%a7^\(E4 $q v1 {5 0%Fg&4UUqppR 4%28&c {fB)E!M[%EQs$/^HZKc0(KC \Q|K)@BbxzD8W" "@
c5Zh?P?>,?
aLeN_v8Rϴ"g:/|("eY d; /ƱRd !U1,wJKtQX/ư P T8@lED N4[ZGGGaH 2 t:e9u(HӔ\۳ F<\˯-z jP'g{IfyC~:0 nLݲPug 3<}5TtO'''hE.]"F rU1c 6i
@EAQAd2j5Ν;={$I8>>nuv#'uNOu-N: )+n'pJE)%B:f|Ů C8$JۢHVZ Lu՝'oRb/S_9@OGve` v.+VfTHa`8N`tLn%pΰ58
FgYEcznzƜmΫ 4ilۧ9<~nWrtdWDJJ)>O+_do y[穧:+&RIYorIk6$IڪRZ >|HUUlll4sww !ŢNa0D,j0M2-$vo/+ޟj,K(+W0H)%y_w45Q+rv<# h c|rV{JRf}ꞯmO32τ/ HqQևI% #4͈ @kKUFKJD
S i0VL
U0BdY=|f}qkssi~Ii';a}⟎:ONNƳA %4+( ?xɼ
e5&:RAKW$VVIS49t:(
677Wa%I)'''ETԩSZ.ik: s\0C忼է/E5*KÃ_~b!E _ʕ>g> ; 3 })C & $vVEE
9ǃ72EidY|>odMV?4^\ٟ1 ~n Nn!tuH,FF{W<8x69vww14>b fm^? yYb~,]F RG ut8CQvJ,sPSU [v n+biJ-M T/ea ~{8JěUDAPLA $ 0d J,k-QX5Ueuh-AK ݼ'''ܽ˭7snÇs)a6~åK8</^ԩSie,-X~x)MbAf:24/kxMu89i9ݭX[a)W3c s} ֭/|pZ^8Ղ OיL)%q%}T|^GnJ#, 7eso{"j5,^&%yl 4/\ 0{-~ȘΐMz~/{SOa7O IDATeoou(booa3GGG<|VnϦ(
& 9KԩSh](hft<(qRn۰8o{O_wOWUDAU嫃F U@-I `$ EW
2mS [ ]zӯ;B7?܀fB!|K-Vv2˓ɲdE+CVq%BpE8 ?Wxm߃ϱ qڵ7Y~?Tn^OYkߴm섛7?7sce t:{Z# )zj loիO<땜= 9|Gܺew^Ƚ{{lniZ/ 29,kkZba89Y\+*Rʦ)ME,& UUUrZ $|k\䄓677aS)eYr|\opa^I)
.]jր}k-är 7ԃ9h| `ss|~Q{xP t: Μ9ӘޏϿGF#scz Y) IԞ劁yUJR*!n+{)+A(/
hØz",! ưz,.))/u;"!W bB
etnYSU2˲A~qޗ$JDi(tuD(2~ [,|SSgϞ''9w#%ϸٌ2 ]7{ xsGrbN |3 i
ZɼVpX٬rYM%ׯ,<4b"I~|w|cv[pz()a6SF]Z{vvTPFݿW)yZ
z)C/3 O{[ W_uPJpp*\t:˗a4r$#%i!e0&I4 Ff39::ܹslhZ5y}}J|u͗ΧiSL;s nM Ro;;/}Y0lL{a Ûf>яr
~j/?WnhL$c|]ɹ(ʊjLڴ h98(8sŋt^wm_Ѫ>SS0 oy˒p=[1|Sn̹ lv;,qM˳xdY@ ΐ(>R%Zшu $eȣŢI
{3C"3HwkNcևP목VypfodU9/7'Iu {Ν;J1pBsxOpҥEyCdՙ ? `ۡms]N>ݔU)O>,=2yTvww
_A:)y6>|,_J^7n/ܸq>Mx ŋveV(?{l/ahN:ZP3 3^װ \ ϠbXp=&_fsr
xѰê
ZӤi|>otxoᐪ묵f{{5{{{qKcmm4M988hdj$Mkϳb=pg)
x M˽~|mk]#
ɵ\B4>RU$햦B!7 weʿ |` rq@ů*`q/Oonw,8N:sJsֆ=@Ot|Fw,He!'8uMʗXO8= I f3w-=8ɂNO)HD ΝkR >=͘f 7 ?%777kNCA# &e9l< % tx؍FZs__S {>\8o^c}ҥWc}GWc>h6ߌuNOJ)옃}f.Ž$=ܽ@`-ƈ~E*>eY?88 s{AFYh`pXpxx |roR/Y*UE(H ^Mի2 Yi`|EʣAb|͟$ O>$GGG8f, FQFLai2 ߏȏKKud?91)
M9$|ˣPgoV !5=XQ)G- V<: ^z ~`0zw^ir:g[~ { _ =`{\ Aj%Q'S2DWV'R/R[ۂ_W87Pʽ5 ʟy8[>SW
FGY&I(
0DڻPkm57z|C j6GYֶ6m fŋ/6èIuҥ12w~[_u~1|VwuqmA!
X`tP`)och_}Ulmm5f u?r5},&pܹI/#gT^~e._^={:Ywi9[[ AIėÇ<7'1o5AӝuԒu*gQZW
5 =.? J^:{xt fe8 6?<+Mn^_Tw{{tH<[s6Onq;;;{g~v:7яzVv""VU'\yoZ#g!Zs|dY/
sRei:Hb~?8;$MvyWטMl `Y1
q[[[c\ss7HE<:Q.F
_QO?˿hf O4;w՜(⥣}n߾Md$O_|*ϼ^xΩSQ<2j5KoA@& З>P}Ct ^yַEQ˵^nM&ΗH__ "g~so{ |r3{,~ Cʲld_ >< 6}4Mg8 6RJ1J 4=aZs
/rf :gϞի3D"4)xg7A,-MNNTJSǏc<8yصkn* `V\ltd ,Kl -r_~wgU,qPoy[0::*U$r ̉AIeXFs=/K(?]2w~cb
aÆ
BEl8
;v֭CTc=o~;,L"H`vv? {1Ae_ ;v9#DZ
rYdlu ˨~} >(U%BR xرz|g2,,,P(`ppP|wj,# Z
B*811
#'Q/70xORVo#ϗcEuUFSE?6?PP/'I8'g9v`tt1U\30^~
6`cJ̪Agz:'
JS[bq.a1dZ~:_~9 |U?eQSbbb{/ |^?>,hN#1 _"hoo'x D0>&''199 [-oy =]J}|ӟ~qw0 | E__7<ꪫZ
N͇ z"|Y[1|C b̪b{cTpmCSzZcSQۋBz
7,"&%?~P}{EAXNY,طo >^O=z)W_}8 ɞmcccbZ Fegz> G̶[97} UdYS Ruϒ$ AN8%h*7!0S uH"Z 2hooG\FXD?ZElֺ
mm5 :ZP(8y
zzRضBoXMt)F݄Wk (\Egg'ۇ?K/,p؉:tDM
mmmğۇ??_/|IIF>GG Ea?'/_j6 ²m o˖- EfQ,(
lق|>;=X~ rbE㘝E\~i?`/~k>?Oᕯ|%ZҦ|`|Cc0 /yu]۷ GRq< ɿ}LȁA IDAT x _ ! ع%_(H`
p\# }rPh8= 8z_ÖP4-LhLCy]**cf 7(!DyJ9'JEjD@^٬MaY1x^xLNNI$"W2F_ T
N<~ЏqʝHƑ#G0<<,/9U$gyYsr\w n*=p=0 \6 M7݄7Fv.mػw^?CDr,(n1zzzS9f%a@8nuQnjW>\dʇ@I!LC sbHZ
GlݱJwT ؍WB!#l+l6
JؼАnlgՅND[ 5P*8pBD>lwU?eKD/eՓWVJXdaӦM0 _p,mYQ(DP*Pׇiя.8Y=r 8y_^>/5l 梭 ̌hDuzP/~qU.:ɬl Q.q팍.dFeY<fH'&' (CӖ- [+r NL)<\I $ ;ÏxdF7ފklhbZmgffVIA@.8sW^4O8P(p%CguCE{WWE#hoq\~K=!f砆aR!#A ϳi,Jժ*|]twttDxd*śW} nY_rhȜĚ4L BAtBzzzDb=NE
4Mibm"YhK#Te(k܋\!u2s#YO 0}o{u@GL'ɈJ ?Xz-wcNX{{
̩8df/"m[2KaIF ˀK輐xjPU vњ AطÖ:^U,fulܸ}5QVm63 c8 de _6]N+]i]Dm:ǒFY
)q[ qP67hx<T6< p=VmOV \ ~Pyi5
.G"kk ɕ|ȦiӔJWVÕlOGh3@֩͘ڳ8N a̚J4Uu/,=)
.]W]uՒŵzkͦ،>qhR<-Z>%m!@I/h0#RY [tZ$m27boˍd8~<$ه$9&2 'DnAd UP,"j%
q#Il
0`(
/
.3D
9|0 Mz2 0mneR IX l*t:]7Fqlz@蠭--Xss
yf\ <;:: #].|lذ_s^Llt:-ڧSwǎ ba/Tx|l7Jj>4Y BVdqbSqN CV~w~gLHJA =ztt u[T+]ׯ w M;L&ŸaZ0P կ$ 3 g@4r4`F=294*5$d
nG"XL%6MV^.!W&sЃ 8; rąr+:C*:lXv:E1LLLÞ={D\bQpŨoe) *zzLds5SoظCgr9D k 4 G^bKNMM R$AGKծjŐQ~>,טiݻ6l@&YNuH A ;\q0lYE(?!4R)IjK]21ʲD2gqJ/ftܶm۲Rr u~z rشip}6o,2ؽkdٳqFAY~ pEadd]]]bîսr6M7 > 8dBQmn ]] \tQ (^?ю.C ke {w m$ FyYA~/I'9qHf6[~d]7l4m@.fg&63<Yu
Th* +* twqWUU9R^s3 9rdԑv
XEJ%[NdԋAn-g)qbkb4xKiyeL5N
FR^, OUV73=2k%fQ~% &En&ɟɲ}݇K/rV~uӦM8ob,߾l&z .,1N"M|2fӧt$lA*Cmv
ط?rE_>щ|ٰX\e\./9 *^)3>]b!LZ^ >} B 'AZS :ԣaj9˔_tCE}QhEhk\ԫ](i\|7|3OtM@ H ,M % ZL&#ǎ [s#DWdg
zl&acKx&<=*UW(P*='Z0Y%۶t:ġ0:xއO'B k(yt
Y @\}{߲畯|%LOOZ"<,,,{`fU rJkkS!˒ jsqYݧt52IӢ X50!MK-f t]X+&$?jشf_<ܘ '@PAAUu MRIjzǃvx<a Xdlh# HY"K'4 C4Hpӟ_~RV/:#ݨs $VVcgϞU_y睇r,'"|_,Mۃath.gk槻;|_:2
LH&%8FY[2Os^]zתE XS.lZM|H\˲$ۿ]cnnSe љIkZ,2ZtZ A`z\'q [ Uв(rT!E
Df ,w܉믿 O>V T
===Xn 8&''EY[Vpgvo:s9;(dj*0-SFYXzJ! Owq@"@рmۘ?
, y5)"d`f Br 3Q.WP,(mY- 2wE0iO,,4?mFY] N! S nY2 M'Do_+7$CQ$RiȲ$ U*EúRQtww^ |5^ߏn RIt[x1 KV-Ocǎ4MlYzEUW]u MILAQtvv.ᙜJM<ꡃTab(Rq
]j|[_\GXBoo>v0! ;wHزEE,¨(~@BYtd21A۷oǖ-[077'A ZҙLGGhM-y'W Fx bvv\p) ?'q
pIlڴi{{3!A̧ҁL& = =鰲`g "5q~զ Cyхx' 7^rmJB0 6**IklzA@9(JQkZg5fOLUkp]s} u
G"w<$QIܴ |9? QCe/G>`ebذaf^ =zwڱc`Y"Q1 b12HJ U0[Vp晻=.z%d)̄0 y E!G8zIRE===K_=ۋYo_23' q @x ltH$ZAY\^wQ@(.~k:EL&~!^
MO%!
=yKD
=K$.L W'ךi/awpKOv`k"* P$
jBb!C,hXLgu>iZ8eբ{L|$) 2\_B;(PQ. 3ёݬ/i> EѣGpw@ =.u,,`)4kUy 3H2TGђ=d2hKee GM =:Zm[qľ߅|#@
SSvjúu\Wǝw13 [Z ~X ,@u]ַ,E]b` .=c\&e
M&''c
tuua`` }}}p]w >ϮHYfoxx{}?z߾
X
`hHqbI'3ݚ@8ti[oef{
8 wW]uzzza*,إ"eW&͛y yetvv
Vd{ｨkH$PT7qJ
n\A#ÞlR @78JgKh0K8W tĄhE B? IDATz3W\!fSS z]oLB*YV#}FSzG.yZUhOyWܴp^t `]?P Cc }4u@ie
;,3p !{%<77'2,lق뮻V|IO?4ߏ= ]"-CG g> 8 7o~.x\ۅRp{{M_/>w ^'O.awttj%ZwR,)(KH2}jLe 2dŃ$yqjבڿخzvx
MYB֫w7H($K
:lǁ a(!HC58NsltJGEQp뭷bϞ=+l'> HK.;wD__ 'C=ֆWUb5
LLL
{Tj jLFOZfggC) Xh"]e"SJ84TB/Ǐ~5#<5 ,X ضVg>a
o@.[bm۶}ϝ;wbǎ kZ7ܹׯs¢T*%M$镛%^#+ʲ^D'|333>a+8}IJ5y!YЭR7\1$ CmTU *# 7WKˉs_p5 D .*)] 5|W `!\Y,QoT!KdDJe NT*urJI033r,2={- p饗
CkSPVvrgbKg~_߿;묳7 V2e~ gKܣlVHlU
LLL9TX}kiӦ%RU{ mۄ2gAqկ~qUW
X 7|3.U+0D]]]F_th x\LR Z}m'O*پLf+g\C=ؕ6(f2qR ax% Iwȱ4E@C:TneY#Ce[y
Nۘ;k^\{3oK&5'ch\r7L C8
TM /HZ۶qhY)>S$[]k."`nnNqŢ`fYp.:EL9KSO<x%w 5>ۚE;:LGGGw {]kh]A\.c8W%g};v< $6mu]Y:oo EEo5'Jur9ڵK6Vf7p,¾} `.>liix1# Y*g}66n܈ | Ϟ \tE FŘͬTUtj χeAVBH0 (*RIX,UPpXUa@⃐Nu )mg0H! ,|(N^S:p0EXb-+B UU0==,TE umuPJe (
yd2B.CGG&0u&eDT]jdYFWW$ `|| wqNJ
ȫ]r :::D E 9l6+: ZM >Pën[N]I37s?9 <_|1v)t{䛔eyСCFVC.Ö-[fa۶(OW;Uz՚k]7x#:::3>LCln鋯-bj-3^ZI9O>GP@^ 1??/fӶ7!b``@|>u CG@p a2
C/N6Q2T*4|v{ t`&IH ٹg>& VTP.199)fe8qBL6% ɑ$SD<~VI]]]8sI xx<.|j_uSW_}`0?͡R&Ofx `~Bݻ]ѭr]Wtdr 2 c:^8??/=Z0uSUcVT- q%N!<==-
L.~-SJEG\.h@ AvQo4i:6f iAQ=%!I@ZT{[ !j~AbGԗtl΅ ,Ue_=sCDBFH2 K@A%HR i* C
%,#BK~к`!;9XLTND5Wؐi\*D{(a-c'E
j0 100f)g Wy,$2m"Zհyf$ :t Ї5::3<jUj*&r3R*:_WfffP Y )QSeٝ!3طuK×&ߕJ| leaffF<(Zf &f< 2sF{snA!2{EQD>R$JE x^7ϖZdb{p= "[TMC,iib4-Uh4Y*F3xXREIˉ#$ܲ| uM+*<;W~X
>;k
f d /AUZ
vaY*J2,ӀjB nBCaw@%xA&Hklq24 qӓLV!ѮOt!'X,
Kk8 "̍RjӋ[ ;1(qFQY\D"4122 /|w[m&:)ҕ.J$>8߅',"ZMpI:|0~~tM0+x 9npڋ⽨!dGt.D"!gы6#<̨#% x =-,,= `Z1` f+ hE
m15 *#`ϪUZ{}8/.< eY./TL
n3U↢]ߗ j` i1a ס$I,+Ԣȓ }}.ƥai}3 E$,ln fLtk} c0Xy06&FŔs("9>E Yt;9~/1D e{^f{{{jZt:-$Lr&Nʒ!l6 nf#E DB|7nڨ7ʝạK_;}Eu!aiغu"saif 2S8CUcfh$N:Yiu$G0ٺİ N~DDQG yd)4H#
3[U-3u of5muvvàUUay vgCm`Y;-,h((9XӰR 48y!zXEl>hs0 OfQ_ 8 lAj9dAA-HD2@AH8 @T@TE.I, $ôtSq4*?gqI
y_ 7uċ_Kyj eXZ\6~)7zx nLC㺐$ix b[z
H@@5 Ӳ`1j)3"z&g89F H*"3 bd5'T*$a<̞ @[[\LI WrYF@`8R;2 cE1l>7壪.bS£%7%ilZ0D.M]k /S0#3cqrY6dŤ@&0Cxt $$Li;PU z
n08dYAp !tEUa*&x ],PTCQ$hTWUW3swG]*? '&Ƽ} 0MR! ﾹ(E9j-7 ퟸӕmn[[\UwVj6 LJ0a*l; PU ߄*P B[Hˊ2"LAS؎rT*8ҥ51L0t&) #\3lb̐dlIp \ حkaP>b DDH ìq TUR(000 0/v:;;)kYH gAО= e`fy ֭[&c; =`#ޜi~܆".jʌe ȱX JEQ?e6hAJ"DIu x |p셙#
8
Ma\kCC,Bp]UO"Zd'AeYQ >B?$ "e ҳRW>w;tR-' ɛ9 ?/_[ ^o ph%(RTn~JeYוa]nJ%]n;!A2CX!Pn Ae4
$H/uÇKH$08b1''J mm1" uf l6kZ'-y* Itt(m) !إR ۷o| O,Wx%~fLͦлMMM R4MѱYɦZ
~~G)arrrnܸqSY!; θyZ
*2JJs&rb8,hF QT
TJmQeIu]`MMM [ bI-JiOUQBAހ{h4lJ^!̀pEef+7tEtEmxO T
H$ PIa2Xibx-)
n٬c~~ ssb\0e 4tbr!
FŅ:]_C%th{T$r9REf ,L4Mͺaa!
,4& e ~闼3:Pgg-Y:rbiB:ƝwZ83%Z߇ g')!tsϩh
qbW|(} ===(
KľpՑiσkÆ
Zˏ-H3P5R j}hn hz Z(0i&p $(+@--"C$fac|c3ӥ W/x@F5NsL dv0u/
0/ pKN= xm@al쨼axSQ!Ber,-T%@2M/ q0}Z_ >z.9 81Qlvp|?=}A%Z>/
2ob5> y/ +V\
B =O~tj躪$ʕ._)ʖ0Fb
Y!+ nn!\O -nZ TM(J TQ8p<^֯iz ZS1-ҧܖ VkitNc.N
[,W* ONJXUJ`B43vah.3nԮ.1mo{۲v_җp7c]Di
u u]cv,iJaGGǢg}Ѿjfff )
Zɠ/)CحJB\\iU
HP5a3'ׇ
UA /id(,VjKT4ȱj*>A Bt _^BR r#Wʒ~0l׳,Kؽ{7Ǘm?^MoYg%|Xj5<쳸뮻 #s饗Kf0TXf13M\N^5
LNNbhhcbbi HXPM i i`sVyp W`:Bq,> `;. cqvT*
? \/X`yq%۱u4>BH5 ]myOh:T_CRB%hUU]7 ɀa&a I* Wʎ-+Z׃TilT,~pW(Y+ 3ˠsFһ9_Y5Cr&BlJ$eUe{e7bp*wjuA+},$&zϓhu/a ˋ+iTXj@\c1Mt'ON DQB2X~d3-
h P5Z~f)K($IgHP 8IDAT]q011!|8~^{-r j5|_wt
Uz:::mV"Hv eɂz}DqPlPݥx%Ja||b#BInmnU3yIr+#q[J E)/D :;; Ѝ$l'Dauv\Ȳ!d?DZ H P5c-gE6e: ai .{ DAf%I*t:~/,_}?,Eym\{与3ֹwϥgfErI,*2,P q? 0@ J,[fLZ%mr/3;}9|8# N rY`-vOU[_ '?{y6Ĉ=ڎ._K0+Z捐{1?W}(?q<9Pfj j@H92] ` +t1I~ ^)~X.BB: e2
Gj6 D _ۉ>"jlp<uzSYqrrrhvNG }7oo%CDq]ܸq0zIT73 E sD$LD-A&gx=s4
]0-j13x 2 S kĔE4cУ1-NzH:
1TR ) V0Ѷe
T9ӓv3o ]r.K c|;l2c,yw8xrΌsFD }? ; K59qAO ҇1T
{\ 8R3A@WŴ ,~ &T /~Ub@頹1" FICe"g$C)5rzcn0}|1G O>f0B~Nv N,Z717^ÿx2pB 9 WW5F"#mR h- cBG )$>8J7o" *e' c$B!gBo Bpë>slgHh[nz"10**ovJIv-RhV+EX.3Rzscjl6GK %%u
r ZW8: 4+Tu
)bh (z88GX.;V
/~ e*=+%l}rR`HJ?/]R95K)r8<Et)S 'V)gB|g78}R*imv)-C,^
ߡ7?. D]!#ys0Wm3 C3e?Z#{j\.+ }@Fp!n HO bȞG FGL|r !Zʃx }V~PR{Цuazwvc5B;)Xbuo/g a:ﻆ1R1!d(k}[p]qV(Zk(|Xb 2}BAؠ#Xyv߂v/i7 ֺY[ (1*xg|BR.@l܇
*m H1 #&2JB ZSIjx-b e -Z[s0>C+.؋qj{!x9ӿ1&/R~; `99m a
K !Hu߉>|E9&xbJ B1%yA+NVFVڮٻw#%Y5k䴱 fucQNobU LƈpȯKj~Cá)'QS(3FH1KIΏĤ,tB*HQp5ppuqvF3SO,{~7nG<|ݶWg:uuqy}&T auն^JiWURJsit?m`D(m_| 3\0= !@(1q\ S\n Ѷ{cZ+8^.(\
бuhS2\fDr{iVMSN:b : ^U]Ikv\gUUrHI) Dg]gmz"8) u ;g6zz!V)j%~~X<~4f]O䕑 b6D!$NdD ;4rlMuſ#> IENDB` oregano-0.84.41/src/pixmaps/tool_text.xpm 0000644 0001750 0001750 00000001156 13413640652 017360 0 ustar ruben ruben /* XPM */
static char *tool_text_xpm [] = {
"20 20 3 1",
". c None",
"a c #000000",
"e c #777777",
"....................",
"....................",
"....................",
"....aaaaaaaaaaa.....",
"....aaeeaaaeeaae....",
"....aee.aaae..ae....",
".....e..aaae...e....",
".......eaae.........",
".......eaae.........",
".......eaae.........",
".......aaae.........",
".......aae..........",
"......eaae..........",
"......eaae..........",
"......aaae..........",
".....aaaaa..........",
"......eeeee.........",
"....................",
"....................",
"...................."
};
oregano-0.84.41/src/pixmaps/log.xpm 0000644 0001750 0001750 00000001221 13413640652 016111 0 ustar ruben ruben /* XPM */
static char * log_xpm[] = {
"16 16 2 2",
" c None",
". c #000000",
" ",
" . . . . . . . . . . . ",
" ",
" . . . . . . . . . . . ",
" ",
" . . . . . . . . . . . ",
" ",
" . . . . . . . . . ",
" ",
" . . . . . . . . . . . . . ",
" ",
" . . . . . . . . . . . . ",
" ",
" . . . . . . . . . ",
" ",
" "};
oregano-0.84.41/src/pixmaps/menu_zoom.xcf 0000644 0001750 0001750 00000002151 13413640652 017317 0 ustar ruben ruben gimp xcf file B B G _
Pasted Layer
$ 4 06/J&>' 2
4'% 06/J&>' 2
4'% 06/J&>' 2
4'% #+# ,5, z(1'NQW=$)!6ywp`
',"SYhr}yi-1&l31F_wzy'+!-CWh 5%9? c #3E3E3E",
", c #DCDCDC",
"' c #D8D7D8",
") c #272727",
"! c #9A979A",
"~ c #E5E2E5",
"{ c #E1E0E1",
"] c #202020",
"^ c #171717",
"/ c #CAC8CA",
"( c #323232",
"_ c #0D0D0D",
": c #343434",
"< c #9B989B",
"[ c #050505",
"} c #DFDBDF",
"| c #E5E3E5",
"1 c #989698",
"2 c #030303",
"3 c #252525",
"4 c #9C999C",
"5 c #969396",
"6 c #000000",
"7 c #DEDADE",
"8 c #DEDBDE",
"9 c #101010",
"0 c #949194",
"a c #010101",
"b c #020202",
"c c #959295",
"d c #0B0B0B",
"e c #040404",
"f c #060606",
" ",
" .+@# ",
" $%& *=-; ",
" > ,' )! ",
" #~ { ~] ",
" ^ / (!",
" _ :<",
" [} |)1",
" 2 345",
" 6667**8915 ",
" 666066ab00 ",
" 66600 0000 ",
" 6660c ",
" a660c ",
"dea00 ",
" c #964537",
", c #EF825B",
" ",
" .............. ",
" .+@@@@@@@#+@#. ",
" .$$$$$$$$$$$$. ",
" .%&%&%&%&%&%&. ",
" .&*&*=*&*&*&-. ",
" .%&*;>,*&*&;&. ",
" .&*;,>;,*&*;-. ",
" .%;,&=&;&*;,&. ",
" .&;&*=*;,&;,-. ",
" .%======>>>=&. ",
" .&*&*=*&;&;&-. ",
" .%&*&=&*,;&*&. ",
" .&-&-&-&-&-&-. ",
" .............. ",
" "};
oregano-0.84.41/src/pixmaps/tool_arrow.xpm 0000644 0001750 0001750 00000000765 13413640652 017533 0 ustar ruben ruben /* XPM */
static char * tool_arrow_xpm[] = {
"16 20 3 1",
" c None",
". c #000000",
"+ c #FFFFFF",
" ",
" . ",
" .. ",
" ... ",
" .... ",
" ..... ",
" ...... ",
" ....... ",
" ........ ",
" ..... ",
" .. .. ",
" . .. ",
" .. ",
" .. ",
" .. ",
" ",
" ",
" ",
" ",
" "};
oregano-0.84.41/src/pixmaps/plot.xpm 0000644 0001750 0001750 00000002216 13413640652 016313 0 ustar ruben ruben /* XPM */
static char * plot_xpm[] = {
"16 16 53 1",
" c None",
". c #1E1E1E",
"+ c #272727",
"@ c #2E2E2E",
"# c #932F3D",
"$ c #993242",
"% c #A33142",
"& c #962E3D",
"* c #70232E",
"= c #932F3F",
"- c #A23243",
"; c #292929",
"> c #7F2836",
", c #922F3E",
"' c #9F3040",
") c #963141",
"! c #2C2C2C",
"~ c #9D3243",
"{ c #6D232F",
"] c #933040",
"^ c #8A2D3B",
"/ c #952D3C",
"( c #1E1D1D",
"_ c #9B3444",
": c #AF3547",
"< c #491D23",
"[ c #932C3B",
"} c #2B2B2B",
"| c #2D2D2D",
"1 c #333333",
"2 c #2A2A2A",
"3 c #2C2B2B",
"4 c #552930",
"5 c #8A313E",
"6 c #872A38",
"7 c #9F3141",
"8 c #813944",
"9 c #AE384A",
"0 c #571D26",
"a c #9E3948",
"b c #3E2D2F",
"c c #94303F",
"d c #7D2532",
"e c #5D2A32",
"f c #641E29",
"g c #8E2B3A",
"h c #AE3A4B",
"i c #AC3445",
"j c #6B2F38",
"k c #A53445",
"l c #A13141",
"m c #63212B",
"n c #6A212C",
" . ",
" + ",
" @ ",
" #$% . &",
" *= - ; >,",
" ' ) ! ~ ",
"{] ^/ ( _ ",
":< [ } ] ",
"_|;1!2_}}1231451",
"6 78. 90 ",
" ab c ",
" de fg ",
" h i ",
" jk_l ",
" +mn ",
" . "};
oregano-0.84.41/src/engines/ 0000755 0001750 0001750 00000000000 13413640652 014555 5 ustar ruben ruben oregano-0.84.41/src/engines/ngspice.c 0000644 0001750 0001750 00000036517 13413640652 016365 0 ustar ruben ruben /*
* ngspice.c
*
* Authors:
* Ricardo Markiewicz
* Marc Lorber
* Bernhard Schuster
* Guido Trentalancia
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2006 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
* Copyright (C) 2014 Bernhard Schuster
* Copyright (C) 2017 Guido Trentalancia
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include
#include
#include
#include
#include
#include
#include "ngspice.h"
#include "netlist-helper.h"
#include "dialogs.h"
#include "engine-internal.h"
#include "ngspice-analysis.h"
#include "errors.h"
#include "ngspice-watcher.h"
static void ngspice_class_init (OreganoNgSpiceClass *klass);
static void ngspice_finalize (GObject *object);
static void ngspice_dispose (GObject *object);
static void ngspice_instance_init (GTypeInstance *instance, gpointer g_class);
static void ngspice_interface_init (gpointer g_iface, gpointer iface_data);
static GObjectClass *parent_class = NULL;
GType oregano_ngspice_get_type (void)
{
static GType type = 0;
if (type == 0) {
static const GTypeInfo info = {sizeof(OreganoNgSpiceClass),
NULL, // base_init
NULL, // base_finalize
(GClassInitFunc)ngspice_class_init, // class_init
NULL, // class_finalize
NULL, // class_data
sizeof(OreganoNgSpice),
0, // n_preallocs
(GInstanceInitFunc)ngspice_instance_init, // instance_init
NULL};
static const GInterfaceInfo ngspice_info = {
(GInterfaceInitFunc)ngspice_interface_init, // interface_init
NULL, // interface_finalize
NULL // interface_data
};
type = g_type_register_static (G_TYPE_OBJECT, "OreganoNgSpice", &info, 0);
g_type_add_interface_static (type, OREGANO_TYPE_ENGINE, &ngspice_info);
}
return type;
}
static void ngspice_class_init (OreganoNgSpiceClass *klass)
{
GObjectClass *object_class;
parent_class = g_type_class_peek_parent (klass);
object_class = G_OBJECT_CLASS (klass);
object_class->dispose = ngspice_dispose;
object_class->finalize = ngspice_finalize;
}
static void ngspice_finalize (GObject *object)
{
OreganoNgSpice *ngspice;
GList *iter;
int i;
ngspice = OREGANO_NGSPICE (object);
iter = ngspice->priv->analysis;
for (; iter; iter = iter->next) {
SimulationData *data = SIM_DATA (iter->data);
for (i = 0; i < data->n_variables; i++) {
g_free(data->var_names[i]);
g_free(data->var_units[i]);
g_array_free (data->data[i], TRUE);
}
g_free (data->var_names);
g_free (data->var_units);
g_free (data->data);
g_free (data->min_data);
g_free (data->max_data);
g_free (data);
}
g_list_free (ngspice->priv->analysis);
g_mutex_clear(&ngspice->priv->progress_ngspice.progress_mutex);
g_mutex_clear(&ngspice->priv->progress_reader.progress_mutex);
g_mutex_clear(&ngspice->priv->current.mutex);
cancel_info_unsubscribe(ngspice->priv->cancel_info);
g_free(ngspice->priv);
parent_class->finalize (object);
}
static void ngspice_dispose (GObject *object) { parent_class->dispose (object); }
static gboolean ngspice_has_warnings (OreganoEngine *self) { return FALSE; }
static gboolean ngspice_is_available (OreganoEngine *self)
{
gboolean is_vanilla;
gchar *exe;
OreganoNgSpice *ngspice = OREGANO_NGSPICE (self);
is_vanilla = ngspice->priv->is_vanilla;
if (is_vanilla)
exe = g_find_program_in_path (SPICE_EXE);
else
exe = g_find_program_in_path (NGSPICE_EXE);
if (!exe)
return FALSE; // ngspice not found
g_free (exe);
return TRUE;
}
/**
* \brief create a netlist buffer from the engine inernals
*
* @engine
* @error [allow-none]
*/
static GString *ngspice_generate_netlist_buffer (OreganoEngine *engine, GError **error)
{
OreganoNgSpice *ngspice;
Netlist output;
GList *iter;
GError *e = NULL;
GString *buffer = NULL;
ngspice = OREGANO_NGSPICE (engine);
netlist_helper_create (ngspice->priv->schematic, &output, &e);
if (e) {
g_propagate_error (error, e);
return NULL;
}
buffer = g_string_sized_new (500);
if (!buffer) {
g_set_error_literal (&e, OREGANO_ERROR, OREGANO_OOM,
"Failed to allocate intermediate buffer.");
g_propagate_error (error, e);
return NULL;
}
// Prints title
g_string_append (buffer, "* ");
g_string_append (buffer, output.title ? output.title : "Title: ");
g_string_append (buffer, "\n"
"*----------------------------------------------"
"\n"
"*\tngspice - NETLIST"
"\n");
// Prints Options
g_string_append (buffer, ".options OUT=120 ");
iter = sim_settings_get_options (output.settings);
for (; iter; iter = iter->next) {
const SimOption *so = iter->data;
// Prevent send NULL text
if (so->value) {
if (strlen (so->value) > 0) {
g_string_append_printf (buffer, "%s=%s ", so->name, so->value);
}
}
}
g_string_append_c (buffer, '\n');
// Include of subckt models
g_string_append (buffer, "*------------- Models -------------------------\n");
for (iter = output.models; iter; iter = iter->next) {
const gchar *model = iter->data;
gchar *model_with_ext = g_strdup_printf ("%s.model", model);
gchar *model_path = g_build_filename (OREGANO_MODELDIR, model_with_ext, NULL);
g_string_append_printf (buffer, ".include %s\n", model_path);
g_free (model_path);
g_free (model_with_ext);
}
// Prints template parts
g_string_append (buffer, "*------------- Circuit Description-------------\n");
g_string_append (buffer, output.template->str);
g_string_append (buffer, "\n*----------------------------------------------\n");
// Prints Transient Analysis
if (sim_settings_get_trans (output.settings)) {
gdouble st = 0;
gdouble start = sim_settings_get_trans_start (output.settings);
gdouble stop = sim_settings_get_trans_stop (output.settings);
if (sim_settings_get_trans_step_enable (output.settings))
st = sim_settings_get_trans_step (output.settings);
else
st = (stop - start) / 50;
if ((stop - start) <= 0) {
// FIXME ask for swapping or cancel simulation
oregano_error (_ ("Transient: Start time is after Stop time - fix this."
"stop figure\n"));
g_string_free (buffer, TRUE);
return NULL;
}
g_string_append_printf (buffer, ".tran %e %e %e", st, stop, start);
if (sim_settings_get_trans_init_cond (output.settings)) {
g_string_append_printf (buffer, " uic");
}
g_string_append_printf (buffer, "\n");
if (sim_settings_get_trans_analyze_all(output.settings)) {
g_string_append_printf (buffer, ".print tran all\n");
} else {
gchar *tmp_str = netlist_helper_create_analysis_string (output.store, FALSE);
g_string_append_printf (buffer, ".print tran %s\n", tmp_str);
g_free (tmp_str);
}
g_string_append_c (buffer, '\n');
}
// Prints DC Analysis
if (sim_settings_get_dc (output.settings)) {
g_string_append (buffer, ".dc ");
if (sim_settings_get_dc_vsrc (output.settings)) {
g_string_append_printf (buffer, "V_%s %g %g %g\n",
sim_settings_get_dc_vsrc (output.settings),
sim_settings_get_dc_start (output.settings),
sim_settings_get_dc_stop (output.settings),
sim_settings_get_dc_step (output.settings));
g_string_append_printf (buffer, ".print dc V(%s)\n",
sim_settings_get_dc_vout (output.settings));
}
}
// Prints AC Analysis
if (sim_settings_get_ac (output.settings)) {
if (sim_settings_get_ac_vout (output.settings)) {
g_string_append_printf (buffer, ".ac %s %d %g %g\n",
sim_settings_get_ac_type (output.settings),
sim_settings_get_ac_npoints (output.settings),
sim_settings_get_ac_start (output.settings),
sim_settings_get_ac_stop (output.settings));
g_string_append_printf (buffer, ".print ac %s\n",
sim_settings_get_ac_vout (output.settings));
}
}
// Prints analysis using a Fourier transform
if (sim_settings_get_fourier (output.settings)) {
if (sim_settings_get_fourier_frequency (output.settings) &&
sim_settings_get_fourier_nodes (output.settings)) {
g_string_append_printf (buffer, ".four %.3f %s\n",
sim_settings_get_fourier_frequency (output.settings),
sim_settings_get_fourier_nodes (output.settings));
}
}
// Prints Noise Analysis
if (sim_settings_get_noise (output.settings)) {
if (sim_settings_get_noise_vout (output.settings)) {
g_string_append_printf (buffer, ".noise V(%s) V_%s %s %d %g %g\n",
sim_settings_get_noise_vout (output.settings),
sim_settings_get_noise_vsrc (output.settings),
sim_settings_get_noise_type (output.settings),
sim_settings_get_noise_npoints (output.settings),
sim_settings_get_noise_start (output.settings),
sim_settings_get_noise_stop (output.settings));
g_string_append (buffer, ".print noise inoise_spectrum onoise_spectrum\n");
}
}
g_string_append (buffer, ".op\n\n.END\n");
return buffer;
}
/**
* \brief generate a netlist and write to file
*
* @engine engine to extract schematic and settings from
* @filename target netlist file, user selected
* @error [allow-none]
*/
static gboolean ngspice_generate_netlist (OreganoEngine *engine, const gchar *filename,
GError **error)
{
GError *e = NULL;
GString *buffer;
gboolean success = FALSE;
buffer = ngspice_generate_netlist_buffer (engine, &e);
if (!buffer) {
oregano_error (g_strdup_printf ("Failed generate netlist buffer\n"));
g_propagate_error (error, e);
return FALSE;
}
success = g_file_set_contents (filename, buffer->str, buffer->len, &e);
g_string_free (buffer, TRUE);
if (!success) {
g_propagate_error (error, e);
oregano_error (g_strdup_printf ("Failed to open file \"%s\" in 'w' mode.\n", filename));
return FALSE;
}
return TRUE;
}
static void ngspice_progress (OreganoEngine *self, double *d)
{
OreganoNgSpice *ngspice = OREGANO_NGSPICE (self);
g_mutex_lock(&ngspice->priv->progress_ngspice.progress_mutex);
*d = ngspice->priv->progress_ngspice.progress;
g_mutex_unlock(&ngspice->priv->progress_ngspice.progress_mutex);
}
static void reader_progress (OreganoEngine *self, double *d)
{
OreganoNgSpice *ngspice = OREGANO_NGSPICE (self);
g_mutex_lock(&ngspice->priv->progress_reader.progress_mutex);
*d = ngspice->priv->progress_reader.progress;
g_mutex_unlock(&ngspice->priv->progress_reader.progress_mutex);
}
static void ngspice_stop (OreganoEngine *self)
{
OreganoNgSpice *ngspice = OREGANO_NGSPICE (self);
cancel_info_set_cancel(ngspice->priv->cancel_info);
GPid child_pid = ngspice->priv->child_pid;
if (child_pid != 0) {
// CTRL+C (Terminal quit signal.)
kill(child_pid, SIGINT);
ngspice->priv->child_pid = 0;
}
}
static void ngspice_start (OreganoEngine *self)
{
OreganoNgSpice *ngspice = OREGANO_NGSPICE (self);
OreganoNgSpicePriv *priv = ngspice->priv;
GError *e = NULL;
if (!oregano_engine_generate_netlist (self, "/tmp/netlist.tmp", &e)) {
priv->aborted = TRUE;
if (e)
schematic_log_append_error (priv->schematic, e->message);
else
schematic_log_append_error(priv->schematic, "Error at netlist generation.");
g_signal_emit_by_name (G_OBJECT (ngspice), "aborted");
g_clear_error (&e);
return;
}
NgspiceWatcherBuildAndLaunchResources *resources = ngspice_watcher_build_and_launch_resources_new(ngspice);
ngspice_watcher_build_and_launch(resources);
ngspice_watcher_build_and_launch_resources_finalize(resources);
}
static GList *ngspice_get_results (OreganoEngine *self)
{
if (OREGANO_NGSPICE (self)->priv->analysis == NULL)
printf ("pas d'analyse\n");
return OREGANO_NGSPICE (self)->priv->analysis;
}
static gchar *ngspice_get_operation_ngspice (OreganoEngine *self)
{
OreganoNgSpicePriv *priv = OREGANO_NGSPICE (self)->priv;
g_mutex_lock(&priv->progress_ngspice.progress_mutex);
gint64 old_time = priv->progress_ngspice.time;
g_mutex_unlock(&priv->progress_ngspice.progress_mutex);
gint64 new_time = g_get_monotonic_time();
if (new_time - old_time >= 1000000)
return g_strdup("ngspice not responding");
return g_strdup(_("ngspice solving"));
}
static gchar *ngspice_get_operation_reader (OreganoEngine *self)
{
OreganoNgSpicePriv *priv = OREGANO_NGSPICE (self)->priv;
g_mutex_lock(&priv->current.mutex);
AnalysisType type = priv->current.type;
g_mutex_unlock(&priv->current.mutex);
return oregano_engine_get_analysis_name_by_type(type);
}
static void ngspice_interface_init (gpointer g_iface, gpointer iface_data)
{
OreganoEngineClass *klass = (OreganoEngineClass *)g_iface;
klass->start = ngspice_start;
klass->stop = ngspice_stop;
klass->progress_solver = ngspice_progress;
klass->progress_reader = reader_progress;
klass->get_netlist = ngspice_generate_netlist;
klass->has_warnings = ngspice_has_warnings;
klass->get_results = ngspice_get_results;
klass->get_operation_solver = ngspice_get_operation_ngspice;
klass->get_operation_reader = ngspice_get_operation_reader;
klass->is_available = ngspice_is_available;
}
static void ngspice_instance_init (GTypeInstance *instance, gpointer g_class)
{
OreganoNgSpice *self = OREGANO_NGSPICE (instance);
self->priv = g_new0 (OreganoNgSpicePriv, 1);
self->priv->progress_ngspice.progress = 0.0;
self->priv->progress_ngspice.time = g_get_monotonic_time();
g_mutex_init(&self->priv->progress_ngspice.progress_mutex);
self->priv->progress_reader.progress = 0.0;
self->priv->progress_reader.time = g_get_monotonic_time();
g_mutex_init(&self->priv->progress_reader.progress_mutex);
self->priv->current.type = ANALYSIS_TYPE_NONE;
g_mutex_init(&self->priv->current.mutex);
self->priv->num_analysis = 0;
self->priv->analysis = NULL;
self->priv->aborted = FALSE;
self->priv->cancel_info = cancel_info_new();
}
/*
* Set "is_vanilla" to TRUE if using the original spice3 from
* UC Berkeley.
*/
OreganoEngine *oregano_spice_new (Schematic *sc, gboolean is_vanilla)
{
OreganoNgSpice *ngspice;
ngspice = OREGANO_NGSPICE (g_object_new (OREGANO_TYPE_NGSPICE, NULL));
ngspice->priv->schematic = sc;
ngspice->priv->is_vanilla = is_vanilla;
return OREGANO_ENGINE (ngspice);
}
oregano-0.84.41/src/engines/engine-internal.h 0000644 0001750 0001750 00000004666 13413640652 020021 0 ustar ruben ruben /*
* engine-internal.h
*
* Authors:
* Ricardo Markiewicz
* Marc Lorber
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2006 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#ifndef __ENGINE_INTERNAL_H
#define __ENGINE_INTERNAL_H 1
#include
#include "sim-settings.h"
#include "schematic.h"
#include "simulation.h"
#define OREGANO_TYPE_ENGINE (oregano_engine_get_type ())
#define OREGANO_ENGINE_CLASS(klass) \
(G_TYPE_CHECK_CLASS_CAST ((klass), OREGANO_TYPE_ENGINE, OreganoEngineClass))
#define OREGANO_IS_ENGINE_CLASS(klass) \
(G_TYPE_CLASS_TYPE ((klass), OREGANO_TYPE_ENGINE, OreganoEngineClass))
#define OREGANO_ENGINE_GET_CLASS(klass) \
(G_TYPE_INSTANCE_GET_INTERFACE ((klass), OREGANO_TYPE_ENGINE, OreganoEngineClass))
typedef struct _OreganoEngineClass OreganoEngineClass;
struct _OreganoEngineClass
{
GTypeInterface parent;
void (*start)(OreganoEngine *engine);
void (*stop)(OreganoEngine *engine);
void (*progress_solver)(OreganoEngine *engine, double *p);
void (*progress_reader)(OreganoEngine *engine, double *p);
gboolean (*get_netlist)(OreganoEngine *engine, const gchar *sm, GError **error);
GList *(*get_results)(OreganoEngine *engine);
gchar *(*get_operation_solver)(OreganoEngine *engine);
gchar *(*get_operation_reader)(OreganoEngine *engine);
gboolean (*has_warnings)(OreganoEngine *engine);
gboolean (*is_available)(OreganoEngine *engine);
// Signals
void (*done)();
void (*abort)();
};
#endif
oregano-0.84.41/src/engines/gnucap.h 0000644 0001750 0001750 00000004226 13413640652 016207 0 ustar ruben ruben /*
* engine.c
*
* Authors:
* Ricardo Markiewicz
* Marc Lorber
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2006 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#ifndef __GNUCAP_ENGINE
#define __GNUCAP_ENGINE
#include
#include "engine.h"
#define OREGANO_TYPE_GNUCAP (oregano_gnucap_get_type ())
#define OREGANO_GNUCAP(obj) (G_TYPE_CHECK_INSTANCE_CAST ((obj), OREGANO_TYPE_GNUCAP, OreganoGnuCap))
#define OREGANO_GNUCAP_CLASS(vtable) \
(G_TYPE_CHECK_CLASS_CAST ((vtable), OREGANO_TYPE_GNUCAP, OreganoGnuCapClass))
#define OREGANO_IS_GNUCAP(obj) (G_TYPE_CHECK_INSTANCE_TYPE ((obj), OREGANO_TYPE_GNUCAP))
#define OREGANO_IS_GNUCAP_CLASS(vtable) (G_TYPE_CHECK_CLASS_TYPE ((vtable), OREGANO_TYPE_GNUCAP))
#define OREGANO_GNUCAP_GET_CLASS(inst) \
(G_TYPE_INSTANCE_GET_CLASS ((inst), OREGANO_TYPE_GNUCAP, OreganoGnuCapClass))
typedef struct _OreganoGnuCap OreganoGnuCap;
typedef struct _OreganoGnuCapPriv OreganoGnuCapPriv;
typedef struct _OreganoGnuCapClass OreganoGnuCapClass;
struct _OreganoGnuCap
{
GObject parent;
OreganoGnuCapPriv *priv;
};
struct _OreganoGnuCapClass
{
GObjectClass parent;
};
GType oregano_gnucap_get_type (void);
OreganoEngine *oregano_gnucap_new (Schematic *sm);
#endif
oregano-0.84.41/src/engines/ngspice-analysis.h 0000644 0001750 0001750 00000005641 13413640652 020205 0 ustar ruben ruben /*
* ngspice-analysis.h
*
* Authors:
* Ricardo Markiewicz
* Marc Lorber
* Guido Trentalancia
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2006 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
* Copyright (C) 2017 Guido Trentalancia
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#ifndef __NGSPICE_ANALYSIS_H
#define __NGSPICE_ANALYSIS_H
#include
#include
#include
#include
#include
#include "../tools/thread-pipe.h"
#include "../tools/cancel-info.h"
#include "ngspice.h"
#include "netlist-helper.h"
#include "dialogs.h"
#include "engine-internal.h"
#include "ngspice.h"
/*
* The file buffer size (recommended value
* is 512 bytes).
*/
#define BSIZE_SP 512
/**
* Progress is a shared variable between GUI thread
* that displays the progress bar and working thread
* which executes the heavy work.
*/
typedef struct {
gdouble progress;
// time (from g_get_monotonic_time) of the last writing access
gint64 time;
GMutex progress_mutex;
} ProgressResources;
/**
* AnalysisType is a shared variable between progress
* bar displaying GUI thread and the working thread.
*/
typedef struct {
AnalysisType type;
GMutex mutex;
} AnalysisTypeShared;
typedef struct {
ThreadPipe *pipe;
gchar *buf;
gboolean is_vanilla;
const SimSettings* sim_settings;
AnalysisTypeShared *current;
GList **analysis;
guint *num_analysis;
ProgressResources *progress_reader;
guint64 no_of_data_rows_ac;
guint64 no_of_data_rows_dc;
guint64 no_of_data_rows_op;
guint64 no_of_data_rows_transient;
guint64 no_of_data_rows_noise;
guint no_of_variables;
CancelInfo *cancel_info;
} NgspiceAnalysisResources;
// Parser STATUS
struct _OreganoNgSpicePriv
{
gboolean is_vanilla;
GPid child_pid;
Schematic *schematic;
gboolean aborted;
CancelInfo *cancel_info;
GList *analysis;
guint num_analysis;
AnalysisTypeShared current;
ProgressResources progress_ngspice;
ProgressResources progress_reader;
};
void ngspice_analysis (NgspiceAnalysisResources *resources);
void ngspice_save (const gchar *path_to_file, ThreadPipe *pipe, CancelInfo *cancel_info);
#endif
oregano-0.84.41/src/engines/netlist-helper.c 0000644 0001750 0001750 00000046371 13413640652 017673 0 ustar ruben ruben /*
* netlist-helper.c
*
*
* Author:
* Richard Hult
* Ricardo Markiewicz
* Andres de Barbara
* Marc Lorber
* Bernhard Schuster
* Guido Trentalancia
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2006 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
* Copyright (C) 2014 Bernhard Schuster
* Copyright (C) 2017 Guido Trentalancia
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include
#include
#include
#include
#include
#include "oregano.h"
#include "schematic.h"
#include "node-store.h"
#include "node.h"
#include "wire.h"
#include "part-private.h"
#include "part-property.h"
#include "netlist-helper.h"
#include "errors.h"
#include "dialogs.h"
#include "debug.h"
static void netlist_helper_node_foreach_reset (gpointer key, gpointer value, gpointer user_data);
static void netlist_helper_wire_traverse (Wire *wire, NetlistData *data);
static void netlist_helper_node_traverse (Node *node, NetlistData *data);
static void netlist_helper_node_foreach_traverse (gpointer key, gpointer value, NetlistData *data);
static gboolean netlist_helper_foreach_model_free (gpointer key, gpointer model,
gpointer user_data);
static gboolean netlist_helper_foreach_model_save (gpointer key, gpointer model,
gpointer user_data);
static char *netlist_helper_linebreak (char *str);
static void netlist_helper_nl_node_traverse (Node *node, GSList **lst);
static void netlist_helper_nl_wire_traverse (Wire *wire, GSList **lst)
{
GSList *iter;
GSList *iter2;
g_return_if_fail (wire != NULL);
g_return_if_fail (IS_WIRE (wire));
if (wire_is_visited (wire))
return;
wire_set_visited (wire, TRUE);
for (iter = wire_get_nodes (wire); iter; iter = iter->next) {
Node *node = iter->data;
for (iter2 = node->pins; iter2; iter2 = iter2->next) {
Pin *pin = iter2->data;
Part *part = PART (pin->part);
char *template, *tmp;
char **template_split;
tmp = part_get_property (part, "template");
if (!tmp)
continue;
template = part_property_expand_macros (part, tmp);
template_split = g_strsplit (template, " ", 0);
if (template_split[0] != NULL)
(*lst) = g_slist_prepend (*lst, g_strdup (template_split[0]));
g_strfreev (template_split);
g_free (tmp);
g_free (template);
}
netlist_helper_nl_node_traverse (node, lst);
}
}
static void netlist_helper_nl_node_traverse (Node *node, GSList **lst)
{
GSList *iter;
g_return_if_fail (node != NULL);
g_return_if_fail (IS_NODE (node));
if (node_is_visited (node))
return;
node_set_visited (node, TRUE);
for (iter = node->wires; iter; iter = iter->next) {
Wire *wire = iter->data;
netlist_helper_nl_wire_traverse (wire, lst);
}
}
/**
* traverses the netlist and picks up all clamp type parts
*
* TODO this is part of the "logic" that determines which "nodes" (or V levels)
* TODO will be plotted (or: not discarded)
*
* @returns a list of parts whose type is clamp
*/
static GSList *netlist_helper_get_clamp_parts (NodeStore *store, Node *node)
{
GList *iter;
GSList *iter2;
Wire *wire;
GSList *ret = NULL;
if (!node)
return NULL;
node_store_node_foreach (store, (GHFunc *)netlist_helper_node_foreach_reset, NULL);
for (iter = store->wires; iter; iter = iter->next) {
wire = iter->data;
wire_set_visited (wire, FALSE);
}
for (iter2 = node->wires; iter2; iter2 = iter2->next) {
wire = iter2->data;
netlist_helper_nl_wire_traverse (wire, &ret);
}
return ret;
}
void netlist_helper_init_data (NetlistData *data)
{
data->pins = g_hash_table_new (g_direct_hash, g_direct_equal);
data->models = g_hash_table_new (g_str_hash, g_str_equal);
data->node_nr = 1;
data->gnd_list = NULL;
data->clamp_list = NULL;
data->mark_list = NULL;
data->node_and_number_list = NULL;
}
void netlist_helper_node_foreach_reset (gpointer key, gpointer value, gpointer user_data)
{
Node *node = value;
node_set_visited (node, FALSE);
}
void netlist_helper_wire_traverse (Wire *wire, NetlistData *data)
{
GSList *iter;
g_return_if_fail (wire != NULL);
g_return_if_fail (IS_WIRE (wire));
if (wire_is_visited (wire))
return;
wire_set_visited (wire, TRUE);
for (iter = wire_get_nodes (wire); iter; iter = iter->next) {
Node *node = iter->data;
netlist_helper_node_traverse (node, data);
}
}
void netlist_helper_node_traverse (Node *node, NetlistData *data)
{
GSList *iter;
gchar *prop;
NodeAndNumber *nan;
g_return_if_fail (node != NULL);
g_return_if_fail (IS_NODE (node));
g_return_if_fail (data != NULL);
if (node_is_visited (node))
return;
node_set_visited (node, TRUE);
// Keep track of netlist nr <---> Node.
nan = g_new0 (NodeAndNumber, 1);
nan->node_nr = data->node_nr;
nan->node = node;
data->node_and_number_list = g_list_prepend (data->node_and_number_list, nan);
// Traverse the pins at this node.
for (iter = node->pins; iter; iter = iter->next) {
Pin *pin = iter->data;
// First see if the pin belongs to an "internal", special part.
prop = part_get_property (pin->part, "internal");
if (prop) {
if (!g_ascii_strcasecmp (prop, "marker")) {
Marker *marker;
gchar *name, *value;
name = part_get_property (pin->part, "name");
if (!name) {
g_free (prop);
continue;
}
value = part_property_expand_macros (pin->part, name);
g_free (name);
if (!value)
continue;
marker = g_new0 (Marker, 1);
marker->node_nr = data->node_nr;
marker->name = value;
data->mark_list = g_slist_prepend (data->mark_list, marker);
} else if (g_ascii_strcasecmp (prop, "ground") == 0) {
data->gnd_list = g_slist_prepend (data->gnd_list, GINT_TO_POINTER (data->node_nr));
} else if (g_ascii_strcasecmp (prop, "clamp") == 0) {
data->clamp_list =
g_slist_prepend (data->clamp_list, GINT_TO_POINTER (data->node_nr));
}
g_free (prop);
}
// Keep track of models to include. Needs to be freed when the
// hash table is no longer needed.
prop = part_get_property (pin->part, "model");
if (prop) {
if (!g_hash_table_lookup (data->models, prop))
g_hash_table_insert (data->models, prop, NULL);
}
g_hash_table_insert (data->pins, pin, GINT_TO_POINTER (data->node_nr));
}
// Traverse the wires at this node.
for (iter = node->wires; iter; iter = iter->next) {
Wire *wire = iter->data;
netlist_helper_wire_traverse (wire, data);
}
}
void netlist_helper_node_foreach_traverse (gpointer key, gpointer value, NetlistData *data)
{
Node *node = value;
g_return_if_fail (data != NULL);
// Only visit nodes that are not already visited.
if (node_is_visited (node))
return;
netlist_helper_node_traverse (node, data);
data->node_nr++;
}
gint compare_marker (gconstpointer a, gconstpointer b)
{
const Marker *ma;
gint node_nr;
ma = a;
node_nr = GPOINTER_TO_INT (b);
if (ma->node_nr == node_nr)
return 0;
else
return 1;
}
gboolean netlist_helper_foreach_model_save (gpointer key, gpointer model, gpointer user_data)
{
GList **l = user_data;
(*l) = g_list_prepend (*l, g_strdup ((gchar *)key));
return TRUE;
}
gboolean netlist_helper_foreach_model_free (gpointer key, gpointer model, gpointer user_data)
{
g_free (key);
return FALSE;
}
char *netlist_helper_linebreak (char *str)
{
char **split, *tmp;
GString *out;
int i;
split = g_strsplit (str, "\\", 0);
out = g_string_new ("");
i = 0;
while (split[i] != NULL) {
if (split[i][0] == 'n') {
if (strlen (split[i]) > 1) {
out = g_string_append_c (out, '\n');
out = g_string_append (out, split[i] + 1);
}
} else {
out = g_string_append (out, split[i]);
}
i++;
}
g_strfreev (split);
tmp = out->str;
g_string_free (out, FALSE); // Don't free the string data.
return tmp;
}
void update_schematic(Schematic *sm) {
char *version = schematic_get_version(sm);
if (version == NULL) {
NodeStore *store = schematic_get_store(sm);
for (GList *iter = store->parts; iter; iter = iter->next) {
int node_ctr = 1;
Part *part = iter->data;
update_connection_designators(part, part_get_property_ref(part, "template"), &node_ctr);
}
}
schematic_set_version(sm, VERSION);
return;
}
// FIXME this one piece of ugly+bad code
void netlist_helper_create (Schematic *sm, Netlist *out, GError **error)
{
NetlistData data;
GList *iter;
Part *part;
gint pin_nr, num_nodes, num_gnd_nodes, i, j, num_clamps;
Pin *pins;
gchar *template, **template_split;
NodeStore *store;
gchar **node2real;
out->models = NULL;
out->title = schematic_get_filename (sm);
out->settings = schematic_get_sim_settings (sm);
store = schematic_get_store (sm);
out->store = store;
node_store_node_foreach (store, (GHFunc *)netlist_helper_node_foreach_reset, NULL);
for (iter = store->wires; iter; iter = iter->next) {
Wire *wire = iter->data;
wire_set_visited (wire, FALSE);
}
netlist_helper_init_data (&data);
data.store = store;
node_store_node_foreach (store, (GHFunc *)netlist_helper_node_foreach_traverse, &data);
num_gnd_nodes = g_slist_length (data.gnd_list);
num_clamps = g_slist_length (data.clamp_list);
// Check if there is a Ground node
if (num_gnd_nodes == 0) {
g_set_error (error, OREGANO_ERROR, OREGANO_SIMULATE_ERROR_NO_GND,
_ ("At least one GND is required. Add at least one and try again."));
}
else if (num_clamps == 0) {
// FIXME put a V/I clamp on each and every subtree
// FIXME and let the user toggle visibility in the plot window
// FIXME see also TODO/FIXME above
g_set_error (error, OREGANO_ERROR, OREGANO_SIMULATE_ERROR_NO_CLAMP,
_ ("No test clamps found. Add at least one and try again."));
}
else {
num_nodes = data.node_nr - 1;
// Build an array for going from node nr to "real node nr",
// where gnd nodes are nr 0 and the rest of the nodes are
// 1, 2, 3, ...
node2real = g_new0 (gchar *, num_nodes + 1 + 1);
node2real[num_nodes + 1] = NULL; // so we can use g_strfreev
for (i = 1, j = 1; i <= num_nodes; i++) {
GSList *mlist;
if (g_slist_find (data.gnd_list, GINT_TO_POINTER (i))) {
node2real[i] = g_strdup ("0");
} else if ((mlist = g_slist_find_custom (data.mark_list, GINT_TO_POINTER (i),
compare_marker))) {
Marker *marker = mlist->data;
node2real[i] = g_strdup (marker->name);
} else {
node2real[i] = g_strdup_printf ("%d", j++);
}
}
// Fill in the netlist node names for all the used nodes.
for (iter = data.node_and_number_list; iter; iter = iter->next) {
NodeAndNumber *nan = iter->data;
if (nan->node_nr > 0) {
g_free (nan->node->netlist_node_name);
nan->node->netlist_node_name = g_strdup (node2real[nan->node_nr]);
}
}
// Initialize out->template
out->template = g_string_new ("");
for (iter = store->parts; iter; iter = iter->next) {
part = iter->data;
gchar *tmp, *internal;
GString *str;
internal = part_get_property (part, "internal");
if (internal != NULL) {
gint node_nr;
Pin *pins;
if (g_ascii_strcasecmp (internal, "clamp") != 0) {
g_free (internal);
continue;
}
// Got a clamp!, set node number
pins = part_get_pins (part);
node_nr = GPOINTER_TO_INT (g_hash_table_lookup (data.pins, &pins[0]));
if (!node_nr) {
g_warning ("Couldn't find part, pin_nr %d.", 0);
} else {
// need to substrac 1, netlist starts in 0, and node_nr in 1
pins[0].node_nr = atoi (node2real[node_nr]);
}
g_free (internal);
continue;
}
tmp = part_get_property (part, "template");
if (!tmp) {
continue;
}
template = part_property_expand_macros (part, tmp);
NG_DEBUG ("Template: '%s'\n"
"macro : '%s'\n",
tmp, template);
g_free (tmp);
tmp = netlist_helper_linebreak (template);
g_free (template);
template = tmp;
pins = part_get_pins (part);
GRegex *regex;
GMatchInfo *match_info;
GError *error = NULL;
regex = g_regex_new("%\\d*", 0, 0, NULL);
g_regex_match_full(regex, template, -1, 0, 0, &match_info, &error);
template_split = g_regex_split(regex, template, 0);
str = g_string_new ("");
NG_DEBUG ("Reading pins.\n)");
int i;
for (i = 0; g_match_info_matches(match_info); i++) {
g_string_append (str, template_split[i]);
gchar *word = g_match_info_fetch(match_info, 0);
pin_nr = g_ascii_strtoll(word + 1, NULL, 10) - 1;
gint node_nr = 0;
node_nr = GPOINTER_TO_INT (g_hash_table_lookup (data.pins, &pins[pin_nr]));
if (!node_nr) {
g_set_error (&error, OREGANO_ERROR, OREGANO_SIMULATE_ERROR_NO_SUCH_PART,
_ ("Could not find part in library, pin #%d."), pin_nr);
return; // FIXME wtf?? this leaks like hell and did for ages!
} else {
gchar *tmp;
tmp = node2real[node_nr];
// need to substrac 1, netlist starts in 0, and node_nr in 1
pins[pin_nr].node_nr = atoi (node2real[node_nr]);
g_string_append (str, tmp);
NG_DEBUG ("str: %s\n", str->str);
}
g_free(word);
g_match_info_next(match_info, NULL);
}
g_match_info_free(match_info);
g_free (template);
template = NULL;
g_regex_unref(regex);
if (template_split[i] != NULL) {
g_string_append (str, template_split[i]);
}
g_strfreev (template_split);
if (error != NULL) {
g_printerr("Error while matching: %s\n", error->message);
g_error_free(error);
}
NG_DEBUG ("Done with pins, i = %d\n", i);
NG_DEBUG ("str: %s\n", str->str);
out->template = g_string_append (out->template, str->str);
out->template = g_string_append_c (out->template, '\n');
g_string_free (str, TRUE);
}
g_strfreev (node2real);
g_hash_table_foreach (data.models, (GHFunc)netlist_helper_foreach_model_save, &out->models);
return;
}
g_hash_table_foreach (data.models, (GHFunc)netlist_helper_foreach_model_free, NULL);
g_hash_table_destroy (data.models);
g_hash_table_destroy (data.pins);
g_list_free_full (data.node_and_number_list, (GDestroyNotify)g_free);
}
char *netlist_helper_create_analysis_string (NodeStore *store, gboolean do_ac)
{
GList *iter;
Part *part;
gchar *prop;
GString *out;
gchar *ret;
out = g_string_new ("");
for (iter = node_store_get_parts (store); iter; iter = iter->next) {
part = iter->data;
prop = part_get_property (part, "internal");
if (prop) {
if (!g_ascii_strcasecmp (prop, "clamp")) {
Pin *pins = part_get_pins (part);
prop = part_get_property (part, "type");
if (!g_ascii_strcasecmp (prop, "v")) {
if (!do_ac) {
g_string_append_printf (out, " %s(%d)", prop, pins[0].node_nr);
} else {
gchar *ac_type, *ac_db;
ac_type = part_get_property (part, "ac_type");
ac_db = part_get_property (part, "ac_db");
if (!g_ascii_strcasecmp (ac_db, "true"))
g_string_append_printf (out, " %s%sdb(%d)", prop, ac_type,
pins[0].node_nr);
else
g_string_append_printf (out, " %s%s(%d)", prop, ac_type,
pins[0].node_nr);
}
} else {
Node *node;
Coords lookup_key;
Coords part_pos;
item_data_get_pos (ITEM_DATA (part), &part_pos);
lookup_key.x = part_pos.x + pins[0].offset.x;
lookup_key.y = part_pos.y + pins[0].offset.y;
node = node_store_get_or_create_node (store, lookup_key);
if (node) {
GSList *lst, *iter;
iter = lst = netlist_helper_get_clamp_parts (store, node);
for (; iter; iter = iter->next) {
g_string_append_printf (out, " i(%s)", (char *)iter->data);
}
g_slist_free_full (lst, g_free); // need to free this, we are owning it!
}
}
}
g_free (prop);
}
}
ret = out->str;
g_string_free (out, FALSE);
return ret;
}
GSList *netlist_helper_get_voltmeters_list (Schematic *sm, GError **error, gboolean with_type)
{
Netlist netlist_data;
GError *e = NULL;
GSList *clamp_list = NULL;
NodeStore *node_store;
GList *iter;
gchar *prop;
Part *part;
Pin *pins;
gint i;
gchar *ac_type, *ac_db, *tmp;
netlist_helper_create (sm, &netlist_data, &e);
if (e) {
g_propagate_error (error, e);
return NULL;
}
node_store = netlist_data.store;
for (iter = node_store_get_parts (node_store); iter; iter = iter->next) {
part = iter->data;
prop = part_get_property (part, "internal");
if (prop) {
if (!g_ascii_strcasecmp (prop, "clamp")) {
g_free (prop);
prop = part_get_property (part, "type");
if (!g_ascii_strcasecmp (prop, "v")) {
pins = part_get_pins (part);
if (with_type) {
ac_type = part_get_property(part, "ac_type");
ac_db = part_get_property(part, "ac_db");
i = 0;
while (ac_type[i]) {
ac_type[i] = g_ascii_toupper(ac_type[i]);
i++;
}
if (!g_strcmp0(ac_db, "true"))
tmp = g_strdup_printf ("VDB(%d)", pins[0].node_nr);
else
tmp = g_strdup_printf ("V%s(%d)", ac_type, pins[0].node_nr);
g_free(ac_type);
g_free(ac_db);
} else {
tmp = g_strdup_printf ("%d", pins[0].node_nr);
}
clamp_list = g_slist_prepend (clamp_list, tmp);
if (0)
printf ("clamp_list = %s\n", tmp);
}
}
g_free(prop);
}
}
if (0) {
clamp_list = g_slist_prepend (clamp_list, "3");
clamp_list = g_slist_prepend (clamp_list, "2");
clamp_list = g_slist_prepend (clamp_list, "1");
}
if (0) {
GSList *slist = NULL;
gchar *text = NULL;
slist = g_slist_copy (clamp_list);
text = g_strdup_printf ("V(%d)", atoi (slist->data));
slist = slist->next;
while (slist) {
text = g_strdup_printf ("%s V(%d)", text, atoi (slist->data));
slist = slist->next;
}
if (0)
printf ("clamp_list = %s\n", text);
}
return clamp_list;
}
GSList *netlist_helper_get_voltage_sources_list (Schematic *sm, GError **error, gboolean ac_only)
{
Netlist netlist_data;
GError *e = NULL;
GSList *sources_list = NULL;
NodeStore *node_store;
GList *iter;
gchar *prop;
Part *part;
netlist_helper_create (sm, &netlist_data, &e);
if (e) {
g_propagate_error (error, e);
return NULL;
}
node_store = netlist_data.store;
for (iter = node_store_get_parts (node_store); iter; iter = iter->next) {
part = iter->data;
prop = part_get_property (part, "Refdes");
if (prop) {
if (prop[0] == 'V' && (prop[1] >= '0' && prop[1] <= '9')) {
gchar *tmp;
tmp = g_strdup (&prop[1]);
if (ac_only) {
g_free(prop);
prop = part_get_property (part, "Frequency");
if (prop)
sources_list = g_slist_append (sources_list, tmp);
} else {
sources_list = g_slist_append (sources_list, tmp);
}
if (0)
printf ("sources_list = %s\n", tmp);
}
g_free(prop);
}
}
return sources_list;
}
oregano-0.84.41/src/engines/netlist-helper.h 0000644 0001750 0001750 00000004423 13413640652 017670 0 ustar ruben ruben /*
* netlist-helper.h
*
*
* Author:
* Richard Hult
* Ricardo Markiewicz
* Andres de Barbara
* Marc Lorber
* Guido Trentalancia
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2004 Ricardo Markiewicz
* Copyright (C) 2009-2010 Marc Lorber
* Copyright (C) 2017 Guido Trentalancia
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#ifndef __NETLIST_HELPER_H
#define __NETLIST_HELPER_H
#include
#include "schematic.h"
#include "sim-settings.h"
typedef struct
{
gint node_nr; ///< Node number
GHashTable *pins;
GHashTable *models;
GSList *gnd_list; ///< Ground parts on the schematic
GSList *clamp_list; ///< Test clamps on the schematic
GSList *mark_list;
GList *node_and_number_list;
NodeStore *store;
} NetlistData;
typedef struct
{
gchar *cmd;
gchar *title;
GString *template;
SimSettings *settings;
NodeStore *store;
GList *models;
} Netlist;
typedef struct
{
gint node_nr;
gchar *name;
} Marker;
typedef struct
{
gint node_nr;
Node *node;
} NodeAndNumber;
void update_schematic(Schematic *sm);
void netlist_helper_init_data (NetlistData *data);
void netlist_helper_create (Schematic *sm, Netlist *out, GError **error);
char *netlist_helper_create_analysis_string (NodeStore *store, gboolean do_ac);
GSList *netlist_helper_get_voltmeters_list (Schematic *sm, GError **error, gboolean with_type);
GSList *netlist_helper_get_voltage_sources_list (Schematic *sm, GError **error, gboolean ac_only);
#endif
oregano-0.84.41/src/engines/ngspice.h 0000644 0001750 0001750 00000005173 13413640652 016364 0 ustar ruben ruben /*
* ngspice.h
*
* Authors:
* Ricardo Markiewicz
* Marc Lorber
* Guido Trentalancia
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2006 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
* Copyright (C) 2017 Guido Trentalancia
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#ifndef __NGSPICE_H
#define __NGSPICE_H
/*
* The name of the vanilla spice3 executable.
*/
#define SPICE_EXE "spice3"
/*
* The name of the ngspice executable.
*/
#define NGSPICE_EXE "ngspice"
/*
* The filename used for the temporary noise
* analysis file.
*/
#define NOISE_ANALYSIS_FILENAME "oregano-noise.txt"
#include
#include "engine.h"
#define OREGANO_TYPE_NGSPICE (oregano_ngspice_get_type ())
#define OREGANO_NGSPICE(obj) \
(G_TYPE_CHECK_INSTANCE_CAST ((obj), OREGANO_TYPE_NGSPICE, OreganoNgSpice))
#define OREGANO_NGSPICE_CLASS(vtable) \
(G_TYPE_CHECK_CLASS_CAST ((vtable), OREGANO_TYPE_NGSPICE, OreganoNgSpiceClass))
#define OREGANO_IS_NGSPICE(obj) (G_TYPE_CHECK_INSTANCE_TYPE ((obj), OREGANO_TYPE_NGSPICE))
#define OREGANO_IS_NGSPICE_CLASS(vtable) (G_TYPE_CHECK_CLASS_TYPE ((vtable), OREGANO_TYPE_NGSPICE))
#define OREGANO_NGSPICE_GET_CLASS(inst) \
(G_TYPE_INSTANCE_GET_CLASS ((inst), OREGANO_TYPE_NGSPICE, OreganoNgSpiceClass))
typedef struct _OreganoNgSpice OreganoNgSpice;
typedef struct _OreganoNgSpicePriv OreganoNgSpicePriv;
typedef struct _OreganoNgSpiceClass OreganoNgSpiceClass;
struct _OreganoNgSpice
{
GObject parent;
OreganoNgSpicePriv *priv;
};
struct _OreganoNgSpiceClass
{
GObjectClass parent;
};
GType oregano_ngspice_get_type (void);
OreganoEngine *oregano_spice_new (Schematic *sm, gboolean is_vanilla);
#endif
oregano-0.84.41/src/engines/ngspice-watcher.c 0000644 0001750 0001750 00000063472 13413640652 020020 0 ustar ruben ruben /*
* ngspice-watcher.c
*
*
* Authors:
* Michi
*
* Web page: https://ahoi.io/project/oregano
*
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include
#include
#include
#include "../tools/thread-pipe.h"
#include "ngspice.h"
#include "ngspice-analysis.h"
#include "../log-interface.h"
#include "ngspice-watcher.h"
enum ERROR_STATE {
ERROR_STATE_NO_ERROR,
ERROR_STATE_NO_SUCH_FILE_OR_DIRECTORY,
ERROR_STATE_ERROR_IN_NETLIST
};
//data wrapper
typedef struct {
GMutex mutex;
GCond cond;
gboolean boolean;
} IsNgspiceStderrDestroyed;
//data wrapper
typedef struct {
gchar *path_to_file;
ThreadPipe *pipe;
CancelInfo *cancel_info;
} NgSpiceSaverResources;
//data wrapper
typedef struct {
ThreadPipe *thread_pipe_worker;
ThreadPipe *thread_pipe_saver;
} NgSpiceWatchForkResources;
//data wrapper
typedef struct {
NgSpiceWatchForkResources ngspice_watch_fork_resources;
guint cancel_info_count;
CancelInfo *cancel_info;
} NgSpiceWatchSTDOUTResources;
//data wrapper
typedef struct {
ProgressResources *progress_ngspice;
LogInterface log;
const SimSettings *sim_settings;
enum ERROR_STATE *error_state;
IsNgspiceStderrDestroyed *is_ngspice_stderr_destroyed;
} NgSpiceWatchSTDERRResources;
//data wrapper
typedef struct {
GThread *worker;
GThread *saver;
LogInterface log;
const void* emit_instance;
GPid *child_pid;
gboolean *aborted;
guint *num_analysis;
GMainLoop *main_loop;
gchar *netlist_file;
gchar *ngspice_result_file;
enum ERROR_STATE *error_state;
IsNgspiceStderrDestroyed *is_ngspice_stderr_destroyed;
CancelInfo *cancel_info;
} NgSpiceWatcherWatchNgSpiceResources;
/**
* Wraps the heavy work of a function into a thread.
*/
static gpointer ngspice_worker (NgspiceAnalysisResources *resources) {
ngspice_analysis(resources);
cancel_info_unsubscribe(resources->cancel_info);
g_free(resources);
return NULL;
}
/**
* Wraps the heavy work of a function into a thread.
*/
static gpointer ngspice_saver (NgSpiceSaverResources *resources)
{
ngspice_save(resources->path_to_file, resources->pipe, resources->cancel_info);
cancel_info_unsubscribe(resources->cancel_info);
g_free(resources->path_to_file);
g_free(resources);
return NULL;
}
/**
* returns the number of strings in a NULL terminated array of strings
*/
static int get_count(gchar** array) {
int i = 0;
while (array[i] != NULL)
i++;
return i;
}
/**
* adds the line number followed by a colon and a space at the beginning of each line
*/
static void add_line_numbers(gchar **string) {
gchar **splitted = g_regex_split_simple("\\n", *string, 0, 0);
GString *new_string = g_string_new("");
//why -1? Because g_regex_split_simple adds one empty string too much at the end
//of the array.
int count = get_count(splitted) - 1;
int max_length = floor(log10((double) count)) + 1;
//splitted[i+1] != NULL (why not only i but i+1?) because g_regex_split_simple
//adds one empty string too much at the end of the array
for (int i = 0; splitted[i+1] != NULL; i++)
g_string_append_printf(new_string, "%0*d: %s\n", max_length, i+1, splitted[i]);
//remove the last newline, which was added additionally
new_string = g_string_truncate(new_string, new_string->len - 1);
g_free(*string);
*string = new_string->str;
g_string_free(new_string, FALSE);
}
//data wrapper
typedef struct {
const void* emit_instance;
gchar *signal_name;
} NgspiceEmitData;
/**
* Use this function to return the program main control flow to the
* main thread (which is the gui thread).
*/
static gboolean g_signal_emit_by_name_main_thread(NgspiceEmitData *data) {
const void* emit_instance = data->emit_instance;
gchar *signal_name = data->signal_name;
g_free(data);
g_signal_emit_by_name (G_OBJECT (emit_instance), signal_name);
g_free(signal_name);
return G_SOURCE_REMOVE;
}
/**
* main function of the ngspice watcher
*/
static gpointer ngspice_watcher_main(GMainLoop *main_loop) {
g_main_loop_run(main_loop);
// unrefs its GMainContext by 1
g_main_loop_unref(main_loop);
return NULL;
}
/**
* forks data to file and heap
*/
static void ngspice_watcher_fork_data(NgSpiceWatchForkResources *resources, gpointer data, gsize size) {
thread_pipe_push(resources->thread_pipe_worker, data, size);
/**
* size_in = size - 1, because the trailing 0 of the string should not
* be written to file.
*/
thread_pipe_push(resources->thread_pipe_saver, data, size - 1);
}
/**
* forks eof to file-pipe and heap-pipe
*/
static void ngspice_watcher_fork_eof(NgSpiceWatchForkResources *resources) {
thread_pipe_set_write_eof(resources->thread_pipe_worker);
thread_pipe_set_write_eof(resources->thread_pipe_saver);
}
/**
* Does not handle input resources.
*/
static gboolean ngspice_watcher_watch_stdout_resources(GIOChannel *channel, GIOCondition condition, NgSpiceWatchSTDOUTResources *resources) {
gchar *str_return = NULL;
gsize length;
gsize terminator_pos;
GError *error = NULL;
resources->cancel_info_count++;
if (resources->cancel_info_count % 50 == 0 && cancel_info_is_cancel(resources->cancel_info)) {
return G_SOURCE_REMOVE;
}
GIOStatus status = g_io_channel_read_line(channel, &str_return, &length, &terminator_pos, &error);
if (error) {
gchar *message = g_strdup_printf ("spice pipe stdout: %s - %i", error->message, error->code);
g_printf("%s", message);
g_free(message);
g_clear_error (&error);
} else if (status == G_IO_STATUS_NORMAL && length > 0) {
ngspice_watcher_fork_data(&resources->ngspice_watch_fork_resources, str_return, length + 1);
} else if (status == G_IO_STATUS_EOF) {
return G_SOURCE_REMOVE;
}
if (str_return)
g_free(str_return);
return G_SOURCE_CONTINUE;
}
/**
* ngspice reading source function
*
* reads the pipe (stdout) of ngspice
*/
static gboolean ngspice_watcher_watch_stdout(GIOChannel *channel, GIOCondition condition, NgSpiceWatchSTDOUTResources *resources) {
gboolean g_source_continue = ngspice_watcher_watch_stdout_resources(channel, condition, resources);
if (g_source_continue == G_SOURCE_CONTINUE)
return G_SOURCE_CONTINUE;
ngspice_watcher_fork_eof(&resources->ngspice_watch_fork_resources);
g_source_destroy(g_main_current_source());
cancel_info_unsubscribe(resources->cancel_info);
g_free(resources);
return G_SOURCE_REMOVE;
}
static void ngspice_watch_ngspice_resources_finalize(NgSpiceWatcherWatchNgSpiceResources *resources) {
g_source_destroy(g_main_current_source());
g_main_loop_quit(resources->main_loop);
g_spawn_close_pid (*resources->child_pid);
*resources->child_pid = 0;
g_free(resources->ngspice_result_file);
g_free(resources->netlist_file);
g_free(resources->error_state);
g_mutex_clear(&resources->is_ngspice_stderr_destroyed->mutex);
g_cond_clear(&resources->is_ngspice_stderr_destroyed->cond);
g_free(resources);
}
static void print_additional_info(LogInterface log, const gchar *ngspice_result_file, const gchar *netlist_file) {
log.log_append_error(log.log, "\n### spice output: ###\n\n");
gchar *ngspice_error_contents = NULL;
gsize ngspice_error_length;
GError *ngspice_error_read_error = NULL;
g_file_get_contents(ngspice_result_file, &ngspice_error_contents, &ngspice_error_length, &ngspice_error_read_error);
add_line_numbers(&ngspice_error_contents);
log.log_append_error(log.log, ngspice_error_contents);
g_free(ngspice_error_contents);
if (ngspice_error_read_error != NULL)
g_error_free(ngspice_error_read_error);
gchar *netlist_contents = NULL;
gsize netlist_lentgh;
GError *netlist_read_error = NULL;
g_file_get_contents(netlist_file, &netlist_contents, &netlist_lentgh, &netlist_read_error);
add_line_numbers(&netlist_contents);
log.log_append_error(log.log, "\n\n### netlist: ###\n\n");
log.log_append_error(log.log, netlist_contents);
g_free(netlist_contents);
if (netlist_read_error != NULL)
g_error_free(netlist_read_error);
}
enum NGSPICE_WATCHER_RETURN_VALUE {
NGSPICE_WATCHER_RETURN_VALUE_DONE,
NGSPICE_WATCHER_RETURN_VALUE_ABORTED,
NGSPICE_WATCHER_RETURN_VALUE_CANCELED
};
/**
* Does not care about input resource handling.
*/
static enum NGSPICE_WATCHER_RETURN_VALUE
ngspice_watcher_watch_ngspice_resources (GPid pid, gint status, NgSpiceWatcherWatchNgSpiceResources *resources) {
GThread *worker = resources->worker;
GThread *saver = resources->saver;
LogInterface log = resources->log;
guint *num_analysis = resources->num_analysis;
enum ERROR_STATE *error_state = resources->error_state;
IsNgspiceStderrDestroyed *is_ngspice_stderr_destroyed = resources->is_ngspice_stderr_destroyed;
// wait for stderr to finish reading
g_mutex_lock(&is_ngspice_stderr_destroyed->mutex);
while (!is_ngspice_stderr_destroyed->boolean)
g_cond_wait(&is_ngspice_stderr_destroyed->cond, &is_ngspice_stderr_destroyed->mutex);
g_mutex_unlock(&is_ngspice_stderr_destroyed->mutex);
GError *exit_error = NULL;
gboolean exited_normal = g_spawn_check_exit_status(status, &exit_error);
if (exit_error != NULL)
g_error_free(exit_error);
g_thread_join(worker);
if (cancel_info_is_cancel(resources->cancel_info))
return NGSPICE_WATCHER_RETURN_VALUE_CANCELED;
if (!exited_normal) {
// check for exit via return in main, exit() or _exit() of the child, see man
// waitpid(2)
// WIFEXITED(wstatus)
// returns true if the child terminated normally, that is, by call‐
// ing exit(3) or _exit(2), or by returning from main().
if (!(WIFEXITED (status)))
log.log_append_error(log.log, "### spice exited with exception ###\n");
else
log.log_append_error(log.log, "### spice exited abnormally ###\n");
g_thread_join(saver);
switch (*error_state) {
case ERROR_STATE_NO_ERROR:
log.log_append_error(log.log, "### unknown error detected ###\n");
log.log_append_error(log.log, "The following information might help you to analyze the error.\n");
print_additional_info(log, resources->ngspice_result_file, resources->netlist_file);
break;
case ERROR_STATE_NO_SUCH_FILE_OR_DIRECTORY:
log.log_append_error(log.log, "spice could not simulate because netlist generation failed.\n");
break;
case ERROR_STATE_ERROR_IN_NETLIST:
log.log_append_error(log.log, "### netlist error detected ###\n");
log.log_append_error(log.log, "You made a mistake in the simulation settings or part properties.\n");
log.log_append_error(log.log, "The following information will help you to analyze the error.\n");
print_additional_info(log, resources->ngspice_result_file, resources->netlist_file);
break;
}
return NGSPICE_WATCHER_RETURN_VALUE_ABORTED;
}
// saver not needed any more. It could have been needed by error handling.
g_thread_unref(saver);
if (*num_analysis == 0) {
log.log_append_error(log.log, _("### Too few or none analysis found ###\n"));
return NGSPICE_WATCHER_RETURN_VALUE_ABORTED;
}
return NGSPICE_WATCHER_RETURN_VALUE_DONE;
}
/**
* function is called after ngspice process has died and the ngspice reading
* source function is finished with reading to
* - clean up,
* - check if all went good or fail,
* - wait for data conversion thread,
* - return the main program flow to the gui thread.
*/
static void ngspice_watcher_watch_ngspice (GPid pid, gint status, NgSpiceWatcherWatchNgSpiceResources *resources) {
enum NGSPICE_WATCHER_RETURN_VALUE ret_val = ngspice_watcher_watch_ngspice_resources (pid, status, resources);
NgspiceEmitData *emitData = g_malloc(sizeof(NgspiceEmitData));
emitData->emit_instance = resources->emit_instance;
switch(ret_val) {
case NGSPICE_WATCHER_RETURN_VALUE_ABORTED:
case NGSPICE_WATCHER_RETURN_VALUE_CANCELED:
emitData->signal_name = g_strdup("aborted");
*resources->aborted = TRUE;
break;
case NGSPICE_WATCHER_RETURN_VALUE_DONE:
emitData->signal_name = g_strdup("done");
break;
}
cancel_info_unsubscribe(resources->cancel_info);
ngspice_watch_ngspice_resources_finalize(resources);
/*
* return to main thread
*
* Don't return too early, because if you do, the ngspice
* object could be finalized but some resources depend on it.
*/
g_main_context_invoke(NULL, (GSourceFunc)g_signal_emit_by_name_main_thread, emitData);
}
/**
* Extracts a progress number (time of transient analysis)
* out of a string (if existing) and saves it to the thread-shared
* progress variable.
*/
static void read_progress_ngspice(ProgressResources *progress_ngspice, gdouble progress_end, const gchar *line) {
if (!g_regex_match_simple("Reference value.*\\r", line, 0, 0))
return;
gchar **splitted = g_regex_split_simple(".* (.+)\\r", line, 0, 0);
gchar **ptr;
for (ptr = splitted; *ptr != NULL; ptr++)
if (**ptr != 0)
break;
if (*ptr != NULL) {
gdouble progress_absolute = g_ascii_strtod(*ptr, NULL);
g_mutex_lock(&progress_ngspice->progress_mutex);
progress_ngspice->progress = progress_absolute / progress_end;
if (g_str_has_suffix(line, "\r\n"))
progress_ngspice->progress = 1;
progress_ngspice->time = g_get_monotonic_time();
g_mutex_unlock(&progress_ngspice->progress_mutex);
}
g_strfreev(splitted);
}
/**
* Reads stderr of ngspice.
*
* stderr of ngspice might contain progress information.
*/
static gboolean ngspice_child_stderr_cb (GIOChannel *channel, GIOCondition condition,
NgSpiceWatchSTDERRResources *resources)
{
LogInterface log = resources->log;
const SimSettings* const sim_settings = resources->sim_settings;
ProgressResources *progress_ngspice = resources->progress_ngspice;
enum ERROR_STATE *error_state = resources->error_state;
IsNgspiceStderrDestroyed *is_ngspice_stderr_destroyed = resources->is_ngspice_stderr_destroyed;
gchar *line = NULL;
gsize len, terminator;
GError *e = NULL;
GIOStatus status = g_io_channel_read_line (channel, &line, &len, &terminator, &e);
if (e) {
gchar *message = g_strdup_printf("spice pipe stderr: %s - %i", e->message, e->code);
log.log_append_error(log.log, message);
g_free(message);
g_clear_error (&e);
} else if (status == G_IO_STATUS_NORMAL && len > 0) {
log.log_append_error(log.log, line);
if (g_str_has_suffix(line, ": No such file or directory\n"))
*error_state = ERROR_STATE_NO_SUCH_FILE_OR_DIRECTORY;
if (g_str_equal(line, "spice stopped due to error, no simulation run!\n"))
*error_state = ERROR_STATE_ERROR_IN_NETLIST;
gdouble progress_end = sim_settings_get_trans_stop(sim_settings);
read_progress_ngspice(progress_ngspice, progress_end, line);
} else if (status == G_IO_STATUS_EOF) {
g_source_destroy(g_main_current_source());
g_free(resources);
// emit signal, that stderr reading has finished
g_mutex_lock(&is_ngspice_stderr_destroyed->mutex);
is_ngspice_stderr_destroyed->boolean = TRUE;
g_cond_signal(&is_ngspice_stderr_destroyed->cond);
g_mutex_unlock(&is_ngspice_stderr_destroyed->mutex);
return G_SOURCE_REMOVE;
}
if (line)
g_free (line);
return G_SOURCE_CONTINUE;
}
/**
* @resources: caller frees
*
* Prepares data structures to launch some threads and finally launches them.
*
* The launched threads are:
* - process ngspice
* - thread watcher
* - thread saver
* - thread worker
*
* As you should know ngspice is the program that actually simulates the simulation.
*
* The watcher thread handles stdout- and death-events of the ngspice process.
* stdout data is forked to the threads "saver" and "worker".
* As response to the death-event of ngspice, the watcher
* - cleans the field of war,
* - checks if all went good and creates error messages if not all went good,
* - waits for the worker to finish work,
* - finally returns the main program flow to the gui thread.
*
* The stderr-events are handled by the main (gui) thread, because it is not heavy work.
* Furthermore additionally shared variables can be avoided.
*
* The saver saves the data to SSD/HDD (temporary folder). It is needed to create
* good error messages in case of failure. Besides of that the user can analyze
* the data with external/other programs.
*
* The worker parses the stream of data, interprets and converts it to structured data
* so it can be plotted by gui.
*/
void ngspice_watcher_build_and_launch(const NgspiceWatcherBuildAndLaunchResources *resources) {
LogInterface log = resources->log;
const SimSettings* const sim_settings = resources->sim_settings;
gboolean is_vanilla = resources->is_vanilla;
GPid *child_pid = resources->child_pid;
gboolean *aborted = resources->aborted;
const void* emit_instance = resources->emit_instance;
guint *num_analysis = resources->num_analysis;
ProgressResources *progress_ngspice = resources->progress_ngspice;
ProgressResources *progress_reader = resources->progress_reader;
GList **analysis = resources->analysis;
AnalysisTypeShared *current = resources->current;
GError *e = NULL;
char *argv[] = {NULL, "-b", resources->netlist_file, NULL};
if (is_vanilla)
argv[0] = SPICE_EXE;
else
argv[0] = NGSPICE_EXE;
gint ngspice_stdout_fd;
gint ngspice_stderr_fd;
// Launch ngspice
if (!g_spawn_async_with_pipes (NULL, // Working directory
argv, NULL, G_SPAWN_DO_NOT_REAP_CHILD | G_SPAWN_SEARCH_PATH, NULL,
NULL, child_pid,
NULL, // STDIN
&ngspice_stdout_fd, // STDOUT
&ngspice_stderr_fd, // STDERR
&e)) {
*aborted = TRUE;
log.log_append_error(log.log, _("Unable to execute NgSpice."));
g_signal_emit_by_name (G_OBJECT (emit_instance), "aborted");
g_clear_error (&e);
return;
}
// synchronizes stderr listener with is_ngspice_finished listener (needed for error handling)
IsNgspiceStderrDestroyed *is_ngspice_stderr_destroyed = g_new0(IsNgspiceStderrDestroyed, 1);
g_mutex_init(&is_ngspice_stderr_destroyed->mutex);
g_cond_init(&is_ngspice_stderr_destroyed->cond);
is_ngspice_stderr_destroyed->boolean = FALSE;
// variable needed for error handling
enum ERROR_STATE *error_state = g_new0(enum ERROR_STATE, 1);
GMainContext *forker_context = g_main_context_new();
GMainLoop *forker_main_loop = g_main_loop_new(forker_context, FALSE);
g_main_context_unref(forker_context);
// Create pipes to fork the stdout data of ngspice
ThreadPipe *thread_pipe_worker = thread_pipe_new(20, 2048);
ThreadPipe *thread_pipe_saver = thread_pipe_new(20, 2048);
/**
* Launch analyzer
*/
NgspiceAnalysisResources *ngspice_worker_resources = g_new0(NgspiceAnalysisResources, 1);
ngspice_worker_resources->analysis = analysis;
ngspice_worker_resources->buf = NULL;
ngspice_worker_resources->is_vanilla = is_vanilla;
ngspice_worker_resources->current = current;
ngspice_worker_resources->no_of_data_rows_ac = 0;
ngspice_worker_resources->no_of_data_rows_dc = 0;
ngspice_worker_resources->no_of_data_rows_op = 0;
ngspice_worker_resources->no_of_data_rows_transient = 0;
ngspice_worker_resources->no_of_data_rows_noise = 0;
ngspice_worker_resources->no_of_variables = 0;
ngspice_worker_resources->num_analysis = num_analysis;
ngspice_worker_resources->pipe = thread_pipe_worker;
ngspice_worker_resources->progress_reader = progress_reader;
ngspice_worker_resources->sim_settings = sim_settings;
ngspice_worker_resources->cancel_info = resources->cancel_info;
cancel_info_subscribe(ngspice_worker_resources->cancel_info);
GThread *worker = g_thread_new("spice worker", (GThreadFunc)ngspice_worker, ngspice_worker_resources);
/**
* Launch output saver
*/
NgSpiceSaverResources *ngspice_saver_resources = g_new0(NgSpiceSaverResources, 1);
ngspice_saver_resources->path_to_file = g_strdup(resources->ngspice_result_file);
ngspice_saver_resources->pipe = thread_pipe_saver;
ngspice_saver_resources->cancel_info = resources->cancel_info;
cancel_info_subscribe(ngspice_saver_resources->cancel_info);
GThread *saver = g_thread_new("spice saver", (GThreadFunc)ngspice_saver, ngspice_saver_resources);
/**
* Add an ngspice-is-finished watcher
*/
NgSpiceWatcherWatchNgSpiceResources *ngspice_watcher_watch_ngspice_resources = g_new0(NgSpiceWatcherWatchNgSpiceResources, 1);
ngspice_watcher_watch_ngspice_resources->emit_instance = emit_instance;
ngspice_watcher_watch_ngspice_resources->aborted = aborted;
ngspice_watcher_watch_ngspice_resources->child_pid = child_pid;
ngspice_watcher_watch_ngspice_resources->log = log;
ngspice_watcher_watch_ngspice_resources->num_analysis = num_analysis;
ngspice_watcher_watch_ngspice_resources->worker = worker;
ngspice_watcher_watch_ngspice_resources->saver = saver;
ngspice_watcher_watch_ngspice_resources->main_loop = forker_main_loop;
ngspice_watcher_watch_ngspice_resources->ngspice_result_file = g_strdup(resources->ngspice_result_file);
ngspice_watcher_watch_ngspice_resources->netlist_file = g_strdup(resources->netlist_file);
ngspice_watcher_watch_ngspice_resources->error_state = error_state;
ngspice_watcher_watch_ngspice_resources->is_ngspice_stderr_destroyed = is_ngspice_stderr_destroyed;
ngspice_watcher_watch_ngspice_resources->cancel_info = resources->cancel_info;
cancel_info_subscribe(ngspice_watcher_watch_ngspice_resources->cancel_info);
GSource *child_watch_source = g_child_watch_source_new (*child_pid);
g_source_set_priority (child_watch_source, G_PRIORITY_LOW);
g_source_set_callback (child_watch_source, (GSourceFunc)ngspice_watcher_watch_ngspice, ngspice_watcher_watch_ngspice_resources, NULL);
g_source_attach (child_watch_source, forker_context);
g_source_unref (child_watch_source);
/**
* Add a GIOChannel to read from process stdout
*/
NgSpiceWatchSTDOUTResources *ngspice_watch_stdout_resources = g_new0(NgSpiceWatchSTDOUTResources, 1);
ngspice_watch_stdout_resources->ngspice_watch_fork_resources.thread_pipe_worker = thread_pipe_worker;
ngspice_watch_stdout_resources->ngspice_watch_fork_resources.thread_pipe_saver = thread_pipe_saver;
ngspice_watch_stdout_resources->cancel_info = resources->cancel_info;
cancel_info_subscribe(ngspice_watch_stdout_resources->cancel_info);
GIOChannel *ngspice_stdout_channel = g_io_channel_unix_new(ngspice_stdout_fd);
g_io_channel_set_close_on_unref(ngspice_stdout_channel, TRUE);
GSource *ngspice_stdout_source = g_io_create_watch (ngspice_stdout_channel, G_IO_IN | G_IO_PRI | G_IO_HUP | G_IO_NVAL);
g_io_channel_unref(ngspice_stdout_channel);
g_source_set_priority (ngspice_stdout_source, G_PRIORITY_HIGH);
g_source_set_callback (ngspice_stdout_source, (GSourceFunc)ngspice_watcher_watch_stdout, ngspice_watch_stdout_resources, NULL);
g_source_attach (ngspice_stdout_source, forker_context);
g_source_unref (ngspice_stdout_source);
/**
* Add a GIOChannel to read from process stderr (attach to gui thread because it prints to log).
* I hope that ngspice does not print too much errors so that it is a minor work
* that does not hold the gui back from paint and user events
*/
NgSpiceWatchSTDERRResources *ngspice_watch_stderr_resources = g_new0(NgSpiceWatchSTDERRResources, 1);
ngspice_watch_stderr_resources->log = log;
ngspice_watch_stderr_resources->sim_settings = sim_settings;
ngspice_watch_stderr_resources->progress_ngspice = progress_ngspice;
ngspice_watch_stderr_resources->error_state = error_state;
ngspice_watch_stderr_resources->is_ngspice_stderr_destroyed = is_ngspice_stderr_destroyed;
GIOChannel *ngspice_stderr_channel = g_io_channel_unix_new (ngspice_stderr_fd);
g_io_channel_set_close_on_unref(ngspice_stderr_channel, TRUE);
// sometimes there is no data and then the GUI will hang up if NONBLOCK not set
g_io_channel_set_flags(ngspice_stderr_channel, g_io_channel_get_flags(ngspice_stderr_channel) | G_IO_FLAG_NONBLOCK, NULL);
GSource *channel_stderr_watch_source = g_io_create_watch(ngspice_stderr_channel, G_IO_IN | G_IO_PRI | G_IO_HUP | G_IO_NVAL);
g_io_channel_unref(ngspice_stderr_channel);
g_source_set_priority (channel_stderr_watch_source, G_PRIORITY_LOW);
g_source_set_callback (channel_stderr_watch_source, (GSourceFunc)ngspice_child_stderr_cb, ngspice_watch_stderr_resources, NULL);
g_source_attach (channel_stderr_watch_source, NULL);
g_source_unref (channel_stderr_watch_source);
// Launch watcher
g_thread_unref(g_thread_new("spice forker", (GThreadFunc)ngspice_watcher_main, forker_main_loop));
}
NgspiceWatcherBuildAndLaunchResources *ngspice_watcher_build_and_launch_resources_new(OreganoNgSpice *ngspice) {
NgspiceWatcherBuildAndLaunchResources *resources = g_new0(NgspiceWatcherBuildAndLaunchResources, 1);
resources->is_vanilla = ngspice->priv->is_vanilla;
resources->aborted = &ngspice->priv->aborted;
resources->analysis = &ngspice->priv->analysis;
resources->child_pid = &ngspice->priv->child_pid;
resources->current = &ngspice->priv->current;
resources->emit_instance = ngspice;
resources->log.log = ngspice->priv->schematic;
resources->log.log_append = (LogFunction)schematic_log_append;
resources->log.log_append_error = (LogFunction)schematic_log_append_error;
resources->num_analysis = &ngspice->priv->num_analysis;
resources->progress_ngspice = &ngspice->priv->progress_ngspice;
resources->progress_reader = &ngspice->priv->progress_reader;
resources->sim_settings = schematic_get_sim_settings(ngspice->priv->schematic);
resources->netlist_file = g_strdup("/tmp/netlist.tmp");
resources->ngspice_result_file = g_strdup("/tmp/netlist.lst");
resources->cancel_info = ngspice->priv->cancel_info;
cancel_info_subscribe(resources->cancel_info);
return resources;
}
void ngspice_watcher_build_and_launch_resources_finalize(NgspiceWatcherBuildAndLaunchResources *resources) {
cancel_info_unsubscribe(resources->cancel_info);
g_free(resources->netlist_file);
g_free(resources->ngspice_result_file);
g_free(resources);
}
oregano-0.84.41/src/engines/ngspice-analysis.c 0000644 0001750 0001750 00000106717 13413640652 020206 0 ustar ruben ruben /*
* ngspice-analysis.c
*
* Authors:
* Marc Lorber
* Bernhard Schuster
* Guido Trentalancia
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 2009-2012 Marc Lorber
* Copyright (C) 2014 Bernhard Schuster
* Copyright (C) 2017 Guido Trentalancia
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include
#include
#include
#include
#include
#include
#include "ngspice.h"
#include "netlist-helper.h"
#include "dialogs.h"
#include "engine-internal.h"
#include "ngspice-analysis.h"
#include "../tools/thread-pipe.h"
#include "../tools/cancel-info.h"
#define SP_TITLE "oregano\n"
#define CPU_TIME "CPU time since last call:"
#define TAGS_COUNT (sizeof(analysis_tags) / sizeof(struct analysis_tag))
#include "debug.h"
#define IS_THIS_ITEM(str, item) (!strncmp (str, item, strlen (item)))
#ifdef DEBUG_THIS
#undef DEBUG_THIS
#endif
#define DEBUG_THIS 1
/**
* \brief extract the resulting variables from ngspice output
*
* In ngspice a number can terminate only with a space,
* while in spice3 a number can also terminate with a
* comma.
*
* In the Fourier analysis the name of the output ends
* with a colon.
*
* Tested function.
*
* @returns a GArray filled up doubles
*/
gchar **get_variables (const gchar *str, gint *count)
{
g_return_val_if_fail (str, NULL);
gchar **out;
static gchar *tmp[100];
const gchar *start, *end;
gint i = 0;
start = str;
while (isspace (*start))
start++;
end = start;
while (*end != '\0') {
if (isspace (*end) || *end == ',' || *end == ':') {
// number ended, designate as such and replace the string
tmp[i] = g_strndup (start, (gsize)(end - start));
i++;
start = end;
while (isspace (*start) || *start == ',' || *start == ':')
start++;
end = start;
} else {
end++;
}
}
if (end > start) {
tmp[i] = g_strndup (start, (gsize)(end - start));
i++;
}
if (i == 0) {
g_warning ("NO COLUMNS FOUND\n");
return NULL;
}
// append an extra NUL slot to allow using g_strfreev
out = g_new0 (gchar *, i + 1);
(*count) = i;
memcpy (out, tmp, sizeof(gchar *) * i);
out[i] = NULL;
return out;
}
/**
* @resources: caller frees
*/
static ThreadPipe *parse_dc_analysis (NgspiceAnalysisResources *resources)
{
ThreadPipe *pipe = resources->pipe;
gchar **buf = &resources->buf;
const SimSettings* const sim_settings = resources->sim_settings;
GList **analysis = resources->analysis;
guint *num_analysis = resources->num_analysis;
static SimulationData *sdata;
static Analysis *data;
gsize size;
gboolean found = FALSE;
gchar **variables;
gint i, n = 0, index = 0;
gdouble val[10];
gdouble np1;
NG_DEBUG ("DC: result str\n>>>\n%s\n<<<", *buf);
data = g_new0 (Analysis, 1);
sdata = SIM_DATA (data);
sdata->type = ANALYSIS_TYPE_DC_TRANSFER;
sdata->functions = NULL;
np1 = 1.;
ANALYSIS (sdata)->dc.start = sim_settings_get_dc_start (sim_settings);
ANALYSIS (sdata)->dc.stop = sim_settings_get_dc_stop (sim_settings);
ANALYSIS (sdata)->dc.step = sim_settings_get_dc_step (sim_settings);
np1 = (ANALYSIS (sdata)->dc.stop - ANALYSIS (sdata)->dc.start) / ANALYSIS (sdata)->dc.step;
ANALYSIS (sdata)->dc.sim_length = np1;
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
// Calculates the number of variables
variables = get_variables (*buf, &n);
if (!variables)
return pipe;
n = n - 1;
sdata->var_names = (char **)g_new0 (gpointer, n);
sdata->var_units = (char **)g_new0 (gpointer, n);
sdata->var_names[0] = g_strdup ("Voltage sweep");
sdata->var_units[0] = g_strdup (_ ("voltage"));
sdata->var_names[1] = g_strdup (variables[2]);
sdata->var_units[1] = g_strdup (_ ("voltage"));
sdata->n_variables = 2;
sdata->got_points = 0;
sdata->got_var = 0;
sdata->data = (GArray **)g_new0 (gpointer, 2);
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
for (i = 0; i < 2; i++)
sdata->data[i] = g_array_new (TRUE, TRUE, sizeof(double));
sdata->min_data = g_new (double, n);
sdata->max_data = g_new (double, n);
// Read the data
for (i = 0; i < 2; i++) {
sdata->min_data[i] = G_MAXDOUBLE;
sdata->max_data[i] = -G_MAXDOUBLE;
}
found = FALSE;
while (((pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size)) != 0) && !found) {
if (strlen (*buf) <= 2) {
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
}
variables = get_variables (*buf, &i);
if (!variables)
return pipe;
index = atoi (variables[0]);
for (i = 0; i < n; i++) {
val[i] = g_ascii_strtod (variables[i + 1], NULL);
sdata->data[i] = g_array_append_val (sdata->data[i], val[i]);
if (val[i] < sdata->min_data[i])
sdata->min_data[i] = val[i];
if (val[i] > sdata->max_data[i])
sdata->max_data[i] = val[i];
}
sdata->got_points++;
sdata->got_var = 2;
if (index >= ANALYSIS (sdata)->dc.sim_length)
found = TRUE;
}
*analysis = g_list_append (*analysis, sdata);
(*num_analysis)++;
return pipe;
}
/**
* @resources: caller frees
*/
static ThreadPipe *parse_ac_analysis (NgspiceAnalysisResources *resources)
{
ThreadPipe *pipe = resources->pipe;
gboolean is_vanilla = resources->is_vanilla;
gchar *scale, **variables, **buf = &resources->buf;
const SimSettings* const sim_settings = resources->sim_settings;
GList **analysis = resources->analysis;
guint *num_analysis = resources->num_analysis;
static SimulationData *sdata;
static Analysis *data;
gsize size;
gboolean found = FALSE;
gint i, n = 0, index = 0;
gdouble fstart, fstop, val[10];
NG_DEBUG ("AC: result str\n>>>\n%s\n<<<", *buf);
data = g_new0 (Analysis, 1);
sdata = SIM_DATA (data);
sdata->type = ANALYSIS_TYPE_AC;
sdata->functions = NULL;
ANALYSIS (sdata)->ac.sim_length = 1.;
ANALYSIS (sdata)->ac.start = fstart = sim_settings_get_ac_start (sim_settings);
ANALYSIS (sdata)->ac.stop = fstop = sim_settings_get_ac_stop (sim_settings);
scale = sim_settings_get_ac_type (sim_settings);
if (!g_ascii_strcasecmp (scale, "LIN")) {
ANALYSIS (sdata)->ac.sim_length = (double) sim_settings_get_ac_npoints (sim_settings);
} else if (!g_ascii_strcasecmp (scale, "DEC")) {
ANALYSIS (sdata)->ac.sim_length = (double) sim_settings_get_ac_npoints (sim_settings) * log10 (fstop / fstart);
} else if (!g_ascii_strcasecmp (scale, "OCT")) {
ANALYSIS (sdata)->ac.sim_length = (double) sim_settings_get_ac_npoints (sim_settings) * log10 (fstop / fstart) / log10 (2);
}
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
// Calculates the number of variables
variables = get_variables (*buf, &n);
if (!variables)
return pipe;
n = n - 1;
sdata->var_names = (char **)g_new0 (gpointer, n);
sdata->var_units = (char **)g_new0 (gpointer, n);
sdata->var_names[0] = g_strdup ("Frequency");
sdata->var_units[0] = g_strdup (_ ("frequency"));
sdata->var_names[1] = g_strdup (variables[2]);
sdata->var_units[1] = g_strdup (_ ("voltage"));
sdata->n_variables = 2;
sdata->got_points = 0;
sdata->got_var = 0;
sdata->data = (GArray **)g_new0 (gpointer, 2);
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
for (i = 0; i < 2; i++)
sdata->data[i] = g_array_new (TRUE, TRUE, sizeof(double));
sdata->min_data = g_new (double, n);
sdata->max_data = g_new (double, n);
// Read the data
for (i = 0; i < 2; i++) {
sdata->min_data[i] = G_MAXDOUBLE;
sdata->max_data[i] = -G_MAXDOUBLE;
}
found = FALSE;
while (((pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size)) != 0) && !found) {
if (strlen (*buf) <= 2) {
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
}
variables = get_variables (*buf, &i);
if (!variables)
return pipe;
index = atoi (variables[0]);
for (i = 0; i < n; i++) {
if (i == 0)
val[i] = g_ascii_strtod (variables[i + 1], NULL);
if (is_vanilla && i > 0)
val[i] = g_ascii_strtod (variables[i + 2], NULL);
else
val[i] = g_ascii_strtod (variables[i + 1], NULL);
sdata->data[i] = g_array_append_val (sdata->data[i], val[i]);
if (val[i] < sdata->min_data[i])
sdata->min_data[i] = val[i];
if (val[i] > sdata->max_data[i])
sdata->max_data[i] = val[i];
}
sdata->got_points++;
sdata->got_var = 2;
if (index >= ANALYSIS (sdata)->ac.sim_length - 1)
found = TRUE;
}
*analysis = g_list_append (*analysis, sdata);
(*num_analysis)++;
return pipe;
}
/**
* Structure that helps parsing the output of ngspice.
*
* @name: The name (handled like an ID) of the column.
* @unit: The physical unit. it can have one of the following values:
* "none", "time", "voltage", "current", "unknown"
* @data: The data.
* @min: The min value of the data.
* @max: The max value of the data.
*/
typedef struct {
GString *name;
GString *unit;
GArray *data;
gdouble min;
gdouble max;
} NgspiceColumn;
/**
* Structure that helps parsing the output of ngspice.
*
* @ngspice_columns: The columns.
* @current_variables: New columns are appended to the end
* of the columns array. Because the index- and time-column
* are displayed repeatedly with every 3 new columns, there
* is needed an information how to interpret the incoming
* data to append it to the right columns. The current_variables
* array maps the position of the input data in the file
* to the position of the related column position in the table.
*/
typedef struct {
GPtrArray *ngspice_columns;
GArray *current_variables;
} NgspiceTable;
/**
* Allocates memory.
*
* @name: The name (ID) of the new column
* @predicted_size: The predicted end size of the new column.
*/
static NgspiceColumn *ngspice_column_new(const gchar *name, guint predicted_size) {
NgspiceColumn *ret_val = malloc(sizeof(NgspiceColumn));
ret_val->name = g_string_new(name);
if (g_str_has_prefix(name, "Index"))
ret_val->unit = g_string_new("none");
else if (g_str_has_prefix(name, "time"))
ret_val->unit = g_string_new("time");
else if (g_str_has_prefix(name, "V") || g_str_has_prefix(name, "v"))
ret_val->unit = g_string_new("voltage");
else if (g_str_has_suffix(name, "#branch"))
ret_val->unit = g_string_new("current");
else
ret_val->unit = g_string_new("unknown");
ret_val->data = g_array_sized_new(TRUE, TRUE, sizeof(gdouble), predicted_size);
ret_val->min = G_MAXDOUBLE;
ret_val->max = -G_MAXDOUBLE;
return ret_val;
}
/**
* Frees memory.
*/
static void ngspice_column_destroy(gpointer ptr) {
NgspiceColumn *column = (NgspiceColumn *)ptr;
if (column == NULL)
return;
if (column->name != NULL)
g_string_free(column->name, TRUE);
if (column->unit != NULL)
g_string_free(column->unit, TRUE);
g_free(column);
}
/**
* Allocates memory.
*/
static NgspiceTable *ngspice_table_new() {
NgspiceTable *ret_val = malloc(sizeof(NgspiceTable));
ret_val->ngspice_columns = g_ptr_array_new_with_free_func(ngspice_column_destroy);
ret_val->current_variables = g_array_new(TRUE, TRUE, sizeof(guint));
return ret_val;
}
/**
* Frees the memory.
*/
static void ngspice_table_destroy(NgspiceTable *ngspice_table) {
if (ngspice_table->ngspice_columns != NULL) {
guint len = ngspice_table->ngspice_columns->len;
for (int i = 0; i < len; i++) {
NgspiceColumn *column = ngspice_table->ngspice_columns->pdata[i];
if (column != NULL)
g_array_free(column->data, TRUE);
}
g_ptr_array_free(ngspice_table->ngspice_columns, TRUE);
}
if (ngspice_table->current_variables != NULL)
g_array_free(ngspice_table->current_variables, TRUE);
g_free(ngspice_table);
}
/**
* Converts "x...x#branch" to "I(x...x)".
*
* Let "x...x" be the name of a part in the ngspice netlist,
* then the current variable (current, that flows through
* that part) of that part is named
* "x...x#branch" in ngspice. To shorten the name and make
* it prettier, the name will be displayed as "I(x...x)"
* in Oregano (analogous to V(node_nr)).
*/
static void convert_variable_name(gchar **variable) {
gchar **splitted = g_regex_split_simple("\\#branch", *variable, 0, 0);
g_free(*variable);
*variable = g_strdup_printf("I(%s)", *splitted);
g_strfreev(splitted);
}
/**
* Creates and appends new columns to the table, if there are new variables.
* The referenced columns are now the newly added columns.
*
* @predicted_size: The predicted end size of the new columns. It is assumed
* that the new columns will have the same size.
*/
static void ngspice_table_new_columns(NgspiceTable *ngspice_table, gchar **variables, guint predicted_size) {
if (ngspice_table->ngspice_columns->len > 0) {
NgspiceColumn *column = (NgspiceColumn *)ngspice_table->ngspice_columns->pdata[0];
predicted_size = column->data->len;
}
g_array_free(ngspice_table->current_variables, TRUE);
ngspice_table->current_variables = g_array_new(TRUE, TRUE, sizeof(guint));
for (gchar **variable = variables; *variable != NULL && **variable != '\n' && **variable != 0; variable++) {
if (g_str_has_suffix(*variable, "#branch"))
convert_variable_name(variable);
int i;
for (i = 0; i < ngspice_table->ngspice_columns->len; i++) {
if (!strcmp(*variable, ((NgspiceColumn *)ngspice_table->ngspice_columns->pdata[i])->name->str))
break;
}
if (i == ngspice_table->ngspice_columns->len) {
NgspiceColumn *new_column = ngspice_column_new(*variable, predicted_size);
g_ptr_array_add(ngspice_table->ngspice_columns, new_column);
}
g_array_append_val(ngspice_table->current_variables, i);
}
}
/**
* Appends a split line to the end of the current referenced columns.
*/
static void ngspice_table_add_data(NgspiceTable *ngspice_table, gchar **data) {
g_return_if_fail(data != NULL);
g_return_if_fail(*data != NULL);
if (**data == 0)
return;
g_return_if_fail(ngspice_table != NULL);
guint64 index = g_ascii_strtoull(*data, NULL, 10);
for (int i = 0; data[i] != NULL && data[i][0] != 0 && data[i][0] != '\n' && i < ngspice_table->current_variables->len; i++) {
guint column_index = g_array_index(ngspice_table->current_variables, guint, i);
NgspiceColumn *column = (NgspiceColumn*)(ngspice_table->ngspice_columns->pdata[column_index]);
if (column->data->len > index) {
continue;//assert equal
}
gdouble new_content = g_ascii_strtod(data[i], NULL);
g_array_append_val(column->data, new_content);
if (new_content < column->min)
column->min = new_content;
if (new_content > column->max)
column->max = new_content;
}
}
/**
* Counts the number of different guints. If a certain
* guint occurs more than once, it is counted as one.
*/
static guint get_real_len(GArray *array_guint) {
guint ret_val = 0;
for (guint i = 0; i < array_guint->len; i++) {
ret_val++;
for (guint j = 0; j < i; j++) {
if (g_array_index(array_guint, guint, i) == g_array_index(array_guint, guint, j)) {
ret_val--;
break;
}
}
}
return ret_val;
}
/**
* Returns the index that is currently parsed.
*
* The first referenced column is the string-index column,
* the second referenced column is the time. The index and
* the time column can already be filled up by earlier
* iterations, so the length of the third referenced column
* represents the index that is currently parsed.
*/
static guint get_current_index(NgspiceTable *ngspice_table) {
guint column_nr = g_array_index(ngspice_table->current_variables, guint, 2);
NgspiceColumn *column = g_ptr_array_index(ngspice_table->ngspice_columns, column_nr);
return column->data->len;
}
typedef struct {
NgspiceTable *table;
ThreadPipe *pipe;
gboolean is_cancel;
} ParseTransientAnalysisReturnResources;
/**
* @resources: caller frees
*/
static ParseTransientAnalysisReturnResources parse_transient_analysis_resources (NgspiceAnalysisResources *resources)
{
gchar **buf = &resources->buf;
const SimSettings *sim_settings = resources->sim_settings;
guint *num_analysis = resources->num_analysis;
ProgressResources *progress_reader = resources->progress_reader;
guint64 no_of_data_rows = resources->no_of_data_rows_transient;
guint no_of_variables = resources->no_of_variables;
enum STATE {
NGSPICE_ANALYSIS_STATE_READ_DATA,
NGSPICE_ANALYSIS_STATE_DATA_SMALL_BLOCK_END,
NGSPICE_ANALYSIS_STATE_DATA_LARGE_BLOCK_END,
NGSPICE_ANALYSIS_STATE_DATA_END,
NGSPICE_ANALYSIS_STATE_READ_VARIABLES_NEW,
NGSPICE_ANALYSIS_STATE_READ_VARIABLES_OLD
};
g_mutex_lock(&progress_reader->progress_mutex);
progress_reader->progress = 0;
progress_reader->time = g_get_monotonic_time();
g_mutex_unlock(&progress_reader->progress_mutex);
gsize size;
NgspiceTable *ngspice_table = ngspice_table_new();
ParseTransientAnalysisReturnResources ret_val;
ret_val.table = ngspice_table;
ret_val.pipe = resources->pipe;
ret_val.is_cancel = TRUE;
enum STATE state = NGSPICE_ANALYSIS_STATE_DATA_LARGE_BLOCK_END;
guint i = 0;
do {
if (i % 50 == 0 && cancel_info_is_cancel(resources->cancel_info))
return ret_val;
switch (state) {
case NGSPICE_ANALYSIS_STATE_READ_VARIABLES_NEW:
{
gchar **splitted_line = g_regex_split_simple(" +", *buf, 0, 0);
ngspice_table_new_columns(ngspice_table, splitted_line, no_of_data_rows);
g_strfreev(splitted_line);
state = NGSPICE_ANALYSIS_STATE_READ_VARIABLES_OLD;
break;
}
case NGSPICE_ANALYSIS_STATE_READ_DATA:
{
gchar **splitted_line = g_regex_split_simple("\\t+|-{2,}", *buf, 0, 0);
ngspice_table_add_data(ngspice_table, splitted_line);
g_strfreev(splitted_line);
if ((ret_val.pipe = thread_pipe_pop(ret_val.pipe, (gpointer *)buf, &size)) == NULL)
return ret_val;
switch (*buf[0]) {
case '\f':{
// estimate progress begin
guint len_of_current_variables = get_real_len(ngspice_table->current_variables) - 2;
guint len_of_current_columns = ngspice_table->ngspice_columns->len - 2;
guint count_of_variables_already_finished = len_of_current_columns - len_of_current_variables;
g_mutex_lock(&progress_reader->progress_mutex);
progress_reader->progress = (double)count_of_variables_already_finished / (double)no_of_variables +
(double)len_of_current_variables / (double)no_of_variables *
(double)get_current_index(ngspice_table) / (double)no_of_data_rows;
progress_reader->time = g_get_monotonic_time();
g_mutex_unlock(&progress_reader->progress_mutex);
// estimate progress end
state = NGSPICE_ANALYSIS_STATE_DATA_SMALL_BLOCK_END;
break;}
case '\n':
state = NGSPICE_ANALYSIS_STATE_DATA_END;
break;
}
break;
}
case NGSPICE_ANALYSIS_STATE_READ_VARIABLES_OLD:
{
if ((ret_val.pipe = thread_pipe_pop(ret_val.pipe, (gpointer *)buf, &size)) == NULL)
return ret_val;
if (*buf[0] != '-')
state = NGSPICE_ANALYSIS_STATE_READ_DATA;
break;
}
case NGSPICE_ANALYSIS_STATE_DATA_SMALL_BLOCK_END:
{
if ((ret_val.pipe = thread_pipe_pop(ret_val.pipe, (gpointer *)buf, &size)) == NULL)
return ret_val;
switch (*buf[0]) {
case 'I':
state = NGSPICE_ANALYSIS_STATE_READ_VARIABLES_OLD;
break;
case ' ':
state = NGSPICE_ANALYSIS_STATE_DATA_LARGE_BLOCK_END;
break;
}
break;
}
case NGSPICE_ANALYSIS_STATE_DATA_LARGE_BLOCK_END:
{
if ((ret_val.pipe = thread_pipe_pop(ret_val.pipe, (gpointer *)buf, &size)) == NULL)
return ret_val;
if (*buf[0] == 'I')
state = NGSPICE_ANALYSIS_STATE_READ_VARIABLES_NEW;
break;
}
case NGSPICE_ANALYSIS_STATE_DATA_END:
break;
}
} while (state != NGSPICE_ANALYSIS_STATE_DATA_END);
ret_val.is_cancel = FALSE;
SimulationData *sdata = SIM_DATA (g_new0 (Analysis, 1));
sdata->type = ANALYSIS_TYPE_TRANSIENT;
sdata->functions = NULL;
gint nodes_nb = ngspice_table->ngspice_columns->len - 2;
ANALYSIS (sdata)->transient.sim_length =
sim_settings_get_trans_stop (sim_settings) - sim_settings_get_trans_start (sim_settings);
ANALYSIS (sdata)->transient.step_size = sim_settings_get_trans_step (sim_settings);
sdata->var_names = g_new0 (gchar *, nodes_nb + 1);
sdata->var_units = g_new0 (gchar *, nodes_nb + 1);
sdata->data = g_new0 (GArray *, nodes_nb + 1);
sdata->min_data = g_new (gdouble, nodes_nb + 1);
sdata->max_data = g_new (gdouble, nodes_nb + 1);
for (int i = 0; i < nodes_nb + 1; i++) {
NgspiceColumn *column = ngspice_table->ngspice_columns->pdata[i+1];
sdata->var_names[i] = g_strdup(column->name->str);
sdata->var_units[i] = g_strdup(column->unit->str);
sdata->data[i] = column->data;
sdata->min_data[i] = column->min;
sdata->max_data[i] = column->max;
ngspice_table->ngspice_columns->pdata[i+1] = NULL;
}
sdata->n_variables = nodes_nb + 1;
NgspiceColumn *column = ngspice_table->ngspice_columns->pdata[0];
sdata->got_points = column->data->len;
sdata->got_var = nodes_nb + 1;
(*num_analysis)++;
*resources->analysis = g_list_append (*resources->analysis, sdata);
return ret_val;
}
static ThreadPipe *parse_transient_analysis (NgspiceAnalysisResources *resources) {
ParseTransientAnalysisReturnResources ret_res = parse_transient_analysis_resources(resources);
ngspice_table_destroy(ret_res.table);
if (ret_res.is_cancel && ret_res.pipe) {
thread_pipe_set_read_eof(ret_res.pipe);
ret_res.pipe = NULL;
}
return ret_res.pipe;
}
/**
* @resources: caller frees
*/
static ThreadPipe *parse_fourier_analysis (NgspiceAnalysisResources *resources)
{
ThreadPipe *pipe = resources->pipe;
gchar **buf = &resources->buf;
const SimSettings *sim_settings = resources->sim_settings;
GList **analysis = resources->analysis;
guint *num_analysis = resources->num_analysis;
static SimulationData *sdata;
static Analysis *data;
gsize size;
gchar **variables;
gint i, n = 0, j, k;
gdouble val[3];
gchar **node_ids;
gchar *vout;
NG_DEBUG ("FOURIER: result str\n>>>\n%s\n<<<", *buf);
data = g_new0 (Analysis, 1);
sdata = SIM_DATA (data);
sdata->type = ANALYSIS_TYPE_FOURIER;
sdata->functions = NULL;
g_strchug (*buf);
ANALYSIS (sdata)->fourier.freq = sim_settings_get_fourier_frequency (sim_settings);
vout = sim_settings_get_fourier_vout (sim_settings);
node_ids = g_strsplit (vout, " ", 0);
for (i = 0; node_ids[i] != NULL; i++) {
}
g_strfreev (node_ids);
g_free (vout);
ANALYSIS (sdata)->fourier.nb_var = i + 1;
n = ANALYSIS (sdata)->fourier.nb_var;
sdata->n_variables = n;
sdata->var_names = (char **)g_new0 (gpointer, n);
sdata->var_units = (char **)g_new0 (gpointer, n);
sdata->var_names[0] = g_strdup ("Frequency");
sdata->var_units[0] = g_strdup (_ ("frequency"));
sdata->got_points = 0;
sdata->got_var = 0;
sdata->data = (GArray **)g_new0 (gpointer, n);
for (i = 0; i < n; i++)
sdata->data[i] = g_array_new (TRUE, TRUE, sizeof(double));
sdata->min_data = g_new (double, n);
sdata->max_data = g_new (double, n);
for (i = 0; i < n; i++) {
sdata->min_data[i] = G_MAXDOUBLE;
sdata->max_data[i] = -G_MAXDOUBLE;
}
// For each output voltage (plus the frequency for the x-axis),
// scan its data set
for (k = 1; k < n; k++) {
variables = get_variables (*buf, &i);
if (!variables)
return pipe;
// Skip data set header (4 lines)
for (i = 0; i < 4; i++)
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
sdata->var_names[k] = g_strdup_printf ("mag(%s)", variables[3]);
sdata->var_units[k] = g_strdup (_ ("voltage"));
// Scan data set for 10 harmonics
for (j = 0; j < 10; j++) {
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
if (!pipe)
return pipe;
sscanf (*buf, "\t%d\t%lf\t%lf\t%lf", &i, &val[0], &val[1], &val[2]);
if (k == 1) {
sdata->data[0] = g_array_append_val (sdata->data[0], val[0]);
if (val[0] < sdata->min_data[0])
sdata->min_data[0] = val[0];
if (val[0] > sdata->max_data[0])
sdata->max_data[0] = val[0];
sdata->data[1] = g_array_append_val (sdata->data[1], val[1]);
if (val[1] < sdata->min_data[1])
sdata->min_data[1] = val[1];
if (val[1] > sdata->max_data[1])
sdata->max_data[1] = val[1];
sdata->got_points = sdata->got_points + 2;
} else {
sdata->data[k] = g_array_append_val (sdata->data[k], val[1]);
if (val[1] < sdata->min_data[k])
sdata->min_data[k] = val[1];
if (val[1] > sdata->max_data[k])
sdata->max_data[k] = val[1];
sdata->got_points++;
}
}
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
if (!pipe)
return pipe;
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
if (!pipe)
return pipe;
}
sdata->got_var = n;
*analysis = g_list_append (*analysis, sdata);
(*num_analysis)++;
return pipe;
}
/**
* @resources: caller frees
*/
static ThreadPipe *parse_noise_analysis (NgspiceAnalysisResources *resources)
{
ThreadPipe *pipe = resources->pipe;
gboolean is_vanilla = resources->is_vanilla;
gchar *scale, **variables, **buf = &resources->buf;
const SimSettings* const sim_settings = resources->sim_settings;
GList **analysis = resources->analysis;
guint *num_analysis = resources->num_analysis;
static SimulationData *sdata;
static Analysis *data;
gsize size;
gboolean found = FALSE;
gint i, n = 0, index = 0;
gdouble fstart, fstop, val[10];
NG_DEBUG ("NOISE: result str\n>>>\n%s\n<<<", *buf);
data = g_new0 (Analysis, 1);
sdata = SIM_DATA (data);
sdata->type = ANALYSIS_TYPE_NOISE;
sdata->functions = NULL;
ANALYSIS (sdata)->noise.sim_length = 1.;
ANALYSIS (sdata)->noise.start = fstart = sim_settings_get_noise_start (sim_settings);
ANALYSIS (sdata)->noise.stop = fstop = sim_settings_get_noise_stop (sim_settings);
scale = sim_settings_get_noise_type (sim_settings);
if (!g_ascii_strcasecmp (scale, "LIN")) {
ANALYSIS (sdata)->noise.sim_length = (double) sim_settings_get_noise_npoints (sim_settings);
} else if (!g_ascii_strcasecmp (scale, "DEC")) {
ANALYSIS (sdata)->noise.sim_length = (double) sim_settings_get_noise_npoints (sim_settings) * log10 (fstop / fstart);
} else if (!g_ascii_strcasecmp (scale, "OCT")) {
ANALYSIS (sdata)->noise.sim_length = (double) sim_settings_get_noise_npoints (sim_settings) * log10 (fstop / fstart) / log10 (2);
}
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
// Calculates the number of variables
variables = get_variables (*buf, &n);
if (!variables)
return pipe;
n = n - 1;
sdata->var_names = (char **)g_new0 (gpointer, 3);
sdata->var_units = (char **)g_new0 (gpointer, 3);
sdata->var_names[0] = g_strdup ("Frequency");
sdata->var_units[0] = g_strdup (_ ("frequency"));
sdata->var_names[1] = g_strdup ("Input Noise Spectrum");
sdata->var_units[1] = g_strdup (_ ("psd"));
sdata->var_names[2] = g_strdup ("Output Noise Spectrum");
sdata->var_units[2] = g_strdup (_ ("psd"));
sdata->n_variables = 3;
sdata->got_points = 0;
sdata->got_var = 0;
sdata->data = (GArray **)g_new0 (gpointer, 3);
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
for (i = 0; i < 3; i++)
sdata->data[i] = g_array_new (TRUE, TRUE, sizeof(double));
sdata->min_data = g_new (double, 3);
sdata->max_data = g_new (double, 3);
// Read the data
for (i = 0; i < 3; i++) {
sdata->min_data[i] = G_MAXDOUBLE;
sdata->max_data[i] = -G_MAXDOUBLE;
}
found = FALSE;
while (!found && ((pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size)) != 0)) {
if (strlen (*buf) <= 2) {
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
}
variables = get_variables (*buf, &i);
if (!variables)
return pipe;
index = atoi (variables[0]);
for (i = 0; i < 3; i++) {
val[i] = g_ascii_strtod (variables[i + 1], NULL);
sdata->data[i] = g_array_append_val (sdata->data[i], val[i]);
if (val[i] < sdata->min_data[i])
sdata->min_data[i] = val[i];
if (val[i] > sdata->max_data[i])
sdata->max_data[i] = val[i];
}
sdata->got_points++;
if (index >= ANALYSIS (sdata)->noise.sim_length - 1)
found = TRUE;
}
// Spice 3f5 is affected by a sort of bug and prints extra data
if (is_vanilla) {
while (((pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size)) != 0)) {
if (strlen (*buf) < 2)
break;
}
}
sdata->got_var = 3;
*analysis = g_list_append (*analysis, sdata);
(*num_analysis)++;
return pipe;
}
/**
* Stores all the data coming through the given pipe to the given file.
* This is needed because in case of failure, ngspice prints additional
* error information to stdout.
*
* Maybe the user wants to analyze the ngspice output by external software.
*/
void ngspice_save (const gchar *path_to_file, ThreadPipe *pipe, CancelInfo *cancel_info)
{
FILE *file = fopen(path_to_file, "w");
gpointer buf = NULL;
gsize size;
for (int i = 0; (pipe = thread_pipe_pop(pipe, &buf, &size)) != NULL; i++) {
if (size != 0)
fwrite(buf, 1, size, file);
/**
* cancel_info uses mutex operations, so it shouldn't be
* called to often.
*/
if (i % 50 == 0 && cancel_info_is_cancel(cancel_info))
break;
}
fclose(file);
if (pipe != NULL)
thread_pipe_set_read_eof(pipe);
}
static gboolean get_analysis_type(gchar *buf_in, AnalysisType *type_out) {
int i = 0;
gchar *analysis_name = oregano_engine_get_analysis_name_by_type(i);
while (analysis_name) {
if (g_str_has_prefix (buf_in, analysis_name)) {
*type_out = i;
g_free(analysis_name);
return TRUE;
}
g_free(analysis_name);
i++;
analysis_name = oregano_engine_get_analysis_name_by_type(i);
}
return FALSE;
}
static guint64 parse_no_of_data_rows(gchar *line) {
gchar **splitted = g_regex_split_simple("No\\. of Data Rows \\: \\D*(\\d+)\\n", line, 0, 0);
guint64 no_of_data_rows = g_ascii_strtoull(splitted[1], NULL, 10);
g_strfreev(splitted);
return no_of_data_rows;
}
static guint parse_no_of_variables(ThreadPipe *pipe, gchar **buf) {
gsize size;
for (int i = 0; i < 5; i++)
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
guint no_of_variables = 0;
while (**buf != '\n') {
no_of_variables++;
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
}
return no_of_variables;
}
/**
* @resources: caller frees
*/
void ngspice_analysis (NgspiceAnalysisResources *resources)
{
ThreadPipe *pipe = resources->pipe;
const SimSettings *sim_settings = resources->sim_settings;
AnalysisTypeShared *current = resources->current;
gboolean is_vanilla = resources->is_vanilla;
gchar **buf = &resources->buf;
gsize size;
gboolean end_of_output;
gboolean transient_enabled = sim_settings_get_trans (sim_settings);
gboolean fourier_enabled = sim_settings_get_fourier (sim_settings);
gboolean dc_enabled = sim_settings_get_dc (sim_settings);
gboolean ac_enabled = sim_settings_get_ac (sim_settings);
gboolean noise_enabled = sim_settings_get_noise (sim_settings);
if (thread_pipe_pop(pipe, (gpointer *)buf, &size) == NULL)
return;
if (!is_vanilla) {
// Get the number of AC Analysis data rows
while (ac_enabled && !g_str_has_prefix (*buf, "No. of Data Rows : ")) {
if (thread_pipe_pop(pipe, (gpointer *)buf, &size) == NULL)
return;
}
if (ac_enabled && g_str_has_prefix(*buf, "No. of Data Rows : "))
resources->no_of_data_rows_ac = parse_no_of_data_rows(*buf);
if (ac_enabled && thread_pipe_pop(pipe, (gpointer *)buf, &size) == NULL)
return;
// Get the number of DC Analysis data rows
while (dc_enabled && !g_str_has_prefix (*buf, "No. of Data Rows : ")) {
if (thread_pipe_pop(pipe, (gpointer *)buf, &size) == NULL)
return;
}
if (dc_enabled && g_str_has_prefix(*buf, "No. of Data Rows : "))
resources->no_of_data_rows_dc = parse_no_of_data_rows(*buf);
if (dc_enabled && thread_pipe_pop(pipe, (gpointer *)buf, &size) == NULL)
return;
// Get the number of Operating Point Analysis data rows
while (!g_str_has_prefix (*buf, "No. of Data Rows : ")) {
if (thread_pipe_pop(pipe, (gpointer *)buf, &size) == NULL)
return;
}
if (g_str_has_prefix(*buf, "No. of Data Rows : "))
resources->no_of_data_rows_op = parse_no_of_data_rows(*buf);
if (thread_pipe_pop(pipe, (gpointer *)buf, &size) == NULL)
return;
// Get the number of Transient Analysis variables
while (transient_enabled && !g_str_has_prefix (*buf, "Initial Transient Solution")) {
if (thread_pipe_pop(pipe, (gpointer *)buf, &size) == NULL)
return;
}
if (transient_enabled && g_str_has_prefix(*buf, "Initial Transient Solution"))
resources->no_of_variables = parse_no_of_variables(pipe, buf);
if (transient_enabled && thread_pipe_pop(pipe, (gpointer *)buf, &size) == NULL)
return;
// Get the number of Transient Analysis data rows
while (transient_enabled && !g_str_has_prefix (*buf, "No. of Data Rows : ")) {
if (thread_pipe_pop(pipe, (gpointer *)buf, &size) == NULL)
return;
}
if (transient_enabled && g_str_has_prefix(*buf, "No. of Data Rows : "))
resources->no_of_data_rows_transient = parse_no_of_data_rows(*buf);
if (transient_enabled && thread_pipe_pop(pipe, (gpointer *)buf, &size) == NULL)
return;
// Get the number of Noise Analysis data rows
while (noise_enabled && !g_str_has_prefix (*buf, "No. of Data Rows : ")) {
if (thread_pipe_pop(pipe, (gpointer *)buf, &size) == NULL)
return;
}
if (noise_enabled && g_str_has_prefix(*buf, "No. of Data Rows : "))
resources->no_of_data_rows_noise = parse_no_of_data_rows(*buf);
} else {
while (!g_str_has_prefix (*buf, "Operating point information:")) {
if (thread_pipe_pop(pipe, (gpointer *)buf, &size) == NULL)
return;
}
}
while (!g_str_has_suffix (*buf, SP_TITLE)) {
if (thread_pipe_pop(pipe, (gpointer *)buf, &size) == NULL)
return;
}
end_of_output = FALSE;
for (int i = 0; transient_enabled || fourier_enabled || dc_enabled || ac_enabled || noise_enabled; i++) {
AnalysisType analysis_type = ANALYSIS_TYPE_NONE;
do {
pipe = thread_pipe_pop(pipe, (gpointer *)buf, &size);
g_strstrip (*buf);
if (!g_ascii_strncasecmp (*buf, "CPU time", 8))
end_of_output = TRUE;
NG_DEBUG ("%d buf = %s", i, *buf);
} while (pipe != NULL && !end_of_output && (*buf[0] == '*' || *buf[0] == '\0'));
// The simulation has finished: no more analysis to parse
if (end_of_output)
break;
if (!get_analysis_type(*buf, &analysis_type) && i == 0) {
oregano_warning ("No analysis found");
break;
}
gboolean unexpected_analysis_found = FALSE;
g_mutex_lock(¤t->mutex);
current->type = analysis_type;
g_mutex_unlock(¤t->mutex);
switch (analysis_type) {
case ANALYSIS_TYPE_TRANSIENT:
pipe = parse_transient_analysis (resources);
transient_enabled = FALSE;
break;
case ANALYSIS_TYPE_FOURIER:
pipe = parse_fourier_analysis (resources);
fourier_enabled = FALSE;
break;
case ANALYSIS_TYPE_DC_TRANSFER:
pipe = parse_dc_analysis (resources);
dc_enabled = FALSE;
break;
case ANALYSIS_TYPE_AC:
pipe = parse_ac_analysis (resources);
ac_enabled = FALSE;
break;
case ANALYSIS_TYPE_NOISE:
pipe = parse_noise_analysis (resources);
noise_enabled = FALSE;
break;
default:
oregano_warning ("Unexpected analysis found");
unexpected_analysis_found = TRUE;
break;
}
g_mutex_lock(¤t->mutex);
current->type = ANALYSIS_TYPE_NONE;
g_mutex_unlock(¤t->mutex);
if (unexpected_analysis_found || pipe == NULL)
break;
}
if (pipe != NULL)
thread_pipe_set_read_eof(pipe);
resources->pipe = NULL;
}
oregano-0.84.41/src/engines/ngspice-watcher.h 0000644 0001750 0001750 00000003767 13413640652 020026 0 ustar ruben ruben /*
* ngspice-watcher.h
*
*
* Authors:
* Michi
*
* Web page: https://ahoi.io/project/oregano
*
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#ifndef ENGINES_NGSPICE_WATCHER_H_
#define ENGINES_NGSPICE_WATCHER_H_
#include "../log-interface.h"
#include "../sim-settings.h"
#include "ngspice-analysis.h"
typedef struct _NgspiceWatcherBuildAndLaunchResources NgspiceWatcherBuildAndLaunchResources;
/**
* This struct has to be public for testing purposes.
*/
struct _NgspiceWatcherBuildAndLaunchResources {
LogInterface log;//in
const SimSettings* sim_settings;//in
gboolean is_vanilla;//in
GPid* child_pid;//out
gboolean* aborted;//out
//OreganoNgSpice object
const void* emit_instance;//in
guint* num_analysis;//out
ProgressResources* progress_ngspice;//out
ProgressResources* progress_reader;//out
GList** analysis;//out
AnalysisTypeShared* current;//out
gchar* ngspice_result_file;//in
gchar* netlist_file;//in
CancelInfo *cancel_info;//in
};
NgspiceWatcherBuildAndLaunchResources *ngspice_watcher_build_and_launch_resources_new(OreganoNgSpice *ngspice);
void ngspice_watcher_build_and_launch_resources_finalize(NgspiceWatcherBuildAndLaunchResources *resources);
void ngspice_watcher_build_and_launch(const NgspiceWatcherBuildAndLaunchResources *resources);
#endif /* ENGINES_NGSPICE_WATCHER_H_ */
oregano-0.84.41/src/engines/engine.h 0000644 0001750 0001750 00000004720 13413640652 016176 0 ustar ruben ruben /*
* engine.h
*
* Authors:
* Ricardo Markiewicz
* Marc Lorber
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2006 Ricardo Markiewicz
* Copyright (C) 2009-2010 Marc Lorber
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#ifndef __ENGINE_H
#define __ENGINE_H 1
#include
#include "sim-settings.h"
#include "schematic.h"
#include "simulation.h"
#define OREGANO_ENGINE(obj) (G_TYPE_CHECK_INSTANCE_CAST ((obj), OREGANO_TYPE_ENGINE, OreganoEngine))
#define OREGANO_IS_ENGINE(obj) (G_TYPE_CHECK_INSTANCE_TYPE ((obj), OREGANO_TYPE_ENGINE))
typedef struct _OreganoEngine OreganoEngine;
// Engines IDs
enum { OREGANO_ENGINE_GNUCAP = 0, OREGANO_ENGINE_SPICE3, OREGANO_ENGINE_NGSPICE, OREGANO_ENGINE_COUNT };
OreganoEngine *oregano_engine_factory_create_engine (gint type, Schematic *sm);
GType oregano_engine_get_type (void);
void oregano_engine_start (OreganoEngine *engine);
void oregano_engine_stop (OreganoEngine *engine);
gboolean oregano_engine_has_warnings (OreganoEngine *engine);
void oregano_engine_get_progress_solver (OreganoEngine *engine, double *p);
void oregano_engine_get_progress_reader (OreganoEngine *engine, double *p);
gboolean oregano_engine_generate_netlist (OreganoEngine *engine, const gchar *file, GError **error);
GList *oregano_engine_get_results (OreganoEngine *engine);
gchar *oregano_engine_get_current_operation_solver (OreganoEngine *);
gchar *oregano_engine_get_current_operation_reader (OreganoEngine *);
gboolean oregano_engine_is_available (OreganoEngine *);
gchar *oregano_engine_get_analysis_name_by_type(AnalysisType type);
gchar *oregano_engine_get_engine_name_by_index (const guint index);
gchar *oregano_engine_get_analysis_name (SimulationData *id);
#endif
oregano-0.84.41/src/engines/engine.c 0000644 0001750 0001750 00000014013 13413640652 016165 0 ustar ruben ruben /*
* engine.c
*
* Authors:
* Ricardo Markiewicz
* Marc Lorber
* Guido Trentalancia
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2006 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
* Copyright (C) 2017 Guido Trentalancia
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include
#include "engine.h"
#include "engine-internal.h"
#include "gnucap.h"
#include "ngspice.h"
static gchar *analysis_names[] = {
[ANALYSIS_TYPE_NONE] = N_ ("None"),
[ANALYSIS_TYPE_OP_POINT] = N_ ("Operating Point"),
[ANALYSIS_TYPE_TRANSIENT] = N_ ("Transient Analysis"),
[ANALYSIS_TYPE_DC_TRANSFER] = N_ ("DC transfer characteristic"),
[ANALYSIS_TYPE_AC] = N_ ("AC Analysis"),
[ANALYSIS_TYPE_TRANSFER] = N_ ("Transfer Function"),
[ANALYSIS_TYPE_DISTORTION] = N_ ("Distortion Analysis"),
[ANALYSIS_TYPE_NOISE] = N_ ("Noise Spectral Density Curves"),
[ANALYSIS_TYPE_POLE_ZERO] = N_ ("Pole-Zero Analysis"),
[ANALYSIS_TYPE_SENSITIVITY] = N_ ("Sensitivity Analysis"),
[ANALYSIS_TYPE_FOURIER] = N_ ("Fourier analysis"),
[ANALYSIS_TYPE_UNKNOWN] = N_ ("Unknown Analysis"),
NULL};
// Engines Types
static gchar *engine_names[] = {
[OREGANO_ENGINE_GNUCAP] = N_ ("gnucap"),
[OREGANO_ENGINE_SPICE3] = N_ ("spice3"),
[OREGANO_ENGINE_NGSPICE] = N_ ("ngspice"),
NULL};
// Signals
enum { DONE, ABORTED, LAST_SIGNAL };
static guint engine_signals[LAST_SIGNAL] = {0};
static void oregano_engine_base_init (gpointer g_class);
GType oregano_engine_get_type (void)
{
static GType type = 0;
if (type == 0) {
static const GTypeInfo info = {
sizeof(OreganoEngineClass),
oregano_engine_base_init, // base_init
NULL, // base_finalize
NULL, // class_init
NULL, // class_finalize
NULL, // class_data
0,
0, // n_preallocs
NULL // instance_init
};
type = g_type_register_static (G_TYPE_INTERFACE, "OreganoEngine", &info, 0);
}
return type;
}
static void oregano_engine_base_init (gpointer g_class)
{
static gboolean initialized = FALSE;
if (!initialized) {
// create interface signals here.
engine_signals[DONE] =
g_signal_new ("done", G_TYPE_FROM_CLASS (g_class), G_SIGNAL_RUN_FIRST,
G_STRUCT_OFFSET (OreganoEngineClass, done), NULL, NULL,
g_cclosure_marshal_VOID__VOID, G_TYPE_NONE, 0);
engine_signals[ABORTED] =
g_signal_new ("aborted", G_TYPE_FROM_CLASS (g_class), G_SIGNAL_RUN_FIRST,
G_STRUCT_OFFSET (OreganoEngineClass, abort), NULL, NULL,
g_cclosure_marshal_VOID__VOID, G_TYPE_NONE, 0);
initialized = TRUE;
}
}
void oregano_engine_start (OreganoEngine *self) { OREGANO_ENGINE_GET_CLASS (self)->start (self); }
void oregano_engine_stop (OreganoEngine *self) { OREGANO_ENGINE_GET_CLASS (self)->stop (self); }
gboolean oregano_engine_has_warnings (OreganoEngine *self)
{
return OREGANO_ENGINE_GET_CLASS (self)->has_warnings (self);
}
gboolean oregano_engine_is_available (OreganoEngine *self)
{
return OREGANO_ENGINE_GET_CLASS (self)->is_available (self);
}
void oregano_engine_get_progress_solver (OreganoEngine *self, double *p)
{
g_return_if_fail(OREGANO_ENGINE_GET_CLASS (self)->progress_solver != NULL);
OREGANO_ENGINE_GET_CLASS (self)->progress_solver (self, p);
}
void oregano_engine_get_progress_reader (OreganoEngine *self, double *p)
{
g_return_if_fail(OREGANO_ENGINE_GET_CLASS(self)->progress_reader != NULL);
OREGANO_ENGINE_GET_CLASS (self)->progress_reader (self, p);
}
gboolean oregano_engine_generate_netlist (OreganoEngine *self, const gchar *file, GError **error)
{
return OREGANO_ENGINE_GET_CLASS (self)->get_netlist (self, file, error);
}
GList *oregano_engine_get_results (OreganoEngine *self)
{
return OREGANO_ENGINE_GET_CLASS (self)->get_results (self);
}
gchar *oregano_engine_get_current_operation_solver (OreganoEngine *self)
{
g_return_val_if_fail(OREGANO_ENGINE_GET_CLASS (self)->get_operation_solver != NULL, NULL);
return OREGANO_ENGINE_GET_CLASS (self)->get_operation_solver (self);
}
gchar *oregano_engine_get_current_operation_reader (OreganoEngine *self)
{
g_return_val_if_fail(OREGANO_ENGINE_GET_CLASS (self)->get_operation_reader != NULL, NULL);
return OREGANO_ENGINE_GET_CLASS (self)->get_operation_reader (self);
}
OreganoEngine *oregano_engine_factory_create_engine (gint type, Schematic *sm)
{
OreganoEngine *engine;
switch (type) {
case OREGANO_ENGINE_GNUCAP:
engine = oregano_gnucap_new (sm);
break;
case OREGANO_ENGINE_SPICE3:
engine = oregano_spice_new (sm, TRUE);
break;
case OREGANO_ENGINE_NGSPICE:
engine = oregano_spice_new (sm, FALSE);
break;
default:
engine = NULL;
}
return engine;
}
gchar *oregano_engine_get_analysis_name_by_type(AnalysisType type) {
return g_strdup(_(analysis_names[type]));
}
gchar *oregano_engine_get_engine_name_by_index (const guint index) {
return g_strdup (_(engine_names[index]));
}
/**
* @sdat: nullable
*/
gchar *oregano_engine_get_analysis_name (SimulationData *sdat)
{
if (sdat == NULL) {
return g_strdup (_ (analysis_names[ANALYSIS_TYPE_UNKNOWN]));
}
return g_strdup (_ (analysis_names[sdat->type]));
}
oregano-0.84.41/src/engines/gnucap.c 0000644 0001750 0001750 00000050252 13413640652 016202 0 ustar ruben ruben /*
* gnucap.c
*
* Authors:
* Ricardo Markiewicz
* Marc Lorber
*
* Web page: https://ahoi.io/project/oregano
*
* Copyright (C) 1999-2001 Richard Hult
* Copyright (C) 2003,2006 Ricardo Markiewicz
* Copyright (C) 2009-2012 Marc Lorber
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include
#include
#include
#include
#include
#include
#include "gnucap.h"
#include "netlist-helper.h"
#include "dialogs.h"
#include "engine-internal.h"
// TODO Move analysis data and result to another file
#include "simulation.h"
struct analysis_tag
{
gchar *name;
guint len;
};
static struct analysis_tag analysis_tags[] = {
{"#", 1}, /* OP */
{"#Time", 5}, /* Transient */
{"#DC", 3}, /* DC */
{"#Freq", 5}, /* AC */
};
#define IS_THIS_ITEM(str, item) (!strncmp (str, item.name, item.len))
#define GNUCAP_TITLE '#'
#define TAGS_COUNT (sizeof(analysis_tags) / sizeof(struct analysis_tag))
// Parser STATUS
struct _OreganoGnuCapPriv
{
GPid child_pid;
gint child_stdout;
GIOChannel *child_iochannel;
gint child_iochannel_watch;
Schematic *schematic;
gboolean aborted;
GList *analysis;
gint num_analysis;
SimulationData *current;
double progress;
gboolean char_last_newline;
guint status;
guint buf_count;
};
#include "debug.h"
static void gnucap_class_init (OreganoGnuCapClass *klass);
static void gnucap_finalize (GObject *object);
static void gnucap_dispose (GObject *object);
static void gnucap_instance_init (GTypeInstance *instance, gpointer g_class);
static void gnucap_interface_init (gpointer g_iface, gpointer iface_data);
static gboolean gnucap_child_stdout_cb (GIOChannel *source, GIOCondition condition,
OreganoGnuCap *gnucap);
static void gnucap_parse (gchar *raw, gint len, OreganoGnuCap *gnucap);
static gdouble strtofloat (char *s);
static GObjectClass *parent_class = NULL;
GType oregano_gnucap_get_type (void)
{
static GType type = 0;
if (type == 0) {
static const GTypeInfo info = {sizeof(OreganoGnuCapClass),
NULL, // base_init
NULL, // base_finalize
(GClassInitFunc)gnucap_class_init, // class_init
NULL, // class_finalize
NULL, // class_data
sizeof(OreganoGnuCap),
0, // n_preallocs
(GInstanceInitFunc)gnucap_instance_init, // instance_init
NULL};
static const GInterfaceInfo gnucap_info = {
(GInterfaceInitFunc)gnucap_interface_init, // interface_init
NULL, // interface_finalize
NULL // interface_data
};
type = g_type_register_static (G_TYPE_OBJECT, "OreganoGnuCap", &info, 0);
g_type_add_interface_static (type, OREGANO_TYPE_ENGINE, &gnucap_info);
}
return type;
}
static void gnucap_class_init (OreganoGnuCapClass *klass)
{
GObjectClass *object_class;
parent_class = g_type_class_peek_parent (klass);
object_class = G_OBJECT_CLASS (klass);
object_class->dispose = gnucap_dispose;
object_class->finalize = gnucap_finalize;
}
static void gnucap_finalize (GObject *object)
{
SimulationData *data;
OreganoGnuCap *gnucap;
GList *iter;
int i;
gnucap = OREGANO_GNUCAP (object);
iter = gnucap->priv->analysis;
for (; iter; iter = iter->next) {
data = SIM_DATA (iter->data);
for (i = 0; i < data->n_variables; i++) {
g_free (data->var_names[i]);
g_free (data->var_units[i]);
}
g_free (data->var_names);
g_free (data->var_units);
for (i = 0; i < data->n_variables; i++)
g_array_free (data->data[i], TRUE);
g_free (data->min_data);
g_free (data->max_data);
g_free (iter->data);
}
g_list_free (gnucap->priv->analysis);
gnucap->priv->analysis = NULL;
parent_class->finalize (object);
}
static void gnucap_dispose (GObject *object) { parent_class->dispose (object); }
static gboolean gnucap_has_warnings (OreganoEngine *self) { return FALSE; }
static gboolean gnucap_is_available (OreganoEngine *self)
{
gchar *exe;
exe = g_find_program_in_path ("gnucap");
if (!exe)
return FALSE; // gnucap not found
g_free (exe);
return TRUE;
}
static gboolean gnucap_generate_netlist (OreganoEngine *engine, const gchar *filename,
GError **error)
{
OreganoGnuCap *gnucap;
Netlist output;
SimOption *so;
GList *iter;
FILE *file;
GError *local_error = NULL;
gnucap = OREGANO_GNUCAP (engine);
netlist_helper_create (gnucap->priv->schematic, &output, &local_error);
if (local_error != NULL) {
g_propagate_error (error, local_error);
return FALSE;
}
file = fopen (filename, "w");
if (!file) {
oregano_error (g_strdup_printf ("Creation of file %s not possible\n", filename));
return FALSE;
}
// Prints title
fputs (output.title ? output.title : "Title: ", file);
fputs ("\n"
"*----------------------------------------------"
"\n"
"*\tGNUCAP - NETLIST"
"\n",
file);
// Prints Options
fputs (".options OUT=120 ", file);
iter = sim_settings_get_options (output.settings);
for (; iter; iter = iter->next) {
so = iter->data;
// Prevent send NULL text
if (so->value) {
if (strlen (so->value) > 0) {
g_fprintf (file, "%s=%s ", so->name, so->value);
}
}
}
fputc ('\n', file);
// Include of subckt models
fputs ("*------------- Models -------------------------\n", file);
for (iter = output.models; iter; iter = iter->next) {
gchar *model;
model = (gchar *)iter->data;
g_fprintf (file, ".include %s/%s.model\n", OREGANO_MODELDIR, model);
}
// Prints template parts
fputs ("*------------- Circuit Description-------------\n", file);
fputs (output.template->str, file);
fputs ("\n*----------------------------------------------\n", file);
// Prints Transient Analysis
if (sim_settings_get_trans (output.settings)) {
gchar *tmp_str = netlist_helper_create_analysis_string (output.store, FALSE);
g_fprintf (file, ".print tran %s\n", tmp_str);
g_free (tmp_str);
g_fprintf (file, ".tran %g %g ", sim_settings_get_trans_start (output.settings),
sim_settings_get_trans_stop (output.settings));
if (!sim_settings_get_trans_step_enable (output.settings))
g_fprintf (file, "%g", (sim_settings_get_trans_stop (output.settings) -
sim_settings_get_trans_start (output.settings)) /
100);
else
g_fprintf (file, "%g", sim_settings_get_trans_step (output.settings));
if (sim_settings_get_trans_init_cond (output.settings)) {
fputs (" UIC\n", file);
} else {
fputs ("\n", file);
}
}
// Print DC Analysis
if (sim_settings_get_dc (output.settings)) {
g_fprintf (file, ".print dc %s\n",
netlist_helper_create_analysis_string (output.store, FALSE));
fputs (".dc ", file);
// GNUCAP don't support nesting so the first or the second
// Maybe an error message must be show if both are on
g_fprintf (file, "%s %g %g %g", sim_settings_get_dc_vsrc (output.settings),
sim_settings_get_dc_start (output.settings),
sim_settings_get_dc_stop (output.settings),
sim_settings_get_dc_step (output.settings));
fputc ('\n', file);
}
// Prints AC Analysis
if (sim_settings_get_ac (output.settings)) {
double ac_start, ac_stop, ac_step;
// GNUCAP dont support OCT or DEC: Maybe an error message
// must be shown if the netlist is set in that way.
ac_start = sim_settings_get_ac_start (output.settings);
ac_stop = sim_settings_get_ac_stop (output.settings);
ac_step = (ac_stop - ac_start) / sim_settings_get_ac_npoints (output.settings);
g_fprintf (file, ".print ac %s\n",
netlist_helper_create_analysis_string (output.store, TRUE));
// AC format : ac start stop step_size
g_fprintf (file, ".ac %g %g %g\n", ac_start, ac_stop, ac_step);
}
// Prints analysis using a Fourier transform
/* if (sim_settings_get_fourier (output.settings)) {
gchar *tmp_str = netlist_helper_create_analysis_string (output.store,
FALSE);
g_fprintf (file, ".four %d %s\n",
sim_settings_get_fourier_frequency (output.settings),
tmp_str);
g_free (tmp_str);
}*/
// Debug op analysis.
fputs (".print op v(nodes)\n", file);
fputs (".op\n", file);
fputs (".end\n", file);
fclose (file);
return TRUE;
}
static void gnucap_progress (OreganoEngine *self, double *d)
{
OreganoGnuCap *gnucap = OREGANO_GNUCAP (self);
gnucap->priv->progress += 0.1;
(*d) = gnucap->priv->progress;
}
static void gnucap_stop (OreganoEngine *self)
{
OreganoGnuCap *gnucap = OREGANO_GNUCAP (self);
g_io_channel_shutdown (gnucap->priv->child_iochannel, TRUE, NULL);
g_source_remove (gnucap->priv->child_iochannel_watch);
g_spawn_close_pid (gnucap->priv->child_pid);
g_spawn_close_pid (gnucap->priv->child_stdout);
}
static void gnucap_watch_cb (GPid pid, gint status, OreganoGnuCap *gnucap)
{
// check for status, see man waitpid(2)
if (WIFEXITED (status)) {
gchar *line;
gsize len;
g_io_channel_read_to_end (gnucap->priv->child_iochannel, &line, &len, NULL);
if (len > 0)
gnucap_parse (line, len, gnucap);
g_free (line);
// Free stuff
g_io_channel_shutdown (gnucap->priv->child_iochannel, TRUE, NULL);
g_source_remove (gnucap->priv->child_iochannel_watch);
g_spawn_close_pid (gnucap->priv->child_pid);
g_spawn_close_pid (gnucap->priv->child_stdout);
gnucap->priv->current = NULL;
if (gnucap->priv->num_analysis == 0) {
schematic_log_append_error (gnucap->priv->schematic,
_ ("### Too few or none analysis found ###\n"));
gnucap->priv->aborted = TRUE;
g_signal_emit_by_name (G_OBJECT (gnucap), "aborted");
} else
g_signal_emit_by_name (G_OBJECT (gnucap), "done");
}
}
static gboolean gnucap_child_stdout_cb (GIOChannel *source, GIOCondition condition,
OreganoGnuCap *gnucap)
{
gchar *line;
gsize len, terminator;
GIOStatus status;
GError *error = NULL;
status = g_io_channel_read_line (source, &line, &len, &terminator, &error);
if ((status & G_IO_STATUS_NORMAL) && (len > 0)) {
gnucap_parse (line, len, gnucap);
g_free (line);
}
// Let UI update
g_main_context_iteration (NULL, FALSE);
return TRUE;
}
static void gnucap_start (OreganoEngine *self)
{
OreganoGnuCap *gnucap;
GError *error = NULL;
char *argv[] = {"gnucap", "-b", "/tmp/netlist.tmp", NULL};
gnucap = OREGANO_GNUCAP (self);
oregano_engine_generate_netlist (self, "/tmp/netlist.tmp", &error);
if (error != NULL) {
gnucap->priv->aborted = TRUE;
schematic_log_append_error (gnucap->priv->schematic, error->message);
g_signal_emit_by_name (G_OBJECT (gnucap), "aborted");
g_error_free (error);
return;
}
error = NULL;
if (g_spawn_async_with_pipes (NULL, // Working directory
argv, NULL, G_SPAWN_DO_NOT_REAP_CHILD | G_SPAWN_SEARCH_PATH, NULL,
NULL, &gnucap->priv->child_pid,
NULL, // STDIN
&gnucap->priv->child_stdout, // STDOUT
NULL, // STDERR
&error)) {
// Add a watch for process status
g_child_watch_add (gnucap->priv->child_pid, (GChildWatchFunc)gnucap_watch_cb, gnucap);
// Add a GIOChannel to read from process stdout
gnucap->priv->child_iochannel = g_io_channel_unix_new (gnucap->priv->child_stdout);
// Watch the I/O Channel to read child strout
gnucap->priv->child_iochannel_watch = g_io_add_watch (
gnucap->priv->child_iochannel, G_IO_IN | G_IO_PRI | G_IO_HUP | G_IO_NVAL,
(GIOFunc)gnucap_child_stdout_cb, gnucap);
} else {
gnucap->priv->aborted = TRUE;
schematic_log_append_error (gnucap->priv->schematic, _ ("Unable to execute GnuCap."));
g_signal_emit_by_name (G_OBJECT (gnucap), "aborted");
}
}
static GList *gnucap_get_results (OreganoEngine *self)
{
return OREGANO_GNUCAP (self)->priv->analysis;
}
static gchar *gnucap_get_operation (OreganoEngine *self)
{
OreganoGnuCapPriv *priv = OREGANO_GNUCAP (self)->priv;
if (priv->current == NULL)
return g_strdup(_("None"));
return oregano_engine_get_analysis_name (priv->current);
}
static void gnucap_interface_init (gpointer g_iface, gpointer iface_data)
{
OreganoEngineClass *klass = (OreganoEngineClass *)g_iface;
klass->start = gnucap_start;
klass->stop = gnucap_stop;
klass->progress_solver = gnucap_progress;
klass->get_netlist = gnucap_generate_netlist;
klass->has_warnings = gnucap_has_warnings;
klass->get_results = gnucap_get_results;
klass->get_operation_solver = gnucap_get_operation;
klass->is_available = gnucap_is_available;
}
static void gnucap_instance_init (GTypeInstance *instance, gpointer g_class)
{
OreganoGnuCap *self = OREGANO_GNUCAP (instance);
self->priv = g_new0 (OreganoGnuCapPriv, 1);
self->priv->progress = 0.0;
self->priv->char_last_newline = TRUE;
self->priv->status = 0;
self->priv->buf_count = 0;
self->priv->num_analysis = 0;
self->priv->analysis = NULL;
self->priv->current = NULL;
self->priv->aborted = FALSE;
}
OreganoEngine *oregano_gnucap_new (Schematic *sc)
{
OreganoGnuCap *gnucap;
gnucap = OREGANO_GNUCAP (g_object_new (OREGANO_TYPE_GNUCAP, NULL));
gnucap->priv->schematic = sc;
return OREGANO_ENGINE (gnucap);
}
typedef struct
{
gchar *name;
} GCap_Variable;
static GCap_Variable *_get_variables (gchar *str, gint *count)
{
GCap_Variable *out;
gchar *tmp[100];
gchar *ini, *fin;
gint i = 0;
i = 0;
ini = str;
// Put blank in advance
while (isspace (*ini))
ini++;
fin = ini;
while (*fin != '\0') {
if (isspace (*fin)) {
*fin = '\0';
tmp[i] = g_strdup (ini);
*fin = ' ';
i++;
ini = fin;
while (isspace (*ini))
ini++;
fin = ini;
} else
fin++;
}
if (i == 0) {
g_warning ("NO COLUMNS FOUND\n");
return NULL;
}
out = g_new0 (GCap_Variable, i);
(*count) = i;
for (i = 0; i < (*count); i++) {
out[i].name = tmp[i];
}
return out;
}
static void _free_variables (GCap_Variable *v, gint count)
{
int i;
for (i = 0; i < count; i++)
g_free (v[i].name);
g_free (v);
}
gdouble strtofloat (gchar *s)
{
gdouble val;
gchar *error;
val = g_strtod (s, &error);
// If the value looks like : 100.u, adjust it
// We need this because GNU Cap's or ngSpice float notation
switch (error[0]) {
case 'u':
val /= 1000000;
break;
case 'n':
val /= 1000000;
val /= 1000;
break;
case 'p':
val /= 1000000;
val /= 1000000;
break;
case 'f':
val /= 100;
break;
case 'K':
val *= 1000;
break;
default:
if (strcmp (error, "Meg") == 0)
val *= 1000000;
}
return val;
}
// Main method. Here we'll transform GnuCap output
// into SimulationResults!
static void gnucap_parse (gchar *raw, gint len, OreganoGnuCap *gnucap)
{
static SimulationData *sdata;
static Analysis *data;
static char buf[1024];
GCap_Variable *variables;
OreganoGnuCapPriv *priv = gnucap->priv;
gint i, j, n;
gdouble val;
gchar *s;
for (j = 0; j < len; j++) {
if (raw[j] != '\n') {
buf[priv->buf_count++] = raw[j];
continue;
}
buf[priv->buf_count] = '\0';
// Got a complete line
s = buf;
NG_DEBUG ("%s", s);
if (s[0] == GNUCAP_TITLE) {
SimSettings *sim_settings;
gdouble np1;
sim_settings = schematic_get_sim_settings (priv->schematic);
data = g_new0 (Analysis, 1);
priv->current = sdata = SIM_DATA (data);
priv->analysis = g_list_append (priv->analysis, sdata);
priv->num_analysis++;
sdata->type = ANALYSIS_TYPE_UNKNOWN;
sdata->functions = NULL;
// Calculates the quantity of variables
variables = _get_variables (s, &n);
for (i = 0; i < TAGS_COUNT; i++)
if (IS_THIS_ITEM (variables[0].name, analysis_tags[i]))
sdata->type = i + 1;
sdata->n_variables = n;
sdata->got_points = 0;
sdata->got_var = 0;
sdata->var_names = (char **)g_new0 (gpointer, n);
sdata->var_units = (char **)g_new0 (gpointer, n);
sdata->data = (GArray **)g_new0 (gpointer, n);
for (i = 0; i < n; i++)
sdata->data[i] = g_array_new (TRUE, TRUE, sizeof(double));
sdata->min_data = g_new (double, n);
sdata->max_data = g_new (double, n);
for (i = 0; i < n; i++) {
sdata->min_data[i] = G_MAXDOUBLE;
sdata->max_data[i] = -G_MAXDOUBLE;
}
for (i = 0; i < n; i++) {
sdata->var_names[i] = g_strdup (variables[i].name);
switch (sdata->type) {
case ANALYSIS_TYPE_TRANSIENT:
if (i == 0)
sdata->var_units[i] = g_strdup (_ ("time"));
else {
if (strstr (sdata->var_names[i], "db") != NULL) {
sdata->var_units[i] = g_strdup ("db");
} else
sdata->var_units[i] = g_strdup (_ ("voltage"));
}
break;
case ANALYSIS_TYPE_AC:
if (i == 0)
sdata->var_units[i] = g_strdup (_ ("frequency"));
else {
if (strstr (sdata->var_names[i], "db") != NULL) {
sdata->var_units[i] = g_strdup ("db");
} else
sdata->var_units[i] = g_strdup (_ ("voltage"));
}
break;
default:
sdata->var_units[i] = g_strdup ("");
}
}
sdata->n_variables = n;
switch (sdata->type) {
case ANALYSIS_TYPE_TRANSIENT:
data->transient.sim_length = sim_settings_get_trans_stop (sim_settings) -
sim_settings_get_trans_start (sim_settings);
data->transient.step_size = sim_settings_get_trans_step (sim_settings);
break;
case ANALYSIS_TYPE_AC:
data->ac.start = sim_settings_get_ac_start (sim_settings);
data->ac.stop = sim_settings_get_ac_stop (sim_settings);
data->ac.sim_length = sim_settings_get_ac_npoints (sim_settings);
break;
case ANALYSIS_TYPE_OP_POINT:
break;
case ANALYSIS_TYPE_DC_TRANSFER:
np1 = 1.;
data->dc.start = sim_settings_get_dc_start (sim_settings);
data->dc.stop = sim_settings_get_dc_stop (sim_settings);
data->dc.step = sim_settings_get_dc_step (sim_settings);
np1 = (data->dc.stop - data->dc.start) / data->dc.step;
data->dc.sim_length = np1;
break;
case ANALYSIS_TYPE_TRANSFER:
case ANALYSIS_TYPE_DISTORTION:
case ANALYSIS_TYPE_NOISE:
case ANALYSIS_TYPE_POLE_ZERO:
case ANALYSIS_TYPE_SENSITIVITY:
case ANALYSIS_TYPE_FOURIER:
break;
case ANALYSIS_TYPE_NONE:
g_error (_ ("No analysis"));
break;
case ANALYSIS_TYPE_UNKNOWN:
g_error (_ ("Unknown analysis"));
break;
}
} else {
if ((priv->analysis == NULL) || (isalpha (s[0]))) {
if (priv->buf_count > 1) {
schematic_log_append (priv->schematic, s);
schematic_log_append (priv->schematic, "\n");
}
priv->buf_count = 0;
continue;
}
val = strtofloat (s);
switch (sdata->type) {
case ANALYSIS_TYPE_TRANSIENT:
priv->progress = val / data->transient.sim_length;
break;
case ANALYSIS_TYPE_AC:
priv->progress = (val - data->ac.start) / data->ac.sim_length;
break;
case ANALYSIS_TYPE_DC_TRANSFER:
priv->progress = val / data->ac.sim_length;
break;
default:
break;
}
if (priv->progress > 1.0)
priv->progress = 1.0;
variables = _get_variables (s, &n);
for (i = 0; i < n; i++) {
val = strtofloat (variables[i].name);
sdata->data[i] = g_array_append_val (sdata->data[i], val);
// Update the minimum and maximum values so far.
if (val < sdata->min_data[i])
sdata->min_data[i] = val;
if (val > sdata->max_data[i])
sdata->max_data[i] = val;
}
_free_variables (variables, n);
sdata->got_points++;
sdata->got_var = n;
}
priv->buf_count = 0;
}
}
oregano-0.84.41/src/log-interface.h 0000644 0001750 0001750 00000002411 13413640652 016013 0 ustar ruben ruben /*
* log-interface.h
*
*
* Authors:
* Michi
*
* Web page: https://ahoi.io/project/oregano
*
*
* 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 program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
/*
* Use this interface to get rid of GUI dependencies. For example
* if you want to write a unit test in which the test function
* needs a log to not throw an exception.
*/
#ifndef LOG_INTERFACE_H_
#define LOG_INTERFACE_H_
typedef void (*LogFunction)(gpointer log, const char *message);
typedef struct {
LogFunction log_append;
LogFunction log_append_error;
gpointer log;
} LogInterface;
#endif /* LOG_INTERFACE_H_ */
oregano-0.84.41/src/sim-settings.c 0000644 0001750 0001750 00000040213 13413640652 015717 0 ustar ruben ruben /*
* sim-settings.c
*
*
* Authors:
* Richard Hult
* Ricardo Markiewicz
* Andres de Barbara
* Marc Lorber